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

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

［第１９２回］


●ＭＡＣＲＯ－８０（４）

前回からの続きです。
ＣＰ／Ｍ２．２のテストプログラムをＭＡＣＲＯ－８０用に一部を書き換えて作成したＭＶＦＴＳＴ１Ｃ．ＭＡＣをＭＡＣＲＯ－８０でアセンブルしたところ、やっとＮｏ　Ｆａｔａｌ　ｅｒｒｏｒ（ｓ）と表示されました。
次に、最後の仕上げにマシン語のオブジクトファイルを作成するべく、Ｌ８０（Ｌｉｎｋ－８０）を実行したところ、これもエラー無く終了しました。
そこで、作成されたはずのＭＶＦＴＳＴ１Ｃ．ＣＯＭを実行するために、
ＭＶＦＴＳＴ１Ｃ［Ｅｎｔｅｒ］
と入力したところ、まさかのハングアップをしてしまいました。

ひょっとしてＭＶＦＴＳＴ１Ｃ．ＣＯＭは作成されなかったのか？
ＤＩＲコマンドで確認してみましたが、ＭＶＦＴＳＴ１Ｃ．ＣＯＭはちゃんと作成されていました。

A>dir
A: F80      COM : HELL1    FOR : HELL1    REL : HELLO    FOR
A: HELLO    REL : HELL2    FOR : HELL2    REL : HELL3    FOR
A: HELL3    REL : M80      COM : MVFTST1  MAC : MVFTST1  REL
A: MVFTST1B MAC : MVFTST1B PRN : MVFTST1B REL : MVFTST1C MAC
A: MVFTST1C PRN : MVFTST1C REL : L80      COM : MVFTST1C COM

A>

ひょっとして、ＭＡＣＲＯ－８０でアセンブルするときに、何らかの理由で誤変換されたりしているかも、と思ってアセンブル時に作成されたリストファイルを参照してみました。
ＭＡＣＲＯ－８０の実行時に’／Ｌ’スイッチをつけると、リストファイルが作成されます。
ファイル名はＭＶＦＴＳＴ１Ｃ．ＰＲＮです。
中味はテキストファイルですから、ＴＹＰＥコマンドで開けます。

A>type mvftst1c.prn
        MACRO-80 3.44   09-Dec-81       PAGE    1


                                ; BDOS function 1 & 2 test for ZBDOS
                                ;for MACRO-80
                                ;12/8/4
                                ;
                                     ORG 0100H
  0005                               FCALL EQU 0005H
                                ;
  0100'   1E 3F                 LOOP:LD E,3FH;?
  0102'   0E 02                         LD C,02
  0104'   CD 0005                       CALL FCALL          
  0107'   0E 01                         LD C,01
  0109'   CD 0005                       CALL FCALL
  010C'   FE 1A                         CP 1AH;^z?
  010E'   C8                            RET Z
  010F'   F5                            PUSH AF
  0110'   1E 3D                         LD E,3DH;=
  0112'   0E 02                         LD C,02
  0114'   CD 0005                       CALL FCALL
  0117'   F1                            POP AF
  0118'   57                            LD D,A
  0119'   CD 0143'                      CALL HEX1
  011C'   5F                            LD E,A
  011D'   7A                            LD A,D
  011E'   0F                            RRCA
  011F'   0F                            RRCA
  0120'   0F                            RRCA
  0121'   0F                            RRCA
  0122'   CD 0143'                      CALL HEX1
  0125'   D5                            PUSH DE
  0126'   5F                            LD E,A
  0127'   0E 02                         LD C,02
  0129'   CD 0005                       CALL FCALL
  012C'   D1                            POP DE
  012D'   0E 02                         LD C,02
  012F'   CD 0005                       CALL FCALL
  0132'   1E 0D                         LD E,0DH
  0134'   0E 02                         LD C,02
  0136'   CD 0005                       CALL FCALL
  0139'   1E 0A                         LD E,0AH
  013B'   0E 02                         LD C,02
  013D'   CD 0005                       CALL FCALL
  0140'   C3 0100'                      JP LOOP
  0143'   E6 0F                 HEX1:AND 0FH
  0145'   C6 30                         ADD A,30H
  0147'   FE 3A                         CP 3AH
  0149'   D8                            RET C;0-9
  014A'   C6 07                         ADD A,07;A-F
  014C'   C9                            RET     
                                ;
                                        END
        MACRO-80 3.44   09-Dec-81       PAGE    S


Macros:

Symbols:
0005    FCALL           0143'   HEX1            0100'   LOOP            



No Fatal error(s)

うーん。
見たところ異常は無さそうですねえ。
ただＣＡＬＬ、ＪＰのアドレス部が気になります。
ＣＤ０５００になるべきところが、ＣＤ　０００５になっています。
もっともここはこのあとリンカー（Ｌ８０）にかければ正しく置き換えられるのかもしれませんが。

