Hello,
include "asm.inc"
Window 800, 800, 1
Cls 180,230,160
single ti1=0.666,ti2=0.999,ti3=0.334,da=.9999
single an2=pi/2,xa=370,ya=370,an3,an1,st=0.1
sys x1,y1,x2,y2,xc=400,yc=400,cr=32,cg=32,cb=96,e=5000
x1=cos(an1)*xa*cos(an3)+xc
y1=sin(an2)*ya*sin(an3)+yc
for i=1, e
x2=cos(an1)*xa*cos(an3)+xc
y2=sin(an2)*ya*sin(an3)+yc
color cr,cg,cb
Line x1, y1, x2, y2
an1+=st*ti1
an2+=st*ti2
an3+=st*ti3
xa*=da
ya*=da
x1=x2
y1=y2
next
text 300,8,16,"It is a rabbit"
waitkey
winExit
.
