ZX-SP-ROMs/ZX_EXP2.ASM
Anatoliy Belyanskiy 51b40b7af5 Setup
2023-06-17 04:36:58 +10:00

88 lines
1.3 KiB
NASM

;
; EXPANSION VER 3.00 (C) 1997 ELSY Co.
DEVICE ZXSPECTRUM128
ORG 0
INCLUDE 'INC/SPRINT00.INC' ; ª®­áâ ­âë, ¬ ªà®áë..
;******************************
; ***** BEGIN EXPANSION *****
;******************************
START:
DI
HALT
;***************************
BLOCK #10-$,255
RET
;***************************
BLOCK #38-$,255
EI
RETI
;***************************
BLOCK #66-$,#C9
RETN
;***************************
BLOCK #100-$,255
INCLUDE 'EXP/EXP_HDD.ASM'
; INCLUDE 'EXP_KBD.ASZ'
;GLOBAL_RESET:
;GLOBAL_RESET_ALL:
; LD A,0
; OUT (0FDH),A
; LD A,40H
; OUT (0FDH),A
; LD A,0
; OUT (CNF_PORT),A
; LD HL,0
; PUSH HL
; DI
; RET
BLOCK #3FD0-$,255
PUSH AF
LD A,D_ROM16OFF
OUT (SYS_PORT_ON),A
POP AF
HD_CMD_XR_RET:
RET
HD_CMD_XR:
JP HD_CMD
;************************
BLOCK #3FE0-$,255
SND_TEST_RET:
LD A,D_ROM16OFF
OUT (SYS_PORT_OFF),A
JP SND_TEST_RET
;***************************
BLOCK #3FE8-$,255
HD_EXP_RET:
PUSH AF
LD A,D_ROM16OFF
OUT (SYS_PORT_ON),A
JP HD_EXP_EXE
BLOCK #3FF0-$,255
HD_DOS_RET:
PUSH AF
DI
LD A,D_ROM16OFF
OUT (SYS_PORT_OFF),A
JR HD_CMD_XR
EXP_FNS_RET:
PUSH AF
LD A,D_ROM16OFF
OUT (SYS_PORT_OFF),A
JP HD_CMD_XR_RET
;******************************************
BLOCK #4000-$,255
;
;