復活!CP/M ワンボードマイコンでCP/Mを!
CP/MがTK−80互換のワンボードマイコンの上で復活します
ND80ZVとMYCPU80の上でCP/Mが走ります!
[第84回]
●RAMディスクの再構築
前回からの続きです。
前回は、AドライブとBドライブの2つに分けた新しい仮のRAMディスクシステムにアクセスできるようにCP/Mを変更しました。
変更したCP/Mを実際に走らせるには、RAMディスクをそのように整えておく必要があります。
でもその前に、まずは現在のAドライブだけのRAMディスクを保存しておくことにします。
logfile nd80zlog\04041833.txt open ND80ZVに接続しました 0001 0000 - z 1000 00C3 - *** nd80z3 basic **** >jp d233 a>dir A: FNC0BTST COM : FNC0BT2 COM : FNC0BT3 COM : FNC0BT4 COM A: FNC0BT1 COM : FNC0BT6 COM : FNC0BT7 COM : FNC04T1 COM A: FNC0BT5 COM : FNC0304T COM : SOUSINT COM : FN0304T2 COM A: FNC06T2 COM : FNC06T3 COM : FNC06T4 COM : FNC06T5 COM A: FNC06T6 COM a>^D>a>^D> ERR:23 >/sv ramdskb.bin,8800,b7ff 3000(12288)bytes saved > |
>/ld fille5.bin,8100 loading FILLE5.BIN ...0010(16)bytes loaded,from 8100 to 810F >jp 8100 >dm 8800,88ff 8800 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8810 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8820 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8830 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8840 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8850 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8860 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8870 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8880 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 8890 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 88A0 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 88B0 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 88C0 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 88D0 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 88E0 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ 88F0 E5 E5 E5 E5 E5 E5 E5 E5-E5 E5 E5 E5 E5 E5 E5 E5 ................ > |
>/ld cpm22k.bin,bc00 loading CPM22K.BIN ...177b(6011)bytes loaded,from BC00 to D37A >jp d233 a>dir No file a>b: b>dir No file b>c: Bdos Err On C: Select a> |
; BDOS function 0E test ; ORG $8100 FCALL=$8005 ; LD C,0E LD E,00;drive a CALL FCALL RET ; |
2012/4/4 18:44 fnc0e_0.txt END=8107 ; BDOS function 0E test ; ORG $8100 FCALL=$8005 ; 8100 0E0E LD C,0E 8102 1E00 LD E,00;drive a 8104 CD0580 CALL FCALL 8107 C9 RET ; FCALL =8005 |
>/ld fnc0e_0.bin,8100 loading FNC0E_0.BIN ...0008(8)bytes loaded,from 8100 to 8107 >jp d233 a>b: b>save 1 fnc0e-0.com b>dir B: FNC0E-0 COM b>fnc0e-0 b> |
; BDOS function 0E test ; ORG $8100 FCALL=$8005 ; LD C,0E LD E,01;drive b CALL FCALL RET ; |
2012/4/4 21:45 fnc0e_1.txt END=8107 ; BDOS function 0E test ; ORG $8100 FCALL=$8005 ; 8100 0E0E LD C,0E 8102 1E01 LD E,01;drive b 8104 CD0580 CALL FCALL 8107 C9 RET ; FCALL =8005 |
>/ld fnc0e_1.bin,8100 loading FNC0E_1.BIN ...0008(8)bytes loaded,from 8100 to 8107 >jp d233 a>save 1 fnc0e-1.com a>dir A: FNC0E-1 COM a>fnc0e-1 a> |