Tolik-Trek/Sprinter-Core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

ref

Browse Source
This commit is contained in:
Anatoliy Belyanskiy 2023-08-03 00:17:17 +10:00
parent 13e72e8300
commit 811da31399
3 changed files with 20 additions and 22 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Shared_Includes

@ -1 +1 @@
Subproject commit 53e49fa3cc457e2d7a8977d6166246b8457cb5ce Subproject commit 4059f40bf7d86c8ba20a2026d6e0f454ec1572c7

2
src/bios/exp/EXP.asm
View File

@ -529,7 +529,7 @@ POST_2_ADRESS_BUS:
JR OUT_C_BYTE ; ¢ë¢¥á⨠áâ à訩 ¡ ©â á § ¯ï⮩ JR OUT_C_BYTE ; ¢ë¢¥á⨠áâ à訩 ¡ ©â á § ¯ï⮩
.TSAB_3: .TSAB_3:
LD C,E LD C,E
LD B,0FFh LD B,#FF
LD IX,.TSAB_4 LD IX,.TSAB_4
JR OUT_C_BYTE ; ¢ë¢¥á⨠¬« ¤è¨© ¡¥§ § ¯ï⮩ JR OUT_C_BYTE ; ¢ë¢¥á⨠¬« ¤è¨© ¡¥§ § ¯ï⮩

38
src/bios/exp/FUNC_LOW_PRINT.ASM
View File

@ -184,7 +184,6 @@ LP_PRINT_AL1:
RET RET
LP_PRINT_SYM: LP_PRINT_SYM:
CALL LP_BEG_P CALL LP_BEG_P
EXX EXX
LD C,A LD C,A
@ -756,9 +755,8 @@ LP_AT_D: ; !!!!!
EXX EXX
LD A,D LD A,D
EXX EXX
LP_AT_DX: .loop: SUB L
SUB L JR NC,.loop
JR NC,LP_AT_DX
; JR Z,LP_AT_DX ; JR Z,LP_AT_DX
ADD A,L ADD A,L
@ -791,7 +789,8 @@ LP_TAB_EX:
ADD A,D ADD A,D
LD D,A LD D,A
LD A,(SYS_PAGE.WIN_MAP_IX+WIN_MODE) LD A,(SYS_PAGE.WIN_MAP_IX+WIN_MODE)
BIT 5,A ;BIT 5,A
AND %0010'0000
JR Z,LP_NO_ADD_A JR Z,LP_NO_ADD_A
LD A,D LD A,D
@ -825,7 +824,7 @@ LP_NEXT_HL:
LD A,(SYS_PAGE.WIN_MAP_IX+WIN_V_BEG) LD A,(SYS_PAGE.WIN_MAP_IX+WIN_V_BEG)
LD L,A LD L,A
INC L INC L
LD H,0C3H LD H,#C3
LP_NEXT_HL1: LP_NEXT_HL1:
LD A,(SYS_PAGE.WIN_MAP_IX+WIN_H_BEG) LD A,(SYS_PAGE.WIN_MAP_IX+WIN_H_BEG)
@ -1069,19 +1068,19 @@ LP_SET_32X:
JR LP_SET_MODE JR LP_SET_MODE
LP_SET_64: LP_SET_64:
LD HL,4104H LD HL,#4104
LP_SET_64X: LP_SET_64X:
LD IX,LP_SCR_64 LD IX,LP_SCR_64
JR LP_SET_MODE JR LP_SET_MODE
LP_SET_40: LP_SET_40:
LD HL,4000H LD HL,#4000
LP_SET_40X: LP_SET_40X:
LD IX,LP_SCR_40 LD IX,LP_SCR_40
JR LP_SET_MODE JR LP_SET_MODE
LP_SET_80: LP_SET_80:
LD HL,4000H LD HL,#4000
LP_SET_80X: LP_SET_80X:
LD IX,LP_SCR_80 LD IX,LP_SCR_80
JR LP_SET_MODE JR LP_SET_MODE
@ -1862,13 +1861,13 @@ WIN_MOVE:
RET NZ RET NZ
PUSH IX PUSH IX
PUSH HL PUSH HL
LD B,#FF LD B,SHARED_PAGE
LD IX,#C000 LD IX,SLOT3.MEM_ADDR
CALL WIN_COPY_WIN1 CALL WIN_COPY_WIN1
POP HL POP HL
POP DE POP DE
LD B,0FFH LD B,SHARED_PAGE
LD IX,0C000H LD IX,SLOT3.MEM_ADDR
CALL WIN_REST_WIN1 CALL WIN_REST_WIN1
AND A AND A
RET RET
@ -1903,7 +1902,7 @@ WIN_COPY_WIN1:
LD C,D LD C,D
EXX EXX
LP_COPY_L2: .COPY_loop2:
LD A,L LD A,L
EXX EXX
LD B,A LD B,A
@ -1911,16 +1910,15 @@ LP_COPY_L2:
ADD A,A ADD A,A
ADD A,XL ADD A,XL
LD XL,A LD XL,A
JR NC,LP_NO_INC_IX1 JR NC,.NO_INC_XH
INC XH INC XH
LP_NO_INC_IX1: .NO_INC_XH:
LD SP,IX LD SP,IX
LD A,C LD A,C
ADD A,B ADD A,B
LP_COPY_L1: .COPY_loop:
DEC A DEC A
OUT (RGADR),A OUT (RGADR),A
LD E,(HL) LD E,(HL)
@ -1928,7 +1926,7 @@ LP_COPY_L1:
LD D,(HL) LD D,(HL)
DEC L DEC L
PUSH DE PUSH DE
DJNZ LP_COPY_L1 DJNZ .COPY_loop
INC HL INC HL
INC HL INC HL
@ -1938,7 +1936,7 @@ LP_COPY_L1:
EXX EXX
DEC H DEC H
JR NZ,LP_COPY_L2 JR NZ,.COPY_loop2
LD A,SYS_PAGE LD A,SYS_PAGE
OUT (SLOT3),A OUT (SLOT3),A