10 A=0.1
20 VX=0:VY=0
30 X=0:Y=0
40 GELLOAD "i1","icon.png"
50 SPRITEGEL "x","i1":SPRITEGEL "y","i1":SPRITEMOVE "y",0,60
60 X%=X:Y%=Y:SPRITEMOVE "x",X%,Y%
70 IF NOT SPRITEHIT("x","y") THEN GOTO 90
80 VY=0:A=0
90 Y=Y+VY*0.1:X=X+VX*0.1
100 VY=VY+A*0.1
120 IF UP(0) AND A=0 THEN VY=VY-2:Y=Y-0.1
130 A=0.1
140 IF LEFT(0) THEN VX=VX-0.1
150 IF RIGHT(0) THEN VX=VX+0.1
160 REPAINT
170 GOTO 60