10 'ノウトレ(3) 20 VIDEO7:CLS:CLV 30 LC0,0:?30-(TICK()/60);" ";:A=RND(4) 40 LC2,1:?CHR$(224+A);:T=TICK() 50 K=INKEY() 60 IF K>=28&&K<=31 IF K=A+28 M=M+1 ELSE S=S+1:GOTO30 70 IF TICK()>T+60 M=M+1:GOTO30 80 IF TICK()>1800 VIDEO1:?S:?M:END 90 GOTO50
これは比較的、素早くできました! が、記録を追求し始めると、底が見えないですね……。脳の使い方もですが、反射神経の勝負にもなってきそうです。