Selbsterzeugte Grosssymbole für Grafikdisplay in Bascom?

[Hajo]

Ich muss heute noch eine Frage loswerden!

In "Typendeklarationen in Bascom möglich?" hatte ich ja schon auf mein Problem mit der Umstellung von Pascal auf Bascom hingewiesen!

In der "Altanwendung" in 80C537-Pascal hatte ich mir fürs Grafikdisplay die Ziffern als Grosssymbole selbstgebaut und als Programmcode abgelegt (siehe Beispiel unten). Hat einer eine Idee, wie ich einen Konstanten-Array anlegen kann? Ich habe bis jetzt keinen Plan, wie dass in Bascom gehen kann.

Das ganze ins RAM abzulegen, ist bei der Datenmenge keine echte Alternative!

Danke für die Antworten und Gruss

Hajo


const Ziffer0 : array [1..164] of byte = (
$00,$0F,$E0,$00,$00,$7F,$F8,$00,$00,$FF,$FE,$00,$0 3,$FF,$FF,$00,$07,$FF,$FF,$80,$07,$FF,$FF,$C0,$0F, $F8,$3F,$E0,
$1F,$F0,$1F,$F0,$1F,$E0,$0F,$F0,$3F,$C0,$07,$F8,$3 F,$C0,$07,$F8,$3F,$C0,$07,$F8,$7F,$80,$03,$FC,$7F, $80,$03,$FC,$7F,
$80,$03,$FC,$7F,$80,$03,$FC,$FF,$80,$03,$FE,$FF,$8 0,$03,$FE,$FF,$80,$03,$FE,$FF,$80,$03,$FE,$FF,$80, $03,$FE,$FF,$80,
$03,$FE,$FF,$80,$03,$FE,$FF,$80,$03,$FE,$FF,$80,$0 3,$FE,$7F,$80,$03,$FC,$7F,$80,$03,$FC,$7F,$80,$03, $FC,$7F,$80,$07,
$FC,$3F,$C0,$07,$F8,$3F,$C0,$07,$F8,$3F,$C0,$07,$F 8,$1F,$E0,$0F,$F0,$1F,$E0,$0F,$F0,$0F,$F0,$1F,$E0, $07,$FC,$FF,$C0,
$03,$FF,$FF,$C0,$03,$FF,$FF,$80,$00,$FF,$FE,$00,$0 0,$7F,$FC,$00,$00,$0F,$E0,$00);

[PicNick]

Da gibst die Statements "DATA" "READ" etc.
Type Bascom "HELP" for help