TetaTricks/code/Basic/yabasic-2.bas
2024-09-28 20:25:02 +02:00

6 lines
184 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+1,y+1,x+4,y+4
next y:next x