This commit is contained in:
Anatoliy Belyanskiy 2023-10-25 03:10:44 +10:00
parent 9adf3d12d5
commit e7b8753a9e
5 changed files with 380 additions and 380 deletions

@ -1 +1 @@
Subproject commit 899a6c3af85b80ef2e629f108999747104680ba5 Subproject commit 374477690571809e7318bd4279bc7da120b6c492

View File

@ -22,7 +22,6 @@
; DW 0,0,0 ; DW 0,0,0
;-----------------------------------------------------------------------; ;-----------------------------------------------------------------------;
; ;
; ;
;-----------------------------------------------------------------------; ;-----------------------------------------------------------------------;
DW %00'000'0'0000'0111 DW %00'000'0'0000'0111

View File

@ -1197,16 +1197,19 @@ ZX_SPECTRUM_MODE:
CALL FN_SYNC.INT_PENT CALL FN_SYNC.INT_PENT
CALL SET_PAL_ZX CALL SET_PAL_ZX
LD HL,#4104
LD E,0 LD E,0
LD B,4 ;!TEST
CALL LP_OPEN_S ; LD HL,#4104
; LD B,4
; CALL LP_OPEN_S
CALL LP_SET_32
;
LD E,0
LD HL,#5104 LD HL,#5104
LD E,0 ;!TEST
LD B,4 ; LD B,4
CALL LP_OPEN_S ;CALL LP_OPEN_S
CALL LP_SET_32.X
; LD D,#35 ; LD D,#35
; CALL CMOS_RD ; CALL CMOS_RD

View File

@ -1040,7 +1040,7 @@ LP_MODE_LINE:
LD A,#50 LD A,#50
OUT (SLOT3),A OUT (SLOT3),A
LD A,L ; ¢¥à⨪ «ì­®¥ ¯®«®¦¥­¨¥ LD A,L ; ¢¥à⨪ «ì­®¥ ¯®«®¦¥­¨¥
CP 80H CP #80
JR NC,LP_EXIT_MODE JR NC,LP_EXIT_MODE
LP_MODE_RECURSE: LP_MODE_RECURSE:
@ -1099,10 +1099,8 @@ LP_EXIT_MODE:
RET RET
; “áâ ­®¢ª  ०¨¬  ­  «¨­¨¨ ; “áâ ­®¢ª  ०¨¬  ­  «¨­¨¨
LP_MODE_LINE2:
; Spectrum mode ; Spectrum mode
LP_MODE_LINE2:
LD A,(IX+Window_Variables.WORK_2) LD A,(IX+Window_Variables.WORK_2)
LD B,(IX+Window_Variables.WORK_1) LD B,(IX+Window_Variables.WORK_1)
@ -1112,12 +1110,12 @@ LP_MODE_LINE2:
LD A,#50 LD A,#50
OUT (SLOT3),A OUT (SLOT3),A
LD A,L ; ¢¥à⨪ «ì­®¥ ¯®«®¦¥­¨¥ LD A,L ; ¢¥à⨪ «ì­®¥ ¯®«®¦¥­¨¥
CP 80H CP #80
JR NC,LP_EXIT_MODE2 JR NC,LP_EXIT_MODE2
LP_MODE_RECURSE2: LP_MODE_RECURSE2:
LD A,D ; £®à¨§®­â «ì­®¥ ¯®«®¦¥­¨¥ LD A,D ; £®à¨§®­â «ì­®¥ ¯®«®¦¥­¨¥
AND 7FH AND #7F
SUB 80 SUB 80
JR C,LP_MODE_LL2 JR C,LP_MODE_LL2
SUB 48 SUB 48
@ -1129,7 +1127,7 @@ LP_MODE_RECURSE2:
LD A,E ; ¢®ááâ ­®¢¨âì LD A,E ; ¢®ááâ ­®¢¨âì
RRA RRA
AND 3FH AND #3F
SUB C SUB C
JR NC,LP_EXIT_MODE2 JR NC,LP_EXIT_MODE2
NEG NEG
@ -1139,7 +1137,7 @@ LP_MODE_RECURSE2:
LP_MODE_LL2: LP_MODE_LL2:
NEG NEG
RRA RRA
AND 3FH AND #3F
CP C CP C
JR NC,LP_MODE_LR2 JR NC,LP_MODE_LR2
LD C,A LD C,A

Binary file not shown.