こうなってくると、やっぱり最終的なマシン語コードがどうなっているのかを確認してみるしかないようです。
そのためには、ＭＶＦＴＳＴ１Ｃ［Ｅｎｔｅｒ］を実行して、マシン語プログラムが０１００Ｈにロードされた直後にブレークして、０１００Ｈからのメモリ内容をＤＭ＠コマンドで確かめてみるのがよさそうです。

トランジェントプログラムをロードした直後にブレークさせる方法については、［第１８１回］で説明をいたしました。
そこではＣＣＰプログラムのアドレスＣ２３８Ｈにブレークポイントを設定しました。
Ｃ２３８Ｈは０１００Ｈにトランジェントプログラムをロードしたあと、その０１００ＨへのＣＡＬＬ命令が書かれているアドレスです。

［第１８１回］の時点ではその方法でよかったのですが、その後にＣＰ／Ｍではメモリサイズの大きなプログラムをロード、実行する場合に、ＣＣＰ部分を上書きすることもある、ということがわかったため、ＢＩＯＳのブート部分を修正して、ブート時にはＣＣＰを再ロードするように変更しました。
うーん。
ちょっと説明がわかりにくいかもしれませんが。
ＺＢ３ＢＡＳＩＣからＪＰ　Ｄ２３３［Ｅｎｔｅｒ］でＣＰ／Ｍ互換ＤＯＳを起動するとき、そのブートが行なわれます。
つまり、ＪＰ　Ｄ２３３の実行後にＣＣＰプログラムがロードされるため、それ以前にＣＣＰプログラムにブレークポイントを設定しても無意味、ということです。

新しく変更したＢＩＯＳのブートプログラム部分です。
アドレスＤ２Ｂ７Ｈで、ＣＣＰのロードプログラムがＣＡＬＬされています。

              ;
              ;BIOS ROUTINE
              ;
D277 3100F8   SETENTRY:LD SP,SPTOP
D27A AF       	XOR A
D27B 3204D6   	LD (CURDRV),A
              ;here,dos system reload
D27E 3100F8   WBOOTJ:LD SP,SPTOP
D281 3EFF     	LD A,FF
D283 D39C     	OUT (9C),A
D285 213800   	LD HL,RST7
D288 3EC3     	LD A,C3
D28A 77       	LD (HL),A
D28B 23       	INC HL
D28C 11CAD2   	LD DE,RST7BRK
D28F 73       	LD (HL),E
D290 23       	INC HL
D291 72       	LD (HL),D
              ;
D292 210000   	LD HL,REENT
D295 3EC3     	LD A,C3
D297 77       	LD (HL),A
D298 23       	INC HL
D299 1103D2   	LD DE,BOOT
D29C 73       	LD (HL),E
D29D 23       	INC HL
D29E 72       	LD (HL),D
D29F 210300   	LD HL,IOBYTE
D2A2 AF       	XOR A
D2A3 77       	LD (HL),A
D2A4 23       	INC HL
D2A5 77       	LD (HL),A
D2A6 23       	INC HL
D2A7 3EC3     	LD A,C3
D2A9 77       	LD (HL),A
D2AA 23       	INC HL
D2AB 1106C7   	LD DE,FBASE
D2AE 73       	LD (HL),E
D2AF 23       	INC HL
D2B0 72       	LD (HL),D
D2B1 11E9D4   	LD DE,ZCCP
D2B4 2100BF   	LD HL,CBASE
D2B7 CD87D4   	CALL LOADZ
D2BA DAC4D2   	JP C,SETEN2
D2BD 3A04D6   	LD A,(CURDRV)
D2C0 4F       	LD C,A
D2C1 C300BF   	JP CBASE
D2C4 AF       SETEN2:XOR A
D2C5 D39C     	OUT (9C),A
D2C7 C33310   	JP ZB3MON

そこでトランジェントプログラムのロード直後にブレークするための手続きはちょっと複雑になりますが、２段階で行なうことになります。
下のログファイルが実際にそれを行なっているところです。

まず最初はＣＣＰのロード直後にブレークするため、アドレスＤ２Ｃ１Ｈにブレークポイントを設定します。
ＣＣＰをロード後にＣＣＰにエントリする直前のアドレスでブレークするためです。

あ。
ＣＣＰのロードアドレスも、当初はＢＣ００Ｈだったのですが、少し後に下げて、ＢＦ００Ｈに変更しました。
できるだけトランジェントエリアを大きくするためです。

logfile nd80zlog\08041655.txt open

ＮＤ８０ＺⅢに接続しました
0001 0000 - z
1000 00C3 - 
*** nd80z3 basic ****
can't open D.vfd
>bp d2c1
>jp d233

A F  B C  D E  H L  A'F' B'C' D'E' H'L'  PC   SP   IX   IY  I  SZ H PNC
0044 0700 D4C7 C65C 0000 0000 0000 0000 D2C1 F800 0000 0000 FF 01000100
>bp c541
>rt@

