２０１２．３．２３
前へ
次へ
ホームページトップへ戻る

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

［第６９回］

●ファンクションコール０ＢＨ（２）

前回はファンクションコール０ＢＨについて説明をしましたが、Ｗｉｎｄｏｗｓ側のプログラムの都合で、期待通りの動きにはなりません、と書きました。

ファンクションコール０ＢＨはコンソールのステータスをチェックしてキー入力があったかどうかを調べます。
キー入力があった場合には、その直後にファンクションコール０１（コンソール入力）を実行することで、キー入力待ちをすることなくコンソールからキー入力文字を受取ることができます。
これはＢＡＳＩＣのＩＮＫＥＹ＄と同じ動作です。

ところが実際にテストプログラムを作って実行してみましたら、どうもキーからの読み込みが思わしくないのです。
キーによっては全く読み込んでくれないものもあります。
これは、おそらくＷｉｎｄｏｗｓ側のプログラム（ＺＢ３．ｅｘｅ）がそのように作られていないためだと思いました。

で、前回はそのように書いたのですけれど。
本日になりましてから、あれ？おかしいぞ。
おかしなことに気が付いてしまいました。

ＩＮＫＥＹ＄はＺＢ３ＢＡＳＩＣにもあります。
でも。
確か、こんなに読み取りが悪いことは無かったはず…。
むむむ。
確認してみました。

logfile nd80zlog\03230647.txt open

ＮＤ８０ＺⅢに接続しました
0001 0000 - z
1000 00C3 - 
*** nd80z3 basic ****

>10 A$=INKEY$
>20 IF A$=" "THEN PRINT "*";ELSE PRINT A$;
>30 GOTO 10
>run
********************************************************************************
**********************a*****************************a****a**********************
**********a****a***********a****a****a****a******a******************b******b****
b*******b*b**b*b*********b****b******b***b****b******b*******************b****b*
***b****b**b*******bc**************c*********c****c*c***************c***********
*c*******c********c*************************************c*************c****c****
*************************************d***************d******d****d****d****d****
**d***********d****d*d**d*d*d*********d*d****d***e*************e****e****e****e*
*****************e******e****e****e*******e**e*e**e****e******e***********e*****
*e*************************************************************^B

break in 10

ＩＮＫＥＹ＄の本来の動作からすれば、キーを押している間は連続してそのキーの文字が表示されるはずなのですが、このように飛び飛びになってしまうのは、おそらくキー入力がオートリピートになっていることと、Ｃ＋＋にはＩＮＫＥＹ＄に相当する命令がなくて、そこでちょっと無理をしていることが原因になっていると思います。
それはともかくとして、この程度なら、ＩＮＫＥＹ＄でもちゃんとキー入力を受け付けています。

そういうことになりますと、問題はＷｉｎｄｏｗｓ側のプログラムにあるのではなくて、ＣＰ／Ｍの側にある、ということになります。
果たしてそうなのか、どうなのか、Ｗｉｎｄｏｗｓ側のプログラム（ＺＢ３．ｅｘｅ）にちょっと細工をして、確かめてみることにしました。

まずは、上で作ったＢＡＳＩＣプログラムで、確認してみました。

logfile nd80zlog\03230731.txt open

ＮＤ８０ＺⅢに接続しました
0001 0000 - z
1000 00C3 - 
*** nd80z3 basic ****
>help
TEXT 8004-8049
ﾍﾝｽｳ DFF7-DFFF
>list
    10 A$=INKEY$
    20 IF A$=" "THEN PRINT "*";ELSE PRINT A$;
    30 GOTO 10
