LoginSignup
1
0

More than 1 year has passed since last update.

【IchigoJam】爆弾ゲーム

Posted at

IchigoJam で爆弾ゲームを作ってみました。

爆弾ゲーム

爆弾の前にスイッチが何個か並んでいます。
そのうち1個だけ、押すと爆弾が爆発するスイッチがあります。

  • 複数人で遊ぶ場合
    • まだ押されていないスイッチを順番に1個ずつ押していきます。
    • 爆弾を爆発させた人が負けです。
  • 1人で遊ぶ場合
    • スイッチを押していきます。
    • 爆弾を爆発させたらゲームオーバーです。
    • 爆弾を爆発させずに押していないスイッチを1個だけにできたらクリアです。

仕様

ゲームを開始すると、1~8の8個のスイッチが表示されます。
1~8の数字キーを押すことで、スイッチを選択します。
まだ押されていないスイッチを選択すると、「ポチッ」と表示されます。
数秒後、押されたのが爆弾が爆発するスイッチだった場合は、「ドカーン!!」と表示されてゲームが終了します。
そうでなかった場合は、「セーフ!」と表示され、次のスイッチの選択に移ります。

プログラム

10 ' バクダン ゲーム
20 N=8
30 FOR I=0 TO N-1:[I]=1:NEXT
40 [RND(N)]=2:CLS:X=16-N
50 LOCATE10,5:?"バクダン ゲーム"
60 FOR I=0 TO N-1
70 LOCATEX+I*2,15:?CHR$(49+I)
80 NEXT
90 LOCATE9,10:?"ドノ スイッチ ヲ オス?"
100 K=INKEY()-49
110 IF K<0 OR N<=K GOTO 100
120 IF [K]=0 GOTO 100
130 LOCATEX+K*2,14:?CHR$(#ED)
140 LOCATE9,10:FOR I=1 TO 14
150 ?CHR$(0);:NEXT
160 LOCATE10,20:FOR I=0 TO 3
170 IF I=0 ?"ポチッ"; ELSE ?".";
180 T=60:GOSUB 280:WAIT T
190 NEXT
200 IF [K]=2 GOTO 310
210 ?"セーフ!":[K]=0
220 T=180:GOSUB 280:WAIT T
230 LOCATEX+K*2,15:?"_"
240 LOCATEX+K*2,14:?CHR$(0)
250 LOCATE10,20:FOR I=1 TO 11
260 ?CHR$(0);:NEXT
270 GOTO 90
280 IF VER()<13208 RETURN
290 IF VER(1)=3 T=T*25/96
300 RETURN
310 ?"ドカーン!!"

解説

  • 10行目 : タイトル
  • 20行目 : スイッチの数の設定
  • 30行目 : スイッチの状態の初期化
  • 40行目 : 爆破スイッチの選択、スイッチの描画位置の決定
  • 50行目~90行目 : 描画
  • 100行目 : キー入力の読み込み
  • 110行目 : スイッチに対応しないキーを弾く
  • 120行目 : 既に押されたキーを弾く
  • 130行目 : 押されたスイッチの上にキャラクターを描画
  • 140行目~190行目 : スイッチを押したときの演出
  • 200行目 : 押されたスイッチが爆破スイッチだったかの判定
  • 210行目~220行目:「セーフ!」の表示
  • 230行目~270行目:ボタンの選択に戻る
  • 280行目~300行目:IchigoJam web 用の待ち時間の調整
  • 310行目 : 「ドカーン!!」の表示

実行結果

改造のアイデア

  • 爆弾の絵を表示する
  • スイッチの表現を改良する
  • 効果音をつける
  • サーボで風船を割るなど、爆破を物理的に表現する
  • コードを切るなど、スイッチの選択を物理的なもので行う

おわりに

※IchigoJamはjig.jpの登録商標です。

1
0
0

Register as a new user and use Qiita more conveniently

  1. You get articles that match your needs
  2. You can efficiently read back useful information
  3. You can use dark theme
What you can do with signing up
1
0