Basic/data/FONTS.BAS

17 lines
282 B
QBasic

5 COL 0,$54,0
10 CLS
20 CROFF
30 TLOAD 1,"font5.dat",16,11
40 STILE 1
50 #a="VERSCHIEDENSTE FONTS BENUTZEN"
60 FOR i=1 TO 10
72 FOR f=0 TO 255 STEP 4
80 FONT #a,$54,f,0,2,2
100 NEXT f
110 NEXT i
120 TLOAD 1,"font2.dat",16,11
130 STILE 1
140 TLOAD 1,"font4.dat",16,11
150 STILE 1