>run
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[61]a
[00]*[00]*[00]*[00]*[61]a[00]*[00]*[61]a[00]*[61]a[00]*[00]*[00]*[00]*[00]*[00]*
[61]a[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[61]a[00]*[00]*[00]*[61]a[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[61]a[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[62]b[00]*[00]*[00]*[00]*[62]b
[00]*[00]*[00]*[00]*[62]b[00]*[62]b[00]*[00]*[00]*[00]*[62]b[00]*[00]*[62]b[00]*
[00]*[00]*[00]*[62]b[00]*[00]*[00]*[00]*[62]b[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[62]b[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[62]b[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[62]b[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[63]c[00]*[00]*[00]*[00]*[63]c[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[63]c
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[63]c[00]*[00]*[00]*[00]*[63]c[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[64]d[00]*[00]*[64]d[00]*[00]*[00]*[00]*[00]*[00]*[64]d[00]*[64]d[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*
[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]*[00]
*[00]
>0000 00C3 - 
リモート接続を終了しました
logfile closed at Fri Mar 23 07:33:32 2012

［］付きの表示はＷｉｎｄｏｗｓ側のプログラムでキーチェックを行なった結果の表示です。
［００］はキーが押されていないことを、そして［６１］はキー’ａ’が押されていることを示しています。上のログファイルでは［６２］（キー’ｂ’）、［６３］（キー’ｃ’）、［６４］（キー’ｄ’）も見えます。
＊、ａ、ｂ、ｃ、ｄはＢＡＳＩＣプログラムの表示です。
これを見ると、ＢＡＳＩＣのＩＮＫＥＹ＄は、Ｗｉｎｄｏｗｓ側のプログラムでのキーチェックの結果をそのまま受取っていることがわかります。

それでは同じことをＣＰ／Ｍで実行してみるとどうなるでしょうか。

logfile nd80zlog\03230735.txt open

ＮＤ８０ＺⅢに接続しました
0001 0000 - z
1000 00C3 - 
*** nd80z3 basic ****
>jp d233
[00][00]
[00]a[00]>[00]d[00]i[00]r[00][00][00]
[00]A[00]:[00] [00]F[00]N[00]C[00]0[00]B[00]T[00]S[00]T[00] [00]C[00]O[00]M[00][
00] [00]:[00] [00]F[00]N[00]C[00]0[00]B[00]T[00]2[00] [00] [00]C[00]O[00]M[00][0
0] [00]:[00] [00]F[00]N[00]C[00]0[00]B[00]T[00]3[00] [00] [00]C[00]O[00]M[00][00
] [00]:[00] [00]F[00]N[00]C[00]0[00]B[00]T[00]4[00] [00] [00]C[00]O[00]M[00][00]
[00]
[00]A[00]:[00] [00]F[00]N[00]C[00]0[00]B[00]T[00]1[00] [00] [00]C[00]O[00]M[00][
00][00]
[00]a[00]>[00]f[00]n[00]c[00]0[00]b[00]t[00]1[00][00][00]
[00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00
]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[
00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]
0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [
00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[61]061 0161[0
0]a[61]a 0161[00]a[00]a[00] [00][00]0[00]0[00]0[61]0 0161[00]a[00]a[00] [00][61]
0061 0161[00]a[00]a[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00
] [00][00]0[00]0[00]0[61]0 0161[00]a[00]a[00] [61]0161[00]a[00]a[00] [00][61]006
1 0161[00]a[61]a 0162[00]b[00]b[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[62]0[
00]0[00]0[00] [00][62]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][62]
0[00]0[62]0[00]0[00] [00][00]0[62]0[00]0[00]0[00] [00][62]0[00]0[00]0[00]0[00] [
62][00]0[00]0[00]0[00]0[00] [00][62]0[00]0[00]0[62]0[00] [62][00]0[00]0[00]0[00]
0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[0
0]0[00]0[00] [00][00]0[00]0[00]0[63]0 0163[00]c[00]c[00] [00][00]0[00]0[00]0[00]
0[00] [63]0163[00]c[00]c[00] [00][63]0063 0163[00]c[00]c[00] [00][63]0063 0163[0
0]c[63]c 0163[00]c[63]c 0163[00]c[00]c[00] [00][00]0[00]0[00]0[00]0[00] [00][00]
0[00]0[00]0[00]0[63] 0163[00]c[00]c[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[0
0]0[00]0[00]0[63] 0164[00]d[00]d[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0
[00]0[64]0[00] [64][00]0[00]0[64]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00
]0[64]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[64] [00][00]0[64]0[00]0[64]0[00] 
[00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00
]0[00] [00][00]0[00]0[00]0[00]0[65] 0165[00]e[00]e[00] [00][65]0065 0165[00]e[00
]e[65] 0165[00]e[65]e 0165[00]e[00]e[00] [00][65]0065 0165[00]e[65]e 0165[00]e[6
5]e 0165[00]e[00]e[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[65]0 016
6[00]f[00]f[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00] [00][0
0]0[00]0[00]0[66]0[00] [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[00]0[00]0[00]
 [00][00]0[00]0[00]0[00]0[00] [00][00]0[00]0[66]0[00]0[00] [00][00]0[66]0[00]0[0
0]0[00] [00][00]0[00]0[00]0[00]0[00]

こちらは、さきほどのＢＡＳＩＣと同じように、ちょっと細工をして［］付きでＷｉｎｄｏｗｓ側のキーチェックの結果を表示させるようにしたＺＢ３．ｅｘｅを実行して、前回と同じファンクションコール０ＢＨのテストプログラムを実行してみた結果です。

これを見ますとＣＰ／ＭはＤＩＲ表示などを１文字ずつコンソール出力していることがよくわかります。
コンソール側（Ｗｉｎｄｏｗｓプログラム側）では１文字を受け取ってそれを表示する間にキーチェックを行なっています。
この部分をさきほどのＢＡＳＩＣと比べてみてください。
ＢＡＳＩＣではシステムの表示はまとめて行なっていますから、間にキーチェックは行なわれていません。

あ。
このログファイルのＣＰ／Ｍにエントリする前の部分も、そうでした。
表示のみ行なわれていてキーチェックはありません。

それはともかくとしまして、Ｗｉｎｄｏｗｓ側のキーチェックと、その結果を受けているはずのファンクションコール０ＢＨの実行の結果を確認してみましたら、推測しました通り、Ｗｉｎｄｏｗｓ側ではキー入力を確認しているのに、ＣＰ／Ｍ側ではそれが反映されていないところがあることがわかります。
コード［６２］［６４］［６６］はほとんど無視されてしまっています。
それから［００］になっているのにＣＰ／Ｍ側では入力文字として表示されているところもちらほらあります。

前回も説明しましたように、ファンクションコール０ＢＨは、コンソールの状態をチェックして、そのあとあらためてコンソール入力を実行しています。
Ｗｉｎｄｏｗｓ側のプログラムに細工をして［］で表示しているのは、コンソールチェックに相当する部分で、コンソール入力に相当する部分ではありません。
そこに時間的なアクセスのずれが加わって上のような結果になっているのだと思われます。

実はＷｉｎｄｏｗｓ側のプログラム（ＺＢ３．ｅｘｅ）のキーチェックルーチンではキーチェックと同時にそのキーのコードも取得します。
ＢＡＳＩＣのＩＮＫＥＹ＄は、そのキーコードも同時に受取るために、ＣＰ／Ｍのような「ずれ」は生じません。

さて。
そのずれを考慮しても、おかしなことに、キーコードが偶数のものの反応が悪い（というかほとんど入力されない）のはなぜでしょうか。

おおお。
そういえば、確か、どこかで、おかしなことをやっているなあ、と思ったような…。

調べてみて、やっとわかりました。
ファンクションコール０ＢＨの処理ルーチンの中で、ＢＩＯＳのコンソールステータスをコールしているところがあります。
ＢＩＯＳルーチンからリターンしてきたあと、Ａレジスタの値をチェックしてコンソール入力の有無をチェックしているのですが…。
この部分です。



１３７５のＣＡＬＬ　ＣＯＮＳＴがＢＩＯＳのチェックコンソールです。
そのあと１３７６のＡＮＤ　０１Ｈで、Ａレジスタのビット０をチェックしています。

私はそこを見落としていて、てっきりＡレジスタにキーコードを入れてリターンすればいいものとばかり思ってＢＩＯＳルーチンを作りましたから、まさかビット０を見ているなどとは思いませんでした。

いえ。
そのところは、もう２ヶ月も前に、ＣＰ／Ｍの内部ルーチンを確認しているときに、見たはずで、頭の隅にはそれが残っていたのですけれど、まさかここでこういうふうに影響してくるとは思ってもみませんでした。

そんなことはどこかに飛んでしまっていて、私は普通にＡレジスタの００か非００かをチェックすればいいはず、と勝手に思い込んでしまいましたから…。
ＯＲ　Ａ
を使えばせっかくのＡレジスタの中味を破壊することなく、００か００でないかがわかります。

ＢＩＯＳのコンソールステータスルーチンは、ＢＡＳＩＣのＩＮＫＥＹ＄をそのまま利用したため、キー入力が無いときはＡレジスタに００を、キー入力があったときは、そのキーコードをＡレジスタに入れてリターンするように作っていました。

ところがＣＰ／ＭではそのＡレジスタのビット０のみを見るために、
ＡＮＤ　０１
を実行していたのです。
そのため、コード６２Ｈ、６４Ｈ、６６Ｈは、ＡＮＤ　０１の実行によって全て００になってしまい、「キー入力無し」ということになってしまったのでした。

それで。
このファンクションコール０ＢＨのテストプログラムでは［Ｃｔｒｌ］［ｚ］の入力でブレイクするようになっていたのですが、［Ｃｔｒｌ］［ｚ］を入力しても全く反応がなかったわけがわかりました。
［Ｃｔｒｌ］［ｚ］のキーコードは１ＡＨです。
ＡＮＤ　０１　によって、００になってしまいます。

やっと原因がわかりましたから、ＢＩＯＳのルーチンを修正することにいたしました。

本日は時間がなくなってしまいましたので、この続きは次回にすることにいたします。

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

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