プチコン3号&BIG 非公式初心者講座 : 第18章 サンプルプログラム7 (その5)
プログラマーからひとこと
いよいよサンプルプログラム７ともこれでおわかれです。
時間をかけてサンプルがどう動いているのか見てきただけあって、今回はけっこうカンタンに話が終わるような気がします。
それだけみなさんもスキルアップしたということです。おめでとう！
前回いきなりサンプル７と関係ないビット演算の話が出てきておどろいたかもしれませんが、ちゃんと今回の話に使いますよ。
それもこれもふくめて、これまでの講座の総まとめです。
泣けるＢＧＭなどをかけながら読んでみてください。
ゲームオーバーを作ってみよう
さて、サンプルプログラム７のつくり方はだいたい分かったけれど……
イヨイヨ、このロクでもねえプログラムをマシにカイゾウするってワケだな！
ソコまで言わんでもよかろうに……
いちどロードしなおしておこうか。
- ＬＯＡＤ”ＳＹＳ／ＥＸ７ＡＬＩＥＮ”
どこから手をつけたらいいのかな？
マッサキにおかしいトコロと言ったら、ゲームオーバーにならねェとこだろうな。
セイカクには、ゲームオーバーになるのは「敵が自機のいる２１行目まで下りてきた時」ということになるかな。
チッ、コマカいやつだぜ！
どういうプログラムにするか、前もってハッキリとイメージしておくのはダイジじゃぞい。
まあ、思いつきでドンドン打ち込むのもひとつのダイゴミではあるが。
こまかく考えていくと、先頭の１匹が２１行目についたタイミングがいいのかな。２０行目のはじっこだとまだ早いって気がするし、何匹も２１行目に乗っていると遅いかんじだもんね。
うむうむ、そういうコトじゃ。こういうのを「仕様（しよう）を決める」と言うのじゃが、できるだけミノガシの少ない仕様を決められるのが良いプログラマーのジョウケンじゃぞい。
ムムム……アトは……そうだな、画面に「GAME OVER（ゲームオーバー）」って書かねェとな！ そしてＥＮＤだ！
そうか、それはたしかにダイジだね。ちゃんとゲームオーバーだってわからないと。
まずは、そういう仕様で作ってみようか。まずサイショにすべきコトは……
もともとムダだった、自機のノコり表示をヤメようぜ！ コメントアウトしとくか。
- ’ＬＯＣＡＴＥ ０，２３
- ’ＰＲＩＮＴ ”Г”＊ＬＩＦＥ；
そのトオリじゃが、あいかわらずコトバがキビしいのう……。
プログラムの中で敵が２１行目におりてくるとすると……＠ＤＷルーチンになるのかな。
- ＠ＤＷ
- ＥＹ［Ｉ］＝ＥＹ［Ｉ］＋１
- ＩＦ ＥＹ［Ｉ］＞２０ ＴＨＥＮ ＥＹ［Ｉ］＝３
- ＥＤ［Ｉ］＝（ＥＤ［Ｉ］＋１） ＡＮＤ ３
- ＧＯＴＯ ＠ＥＰＵＴ
126行目では敵が画面の下から上にワープするように作ってあるけど、今回の改造ではココはいらないね。
- ’ＩＦ ＥＹ［Ｉ］＞２０ ＴＨＥＮ ＥＹ［Ｉ］＝３
とりあえずコメントアウトしよう。
せっかくＩＦ ＥＹ[Ｉ]＞２０ ＴＨＥＮなら、ソコでゲームオーバーにすりゃイイんじゃねェの？
オシイけど、ココではまだ敵が２１行目に表示されていないんだ。さっき決めた仕様どおりに作るならハズレだね。
チッ、コマカいハナシはニガテだぜ！ ウゴいた敵を書いてるのは、そのアトの＠ＥＰＵＴルーチンだったか。
- ＠ＥＰＵＴ
- ＬＯＣＡＴＥ ＥＸ［Ｉ］，ＥＹ［Ｉ］
- ＰＲＩＮＴ ”Е”
- ＲＥＴＵＲＮ
どう見ても、141行目のアトにIF文を１行書けばイイはずだぜ！
- ＩＦ ＥＹ［Ｉ］＞２０ ＴＨＥＮ ＠ＧＯＶＥＲ
たいしてやるコトもなさそうだが、イチオウ新しくゲームオーバー（Game OVER）サブルーチンに飛ばしといたぜ。
あとはムズカシイことは何もなさそうだね。
- ＠ＧＯＶＥＲ
- ＬＯＣＡＴＥ １７，１１
- ＰＲＩＮＴ ”Ｇ Ａ Ｍ Ｅ Ｏ Ｖ Ｅ Ｒ”
- ＥＮＤ
ウム。キチンとできておる。
しかし、やってみるとジミな気もするな。ドウセならこのぐらいは……
- ＠ＧＯＶＥＲ
- ＬＯＣＡＴＥ ＰＸ，ＰＹ
- ＣＯＬＯＲ ７
- ＰＲＩＮＴ ”◎”
- ＬＯＣＡＴＥ １７，１１
- ＣＯＬＯＲ ３
- ＰＲＩＮＴ ”Ｇ Ａ Ｍ Ｅ Ｏ Ｖ Ｅ Ｒ”
- ＥＮＤ
うむうむ。いくら仕様を前もって決めていても、作ってみるともっとやりたいコトは出てくるモノじゃ。ためらわず新しく作りはじめる心もダイジじゃぞ。
言ってるコトがバラバラな気もするけど……
あと、自分でワケがワカらなくなる前に、ホドホドで止めておく心もやっぱりダイジじゃな。
どうしろってんだ！
どの考え方も同じくらい大切なものさ。うまくバランスをとってプログラムしていきたいね。
スピードを変えてみよう
そういえば、さっきから気になってたんだけど、
- ＠ＲＩ
- ＥＸ［Ｉ］＝ＥＸ［Ｉ］＋０．２
- ＠ＬＦ
- ＥＸ［Ｉ］＝ＥＸ［Ｉ］−０．２
EX[I]って、敵のX座標だよね。1ずつ足すんじゃないの?
ホントだな。+1がタダしいんじゃねェのか?
- ＠ＲＩ
- ＥＸ［Ｉ］＝ＥＸ［Ｉ］＋１
- ＠ＬＦ
- ＥＸ［Ｉ］＝ＥＸ［Ｉ］−１
- ＲＵＮ
チクショウ！敵が早すぎてゼンゼン当たらねー！
そうか、敵の動きを+1から+0.2に減らして、敵を遅くしているんだね。
そうだね。ここの数字を変えると、敵の速さを自由に変えられるよ。
ン？ 敵の位置が整数にならないのはイイのか？
それは大丈夫だよ！LOCATEでは、小数は切り捨てられて処理されるんだ。
ほっほっほ。敵の動く量を変えれば、速さが変わるのはトウゼンじゃな。
じゃが、敵の動きは+1のままでも、敵を遅くする方法があるぞい。
そう言えば、スピードをコントロールしてる部分がもうあったような……
！ タシカに、オレとしたコトがワスレてたぜ！
- ＠ＬＯＯＰ
- ＧＯＳＵＢ ＠ＭＹＳＨＩＰ
- ＧＯＳＵＢ ＠ＭＹＳＨＯＴ
- ＧＯＳＵＢ ＠ＡＬＩＥＮ
- ＧＯＳＵＢ ＠ＳＣＯＲＥ
- ＶＳＹＮＣ １
- ＧＯＴＯ ＠ＬＯＯＰ
メインループの中のVSYNC 1で1/60秒オソくしてたんだったな。じゃあ、コレをもっとオソくすりゃイイんじゃねェか？
- ＶＳＹＮＣ ２０
あれ？ なんだか……
- ＲＵＮ
……あ、そうか。
し、シマッタ！ 自機がオソいのは100歩ゆずっても、ショットがオソいのだけはガマンならねー！
というかコレ、ただゲームのテンポがユルくなったダケだな！
そういうコトだね。VSYNCはその場でポーズするようなモノだから、ゲーム全体のスピードが変わってしまうんだ。
VSYNCじゃなくて、敵だけが遅くなるような改造にしないとダメなんだね。
ムムム……自分やショットはウゴくが、敵はウゴかない……ん？ そう考えるとアンガイよくあるパターンじゃねえか？
そう、敵を動かす部分をスキップすればいいってコトだね。
- ＠ＥＭＯＶＥ
- ＩＦ ？？？ ＴＨＥＮ ＠ＥＰＵＴ
- ＯＮ ＥＤ［Ｉ］ ＧＯＴＯ ＠ＲＩ，＠ＤＷ，＠ＬＦ，＠ＤＷ
ある条件のトキ以外は敵の場所を変えないことにしたよ。
ずっとスキップしっぱなしじゃ動かなくなっちゃうから、このIF文で「何回かに１回だけ動く」ようにすればいいってことか……。
だいたいハナシが見えてきたゼ。こうすりゃイイんだな！
- ’−−−
- ＠ＡＬＩＥＮ
- ＥＳＴＯＰ＝ＥＳＴＯＰ＋１
まず敵をウゴかすオオモトのところに、変数ＥＳＴＯＰをヨウイするぜ！ コイツは敵を止める（STOP）ためのフラグだな。
- ＩＦ ＥＳＴＯＰ＝＝１０ ＴＨＥＮ ＥＳＴＯＰ＝０
こうやって、10回に１回は０にモドるようにしておくゼ！ アトは、スキップするジョウケンを……
- ＠ＥＭＯＶＥ
- ＩＦ ＥＳＴＯＰ ＴＨＥＮ ＠ＥＰＵＴ
ＩＦ ＥＳＴＯＰ ＴＨＥＮ、ツマリＥＳＴＯＰがゼロじゃなければスキップする、ってコトにすればデキアガリじゃねえか!?
おっ、やったじゃないか！ これで敵のスピードだけが10分の１になったね。
ワレながら、ジョウタツぶりがミゴトだぜ……。
あれ？ そういえばこの10回に１回は０にもどるってパターンは……
どうやらオボエていたようじゃのう。ワンパク君のプログラムの、ドコを変えればいいかわかったかの？
オレのプログラムのシュウセイからのスタートかよ！
この92行目はやっぱりけずって……
- ＥＳＴＯＰ＝ＥＳＴＯＰ＋１
- ’ＩＦ ＥＳＴＯＰ＝＝１０ ＴＨＥＮ ＥＳＴＯＰ＝０
そしたら、数がフエるイッポウじゃねェか？
うーん、タシカにそうなんだけど。
- ＩＦ ＥＳＴＯＰ ＭＯＤ １０ ＴＨＥＮ ＠ＥＰＵＴ
スキップの条件をこう書きかえれば、10回に１回だけＥＳＴＯＰ MOD 10の答が０になる……つまりスキップしないってコトになるよね。
「Ｉ＝Ｉ＋１でループするとき、Ｉ MOD Ｎと書くとＩが『Ｎの倍数』になるたびゼロまでおり返しながら１増えていく」。前におぼえたホウソクだね。
やってるコトは同じじゃが、IF文がひとつ消えてコンピューターにやさしく、短いプログラムになったのう。
ＥＳＴＯＰの数はサイゴまで増えっぱなしじゃが、このゲームではメモリーのゲンカイまで増える前にゲームオーバーになるから、これでもよかろう。
そこまでコウリツをモトめるその考え方、オレは気にくわねェな！
タシカに、ワンパク君のプログラムの方が初心者にはわかりやすいとも言えるわい。
どこまでプログラムにコウリツを求めるべきか、それはプログラマーにとってエイエンのテーマじゃ。
どれがセイカイとも言えない、ってコトかな。ちなみにスキップする回数はちょっと変わるけど、こういう方法もあるよ。
- ＥＳＴＯＰ＝（ＥＳＴＯＰ＋１） ＡＮＤ ７
- ＩＦ ＥＳＴＯＰ ＴＨＥＮ ＠ＥＰＵＴ
ビット演算のくわしいセツメイはもうはぶくけど、8回に１回だけＥＳＴＯＰがゼロになってスキップしなくなるプログラムだね。
コンピューター的にはわり算よりビット演算の方が早いから、ボクはＩ MOD Ｎを使うよりもスキかなあ。
ケッキョク、プログラムするヤツのスキズキってコトか……。
セイカイがひとつとかぎらんのも、プログラムのおもしろさじゃな。プログラマー２人に合作させるとおたがいのビガクがぶつかって、見ていてオモシロいもんじゃよ。
……やじうま？
クリア画面をつくってみよう
スピードが変わって、だいぶゲームらしくなってきたな！
敵が少なくなると、デタラメに撃っても当たらなくなるのがよくわかるね。だけどあんまりじっくり当てようとしていると、敵にせめこまれてゲームオーバーになっちゃう。ゲームにはこういうカケヒキがないとね。
なんだかハジメてホメられた気がするわい……。
こうなってくると、敵を全滅させた時に何もないのがさびしいね。ゲームクリア画面を作っておこうよ。
そうムズカシくないんじゃねェか？ とりあえず敵の数をチェックするための変数がいるな。
- ＥＬＥＦＴ＝ＥＭＡＸ
敵の最大数を決める変数ＥＭＡＸがもともとあったから、新しい敵（Enemy）の残り（LEFT）変数ＥＬＥＦＴに使うことにするゼ！
敵が１匹やられるたびに、変数ＥＬＥＦＴを１へらせばいいね。
- ＥＬＥＦＴ＝ＥＬＥＦＴ−１
あとはこの数がゼロになったら、ゲームエンド（Game END）でいいかな。
- ＩＦ ＥＬＥＦＴ＝＝ＦＡＬＳＥ ＴＨＥＮ ＠ＧＥＮＤ
そこからは新しいサブルーチンになるね。
- ＠ＧＥＮＤ
- ＬＯＣＡＴＥ ２０，１１
- ＰＲＩＮＴ ”しんりゃく みすい”
- ＥＮＤ
こんなところかな？
さすがにサクサクいくようになったのう。
クリアしたその時、はじめてゲームタイトルが出てそのイミが明らかになる。ワシのノゾミどおりの、ハリウッド的クールなエンシュツじゃ。
そこまで考えてなかったけど……。
あっと、まだ終わりじゃないよ。ひとつわすれてることがあったね。
そうか？ トクにおかしいトコロはなさそうだが……
- ＳＣＯＲＥ： １９０
あっ！ 最後の敵を撃った点が入ってないよ！
最後の敵が撃たれたらスグに＠ＧＥＮＤに飛んでいるから、こうなっちゃうね。
じゃあ、＠ＧＥＮＤに飛んだサキですぐに点を入れればイイんじゃねェか？
- ＠ＧＥＮＤ
- ＧＯＳＵＢ ＠ＳＣＯＲＥ
ず……ずいぶんストレートな方法でカイケツしてきたね。
＠ＳＣＯＲＥに行って10点プラスして帰ってくるワケじゃな。10点以上の敵を倒してクリアしたトキはどうする、というモンダイはあるが……そもそも10点以上の敵がいないので、マチガイなくこれでカイケツはしておるな。
いいの？ ハカセにしてはアッサリしてるけど。
何点の敵を打ってもＯＫなプログラムを組むのがリソウではあるんじゃが……、ショクンならフラグをうまく使えばスグにできるじゃろうしな。10点以上の敵を出すヨテイもない今は、これでよかろう。
（さっき自分も気がつかなかったコトを、ゴマカそうとしてるんじゃねェか……？）
まとめのようなもの
おぼえたコトは、なんでもムダにはならないってコトだね。
ビット演算にかぎらず、このBASIC講座で勉強したことは、イガイなところで役に立ったり、応用しだいでもっとイロイロな使いみちがあるハズさ。
そういうコトじゃな。読者のショクンも、このサンプルをさらに改造するコトから始めてみてはどうかな？
これまでの講座でおぼえた命令を組み合わせると、イガイにやりたいコトができたりするものじゃ。
たしかに、まだ改造したいポイントはいっぱいあるね。敵の種類をふやしてみたいし、プレイヤーが１機でおわりじゃなくてもいいよね。
もっとカラフルにするのもよさそうじゃな。敵がやられた時にバクハツパターンを出すなどもいいじゃろう。
こういう見た目のエンシュツはイガイに考えるところが多く、うまくいった時のジュウジツ感も大きいのでおすすめじゃぞ。
やりたいコトに手が届かない時は、説明書をながめてみるのもいいかもね。
ムズカシそうだけど、ここまで読んだ今なら、何が書いてあるのかカナリわかるようになってるハズだよ。
……テメーら！ 最後だけマジメな話でまとめて、さもキョウイク的な講座だったってカオしてんじゃねえぞ！
今回のまとめ
- まとめ方
- 最後のほうで、みんないい子になって教育的なことでまとめれば、まるでいい講座だったように思い込めるものです。
表示モード : [ スマホ・3DS対応表示 | クラシック表示 ]
PukiWiki 1.4.7 Copyright © 2001-2006 PukiWiki Developers Team. License is GPL. Based on "PukiWiki" 1.3 by yu-ji
ページの処理時間 : 0.355 秒 | このページの最終更新 : 2022/09/20 (火) 12:49:35 (565d) | ログイン
Copyright(C) 2011-2014 プチコンまとめWiki ◆1sxkymI8ji30