1 'ハヤウチケ゛ーム 2 POKE #728,#00,#00,#00,#00,#00,#EF,#FC,#EF 3 VIDEO 3 5 CLS:LED0:?"マタ゛マッテ..." 6 LC 5,10:?"(#FB) (#FD)" 10 FOR I=0 TO RND(501)+250 11 IF BTN() OR BTN(SPACE) GOTO 60 12 WAIT 1 13 NEXT 20 BEEP:LED1:LC 0,1:?"イマタ゛!" 30 FOR I=0 TO 30 31 IF BTN() OR BTN(SPACE) GOTO 50 32 WAIT 1 33 NEXT 40 CLS:LC 0,0:?"サ゛ンネン...":LED0 41 LC 5,10:?"(#F4) (#FD)" 42 WAIT 60:CLS:LC 0,0:?"サ゛ンネン...":LC 5,10:?"(#E5) (#FD)":WAIT60:GOTO1 50 CLS:LC 0,0:?"ナイス!" 51 LC 5,10:BEEP:?"(#FB) (#F4)" 52 WAIT 60:CLS:LC 0,0:?"ナイス!":LC 5,10:?"(#FB) (#E5)" 53 FOR I=0 TO 5 54 LED1:WAIT10 55 LED0:WAIT10 56 NEXT 57 GOTO1 60 CLS:LC 0,0:?"フラインク゛!":LED0:BEEP 10,30 61 LC 5,10:?"(#F4) (#FD)" 62 WAIT 60:CLS:LC 0,0:?"フラインク゛!":LC 5,10:?"(#E5) (#FD)":WAIT60:GOTO1