some refactoring

This commit is contained in:
Anatoliy Belyanskiy 2023-06-26 02:54:36 +10:00
parent 53c775b2f6
commit cc2f5ec57b
6 changed files with 25 additions and 25 deletions

View File

@ -3,6 +3,7 @@
;ÇÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄĶ ;ÇÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄĶ
;º RE-SOURCE'd by Z80MU PROFESSIONAL version 5.2b º ;º RE-SOURCE'd by Z80MU PROFESSIONAL version 5.2b º
;ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ ;ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ
;!TODO ¨á¯®«ì§®¢ âì ¢­¥è­¨¥ ¯®àâë #E0 ¨ #E3 ¤«ï á®åà ­¥­¨ï ॣ¨áâ஢ ¯à¨ ¯¥à¥å¢ â¥ ¢á直å #3D2F
DEVICE ZXSPECTRUM128 DEVICE ZXSPECTRUM128
ORG 0 ORG 0

@ -1 +1 @@
Subproject commit 81f727ca6ecd8fcaaac4f4e573fe1fd6578c1efa Subproject commit fc7af6fc40d61e9f8e626b39a8423d29a955afb2

View File

@ -261,8 +261,7 @@ CMD_EXE1:
LD L,A LD L,A
CALL JP_HL CALL JP_HL
JP AUTO_03E1 JP AUTO_03E1
JP_HL: JP_HL: JP (HL)
JP (HL)
NEXT_WORD: NEXT_WORD:
INC HL INC HL
@ -568,8 +567,8 @@ WORDS:
; CALL EXP_FNS ; CALL EXP_FNS
; RET ; RET
AY8910: AY8910:
LD A,0EAH LD A,#EA
LD C,0F3H LD C,#F3 ;!HARDCODE BIOS.SPRINTER_ALL
CALL EXP_FNS CALL EXP_FNS
EI EI
CALL AUTO_1D97 CALL AUTO_1D97
@ -579,17 +578,17 @@ AY8910:
SPR_1: SPR_1:
LD A,(DE) LD A,(DE)
INC DE INC DE
CP 20H CP #20
JR Z,SPR_1 JR Z,SPR_1
CP "1" CP "1"
LD C,0F0H LD C,#F0 ;!HARDCODE BIOS.RST_CONF.SP97_1
JR Z,SP_1 JR Z,SP_1
CP "2" CP "2"
SCF SCF
RET NZ RET NZ
LD C,0F1H LD C,#F1 ;!HARDCODE BIOS.RST_CONF.SP97_2
SP_1: LD A,(DE) SP_1: LD A,(DE)
CP 21H CP #21
CCF CCF
RET C RET C
CALL EXP_FNS CALL EXP_FNS

View File

@ -1,6 +1,6 @@
INIT_RMD: INIT_RMD:
LD C,9FH LD C,#9F ;!HARDCODE BIOS.FullInit
CALL EXP_FNS CALL EXP_FNS
EI EI
RET RET
@ -57,11 +57,11 @@ TB_ONOFF:
CP 'f' CP 'f'
JR Z,TB_OFF_EXE JR Z,TB_OFF_EXE
TB_ON_EXE: TB_ON_EXE:
LD C,8Fh LD C,#8F ;!HARDCODE BIOS.FN_TURBO
LD A,4 LD A,4
JP EXP_FNS JP EXP_FNS
TB_OFF_EXE: TB_OFF_EXE:
LD C,8Fh LD C,#8F ;!HARDCODE BIOS.FN_TURBO
LD A,3 LD A,3
JP EXP_FNS JP EXP_FNS
; ;
@ -267,7 +267,7 @@ SKEEP_XX1:
;***************************************** ;*****************************************
MADE_next_blk: MADE_next_blk:
PUSH BC PUSH BC
LD C,95h LD C,#95 ;!HARDCODE BIOS.GetMemPageNext (#C7)
CALL EXP_FNS CALL EXP_FNS
POP BC POP BC
INC L ; SET ZF, if END BLK !!! INC L ; SET ZF, if END BLK !!!

View File

@ -24,7 +24,7 @@ HDD_REDIR:
MSD_R_W_UT: MSD_R_W_UT:
PUSH AF PUSH AF
CALL DISK_REDIR CALL DISK_REDIR
CP 40H CP #40
JR NC,HDD_REDIR JR NC,HDD_REDIR
POP AF POP AF
EX AF,AF' EX AF,AF'
@ -417,7 +417,7 @@ SET_1440:
READ_BPB: READ_BPB:
CALL DISK_REDIR CALL DISK_REDIR
CP 40H CP #40
JR NC,HDD_REDIR2 JR NC,HDD_REDIR2
CP 4 CP 4
JP NC,ERROR_MSDOS JP NC,ERROR_MSDOS

