Your aim is to click the smiley
.
Much fun!
sync on:sync rate 30:randomize timer()
set display mode 640,480,16:set text size 15:create bitmap 1,200,200
text 0,0,":)"
get image 1,0,0,text width(":)"),text height(":)"):delete bitmap 1
create bitmap 1,200,200:ink RGB(0,0,255),0
text 0,0,":)"
get image 3,0,0,text width(":)"),text height(":)"):delete bitmap 1
backdrop on:color backdrop 0:get image 2,0,0,2,2
do
sprite 1,cos(i)/2+sin(i+k)*200+320,sin(i-10)/3-sin(k*3)*200+240,1:sprite 2,mousex(),mousey(),2:hide sprite 2
if mousemovex()>0 then position mouse mousex()+tan(rnd(360)),mousey()+rnd(10)*sin(rnd(360))
if mousemovey()>0 then position mouse mousex()+rnd(10)*cos(rnd(360)),mousey()+tan(rnd(360))
if sprite collision(2,1)=1
sprite 1,cos(i)/2+sin(i+k)*200+320,sin(i-10)/3-sin(k*3)*200+240,3
if mouseclick()=1 then score=score+1
endif
i=wrapvalue(i+rnd(2)):k=wrapvalue(k+cos(i)*rnd(2))
set cursor 0,0:print "score:",score
sync
loop
"If you can't make it good
make it look good."
Bill Gates
