FLEX09上のMC09でASSIST09などのモニター下で動作する実行ファイルを作成する

 FLEX09上のMC09を用いてFLEX09がない環境で動作する実行ファイルを作成する

FLEX09には高機能で使いやすいアセンブラASMBがあって便利に使っています。さらに有名な整数型CコンパイラMC09もあります。

ASMBで作成した実行ファイルはもちろんFLEX09のない環境に移行して動作させることができるので、しばしばそのような使い方をしているのですが、MC09については、生成された実行ファイルがFLEX09と密接に関連していて、他の環境で動作させることはできないと思い込んでいました。

しかし以前、「小さな言語」というwnoy さんのサイトがありまして、そこではMPB6809というボードマイコンとそれ用のモニタープログラムが公開されていました。

（現在このサイトは存在しませんが、その内容を保存された方が紹介されています。「MPB6809」で検索するとヒットします。）

このサイトでは他にもForthの移植やTinyBasicの解析などもされているのですが、何とPL/0をMC09でコンパイルして移植しておられるのです。

私もこのモニタープログラムを入力してROMに焼き、自作の6809マイコンでPL/0を走らせてみました。PL/0は実用を目指したコンパイラではないので、特に使い続けるつもりはありませんでしたが、MC09でコンパイルした実行ファイルをMPB6809というマイコンに移植したという点に興味を持ちました。

FLEX09に依存しているファイルI/Oを使わないプログラムならFLEX09がなくても動作するのは当然ではありますが、初めて見る実例でした。このサイトを知ったのは十年以上前なのですが、それ以来、時々ですがMC09でコンパイルした結果のソースリストをいじって自作のマイコンで走らないかと試していました。

PL/0のソースは大幅に書き換えないとそのままではMC09でコンパイルできないので、まだPL/0をコンパイルすることはできていないのですが、他のプログラムについては、最近ようやく何とか動くようになりました。

動作試験に用いたマイコンは下画像のもので、2MHz動作の63B09と68B02を切り替えて使用しています。モニターは6809では自作のものとASSIST09を、6802では自作のものとMIKBUG2をROMに入れてあり、FlexDrvWin.exeという仮想ドライブ構築ソフトを用いることで6809のFLEX09と6800のFLEX2が走っています。

使用したボードマイコン

MC09での実行ファイル作成手順

MC09でコンパイルした結果はC.OUTというアセンブルリストとして出力され、それをMC09に標準で添付されているC.TXTというアセンブルリスト中に読み込んで、全体をアセンブルすることで実行ファイルが生成されます。

MC09 oooo.C　-->　アセンブルリスト C.OUTが作られる。

ASMB C.TXT　oooo.CMD　-->　C.TXT中にC.OUTが読み込まれ、実行ファイル oooo.CMDが生成される。

C.TXTを書き換えれば良いはず

このC.TXT中にコンソールI/OやファイルI/Oなどが書き込まれているので、コンソールI/Oを自分の環境に合うように書き換え、ファイルI/Oは不要ということで削除すれば良いはずなのですが、エラーの連発でなかなかうまくいかず、試行錯誤の連続でしたが、wnoyさんのPL/0のアセンブルリストを参考にしながら何とか動作するものを作ることができました。

もちろん、FLEX09のファイルI/Oを必要とするプログラムはダメですが、ファイルI/OがないプログラムならMC09で作成して、マイコン等で走らせることができます。サンプルとしてメモリダンププログラム mdump.c を作成してみました。

ASSIST09用と自作モニター用の２種を作成した

作成したのは、私の自作マイコンにインストールしてある自作モニター用のC_SBC.TXTとモトローラ社のモニターASSIST09用のC_ASSIST.TXTの２種です。

これらを標準のC.TXTの代わりに用いることで、自作モニタ―上やASSIST09上で動作する実行ファイルが得られます。

