ワンボードマイコンをつくろう！（パソコンの原点はここから始まった）
ＴＫ８０ソフトコンパチブル！８０８０、Ｚ８０マシン語からＢＡＳＩＣまでこれ１台でこなせます
| 当記事は２００９年１１月から「ＴＴＬでＣＰＵをつくろう！」というタイトルの もとにほとんど毎日連載をしてきたものを再編集したものです。 |
２０１１．６．３０ 前へ 次へ 目次へ戻る ホームページトップへ戻る |
| ☆ＮＤ８０ＺⅢでＢＡＳＩＣを。 とんでもない機能追加を思いついてしまいました。 ＮＤ８０ＺⅢでＢＡＳＩＣを実行できるようにしようというのです。 それも浮動小数点演算ができて、三角関数や対数計算までできる本物のＢＡＳＩＣです！ |
［第５６回］
●ＦＯＲ ＮＥＸＴのデバッグ
前回は／ｓａｖｅコマンドのデバッグ作業をしていて、ｌｉｓｔコマンドでの表示がおかしいことに気が付きました。
／ｓａｖｅコマンドでは受信バッファのデータをそのまま表示しているのですが、ｌｉｓｔコマンドでは受信バッファにデータがあっても表示しないで、最後にプロンプトマーク＞（コード３Ｅ）と入力要求コード０１を受信したときにはじめて受信バッファにたまっている全データを表示するようになっていました。
このままではたとえば非常に長いプログラムをｌｉｓｔ表示させるときなどに困ったことになります。
なにしろ全データを受信し終わるまで、全く表示されないわけですから。
それは、困ります。
なので、そこのところは、受信する都度表示するように、Ｃ＋＋のプログラムを直しました。
前回最後にお見せしたログファイルはデバッグのための受信データも一緒に表示されています。
下はプログラムの修正後に、デバッグ用の受信データを表示しないようにしてから、ｌｉｓｔコマンドと／ｓａｖｅコマンドを実行した画面です。
ひょんなことから、ｌｉｓｔコマンドの表示がまずいことに気が付いて直したのですが、それでやっとテストプログラムが何も表示しないでハングアップしてしまう理由がわかりました。
ｌｉｓｔコマンドだけではなくて、そのほかの多くのコマンドやＢＡＳＩＣプログラムのＰＲＩＮＴ文の表示なども同じ表示方法になっていたことがその理由でした。
どうも実数型のＦＯＲ ＮＥＸＴ文にバグがあるらしくて（まだこの時点では原因を追求中なのですが）そこまでくると無限ループになってしまうらしく、ＢＡＳＩＣプログラムから抜け出せないようなのです。
するとどこまでいっても、プロンプトマーク＞（コード３Ｅ）と入力要求コード０１が送られてこないことになりますから、受信バッファにはそれ以前の表示データは溜まっていたのですけれど、それが全然表示されなくて、ハングアップしたように見えていたのです。
これで不可解に思えた現象もかなりはっきりと見えるようになってきました。
解決まであと1歩です。
とりあえず／ｓａｖｅコマンドでテストプログラムは保存しましたので、ｎｅｗコマンドでＢＡＳＩＣプログラムをクリアしました。
ｎｅｗコマンドはそれまでそこに書かれていたプログラムを全消去するコマンドです。
と言っても本当にメモリクリアしてしまうのではなくて、プログラムの開始アドレス、終了アドレスや変数エリアの情報を初期化するだけですから、ｎｅｗコマンドを実行しただけで、まだ新たなプログラムを一行も入力していないときでしたら、ｈｅｌｐコマンドで元通りにプログラムを復活させることができます。
さてここでは新規にプログラムを書くために、まずｎｅｗコマンドを実行しました。
もうｌｉｓｔコマンドを入力しても何も表示されなくなりました。
ちょっとわかりにくいのですが、ｎｅｗの下でｌｉｓｔと入力したその下にはプロンプトマーク＞しか表示されていません。
１０のｆｏｒ文と２０のｎｅｘｔ文は、その後でキーボードから新たに入力したものです。
実数型のＦＯＲ ＮＥＸＴがおかしい、ということはほぼ確実になりましたから、余計な部分は省いてしまって、画面のようにＦＯＲとＮＥＸＴだけにして実行してみました。
これは予想通りハングアップしてしまいました。
そこでいよいよ実数型のＦＯＲとＮＥＸＴのデバッグです。
ＦＯＲ ＮＥＸＴループのカウンタに使う変数名としてＡ％のように整数型変数を使うと、整数型のＦＯＲ ＮＥＸＴ文になります。
変数名の後ろに％をつけると、その変数は整数型になります。
何もつけないで、ＡとかＡＢＣとだけ書いた場合、その変数は実数型になります。
上で新たに書いたテストプログラムではＦＯＲ ＮＥＸＴ文の変数に実数型変数のＡを使いましたから、このＦＯＲ ＮＥＸＴは実数型で実行されます。
ＦＯＲ文のエントリアドレスは２５６Ｄです。
いきなりサブルーチンをコールしていますから、まずはそのＣＡＬＬ ＦＧＯＳの次のアドレスにブレイクポイントを置いて、テストプログラムを実行してみます。
ｂｐ ２５７０
ｒｕｎ
です。
アドレス２５７０でブレイクしました。
ユーザープログラムのアドレスを保持しているＤＥレジスタの値は…。
あれ？
４０２０になっています。
これはいけません。
とんでもないバグです。
実はこのＺ８０ＢＡＳＩＣシステムのもとになったＺＢＫ開発セット用のＢＡＳＩＣでは、ユーザープログラムの開始アドレスは４０００でした。
そこのところは、８０００になるように直したつもりだったのですが、変更していないところがあったようです。
今回のＺ８０ＢＡＳＩＣシステムでは４０００番地台にはシステムプログラムがありますから、モロ破壊されてしまっています（汗）。
この時点ではまだそのことに気が付いていないようです。
なんと恐ろしいこと。
しかしＦＯＲ ＮＥＸＴの動作には幸い影響は及んでいないようです。
システムプログラムを破壊してテストプログラムが書かれてしまっているわけですけれど、とりあえずは動作しているようですし、せっかくの画面コピーですから、それを使ってしばらくは説明を続けていくことにいたします。
アドレス２５６Ｄから２５８０までのところで、ＦＯＲ文で使っている変数のアドレスをＦＯＲＶＬに保存し、その変数の型をＦＯＲＶＴに保存しています。
変数のアドレスはＤＦＦＣで変数の型はＦ０（実数型）です。
［１０．７．４追記ここから］
この値はアドレス２５７６でブレイクしたときのレジスタダンプに表示されています。
ＨＬレジスタに変数ＡのアドレスＤＦＦＣが、そしてＡレジスタに変数Ａの型（実数型）を示すＦ０が入っています。
サブルーチンＦＧＯＳとＬＥＴＳの実行によって、ＦＯＲ Ａ＝０の部分が解読されて、実行された結果です。
テストプログラムのアドレスを保持しているＤＥレジスタは４０２０から４０２７に進みました。
そういえば、テストプログラムのメモリダンプリストがありませんねえ。
うっかりしていて、それを表示させるのを忘れてしまったようです。
でもここで同じ内容を再現しようとしますと、またシステムプログラムを破壊してしまいます。
もう今はバグを修正してアドレス８０００からユーザープログラムが格納されるようになっていますから、この時点ではアドレスが４０００からになっていたところを、アドレス８０００からになってしまいますが、テストプログラムを再入力して、そのメモリダンプリストを表示させてみました。
logfile nd80zlog\07032039.txt open
ＮＤ８０ＺⅢに接続しました
0001 0000 - Z1000 00C3 - *** nd80z3 basic ****
>
>10FOR A=0 TO 10
>20NEXT A
>LIST
10 FOR A=0 TO 10
20 NEXT A
>HELP
TEXT 8004-8036
ﾍﾝｽｳ DFFB-DFFF
>DM,8000,8036
8000 04 80 10 80 00 80 FF DF 10 80 0C 00 B3 53 44 94 .......ﾟ....ｳSD.
8010 FC DF 41 00 00 00 00 85 0A 00 04 00 0A 00 0D 84 .ﾟA.............
8020 F0 0C 00 9A FA 00 00 98 FA 0A 00 0D 10 14 00 05 ................
8030 85 F0 0C 00 0D 08 00 0D 10 14 00 0B F1 0C 00 9A ................
>/EXIT
ndremote.exeを終了しました
logfile closed at Sat Jul 03 20:39:44 2010
|
F0 0C 00 9A FA 00 00 |
