%第1版第9第刷 % 本文由来の誤植ありあり。もっと新しい刷の方に直して貰わないと・・・ % ・List A.1 に、List 5.15 が必要と書いてあるけど、たぶん 5.13 % (5.15 は無いし。勝手に修正済) % ・本文には「erea」という部分が何カ所か。workerea とか。 % 勝手に area に修正。 % ・カートリッジバス配線図。+5V が 2 つある・・・。どちらが -5V か % わからないので、そのままにしてあります。 % %==================================================================== Appendix A.7 カートリッジ ハードウェア仕様 第 5 部 7 章ではカートリッジ ROM 内に収めるソフトウェアの作成法を説明しましたが、実際にカートリッジを制作する場合には、ここに示したハードウェア仕様を参考にしてください。 %========================================================================= ;============================================================ ; List A.1 MSX ROM Cartridge Header to start by H.STKE ; (this program must link List 5.13) ;============================================================ ; ; Switch SNSDEL EQU 1 ;Sense DEL key not to start ; ; BIOS ; SNSMAT EQU 141H ;Sense key in real time ; ; System work area ; H.STKE EQU 0FEDAH ;Hook for auto start ; ; External symbol ; EXTRN START ;Address to start EXTRN GTSL1@ ;Get my slot address ; ; Header ; ASEG ORG 4000H DB 41H, 42H DW INIT DW 0 ;No STATEMENT DW 0 ;No DEVICE DW 0 ;No TEXT DW 0 DW 0 DW 0 ; ; INIT : set H.STKE and return ; INIT: IF SNSDEL LD A,8 ;Read 8th row CALL SNSMAT ;Read key BIT 3,A ;DEL key RET Z ;Return if DEL pressed ENDIF ;IF SNSDEL ; LD HL,H.STKE ;Hook for auto start LD A, 0F7H ;"RST 30H" instruction DI ;For fale safe LD (HL), A CALL GRSL1@ ;[A] = my slot address INC HL LD (HL), A LD DE, START ;Set start address INC HL LD (HL), E INC HL LD (HL), D EI RET END %========================================================================= %========================================================================= ;================================================================ ; List A.2 MSX ROM Cartridge Header to get work area from HIMEM ;================================================================ .SFCOND .XALL .RADIX 10 ; ; Switch ; SNSDEL EQU 1 ;Sense DEL key not to start ; ; Constant ; MYWORK EQU 1024 ;Length of my work area to request ; ; BIOS ; RSLREG EQU 138H ;Get primary slot register SNSMAT EQU 141H ;Sense key in real time CALBAS EQU 159H ;Call BASIC interpreter ; ; System work area ; MEMSIZ EQU 0F672H VARTAB EQU 0F6C2H STKTOP EQU 0F674H TEMP EQU 0F6A7H ;To save text pointer MAXFIL EQU 0F85FH FILTAB EQU 0F860H NULBUF EQU 0F862H BOTTOM EQU 0FC48H HIMEM EQU 0FC4AH EXPTBL EQU 0FCC1H SLTWRK EQU 0FD09H H.CLEA EQU 0FED0H ;Hook to get work area ; ; MACROS ; COMPAR MACRO RST 20H ;Compares HL with DE ENDM ; BIOS MACRO ADDRESS CALL ADDRESS ;Will be change for DOS version ENDM ; ; Header ; CSEG ; ASEG ; ORG 4000H DB 41H, 42H DW INIT DW 0 ;No STATEMENT DW 0 ;No DEVICE DW 0 ;No TEXT DW 0 DW 0 DW 0 ; ; INIT : set H.CLEA and return ; INIT: IF SNSDEL LD A,8 ;Read 8th row CALL SNSMAT ;Read key BIT 3,A ;DEL key RET Z ;Return if DEL pressed ENDIF ;IF SNSDEL ; LD HL, H.CLEA ;Hook to get work area LD A, 0F7H ;"RST 30th" instruction DI ;For fale safe LD (HL), A CALL GTSL1@ ;[A] = my slot address INC HL LD (HL), A LD DE, START ;Set start address INC HL LD (HL), E INC HL LD (HL), D EI RET ; ; Called by H.CLEA ; START: LD (TEMP),HL ;Save [HL] DI ;For fail safe LD B,5 LD HL,H.CLEA LD A,0C9H ;RET instruction CLHOOK: LD (HL),A ;Clear H.CLEA INC HL DJNZ CLHOOK EI ; LD HL,MYWORK ;How many memory to request CALL WORKH@ ;Change HIMEM ; ; [HL] = (HIMEM) = start address of my work area ; [HL] = 0 if out of memory ; CALL DEFILE ; ; Note that DEFILE changes stack pointer ; LD IX,7D20H JP CALBAS ; ; Note that H.CLEA will be called again. ; Make sure that H.CLEA is cleared by 'RET' ;----------------------------------------------------------- ; BOTTOM became greater than 0DFFFH, there is ; no RAM left to be allocated. ; NORMOOM: LD HL,0 CALL WSLW1@ ;Clear slot work JR WORKBEND ;Return 0 in [HL] ENDIF ;IF USEWORKB OR USEWORKH IF USEWORKH ; ; WORKH allocate work area from HIMEM ; (my slot work) <- (new HIMEM) ; Entry HL required memory size ; Return HL start address of my work area = new HIMEM ; 0 if cal not allocate ; Modify None ; Note This routine shoud be called by H.STKE not by INIT. ; LIMHIM EQU 0C400H ; PUBLIC WORKH@ WORKH@: PUSH DE PUSH BC PUSH AF ; EX DE,HL ;[DE} = size LD HL,(HIMEM) ;Get current RAM top XOR A ;Clear carry SBC HL, DE ;[HL] = new HIMEME JR C, NOROOM ;HIMEM < 0 EX DE, HL ;[DE] = new HIMEME LD HL, LIMHIM ;Lower limit of HIMEM XOR A ;Clear carry SBC HL, DE JR NC, NOROOM ;HIMEM < LIMHIM EX DE, HL ;[HL] = new HIMEM CALL WSLW1@ ;Save HIMEM to slot work LD (HIMEM), HL ;Update HIMEM JR WORKBEND ENDIF ;If USEWORKH ; ; DEFILE : re-build file structure ; Original program is in INIT.MAC ; Changed to set workarea at H.CLEA ; MAXFIL = 1 ; String space = 200 ; by nao-i on 3. Feb., 1986 ; ; Entry (HIMEM) New HIMEM ; (STKTOP) To know string space if not STR200 ; (MEMSIZ) To know string space if not STR200 ; (VARTAB) To check free space if CHKOME ; [A] New MAXFIL if not FILMAX1 ; ; Return (MAXFIL) ; (FILTAB) ; (MEMSIZ) ; (STKTOP) ; (NULBUF) ; ; Modify AF, BC, DE, HL, SP ; ; Note This routine changes stack pointer ; ; Constant ; NUMLEV EQU 60 FILLEN EQU 265 FL.BUF EQU 9 ; ; Switch ; MAXFIL1 EQU 1 ;MAXFILE = 1 STR200 EQU 1 ;String space is 200 Byte CHKOME EQU 0 ;Check "Out of memory" ; IF CHKOME EXTRN OMERR ;Entry of "Out of memory" ENDIF ; DEFILE: IFE MAXFIL1 PUSH AF ;Save new MAXFIL ENDIF ;IFE MAXFIL1 LD HL,(HIMEM) IF MSXFIL1 LD DE,65536-FILLEN*2-4 ADD HL,DE ELSE LD DE,65536-FILLEN-2 DEFIL1: ADD HL,DE ;[HL] = (HIMEM) - FILLEN -2 DEC A JP P,DEFIL1 ENDIF ;IF MAXFIL1 EX DE,HL ;DE:=FILTAB IF STR200 ;String space is fixed LD HL,200 ELSE LD BC,(STKTOP) ;Get current string space in BC LD HL,(MEMSIZ) XOR A ;Clear carry SBC HL,BC ;[HL] = (MEMSIZ) - (STKTOP) ENDIF ;IF STR200 IFE MAXFIL1 POP AF ;Restore new MAXFIL ENDIF ;IFE MAXFIL1 PUSH HL ;Save current string space IFE MAXFIL1 PUSH AF ;Save new MSXFIL ENDIF ;IFE MAXFIL IF CHKOME LD BC,2*NUMLEV+20 ADD HL,BC LD B,H LD C,L LD HL,(VARTAB) ;Get end of program ADD HL,BC COMPAR ;Enough breathing room? JP NC,OMERR ;No ENDIF ;IF CHKOME IF MAXFIL1 LD A, 1 ;Make sure MAXFIL = 1 ELSE POP AF ;Restore new MAXFIL ENDIF ;IF MSXFIL1 LD (MAXFIL),A LD L,E LD H,D ;[HL] = [DL] = (HIMEM) - FILLEN -2 LD (FILTAB),HL ;Pointer to first FCB DEC HL DEC HL ;[HL] = (HIMEM) - FILLEN - 4 LD (MEMSIZ),HL POP BC ;Restore current string space XOR A ;Clear carry SBC HL, BC LD (STKTOP),HL ;[HL] = (HIMEM) - FILLEN -4 - DEC HL DEC HL POP BC ;Get return address LD SP,HL ;Set new temporary stack PUSH BC IF MSXFIL1 LD A, 1 ;[A] = MAXFIL LD HL, 4 ;[HL] = MAXFIL * 2 + 2 ELSE LD A,(MSXFIL) LD L,AINC L LD H,0 ADD HL,HL ;[HL] = (MSXFIL) * 2 + 2 ENDIF ;IF MAXFIL1 ADD HL,DE ;Add FILTAB to get start of FCB's EX DE,HL ;DE=Adress of first FCB PUSH DE ;Address of first FCB (#0) LD BC,FILLEN DSKFLL: LD (HL),E INC HL LD (HL),D INC HL EX DE,HL LD (HL),0 ;Make it look closed ADD HL,BC EX DE,HL DEC A JP P,DSKFLL POP HL ;Restore address of first FCB LD BC,FL,BUF ADD HL,BC ;Get address of buffer for file #0 LD (NULBUF),HL RET END %========================================================================= ●カートリッジバス信号線表 ピンNo. 名称 I/O* ピンNo. 名称 I/O* ___ ___ 1 CS1 O 2 CS2 0 ____ _____ 3 CS12 0 4 SLTSL 0 ____ 5 予備 *1 - 6 RFSH 0 ____ ___ 7 WAIT *2 1 8 INT *2 I __ ______ 9 M1 0 10 BUSDIR I ____ ____ 11 IORQ O 12 MERQ O __ __ 13 WR O 14 RD O _____ 15 RESET O 16 予備 *1 - 17 A9 0 18 A15 0 19 A11 O 20 A10 O 21 A7 O 22 A6 O 23 A12 O 24 A8 O 25 A14 O 26 A13 O 27 A1 O 28 A0 O 29 A3 O 30 A2 O 31 A5 O 32 A4 O 33 D1 I/O 34 D0 I/O 35 D3 I/O 36 D2 I/O 37 D5 I/O 38 D4 I/O 39 D7 I/O 40 D6 I/O 41 GND - 42 CLOCK O 43 GND - 44 SW1 - 45 +5V - 46 SW2 - 47 +5V - 48 +12V - 49 SUNDIN I 50 -12V - 注) 本体を基準にした入出力の区別 *1 予備は使用禁止端子 *2 OPEN COLLECTER 出力 %==================================================================== % スロットの番号図 %==================================================================== ●スロットのタイミングチャート M1 サイクル 基本スロット %==================================================================== % 図 %==================================================================== M1 サイクル 拡張スロット %==================================================================== % 図 %==================================================================== メモリサイクル 基本スロット %==================================================================== % 図 %==================================================================== メモリサイクル 拡張スロット %==================================================================== % 図 %==================================================================== I/O サイクル 基本スロット %==================================================================== % 図 %==================================================================== I/O サイクル 拡張スロット %==================================================================== % 図 %==================================================================== ●拡張スロットセレクト信号作成回路例 %==================================================================== % 図×３つ %==================================================================== ●カートリッジ寸法 %==================================================================== % 図×３つぐらい %==================================================================== ●コネクター寸法例 %==================================================================== % 図×３ %====================================================================