●ＳＴＥＰ値のセット（ＦＯＲ ＮＥＸＴのデバッグの続きです）
前回までのＦＯＲ文のデバッグで、ＴＯの値をＦＴＯに格納するところまで進みました。
次はＳＴＥＰの値です。
ＳＴＥＰ値はＦＯＲ変数の値の増分ですが、今回のテストプログラムではＳＴＥＰは省略しています。
ＳＴＥＰを省略したときは、ＳＴＥＰ値は１になります。
ＦＳＴＰのアドレスはＦ０ＤＦ～Ｆ０Ｅ２です。
前回のＴＯの値のときと同じ要領で、まずＦ０ＤＦ～Ｆ０Ｅ２にＦＦを書き込んだあと、２５Ｄ５にブレイクポイントを設定してから、ｒｔコマンドを実行しました。
アドレス２５Ｃ２のＣＡＬＬ ＧＴＯＮＥは、実数型の１を演算レジスタＦＡＣＣに読み込むためのサブルーチンコールです。
そしてそのあとのＣＡＬＬ ＡＰＫはＦＳＴＰ（Ｆ０ＤＦ～Ｆ０Ｅ２）に実数型の１を格納するために実行しています。
このあとはブレイク後にアドレスＦ０ＤＦ～Ｆ０Ｅ２の値を確認して、実数型の１がそこにちゃんと書き込まれていることを確認する、つもりだったのですが…。
●やっとバグに気付きました
ここまできてやっとバグに気付いたようです。
あ。テストプログラムを実行してもＰＲＩＮＴ文による画面表示が全く行われない、という異常動作の原因について、ではありません。
ユーザープログラムが格納されるアドレスが、本来ならば８００４からでなければならないのに、いつのまにか４００４からになってしまっていた（［第５６回］）、ということにやっと気が付きました。
４００４～はＢＡＳＩＣシステムプログラムのアドレスです。
当然そこの部分のプログラムは破壊されてしまっています。
うわあ。えりゃあこっちゃあ。
というわけで、ＦＯＲ ＮＥＸＴのデバッグなど、もうどこかに吹っ飛んでしまいました。
このバグは急遽プログラムを確認して修正しましたし、プログラムを４００４～に誤書き込みしてしまったために破壊されてしまったＢＡＳＩＣプログラムも元通りに修復いたしました。
しかしながら、一時はパニック、パニックでしたから、ＦＳＴＰ（Ｆ０ＤＦ～Ｆ０Ｅ２）の値を確認することなど、もうすっかり忘れてしまいました。
ええ。でもこのテストプログラムはブレイクポイントを設定してデバッグを始める前にも何回か実行していますから、Ｆ０ＤＦ～Ｆ０Ｅ２には、もともとすでに実数型の１が書き込まれてしまっています。
この部分にはバグがないことはわかっていますから、わざわざこの部分のデバッグを再現して、Ｆ０ＤＦ～Ｆ０Ｅ２に実数型の１が書き込まれているところをあらためて確認する、というのもなんだかなあ、と思います。
ですから、あらためてデバッグをやり直すことはいたしません。
ここの部分につきましては、ＦＦを書き込む前の値が実数型の１になっている、ところを見ていただくということにいたします。
上の画面で、ｃｍ ｆ０ｄｆでＦＦを書き込む前の値をみますと、
Ｆ０ＤＦ ００
Ｆ０Ｅ０ ００
Ｆ０Ｅ１ ４０
Ｆ０Ｅ２ ０１
になっています。
これをデータの上位バイト～下位バイトの順に並び替えます。
０１ ４０ ００ ００
になります。
最上位バイトは指数部です。ここは０１ですから、２１つまり×２です。
仮数部の下位２バイトは００ですから省略して上位１バイトのみを２進数で表現します。
０１００００００
です。
前回と同じやり方で、この値が１であることを確認してみます。
と言うほどのことも無くて、これは簡単です。
小数点を表示させてみると、
０．１００００００
になります。前回も書きましたが、１０進数の０．１ではなくて、２進数に小数点位置を仮に表示させているだけです。
指数部が１ですから
０．１００００００ ×２ です。
×２をなくすために、仮数部を左に１ビットシフトさせます（２進数を左に１ビットシフトすると、もとの数の２倍になります）。
すると
１．０００００００
になります。
確かに ０１ ４０ ００ ００ が実数型の１であることがわかりました。
●ＮＥＸＴ命令のデバッグ
テストプログラムをアドレス８００４に入れ直して、デバッグの続きを再開いたしました。
ＮＥＸＴ命令のデバッグを大急ぎでやります。
テストプログラムが４００４～のＢＡＳＩＣシステムのアドレスに書かれてしまっていて、ＢＡＳＩＣプログラムを破壊してしまっていたことで、かなり泡を食ってしまったらしく、ＮＥＸＴ命令の部分のリストを表示している画面コピーがありません。
それでは何をやっているのかさっぱりわかりませんから、下にＮＥＸＴ命令の部分のアセンブルリストを表示いたします。
かなり長いプログラムです。
上の画面では、最初のブレイクポイントを設定するところがスクロールして消えてしまっています。
しかしブレイク後のレジスタダンプリストのＰＣ（プログラムカウンタ）にはブレイクアドレスが表示されますから、それを見ることで、最初のブレイクアドレスを知ることができます。
最初のブレイクアドレスは２５Ｄ５です。
ここはさきほどのＳＴＥＰの値を格納し終わったあとのアドレスです（今回の一番最初の画面コピーを参照してください）。
ＪＰ ＳＴＥＮＤは命令行の最後の処理へのジャンプ命令です。
これでＦＯＲ文の解読実行は終了です。
次のブレイクアドレスは２６００です。
これ以後は上の画面コピーと下のプログラムリストを共に参照してください。
アドレス２６００はＮＥＸＴ命令の最初のところです。
ＮＥＸＴ命令の次に書かれている変数の型を確認しています。
Ｆ０ですから実数型です。
まっすぐ下の処理に進みます。
次のブレイクアドレスは２６０Ｆです。
その直前のアドレス２６０ＣのＣＡＬＬ ＨＥＮＳＢはＮＥＸＴ変数（ＦＯＲ変数と一致）のアドレスをＨＬレジスタに入れるためのサブルーチンＣＡＬＬです。
ＨＬレジスタには変数ＡのアドレスＤＦＦＣが入っています。
つぎのブレイクアドレスは２６１９です。
この直前に、さきほどのＣＡＬＬ ＨＥＮＳＢで得たＮＥＸＴ変数のアドレスを ＥＸ ＤＥ，ＨＬ命令で、ＨＬからＤＥに入れ替えています。
そうしておいて、ＦＯＲ文で保存したＦＯＲ変数のアドレスをＨＬレジスタに読み出しています。
ブレイクした結果、ＤＥレジスタもＨＬレジスタもＤＦＦＣになっています。
ここが不一致の場合は、ＦＯＲ文とＮＥＸＴ文に食い違いがあると考えられますから、エラーになります。
次のブレイクアドレスは２６２５です。
この直前にＡレジスタの値がＦ０であるかどうかを確認しています。
Ａレジスタの値はさらにその前のＥＸ ＡＦ，ＡＦ’命令で裏レジスタに置かれていた値を表に置き換えたものです。
この時より前の各ブレイク時のレジスタダンプリストのＡとＡ’の値を確認してみてください。
サブルーチンＨＥＮＳＢは、変数アドレスをＨＬレジスタに入れると共に、その後の変数型の参照に備えて、変数型コード（今回のテストプログラムの例では実数型を示すＦ０）を裏レジスタＡ’に保存します。
Ａレジスタの値（Ａ’に保存されていた値）はＦ０ですから、このあとは実数型のＮＥＸＴ処理が行われます。
ＮＸＴＲ（アドレス２６４Ｅ）にジャンプします。
