Na das werden doch so mindestens 50 oder mehr Procs.
Und wie gesagt, vieles wird man vielleicht optimieren können, sozusagen den kleinsten gemeinsamen Nenner finden.
Ich stell mir das so vor:
Delphi-Quellcode:
if c in ['0', '2', '3', '5', '6', '7', '8', '9']
then male_strich_oben;
if c in ['2', '3', '4', '5', '6', '8', '9']
then male_strich_mitte;
if c in ['0', '2', '3', '5', '6', '8', '9']
then male_strich_unten;
...
Das wären bei einer digitalen Darstellung die waagerechten Striche für die Ziffern.
Natürlich ist das nicht besonders übersichtlich. Besser wärs, für jedes Zeichen vorher festzulegen, welche Striche gemalt werden sollen. Aber der Vorschlag kam ja schon mal.