15 lines
125 B
Text
15 lines
125 B
Text
let s = 255
|
|
|
|
for y = 0 to s
|
|
|
|
for x = 0 to s
|
|
|
|
let r = x ~ y
|
|
fgcolor r, r * 2, r * 3
|
|
dot x, y
|
|
|
|
wait
|
|
|
|
next x
|
|
|
|
next y
|