復活！ＣＰ／Ｍ　ワンボードマイコンでＣＰ／Ｍを！
ＣＰ／ＭがＴＫ−８０互換のワンボードマイコンの上で復活します
ＮＤ８０Ｚ�VとＭＹＣＰＵ８０の上でＣＰ／Ｍが走ります！

［第３６回］

●ｃｐｍ２２．ｚ８０のバグ（２）

前回からの続きです。
下のＣＨＥＣＫＳＵＭルーチンにはバグがあります。
どこにバグがあるか、おわかりになりますでしょうか？
というところまでが、前回のお話でした。

; ; Compute the check-sum for the directory buffer. Return ; integer sum in (A). ; C8FA 0E80 CHECKSUM: LD C,128 ;length of buffer. C8FC 2AC0D1 LD HL,(DIRBUF) ;get its location. C8FF AF XOR A ;clear summation byte. C900 C600 CHKSUM1:ADD A,M ;and compute sum ignoring carries. C902 23 INC HL C903 0D DEC C C904 C200C9 JP NZ,CHKSUM1 C907 C9 RET

Ｚ８０アセンブラを理解してみえる方でしたら、すぐにおわかりになったと思います。
ＣＨＫＳＵＭ１：ＡＤＤ　Ａ，Ｍ
が、バグなのです。
こんな表記はＺ８０アセンブラにはありません。
これは、８０８０アセンブラの表記です。

ここは、
ＣＨＫＳＵＭ１：ＡＤＤ　Ａ，（ＨＬ）
と書くべきところです。

私の作ったＺ８０アセンブラですと、ＡＤＤ　Ａ，Ｍはエラーではじき出します。
しかしＺＡＳＭ１．６４ではエラーにはならないようです。
エラーにする代わりに、誤ったコードを作成してしまいます。
上記リストの左側部分がソースプログラムをアセンブルした結果作成されたマシン語コードです。
ＣＨＫＳＵＭ１：ＡＤＤ　Ａ，Ｍ　の、その部分を見ますと
Ｃ６００
になっています。

これはＡＤＤ　Ａ，（ＨＬ）　のマシン語コードではなくて、
ＡＤＤ　Ａ，００
のマシン語コードです。
ちなみに、ＡＤＤ　Ａ，（ＨＬ）のマシン語コードは、
８６
です。
全然違ってしまいます。

当然、正しい結果は得られません。
上のＣＨＥＣＫＳＵＭルーチンの実行結果は常にＡ＝００になってしまいます。

まあ、しかし、このチェックサムは、フロッピーディスクを処理の途中で交換してしまったかどうかをチェックするための目的で使われるもののようでありますから（それが検出されると、そのディスクにはライトプロテクトがかかってしまうらしい）、私が計画しております、仮想フロッピーディスクシステムでは、無用のものになります。

そういうことでありますから、ここは、まあ、このままにしておいてもよい、でありましょう。

ということで、本件は終わり。
のつもり、だったのでありますが…。

●ｃｐｍ２２．ｚ８０のバグはとんでもないバグでありました

ここで、はて？
と、また疑問が生じてきました。
一体このバグは、どこから来たのだろう？

上に書きましたように、ＡＤＤ　Ａ，Ｍは８０８０アセンブラの表記です。
このソースプログラムの作者（リストの先頭には、ｂｙ　Ｃｌａｒｋ　Ａ．　Ｃａｌｋｉｎｓの署名があります）は、この部分を間違えて、うっかり８０８０アセンブラで書いてしまったのでしょうか？

しかし、もともとこのソースプログラムはＣａｌｋｉｎｓ氏が書いたのではなくて、あるシステム用のＣＰ／Ｍのマシン語コードをもとにＺ８０逆アセンブラを使ってソースプログラムを逆生成したものに、あとから氏がコメント文を追加したもののようです。

作者がニーモニックそのものを直接書いたということではない、とすると…？

おお！
ひょっとすると、この部分　ＡＤＤ　Ａ，Ｍ　を書いたのは、氏が逆アセンブルするのに使った、Ｚ８０逆アセンブラそのものではあるまいか？

もしも、そうだったとすると…。
うわっ。
他にも同じ間違いがあるのでは！

その通りでありました。
「，Ｍ」で検索をかけてみましたら。
なんと。
他にも同じバグがみつかりました。

2043 CHKSUM1:ADD A,M ;and compute sum ignoring carries. 2168 SBC A,M ;set carry if no more names. 3340 SBC A,M 3348 SBC A,M

