Author Topic: Flag  (Read 1166 times)

Galileo

  • Guest
Flag
« on: February 25, 2017, 08:05:25 PM »
Code: [Select]
// Galileo, 02/2017
// Based in this javascript code: https://www.dwitter.net/d/627

open window 1100, 700
backcolor 0,0,0
clear window

for t=1 to 1000 step .1
pause .02

for i=20 to 1 step -1
for j=12 to 1 step -1
A=4*t+i
W=32+cos(A)/.3
ox=50*i-7*sin(A)
oy=50*j+7*cos(A)
color 0,0,0
fill rect ox-5, oy-5, ox+W+5, oy+W+5
if j>9 then
color 255,0,0
elseif j>3
color 255,255,0
else
color 255,0,0
end if
fill rect ox, oy, ox+W, oy+W
next j
next i
next t