MC09 -O1.C.OUT oooo.C　-->　アセンブルリスト C.OUTがドライブ１に作成される

ASMB C_SBC oooo.BIN +YLS　または　ASMB C_ASSIST oooo.BIN +YLS　-->　実行ファイル oooo.BIN がドライブ１に作成される

この実行ファイルをFLEX09のディスクから取り出してマイコン側にインストールして、$100から実行します。

（C.TXTにORG $100と書いてあるので、MC09で作成した実行ファイルは$100から実行することになっていますが、実は、アドレス依存のコードではないのでどのアドレスに置いても実行できます。）

作成したC.SBC.TXTとC.ASSIST.TXTを下記に示します。基本的にI/O関係のアドレスが異なるだけですが、ASSIST09のI/OルーチンはSWI命令を使っているのに対して、私の自作モニターは普通にJSR命令を使っているので、コールの仕方もそれぞれに合わせています。

以下にC.ASSIST.TXTとC.SBC.TXTのリストを示します

C_SBC.TXT 

  

  * * micro-C driver under SBC * * 14-Aug-23 Y.Yamamoto * 12-Dec-81 M.Ohta,H.Tezuka * INCHA EQU $F000 OUTCHA EQU $F002 MONITR EQU $F83A PCRLF EQU $FAE9 ORG $100 _00000 LDX #$BFFF memory end LEAS 1,X * JSR PCRLF CR/LF * LEAS -256,S ALLOCATE WORK AREA LEAU 128,S POINT TO CONTENT OF ARGUMENT VECTOR LEAY _99999,PCR clear globals LDX #_GLOBALS _0C002 BEQ _0C003 CLR ,Y+ LEAX -1,X BRA _0C002 * _0C003 LEAY _99999,PCR LBSR _INITIALIZE call initializer LBSR _main exit JMP MONITR FMS RTS added by Y.Y. GETCH PSHS X,Y,U JSR INCHA get character TFR A,B ANDB #$7F CMPB #26 control-Z ? BNE _0G001 LDD #-1 PULS X,Y,U,PC _0G001 CMPB #$0D BNE _0G002 LDB #$0A _0G002 CLRA PULS X,Y,U,PC * PUTCH2 EQU * PUTCH LDD 2,S PSHS D,X,Y,U TFR B,A CMPA #$09 BNE _0P001 LDA #$20 _0P001 CMPA #$0A BNE _0P002 JSR PCRLF PULS D,X,Y,U,PC _0P002 JSR OUTCHA put character PULS D,X,Y,U,PC （以下省略）

C_ASSIST.TXT 

  

  * * micro-C driver under ASSIST09 * * 14-Aug-23 Y.Yamamoto * 12-Dec-81 M.Ohta,H.Tezuka * INCHA EQU 0 OUTCHA EQU 1 MONITR EQU 8 PCRLF EQU 6 ORG $100 _00000 LDX #$BFFF memory end LEAS 1,X * SWI FCB PCRLF * LEAS -256,S ALLOCATE WORK AREA LEAU 128,S POINT TO CONTENT OF ARGUMENT VECTOR LEAY _99999,PCR clear globals LDX #_GLOBALS _0C002 BEQ _0C003 CLR ,Y+ LEAX -1,X BRA _0C002 * _0C003 LEAY _99999,PCR LBSR _INITIALIZE call initializer LBSR _main exit SWI FCB MONITR FMS RTS added by Y.Y. GETCH PSHS X,Y,U SWI FCB INCHA get character TFR A,B ANDB #$7F CMPB #26 control-Z ? BNE _0G001 LDD #-1 PULS X,Y,U,PC _0G001 CMPB #$0D BNE _0G002 LDB #$0A _0G002 CLRA PULS X,Y,U,PC * PUTCH2 EQU * PUTCH LDD 2,S PSHS D,X,Y,U TFR B,A CMPA #$09 BNE _0P001 LDA #$20 _0P001 CMPA #$0A BNE _0P002 SWI FCB PCRLF PULS D,X,Y,U,PC _0P002 SWI FCB OUTCHA put character PULS D,X,Y,U,PC （以下省略）

