diff --git a/constants/SP2000.inc b/constants/SP2000.inc index 02a040b..bf543c1 100644 --- a/constants/SP2000.inc +++ b/constants/SP2000.inc @@ -1,6 +1,9 @@ ; DEFDEVICE SPRINTER, #4000, 256 + DEFINE SLOT? +(SLOT0 | ((#C0 & high $)>>>1)) + DEFINE OFFSET? +(SLOT3 ^ SLOT?)*512 + IFNDEF _includedSP2000 : DEFINE _includedSP2000 : ENDIF ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; Прерывания ; @@ -388,7 +391,6 @@ SCR_SyncPort EQU #FE ;--------------------------------------- ; - DEFINE SLOT? +( SLOT0 | ((#C0 & high $)>>>1) ) SLOT0 EQU #82 ; номер банки 0 .MEM_ADDR EQU #00 SLOT1 EQU #A2 ; номер банки 1 @@ -2051,6 +2053,22 @@ REG: ;=======================================================================; ;__________________________________________________________________________________________________________# +; MACRO _mGET_FAT_START slot_num +; .correct EQU (SLOT3 and slot_num)*2 + +; IN A,(slot_num) +; LD B,A +; LD A,SYS_PAGE +; OUT (slot_num),A +; LD HL,SYS_PAGE.RAMD_FAT - .correct + +; DISPLAY "CORRECT = ",/h,.correct +; ENDM + +; MACRO _mGET_FAT_END slot_num +; OUT (slot_num),A +; ENDM +;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ; ; DW #FEFF ; Sprinter-2000 ;