apple2a/examples/gr_fill_screen.bas

8 lines
87 B
QBasic
Raw Normal View History

2018-08-06 07:25:27 +00:00
10 GR
15 COLOR=5
20 FOR Y = 0 TO 39
30 FOR X = 0 TO 39
40 PLOT X,Y
50 NEXT X
60 NEXT Y