■QWERTY TAP■
著作制作…………よなぷー
制作年月日………2018年3月5日
対応機種…………PB-100/110/120用ゲームプログラム
使用メモリ………311ステップ
※「ク」はクラブ、「ス」はスペード、「ハ」はハートの記号です。
※「●」はスペース一個です。
※「○」はEXTモードの[SHIFT][A]です。
※「⊂」は[ANS]の下の[E]です。
適当なプログラムエリア
1 GOTO 9
2 F=0:E$=MID(D+1,1):IF RAN#<.05;E$="Z":D=11
3 PRINT CSR10;G;CSRD;E$;
4 F=F+1:IF KEY≠E$ THEN 4
5 IF E$="Z";IF F≦30;PRINT CSR11;"■";:C=C+COS TAN SIN 0+99:D=0:GOTO 2
6 PRINT CSRD;"*";CSR TAN COS 0+D;"●";:C=C+81-H:D=INT(RAN#*10
7 IF F>H;G=G-1:IF G=0 THEN 30
8 F=0:H=H-SGN(H-30:GOTO 2
9 PRINT "●QWERTY●TAP","HI";A,"BY●";B$:C=0:$="QWERTYUIOP"
20 G=9:D=0:H=80:GOTO 2
30 STOP:PRINT "SCORE";C;:IF A≧C;END
40 STOP:A=C:INPUT "NAME",B$
(311STEP)