работа с режимом ТХТ 40х32 восстановлена из небытия комментирования

This commit is contained in:
Anatoliy Belyanskiy 2023-10-31 03:14:11 +10:00
parent 9226260e35
commit 681c2cfdff
2 changed files with 21 additions and 19 deletions

@ -1 +1 @@
Subproject commit 2308a92341b8cf17b710c05123feec4d4dc55609
Subproject commit a15861c07cab60eaf09c28226d0c7761b4fd8235

View File

@ -63,33 +63,35 @@
; H - ¢ëá®â , L - è¨à¨­ 
;=============================================================
MACRO TEST_40
; EX AF,AF'
; JR C,.LLL
; INC D ; ०¨¬ 40
;.LLL:
; EX AF,AF'
;[x] ¢ª«î稫 31/10/23, ç¨áâ® ­  •í««®ããã㨨¨­
EX AF,AF'
JR C,.LLL
INC D ; ०¨¬ 40
.LLL:
EX AF,AF'
;
ENDM
MACRO DJ_NEXT_HL
; DEC B
; CALL Z,LP_NEXT_HL
DJNZ .LLL
CALL LP_NEXT_HL
; DEC B
; CALL Z,LP_NEXT_HL
DJNZ .LLL
CALL LP_NEXT_HL
.LLL:
ENDM
MACRO LP_OPEN_PG
IN A,(SLOT3)
LD C,A
LD A,SYS_PAGE
OUT (SLOT3),A
IN A,(SLOT3)
LD C,A
LD A,SYS_PAGE
OUT (SLOT3),A
LD A,C
LD (SYS_PAGE.COPY_SLOT3),A
IN A,(PORT_Y)
LD (SYS_PAGE.COPY_RGADR),A
LD A,C
LD (SYS_PAGE.COPY_SLOT3),A
IN A,(PORT_Y)
LD (SYS_PAGE.COPY_RGADR),A
ENDM
MACRO LP_CLOSE_PG
@ -178,7 +180,7 @@ LP_PRINT_ALL:
INC L
LD (HL),A
DEC L
;TEST_40
TEST_40 ;[x] ¢ª«î稫 31/10/23, ç¨áâ® ­  •í««®ããã㨨¨­
DJ_NEXT_HL
EXX
DJNZ .loop