10 CLV:FORI=0TO1:P=(P+S/3+2)*(P<360):Y=Y+!!INKEY()*9*!Y-!!Y:Z=COS(P+90)/7:V=SIN(P+90)/7:BEEP55-S/3-Y*4,30:WAIT-9:CLS:DRAW33-Z,9-P/99,33+Z,12+V:LC16,23-Y/3:?CHR$(#ED);:LC0:?S:S=S+!P:I=!P*(Y<3):NEXT
おおー、ダイナミック! 普通のなわとびより迫力があっていいですね。私としては、もっとスピード感があると嬉しいです!