Public feed
#527618
y=200'y on muuttuja joka kuvaa pallon y-sijaintia
yplus=-15'muuttuja joka lisätään y:hyn, pomppiminen ja painovoima
x=100'pallon x-sijainti
Repeat
Circle x,y,20'pistetään pallo koordinaatteihinsa
yplus = yplus +1'painovoima
If yplus=15 Then yplus=-15'pomppiminen
y=y+yplus'lisätään pallon sijaintiin yplus(painovoima ja pomppiminen)
If KeyDown(cbkeyright) Then x=x+1'liikkuminen sivuttain
If KeyDown(cbkeyleft) Then x=x-1
DrawScreen
Forever