※途中で戻りたい場合は、ブラウザの「戻る」機能を使ってください。
70行目70行からの解析です。 まずはリストを見てみます。  まず始めにＤＥＦ ＵＳＲ命令が出てきました。 これは、ＵＳＲ関数が呼び出すマシン語のルーチンの実行開始アドレスを定義する命令です。 そして、このＵＳＲ関数が呼び出すアドレスは３４２（１５６ｈ）であり、「キーボードバッファのクリア」となります。 つぎはＶＰＯＫＥ ６９１５，０で、先程にも出てきたように、スプライトアトリビュート・テーブルの設定のスプライト面０の色コード（スプライトパターンのビットが１である部分の色）を０に指定しています。 ＣＬＳ命令で（タイトル画面）をクリアして、ＦＯＲ ＮＥＸＴ命令で０〜１１回分Ｍ＄（ブロック２行分）を続けて（；が後ろにある）表示します。 ＶＰＯＫＥ ６９１１，１０４はアドレス６９１１（１ＡＦＦｈ）に１０４（６８ｈ）を代入しています。 アドレス１ＡＦＦｈはパターン名称テーブル（＆Ｈ１８００〜＆Ｈ１ＡＦＦ）で、画面の１キャラクタが１バイトに対応して、ここに書き込むことで、画面上にキャラクタを表示させる事が出来ます。 この場合だと、アドレス６９１１（１ＡＦＦｈ）は画面の右下（一番最後のアドレス）を指し、ここに１０４（６８ｈでキャラクタでは”ｈ”）を書き込んでいます。 ちなみにキャラクタを変えていますので、”ｈ”はブロックの右下のキャラクタになっています。 確認のために表示しておきます。  そして、このＶＰＯＫＥ ６９１１，１０４を取り除いて実行するとどうなるか試してみました。 実行結果です。  一番右下に１キャラクタ分かけているのがわかります。 また、ＶＰＯＫＥ ６９１１，１０４を書き込んで実行してみます。 実行結果です。  見事、一番右下が埋まっています。 次はＰＲＩＮＴ文でＥ＄を使い、エスケープシーケンスを使っています。 Ｅ＄に続く文字は、” ＋”（空白とプラスでそれぞれのキャラクタ番号は３２と４３）となっています。 １文字目はＹ座標（３２−３２）０を意味し、２文字目はＸ座標（４３−３２）１１を意味します。 つまり、以下に続くＵＳＩＮＧ＋文字列” ＳＴＡＧＥ ＃＃ ”をＸ座標１１、Ｙ座標０に表示します。 あと”＃＃”は変数Ｔに対応していて、ステージ数を表しています。 また、変数Ｔは６０行で１を代入しています。 次はＰＬＡＹ文で、ステージ開始に流れるメロディーを流します。 Ｋ＝０で金塊の数を表す変数Ｋをゼロクリアします。 次はステージ開始のアイスマン（バッキー）の位置を指定する為に、文字列からステージ数に応じてデータを拾い、それをＡＳＣ関数で文字を数値化して変数ＸとＹにそれぞれ代入するようになっています。 ＭＩＤ＄の文字列が、それぞれ１０文字ずつありますので、ステージ数は１０までだと思われます。 80行目80行を表示します。  80行は解説を見ると、
まずは、「ステージデータの展開と表示」です。 これはＦＯＲ文を使い、Ｉ とＪを使って二重のループを作っています。 外側のループ Ｉ は、０〜４９で50回、内側のループＪは０〜２で3回となっています。 まず外側のＦＯＲ文の次は、変数Ｖに２２０行のＤＡＴＡ文から読み込まれたＴ＄の文字列を先頭から1文字読み込んだものをＡＳＣ関数で数値化してから４８を引いたものを代入します。 次に内側のＦＯＲ文が始まり、ＬＯＣＡＴＥ文でＸ座標とＹ座標を変数 Ｉ とＪを使って指定しています。 次は、先程の変数Ｖの剰余を求め、変数Ｗに代入します。 その変数Ｗを使ってＡ＄（Ｗ）と表し、10行で指定したＡ＄の内容（２×２のキャラクタ）を先程のＬＯＣＡＴＥ文で指定した座標に表示します。 次のＫ＝Ｋ−（Ｗ＝３）ですが、これはＷ＝３（表示するキャラクタが金塊）だと−１となるので、Ｋ＝Ｋ−（−１）となり、Ｋ＝Ｋ＋１の意味（変数Ｋは先程７０行で０クリアしています）になります。 ここで、「そのステージでの金塊の数設定」を行っている事がわかりました。 次は変数Ｖを４で割りその整数部分を変数Ｖに代入しています。 その後はＮＥＸＴ Ｊ，Ｉ とあり、二つのループを閉じています。 つまり内側のループは２×２個分のキャラクタを３つずつ表示して抜けるようになっています。 外側のループは５０回なので、３×５０＝１５０この２×２のキャラクターを表示している事になります。 Ｔ＄の１文字が２×２のキャラクタを３つ表示するシステムになっていることを知って、データの圧縮化を見事に実現しています。 二重ループの後は、変数Ｈ（アイスマンの向き）に１を入れ、変数Ｍ（アイスマンがいる位置のマップキャラ識別用キャラクターコード）には３２を入れ、変数Ｃ（アイスマンの表示切り替え用→アニメーション効果用）には０を入れています。 ここで、「アイスマンの方向など設定」を行っています。 最後にＵ＝ＵＳＲ（０）でキーボードバッファのクリアをしています。 ここで「ＵＳＲ関数呼び出し→キーバッファクリア」を行っています。 90行目90行を表示してみます。  90行は解説を見ると、
まず始めにＰＵＴ ＳＰＲＩＴＥ命令で、面番号が００、Ｘ座標がＸ＊８＋８、Ｙ座標がＹ＊８＋１５、色は１５（白）、スプライトパターン番号はＨ−Ｃとなっています。 座標にそれぞれ８倍しているのは、動く感覚が１キャラクタ分（８ドット）ずつのためでしょう。 しかし、その後Ｘには８、Ｙには１５を足しているのはなぜでしょう？ これを消して実行させてみます。 消してみたリストです。  実行結果です。  始めの位置が、おそらく８ドット左に、１５ドット上にずれています。 Ｘ座標の８ドットは１キャラクタ分とわかるのですが、Ｙ座標はなぜ１６ではなく、１５なのでしょうか？ 今度はＸ座標には８を足し、Ｙ座標には１６を足してみます。 リストです。  実行結果です。  アイスマン（バッキー）の足元に注意してください。 地面に埋まっているように見えるのがわかるでしょうか？ 拡大してみましょう。
憶測ですが、理論的には１６を加える事だと思いますが、見た目が不自然にならないように調整する事で、１５を加える事にしたのだと思います（あくまでも私の考えです）。 ここで「アイスマン（バッキー）の表示」の処理を行っています。 次は変数Ｄに６２７３＋Ｙ＊３２＋Ｘのアドレスにある値を入れています。 これは、６２７３と言えば１６進数では１８８１で、＆Ｈ１８００〜＆Ｈ１ＡＦＦのパターン名称テーブルのアドレスである事がわかります。 では、＆Ｈ１８００から８１ｈ分後の画面の位置はどこになるのでしょうか？ ８１ｈは１２９で一行は３２だから、４行下（５行目の始め）は１２８。 ということは、５行目の右から２キャラクタ目となります。 ここは、アイスマン（バッキー）が一番左上に来た時の足元の始めの位置になります。 ということは、変数Ｄはアイスマン（バッキー）の下にあるものが何なのかを表しています。 ＩＮＫＥＹ＄でＩ＄に読み取ったキー入力の文字（入力がなければ、ヌル）が入ります。 ここで「キー入力受付」の処理を行っています。 Ｆ＝Ｆ＝０ですが、変数Ｆは金塊の色を切り替えるために使われています。 Ｆが０ならＦは−１、Ｆが−１なら０になります。 ＩＦ Ｍ＜３６ ＡＮＤ Ｄ＜３６ ＴＨＥＮ Ｙ＝Ｙ＋２：ＧＯＴＯ １２０：ＥＬＳＥ ＩＦ Ｘ＜２９ ＡＮＤ （ＳＴＲＩＧ（１） ＯＲ Ｉ＄＝”Ｘ” ＯＲ Ｉ＄＝”ｘ”） ＴＨＥＮ Ｖ＝Ｘ＋３：ＧＯＴＯ １６０ ＩＦ文なのですが、「変数ＭとＤの内容が共に３６より小さければ」と言う条件式になっています。 変数Ｍは「アイスマン（バッキー）がいる位置のマップキャラ識別用キャラクタコード」です。 また、変数Ｄは先程説明したように、「アイスマン（バッキー）がいる下のマップキャラ識別用キャラクタコード」です。 その二つの変数が３６よりも小さいという事は、空間（３２）または金塊（３５）と言う事で、下に落ちる処理をする事になります。 ＴＨＥＮ以後は、Ｙ座標に２を足し（下に２キャラクタ分下がる＝自分の大きさ分落ちる）、１２０行へ飛びます。 ＥＬＳＥ以後は、またＩＦ文で「変数Ｘの内容が２９より小さいく、かつジョイスティックの右ボタンかＸキーが押されたら」と言う条件式になっています。 ＴＨＥＮ以後は、Ｖ＝Ｘ＋３で変数Ｘの内容に３を加えたものを変数Ｖに代入し、１６０行へ飛びます。 次章は、１００行からの解析になります。 |
Copyright(C) 2006. ピコピコテクノロジー All Right Reserved.
１５を加えた場合。
１６を加えた場合。