CLS:COLOR 0
@SYUDAN
PRINT"PUTIKON3GOU"
INPUT"HAJIMERUKA?;A DE START B DE END"SYUDAN
@SYUDANTAIOU
HANTEI=0
IF SYUDAN=="A" THEN 1
IF SYUDAN=="B" THEN 2
ON MARK @TIGAU @HAJIME @END
@TIGAU
COLOR 6:BEEP 0
PRINT''A KA B WO OSITE''
COLOR 0
GOTO @SYUDAN
2そうだね 未プレイ