指示されたボタンを素早く押し終わるまでを競うタイムアタックゲームだ。
「GO!」の表示とともに十字ボタン・ABXY・LRボタンを駆使して、左から順に正しいボタンを押し続けよう。
次々に押し続けて表示をすべて消したタイムで勝負! めざせ小数点以下!
ヅラChu
90年代後半~00年代に某マイコンBASICなマガジンに投稿してた人です。
- VISIBLE 1,1,0,0,0,0
- COLOR 0:CLS
- CLEAR
- ’ホ゛タンヒョウシ゛トイロ
- DATA ”↑”,0,”↓”,0,”←”,0,”→”,0
- DATA ”А”,13,”Б”,3,”Ф”,4
- DATA ”Х”,9,”К”,15,”н”,15
- DIM TXT$[10]
- DIM CLR[10]
- FOR I=0 TO 9
- READ TXT$[I]
- READ CLR[I]
- NEXT
- DIM TARGET[32]
- LOCATE 0,12
- R0=-1
- FOR I=0 TO 31
- @RANDOM
- R=RND(10)
- ’オナシ゛ホ゛タンカ゛ツツ゛カナイヨウニ
- IF R0==R GOTO @RANDOM
- COLOR CLR[R]
- PRINT TXT$[R];
- TARGET[I]=R
- R0=R
- NEXT
- COLOR 0
- TIME=0
- FPS=60
- SCORE=0
- PAST=0
- LOCATE 14,10:PRINT”READY”
- FOR I=1 TO 100000:NEXT
- LOCATE 14,10:PRINT” GO! ”
- BEEP 11
- @LOOP
- BTN=BUTTON()
- TRIG=BTN AND (NOT PAST)
- PAST=BTN
- K=1
- FOR I=1 TO TARGET[SCORE]
- K=K*2
- NEXT
- IF TRIG AND K GOTO @SHIFT
- @TIMEINC
- TIME=TIME+1
- IF FPS==TIME THEN LOCATE 15,10:PRINT” ”
- IF 60*FPS<TIME GOTO @TIMEOVER
- IF TIME%FPS==0 THEN BEEP 0
- LOCATE 0,0
- PRINT”TIME:”;TIME/FPS
- VSYNC 1
- GOTO @LOOP
- @SHIFT
- LOCATE SCORE,12:PRINT” ”
- SCORE=SCORE+1
- IF SCORE<32 GOTO @TIMEINC
- @GAMECLR
- LOCATE 9,12
- PRINT”GAME CLEAR !!”
- BEEP 39
- END
- @TIMEOVER
- LOCATE 0,0
- PRINT”TIME OVER !!”
- BEEP 4
- END