行の先頭にある数字はＴｅｒａｐａｄでｃｐｍ２２ｅ．ｔｘｔを開いたときに表示される行番号です。
ＡＤＤ　Ａ，Ｍは前回から説明をしておりますＣＨＫＳＵＭ：の１ヶ所だけですが、そのほかにＳＢＣ　Ａ，Ｍが３ヶ所みつかりました。
みつかったＳＢＣ　Ａ，Ｍの１つを、アセンブルリストで見てみますと、下のようになっています。



これもＡＤＤ　Ａ，Ｍと同じで、Ｚ８０ニーモニックではなくて８０８０ニーモニックです。
生成されたマシン語コードはＤＥ００です。
ＤＥ００は、ＳＢＣ　Ａ，００のマシン語コードです。
Ｍが未定義のラベルなので、００に置きかえられてしまったようです。
ここは、本来はＳＢＣ　Ａ，（ＨＬ）と表記すべきところです。
ＳＢＣ　Ａ，（ＨＬ）のマシン語コードは、９Ｅです。

うむむ。
Ｃａｌｋｉｎｓ氏がお使いになったＺ８０逆アセンブラはどのようなものかは知りませぬが、Ｚ８０ニーモニックの代わりに８０８０ニーモニックを吐き出してしまうとは、さてさてとんでもない逆アセンブラのようであります。

●ＣＰ／Ｍソースプログラムの再々修正

さすがにこのままのソースプログラムでは、おそらくそのうちに挙動不審な動作をして悩むことになると思いますから、再度、修正しておくことに致します。
前回（［第３５回］）作成保存しましたｃｐｍ２２ｅ．ｔｘｔをＴｅｒａＰａｄで開いて、下記のように４ヶ所を修正してください。

2043 CHKSUM1:ADD A,(HL) ;and compute sum ignoring carries. 2168 SBC A,(HL) ;set carry if no more names. 3340 SBC A,(HL) 3348 SBC A,(HL)

行の先頭にある数字はＴｅｒａＰａｄでｃｐｍ２２ｅ．ｔｘｔを開いたときに表示される行番号です。
Ａ，Ｍとなっているところを上のリストのようにＡ，（ＨＬ）に直します。

今回はこの４ヶ所のみですから、それぞれ手作業で修正してもそれほど手間はかかりません。
もっと変更箇所が多い場合には、［検索］→［置換］を使って一括変換をすると便利です。
ただし、特にプログラムソースに対して、今回のように命令の一部を変更する場合は余程注意しないと、とんでもない落とし穴があって変換してはならないところが変換されてしまったりします。
その意味では、「すべて置換」は使わない方が安全です。

参考までに「検索」→「置換」の方法を簡単に説明します。
ツールバーの「検索」→「置換」をクリックします。



「検索する文字列」に「，Ｍ」を、「置換後の文字列」に「，（ＨＬ）」を入れます（共に半角で入力します）。



最初の一回だけは「先頭から検索」をクリックして、先頭にある「，Ｍ」を置き換えます。
その置換完了後にもう一度［検索］→［置換］と操作して、「連続置換」をクリックすると、その次の「，Ｍ」から順次置換えをすることができます。
ここで「先頭から検索」をしないでいきなり「連続置換」をすると、行の先頭からではなくて、現在のカーソルポイントから検索（置換え）が行なわれてしまいます。

以上のように修正ができましたら、ファイル名をｃｐｍ２２ｆ．ｔｘｔ　にして保存してください。
保存したら、ＺＡＳＭ１．６４でアセンブルしてください。


アセンブルの結果作成されたｃｐｍ２２ｆ．ｐｒｎを開いてみました。


おお。
ＢＩＯＳジャンプテーブルのアドレスがＤ２０３から始まっています。
ここがＤ２００にならないのは、ＣＰ／Ｍプログラムの先頭に初期設定ルーチンへのＪＰ命令を追加しているためです（［第３２回］参照。＃４４　ＳＴＡＲＴ：ＪＰ　ＳＥＴＥＮＴＲＹ）。
このジャンプ命令さえ無ければ、今回のバグ修正によって、もともとのＣＰ／ＭオリジナルのようにＢＩＯＳジャンプテーブルのアドレスが××００Ｈから始まります。

むむ。
そうか。
やっぱり、先頭のジャンプ命令はまずいですね。
またまた変更で申し訳ありませんが、そこは次回に変更することにいたします。

ワンボードマイコンでＣＰ／Ｍを！［第３６回］
２０１２．２．１７ｕｐｌｏａｄ

前へ
次へ
ホームページトップへ戻る