VAR VVEL,Y=16 WHILE TRUE IF BUTTON()==16 THEN VVEL=2 IF Y!=16 THEN DEC Y,VVEL:VVEL=VVEL-.5 IF Y>16 THEN Y=16 WEND Or something similar