CASIO PB-100 プログラム


[戻る]

クォーリー
1990-10
quarry02.gif
quarry01.gif


機種: CASIO PB-110/100

遊び方:
 RUNさせると、タイトルとハイスコアを表示した後、ゲームが始まります。
 左側の数字が自機になります。この数字は、ゆっくりとカウントアップしていきます。
 右側の数字列は敵で、一定時間毎に1桁ずつ増えていきます。
 何かキーを押すと、自機の数字が飛んで、敵数字列の先頭に当たります。その時、自機の数字と敵の先頭の数字との足した数が10になる時、その先頭の数字は消えます。また、10にならなかった時は、敵の先頭の数字が、足した値の1の位の数字に変わります。
 得点は、1つの数字を消すごとに2点、同じ数字を続けて消していくと4、6、8、・・・と加算される点数が上がっていきます。
 敵が左端まで来ると、ゲームは終わりです。

プログラムの説明:
 このリストはPB-100系では動作しません。PB-100系の場合は、以下の部分を変更してください。

PB-100用変更リスト
 20 $=”12345678955”:D=5:E=0:R=0:S=0:W=6:Y=11
 60 PRINT CSR Y;MID(10,12−Y);CSR 0;MID(A,1);
100 G=INT(RAN#*9+1:$=MID(1,21−Y)+MID(G,2):Y=Y−1:RETURN
110 FOR J=0 TO Y:PRINT CSR J;MID(A,1);:NEXT J
140 $=MID(1,9)+MID(D,1)+MID(11):GOTO 190
180 $=MID(1,9)+MID(11):Y=Y+1:IF Y=12;GOSUB 100:R=0
190 C$=MID(10,1):D=VAL(C$):PRINT:RETURN

 

サイズ: 463 steps

PB-SIM:テキストのプログラムリスト

画面説明

[6       5872]

[66666   5872]

[6       1872]


左が自機、右が敵

何かキーを押すと数字が数字が飛んでいく

当たった数字の和の1の位の数字が残る
(この時点での得点はない)

[9       1872]

[99999999o872]

[9        872]


自機の数字と敵の先頭の数字との和を見る

当たった数字の和が10の時・・・

その数字は消える


変数表
自機カウンタ
C$
敵数字列の先頭数字取り出し用
敵数字列の先頭数字


続けて同じ数字を消したかの判定
敵を消した時の得点
ハイスコア



ゲームスピード調節用
表示FOR〜NEXT用
敵侵略用カウンタ
得点


ウェイト用
ゲームスピード決定用
敵表示位置
敵数字列


2004-07-18 滝本飛沫