View File

@ -3,7 +3,7 @@ DISK_REDIR:
PUSH BC PUSH BC
LD A,(OPER_DISK) LD A,(OPER_DISK)
AND 3 AND 3
LD C,0CFH LD C,#CF ;!HARDCODE BIOS.GET_DRV_ST
CALL EXP_FNS CALL EXP_FNS
EI EI
POP BC POP BC
@ -40,7 +40,7 @@ RECALL_MSD:
TEST_RAMD: TEST_RAMD:
PUSH HL PUSH HL
LD C,0CEH LD C,#CE ;!HARDCODE BIOS.GET_RAMD_ST
CALL EXP_FNS CALL EXP_FNS
EI EI
POP HL POP HL
@ -266,14 +266,14 @@ PAGE_CALC2:
RRCA RRCA
RRCA RRCA
LD D,A LD D,A
AND 0F0H AND #F0
OR E OR E
LD E,A LD E,A
LD A,D LD A,D
AND 0FH AND #0F
LD D,A LD D,A
PUSH HL PUSH HL
LD C,98h LD C,#98 ;!HARDCODE BIOS.RAMD_CALC_PAGE
CALL DISK_REDIR CALL DISK_REDIR
SUB 4 SUB 4
CALL EXP_FNS ; ¢ëç¨á«¥­¨¥  ¤à¥á  ¨ áâà ­¨æë RAM-Disk CALL EXP_FNS ; ¢ëç¨á«¥­¨¥  ¤à¥á  ¨ áâà ­¨æë RAM-Disk
@ -392,7 +392,7 @@ CLEAR_RMD_A:
PUSH HL PUSH HL
PUSH DE PUSH DE
PUSH BC PUSH BC
LD C,93h ; ®ç¨á⪠ RAM-Disk LD C,#93 ;!HARDCODE BIOS.FreeMemRMD
CALL EXP_FNS ; ¢ë§¢ âì äã­ªæ¨î CALL EXP_FNS ; ¢ë§¢ âì äã­ªæ¨î
EI EI
POP BC POP BC
@ -403,7 +403,7 @@ CLEAR_RMD_A:
;********************************************************* ;*********************************************************
GET_RMD_A: GET_RMD_A:
GET_RAM_BLK: ; B - —ˆ‘‹Ž <><EFBFBD>“…Œ<20>ŽŠŽ, A - Š‹ž— RAM-Disk GET_RAM_BLK: ; B - —ˆ‘‹Ž <><EFBFBD>“…Œ<20>ŽŠŽ, A - Š‹ž— RAM-Disk
LD C,92h LD C,#92 ;!HARDCODE BIOS.GetMemRMD
CALL EXP_FNS ; A,L - Š‹ž— RAM-Disk - ­®¬¥à ¯¥à¢®£® ¡«®ª  CALL EXP_FNS ; A,L - Š‹ž— RAM-Disk - ­®¬¥à ¯¥à¢®£® ¡«®ª 
EI EI
RET NC RET NC
@ -419,7 +419,7 @@ READ_ONLY:
FDD_SET: FDD_SET:
LD A,(OPER_DISK) LD A,(OPER_DISK)
LD B,A LD B,A
LD C,0CCH LD C,#CC ;!HARDCODE BIOS.FDD_TO_DRV
CALL EXP_FNS CALL EXP_FNS
EI EI
RET RET
@ -432,7 +432,7 @@ HDD_SET:
LD A,(OPER_DISK) LD A,(OPER_DISK)
LD B,A LD B,A
LD A,0 LD A,0
LD C,0CDH LD C,#CD ;!HARDCODE BIOS.HDD_TO_DRV
CALL EXP_FNS CALL EXP_FNS
EI EI
RET RET
@ -445,7 +445,7 @@ RAMD_SET1:
LD A,(OPER_DISK) LD A,(OPER_DISK)
LD B,A LD B,A
POP AF POP AF
LD C,0CBH LD C,#CB ;!HARDCODE BIOS.RAMD_TO_DRV
CALL EXP_FNS CALL EXP_FNS
EI EI
RET RET