10'KAWAKUDARI 20SWITCH1:FORI=1TO4:OUTI,-1:NEXT 30LC0,0,1:?"KAWAKUDARI";:GSB@W 40CLS:X=8:Y=1 50@LP:LC RND(15),7:?"*" 60X=X-!IN(5)+!IN(8) 70IFSCR(X,Y)GOTO@ED 80IF X<0 OR X>14 GOTO@ED 90LCX,Y:?"V"; 100WAIT20:GOTO@LP 110@ED:BEEP100:WAIT10:BEEP200 120LCX,Y:?"X":LCX,Y,1:GSB@W:F=FILE():LRUN0 130@W:IF!BTN()CONT:ELSEBEEP2 140IFBTN()CONT:ELSEBEEP5:RTN