（以下省略）の部分は標準のC.TXTの192行目以降と同じです。

参考までに、サンプルとして作成した mdump.c を示しておきます。このような、ファイルI/OがないプログラムはFLEX09がなくても動作するわけです。

mdump.c 

  

  /* memory dump */ #include "STDIO.TXT" #include "ALLOC.TXT" #include "STRING.TXT" int main() { int d, i, sadr, eadr; char sttadr[12], endadr[12]; char ch, *pa; char msttadr[12]; char mendadr[12]; char header[80]; strcpy(msttadr, "sttadr= $"); strcpy(mendadr, "endadr= $"); strcpy(header, " +0 +1 +2 +3 +4 +5 +6 +7 +8 +9 +A +B +C +D +E +F 0123456789ABCDEF"); /* input disp adrs area */ printf(msttadr); i = 0; while ((ch = getchar()) != '\n' && i < 12) { sttadr[i++] = ch; } sttadr[i] = '\0'; printf("\n%s", mendadr); i = 0; while ((ch = getchar()) != '\n' && i < 12) { endadr[i++] = ch; } endadr[i] = '\0'; printf("\n"); sadr = asc2bin(sttadr[0])*0x1000+asc2bin(sttadr[1])*0x100 +asc2bin(sttadr[2])*0x10+asc2bin(sttadr[3]); eadr = asc2bin(endadr[0])*0x1000+asc2bin(endadr[1])*0x100 +asc2bin(endadr[2])*0x10+asc2bin(endadr[3]); /* disp memory data */ sadr &= 0xfff0; do { printf("\n%s\n", header); do { pa = sadr; printf("%04x: ", sadr); /* disp adrs */ for (i=0; i<16; i++) { ch = *(pa+i) & 0xff; if (ch >= 0 && ch < 0x10) printf("%c%x ", '0', ch & 0xff); /* disp data by hex */ else printf("%x ", ch & 0xff); } putchar(' '); for (i=0; i<16; i++) { d = *(pa+i); ch = (d>=0x20 & d<=0x7e)?d:'.'; putchar(ch); /* disp data by ascii */ } printf("\n"); sadr += 0x10; } while ((sadr < eadr) && (sadr & 0xff) != 0); } while (sadr < eadr); printf("\n"); } /* asc to bin */ asc2bin(ch) char ch; { return (ch>=0 && ch<0x39)?ch-0x30:ch-0x37; }

出来あがった mdump.bin のサイズは4.2KBほどでした。サイズは大きくなりますが、アセンブラで書くよりも作成時間が短くなるので、サイズがそれほど問題にならない場合にはMC09を使用するメリットはあると思います。

参考までに、私の場合の具体的な実行ファイル作成・実行手順を示します。

１．WindowsPC上のエディタでソースプログラムを作成する。

２．FlexDrvWin.exe中のイメージファイル（.DSKまたは.D77）にソースをドラッグ＆ドロップする。

３．MC09でコンパイル、ASMBでアセンブルする。

４．出来あがった実行ファイル（.BIN）をイメージファイルからWindowsPCへ読み出す。

５．バイナリ形式の実行ファイルを自作の変換ソフトCvtMotHexBin.exeを用いてモトローラ形式（.MOT）に変換する。

６．モニターのLoadコマンドでモトローラ形式の実行ファイルを読み込む。

７．モニターのGoコマンドで実行する。

以上ですが、作成・使用したファイル（C_ASSIST.TXT, C_SBC.TXT, 最新版のFlexDrvWin.exe, CvtMotHexBin.exe, サンプルのmdump.c）をOneDriveに上げておきます。なお、FLEX09やMC09の作成手順は以前のブログで紹介しております。