11 lines
173 B
Text
11 lines
173 B
Text
w = 256
|
|
|
|
open window w, w
|
|
|
|
For x = 0 To w-1
|
|
For y = 0 To w-1
|
|
r =and(xor(x, y), 255)
|
|
color r, and(r*2, 255), and(r*3, 255)
|
|
dot x, y
|
|
Next
|
|
Next
|