6 lines
180 B
QBasic
6 lines
180 B
QBasic
open window 511,511
|
|
for x=10 to 495 step 5:for y=10 to 495 step 5
|
|
colour x/2,y/2,0
|
|
fill rectangle x,y,x+5,y+5
|
|
next y:next x
|