ＢＰ　Ｄ２Ｃ１［Ｅｎｔｅｒ］を実行してＤ２Ｃ１Ｈにブレークポイントを設定したあと、ＪＰ　Ｄ２３３［Ｅｎｔｅｒ］で、ＣＰ／Ｍ互換ＤＯＳを起動すると、ＣＣＰをロード直後にブレークします。
そこであらためて、ＣＣＰのトランジェントプログラムのコール直前のアドレスＣ５４１Ｈにブレークポイントを設定します。
そしてそのあとＲＴ＠で、ブレークしたところから続きを再開します。

トランジェントプログラムをコールするところのアドレスも変更になっています。
［第１８１回］の時点ではＣ２３８Ｈでしたが、上のログではＣ５４１Ｈになっています。
下は新しいＣＣＰプログラムの、トランジェントプログラムのコール部分のリストです。
［第１８１回］のリストと同じプログラムですが、アドレスが移動しています。

              ;
C52A 218000   	LD HL,DMABF
C52D 2262D6   	LD (DIRBFADRS),HL
C530 2206D6   	LD (DMABFADRS),HL
C533 3A05D6   	LD A,(CDRV_DIRWK)
C536 2104D6   	LD HL,CURDRV
C539 BE       	CP (HL)
C53A CA41C5   	JP Z,USRCMD722
C53D 5F       	LD E,A
C53E CD33C7   	CALL DRVNOSET
C541 CD0001   USRCMD722:CALL TRNS0
C544 3A05D6   USRCMD73:LD A,(CDRV_DIRWK)
C547 3204D6   	LD (CURDRV),A
C54A C32EBF   	JP CCPENTRY
              ;

説明があちこち飛んでしまいましたので、理解しにくいかもしれません。
ともかくそのように最終的にトランジェントプログラムのロード直後に（つまり、今回はＭＶＦＴＳＴ１Ｃ．ＣＯＭを０１００Ｈにロードした直後に）ブレークするように、
ＢＰ　Ｃ５４１［Ｅｎｔｅｒ］
を実行してから
ＲＴ＠［Ｅｎｔｅｒ］
で、ブレークしたところから実行を再開しました。

するとＣＰ／Ｍ互換ＤＯＳにエントリして、
Ａ＞
が表示されましたから、まずはＤＩＲコマンドでＡドライブのディレクトリを表示させました。
ここでディレクトリを表示させたことに深い意味はありません。

そのあと、
ＭＶＦＴＳＴ１Ｃ［Ｅｎｔｅｒ］を入力しました。


A>dir
A: F80      COM : HELL1    FOR : HELL1    REL : HELLO    FOR
A: HELLO    REL : HELL2    FOR : HELL2    REL : HELL3    FOR
A: HELL3    REL : M80      COM : MVFTST1  MAC : MVFTST1  REL
A: MVFTST1B MAC : MVFTST1B PRN : MVFTST1B REL : MVFTST1C MAC
A: MVFTST1C PRN : MVFTST1C REL : L80      COM : MVFTST1C COM
A: VFTST1   COM
A>mvftst1c

A F  B C  D E  H L  A'F' B'C' D'E' H'L'  PC   SP   IX   IY  I  SZ H PNC
0042 0001 D709 D604 0000 0000 0000 0000 C541 F800 0000 0000 FF 01000010
>dm@0100,017f
0100  00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00  ................
0110  00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00  ................
0120  00 00 00 00 00 00 00 00-00 00 00 00 00 00 00 00  ................
0130  00 00 1A 29 0B FE 29 C4-9D 04 C3 40 0B 3E 01 32  ...)..)ﾄ..ﾃ@.>.2
0140  2F 3D C3 59 2B AF 32 2F-3D C3 59 2B AF 32 2D 3D  /=ﾃY+ｯ2/=ﾃY+ｯ2-=
0150  C3 59 2B CD 55 0B C2 47-2B 0C 0D CA 47 2B F5 CD  ﾃY+ﾍU.ﾂG+..ﾊG+.ﾍ
0160  0E 0C C4 24 0C C2 3A 2B-7E F6 40 77 F1 FE 2C C0  ..ﾄ$.ﾂ:+~.@w..,ﾀ
0170  CD 55 0B C2 C1 04 C3 2C-2B 3E 01 32 2D 3D C9 3E  ﾍU.ﾂﾁ.ﾃ,+>.2-=ﾉ>
>0000 00C3 - 
リモート接続を終了しました
logfile closed at Sat Aug 04 17:02:05 2012

するとＣ５４１Ｈでブレークしました。
ＭＶＦＴＳＴ１Ｃを０１００Ｈにロードした直後のブレークですから、０１００ＨからのメモリエリアをＤＭコマンドで確認してみれば、そこにロードされたマシン語コードが見えるはずです。

ＤＭ＠０１００，０１７Ｆ［Ｅｎｔｅｒ］
を実行しました。

むむむ？
なんだか様子が変です。
これは？
ＭＶＦＴＳＴ１．ＣＯＭのマシン語プログラムとは似ても似つかぬ代物です。

これは一体どうしたことでありましょうか？
追求はさらに続きます。
毎度のことながら、なかなかにつらい人生であります。

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

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