No need EXP and EXP2

This commit is contained in:
Anatoliy Belyanskiy 2023-06-24 05:50:08 +10:00
parent eb37c13a60
commit b2623d1cd9
3 changed files with 41 additions and 37 deletions

View File

@ -6503,18 +6503,16 @@ REDIR_3D13:
RES 6,C RES 6,C
JP HD_CMD ;#3FF0 ROM. DI JP HD_CMD ;#3FF0 ROM. DI
BLOCK #3CFA - $,255
;***************************** ;*****************************
BLOCK #3CFA - $,255
AUTO_3CFA: AUTO_3CFA:
JP xchg_intf1 JP xchg_intf1
;****** 3D13 redirection ****** ;****** 3D13 redirection ******
BLOCK #3CFD - $,255
AUTO_3CFD: AUTO_3CFD:
JP REDIR_3D13 JP REDIR_3D13
; JP AUTO_283C ; JP AUTO_283C
;***********************************************************************; ;***********************************************************************;
BLOCK #3D00-$,#FF BLOCK #3D00-$,#FF
@ -6535,6 +6533,7 @@ AUTO_3D0E:
NOP NOP
JR AUTO_3CFA JR AUTO_3CFA
;****** 3D13 point !!! **** ;****** 3D13 point !!! ****
BLOCK #3D13-$,#FF
NOP NOP
JR AUTO_3CFD JR AUTO_3CFD
AUTO_3D16: AUTO_3D16:
@ -6562,8 +6561,8 @@ AUTO_3D31:
JP EDIT_X05 JP EDIT_X05
AUTO_3D38: AUTO_3D38:
XOR A XOR A
OUT (#F7),A ;????? OUT (#F7),A ;¯à®¢¥àª  ˆ­â¥à䥩င<E2809E>)))
IN A,(#F7) ;????? IN A,(#F7)
CP 30 CP 30
JR Z,AUTO_3D44 JR Z,AUTO_3D44
CP 31 CP 31
@ -6579,7 +6578,7 @@ AUTO_3D44:
AUTO_3D4C: AUTO_3D4C:
XOR A XOR A
OUT (P_DOS_FF),A OUT (P_DOS_FF),A
IN A,(#F6) ;????? IN A,(#F6)
LD HL,AUTO_3D38 LD HL,AUTO_3D38
LD DE,MEM_BOT LD DE,MEM_BOT
LD BC,AUTO_3D38.Size + AUTO_3D44.Size LD BC,AUTO_3D38.Size + AUTO_3D44.Size
@ -6622,7 +6621,7 @@ PRINT_SYM:
RST R38 RST R38
AUTO_3D94: AUTO_3D94:
RST RST20 RST RST20
DW 00010H DW #0010 ;!HARDCODE
RET RET
AUTO_3D98: AUTO_3D98:
LD A,8 LD A,8
@ -6631,11 +6630,11 @@ WG93_EXE:
AUTO_3D9C: AUTO_3D9C:
PUSH HL PUSH HL
RST RST20 RST RST20
DW 01F54H DW #1F54 ;!HARDCODE
;RET_1F54: ;RET_1F54:
JR C,AUTO_3DA5 JR C,AUTO_3DA5
RST RST20 RST RST20
DW 01B7BH DW #1B7B ;!HARDCODE
AUTO_3DA5: AUTO_3DA5:
POP HL POP HL
IN A,(P_DOS_FF) IN A,(P_DOS_FF)
@ -7014,7 +7013,8 @@ AUTO_3FEC:
;****************************************** ;******************************************
;****************************************** ;!FIXIT Œ®¦­® ¯®¯à ¢¨âì ­®¬¥à  ä㭪権 ¯à¨ ¢ë§®¢ å API ¨ ¯à룠âì áà §ã ¢ BIOS ç¥à¥§ #3FF8
;-------[ From TR-DOS to API 4x ]-------
BLOCK #3FF0-$, #FF BLOCK #3FF0-$, #FF
HD_CMD: PUSH AF HD_CMD: PUSH AF
DI DI
@ -7022,10 +7022,10 @@ HD_CMD: PUSH AF
OUT (SYS_PORT_ON),A OUT (SYS_PORT_ON),A
POP AF POP AF
RET RET
;****************************************** ;---------------------------------------
;
;****************************************** ;----[ From API #80..#FF to TR-DOS ]-----
BLOCK #3FF8-$, #FF BLOCK #3FF8-$, #FF
EXP_FNS: EXP_FNS:
PUSH AF PUSH AF
@ -7034,7 +7034,10 @@ EXP_FNS:
OUT (SYS_PORT_ON),A OUT (SYS_PORT_ON),A
POP AF POP AF
RET RET
;****************************************** ;---------------------------------------
;
;
BLOCK #4000-$, #FF BLOCK #4000-$, #FF
DISPLAY "16k..ALL!" DISPLAY "16k..ALL!"
; ;

View File

@ -1707,21 +1707,21 @@ kbd_loop2:
;***********************************************************************; ;***********************************************************************;
;!FIXIT not used ;!FIXIT not used
BLOCK #3FD0 - $,0 BLOCK #3FD0 - $,0
FN1_RET: ; FN1_RET:
PUSH AF ; PUSH AF
LD A,D_ROM16ON ; LD A,D_ROM16ON
OUT (CNF_PORT),A ; OUT (CNF_PORT),A
POP AF ; POP AF
RST #18 ; RST #18
JR FN1_RET ; JR FN1_RET
;***********************************************************************; ;***********************************************************************;
;!FIXIT not used ;!FIXIT not used
BLOCK #3FE0 - $,255 BLOCK #3FE0 - $,255
SOUND_TEST: ; SOUND_TEST:
LD A,D_ROM16ON ; AROM16 = 1 ; LD A,D_ROM16ON ; AROM16 = 1
OUT (CNF_PORT),A ; OUT (CNF_PORT),A
JP SND_TEST_RET ; JP SND_TEST_RET
;***********************************************************************; ;***********************************************************************;
BLOCK #3FE8 - $,255 BLOCK #3FE8 - $,255

View File

@ -40,12 +40,12 @@ START:
; RET ; RET
;***********************************************************************; ;***********************************************************************;
BLOCK #3FD0-$,255 BLOCK #3FD0-$,255
PUSH AF ; PUSH AF
LD A,D_ROM16OFF ; LD A,D_ROM16OFF
OUT (SYS_PORT_ON),A ; OUT (SYS_PORT_ON),A
POP AF ; POP AF
HD_CMD_XR_RET: ; HD_CMD_XR_RET:
RET ; RET
;***********************************************************************; ;***********************************************************************;
BLOCK #3FD7-$,255 BLOCK #3FD7-$,255
@ -55,10 +55,10 @@ HD_CMD_XR:
;***********************************************************************; ;***********************************************************************;
;!FIXIT not used ;!FIXIT not used
BLOCK #3FE0-$,255 BLOCK #3FE0-$,255
SND_TEST_RET: ; SND_TEST_RET:
LD A,D_ROM16OFF ; LD A,D_ROM16OFF
OUT (SYS_PORT_OFF),A ; OUT (SYS_PORT_OFF),A
JP SND_TEST_RET ; JP SND_TEST_RET
;***********************************************************************; ;***********************************************************************;
BLOCK #3FE8-$,255 BLOCK #3FE8-$,255
@ -86,7 +86,8 @@ EXP_FNS_RET:
PUSH AF PUSH AF
LD A,D_ROM16OFF LD A,D_ROM16OFF
OUT (SYS_PORT_OFF),A OUT (SYS_PORT_OFF),A
JP HD_CMD_XR_RET //JP HD_CMD_XR_RET
RET
;***********************************************************************; ;***********************************************************************;
BLOCK #4000-$,255 BLOCK #4000-$,255