ひまわりユーザー プログラム掲示板 バックアップ
注意
ひまわりのススメ  □ ひまわり本家Home  □ 新着記事  □ 新規投稿  □ SEARCH  □ 参考プログラム集
ツリー表示

MESSAGE ボタンが落ちるタイピングゲーム /moka (02/01/13(Sun) 18:36) [194]
......MESSAGE Re[1]: ボタンが落ちるタイピングゲーム /にゃんこ (02/01/13(Sun) 22:31) [202]


親記事 / ▼[ 202 ]
NO.194  ボタンが落ちるタイピングゲーム
□投稿者/ moka -(2002/01/13(Sun) 18:36:39)
□U R L/ http://www.geocities.jp/moka21/teatime/
頓挫してたタイピングゲームが動きました。
アルファベットをタイプして、ボタンを消していきます。
26文字消すか、ボタンが下まで落ちたらゲーム終わり。

途中、なぜかゲームオーバーになったりします。なぜ?
ゲームバランスもちょっと適当です。どうでしょう?

=====

'ボタンが落ちるタイピングゲーム

{レベル設定(秒,落ち幅)}
レベル#0=「2,10」
レベル#1=「1.5,15」
レベル#2=「1,20」
レベル#3=「0.5,30」

母艦の、テキストは、「ボタンが落ちるタイピングゲーム」
母艦の、キー押した時は、(
   押されたキーの、文字。
   ボタン名=それ&「ボタン」
   もし、(ボタンリストの、ボタン名)が、1ならば、(
      ボタン名の、オブジェクト破壊。
      ボタンリストの、ボタン名は、2。
      スコア=スコア+1
      スコアラベル=「Score:{スコア}」
      もし、スコア=26ならば、(
         タイマー解除。
         ゲームクリアへ、飛ぶ。
      )
   )
   戻る。
)

スコアラベルを、ラベルとして、作成。
その、テキストは、「Score:0」
レベルリストを、リストとして、作成。
その、アイテムは、「Easy\nNormal\nHard\nVeryHard」
その、値は、1
その、クリックした時は、(
   その、可視は、オフ。
   ゲーム開始へ、飛ぶ。
)

ボタンリスト=「」
ボタンリストを、辞書として扱う。
スコア=0
待機。

*ゲーム開始
   *ボタン名生成
   それは、乱数(26)+65。
   それの、文字。
   ボタン名は、それ&「ボタン」
   もし、(ボタンリストの、ボタン名)>0ならば、ボタン名生成へ、飛ぶ。
   ボタンリストの、ボタン名は、1。
      
   (ボタン名)を、ボタンとして、作成。
   その、Xは、乱数(640-(その、幅))
   その、Yは、0
   その、イベントは、(
      ボタンリストの、イベントオブジェクトは、2。
      イベントオブジェクトの、オブジェクト破壊。
      スコア=スコア+1
      スコアラベル=「Score:{スコア}」
      もし、スコア=26ならば、(
         タイマー解除。
         ゲームクリアへ、飛ぶ。
      )
      戻る。
   )
   その、イベントは、「」{エラーが出るので}

   ボタンリストの、辞書項目列挙。
   反復(
      (それ)の、Yは、(それの、Y)+レベル#1#(レベルリストの、値)
      もし、(それの、Y)+(それの、高さ)>400ならば、(
         タイマー解除。
         ゲームオーバーへ、飛ぶ。
      )
   )
   それ=レベルリストの、値
   レベル#0#それ秒後に、ゲーム開始へ飛ぶ、タイマー設定。
   待機。
   
*ゲームクリア
   母艦の、キー押した時は、「」
   センタリング。
   (,180)へ、移動。
   「ゲームクリア!\nおめでとう!!」と、表示。
   待機。
   
*ゲームオーバー
   母艦の、キー押した時は、「」
   オブジェクト全破壊。
   センタリング。
   (,180)へ、移動。
   「ゲームオーバー!\n次は頑張ってね!」と、表示。
   待機。



▲[ 194 ] / 返信無し
NO.202  Re[1]: ボタンが落ちるタイピングゲーム
□投稿者/ にゃんこ -(2002/01/13(Sun) 22:31:14)
□U R L/
うちの子のキーボードの練習用に、頂きましたm(__)mペコ
その前に、アルファベットを教えなくちゃなんですが・・・(笑)



- Child Tree -