apple2a/examples/text_fill_screen_for.bas

8 lines
92 B
QBasic

10 HOME
20 FOR CH=65+128 TO 69+128
30 FOR AD = 1024 TO 2047
40 POKE AD, CH
50 NEXT
60 NEXT