1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17
buffer = 0 open window 640, 512 setrgb 0, 0, 0, 0 clear window for i = 1 to 100 setrgb 1, mod(i, 256), mod(i, 256), mod(i, 256) clear window circle 320, 256, 1 + mod(i, 200) next i