This commit is contained in:
Anatoliy Belyanskiy committed 2023-12-30 03:05:24 +10:00
1 parent f655cad1fc
commit 91c22e8e58
6 files changed
+20 -71

No files matched your search

+3 -3
View File
@@ -471,7 +471,7 @@ LP_PRINT_LINE6:
;
;------------------------------------------------------------------[#84]
LP_SET_PLACE: ; !!!!! ®¦¨¤ ¥âáï, çâ® ¯®àâïâáï ⮫쪮  «ìâ¥à­ â¨¢­ë¥ ॣ¨áâàë ¨ â¥, çâ® ª ª ¯ à ¬¥âàë ­  ¢å®¤¥
LP_SET_PLACE: ; ¯®àâïâáï ⮫쪮  «ìâ¥à­ â¨¢­ë¥ ॣ¨áâàë ¨ â¥, çâ® ª ª ¯ à ¬¥âàë ­  ¢å®¤¥
CALL LP_BEG_P
CALL LP_AT_D
CALL LP_TAB_E
@@ -1533,8 +1533,8 @@ WIN_GET_SYM:
INC L
EXX
CALL LP_END_P
RET
JP LP_END_P
;RET
; DE - ¬¥á⮠ᨬ¢®«  ¢ ®ª­¥
; € - ­®¬¥à ®ª­ 
+2 -2
View File
@@ -13,7 +13,7 @@ PG_Sp2000 EQU #FE
RST_CONF:
;--[] ZX Spectrum
.AY8910:
LD D,#35 ;!HARDCODE ¢ëïá­¨âì §  çâ® à ­ìè¥ íâ  ï祩ª  ¢ ª¬®á ®â¢¥ç « . ¯®å®¦¥ ­  åà ­¥­¨¥ §­ ç¥­¨ï Port_All_Mode ¨«¨ CONFIG_DE+1
LD D,#35 ;!HARDCODE REG #35 - BASIC SETTING 1 (SYS_PAGE.CONFIG_DE+1 = #C13B on PAGE #FE)
CALL CMOS_RD
OR 1
CALL CMOS_WR
@@ -30,7 +30,7 @@ RST_CONF:
;--[] Sprinter ZX
.SP97_1:
LD D,#35 ;!HARDCODE ¢ëïá­¨âì §  çâ® à ­ìè¥ íâ  ï祩ª  ¢ ª¬®á ®â¢¥ç « . ¯®å®¦¥ ­  åà ­¥­¨¥ §­ ç¥­¨ï Port_All_Mode ¨«¨ CONFIG_DE+1
LD D,#35 ;!HARDCODE REG #35 - BASIC SETTING 1 (SYS_PAGE.CONFIG_DE+1 = #C13B on PAGE #FE)
CALL CMOS_RD
AND #FE
CALL CMOS_WR
+6 -7
View File
@@ -1,10 +1,10 @@
;
_mInfoALIGN 256,0 ; ¢ëà ¢­¨¢ ­¨¥ ­   ¤à¥á #XX00
_mInfoALIGN 256,0 ; ¢ëà ¢­¨¢ ­¨¥ ­   ¤à¥á #XX00
SBUF: BLOCK 64,0
HEAD: DB 0
HOST: DB 0
HEAD: DB 0
HOST: DB 0
;
K_LOCK EQU $-KEYFLAG
@@ -16,7 +16,7 @@ NUM_L EQU 3
SCRL_L EQU 2
INS_L EQU 1
CAPS_L EQU 0
KEYFLAG DB 2 ;D0-Key Pressed
KEYFLAG: DB 2 ;D0-Key Pressed
;
K_SHIFT EQU $-KEYFLAG
L_SHIFT EQU 7
@@ -27,7 +27,7 @@ L_CTRL EQU 3
L_ALT EQU 2
R_CTRL EQU 1
R_ALT EQU 0
KEYCTRL DB 0
KEYCTRL: DB 0
;
KEYFLG EQU $-KEYFLAG
FLAG_E0 EQU 7
@@ -110,8 +110,7 @@ CTRLKEY:
DEC A
RET
PUTSYM:
LD HL,HEAD
PUTSYM: LD HL,HEAD
LD A,(HOST)
SUB 4
AND #3F
+8 -8
View File
@@ -95,42 +95,42 @@ RET_TO_EXP_ADDR: WORD 0000 ; p
; ¨ ¢ ॣ¨áâॠA ­  ¢ë室¥ ¨§ ä㭪樨 #F6 (CMOS_RD) BIOS §­ ç¥­¨ï ¤¥áïâ¨ç­ë¥.
GETTIME:
PUSH HL
LD D,4 ;HOURS
LD D,CMOS.Register.hours
CALL CMOS_RD
CP #24 ;24
jp nc,.error
LD (HL),A
INC HL
LD D,2 ;MINUTES
LD D,CMOS.Register.minutes
CALL CMOS_RD
CP #5A ; 60
jp nc,.error
LD (HL),A
INC HL
LD D,0 ;SECONDS
LD D,CMOS.Register.seconds
CALL CMOS_RD
CP #5A ; 60
jp nc,.error
LD (HL),A
INC HL
LD D,7 ;DAY
LD D,CMOS.Register.date ; ç¨á«®
CALL CMOS_RD
CP #32 ;32
CP #32
jp nc,.error
LD (HL),A
INC HL
LD D,8 ;MONTH
LD D,CMOS.Register.month
CALL CMOS_RD
CP #13 ;13
jp nc,.error
LD (HL),A
INC HL
LD D,#32 ;CENTURY
LD D,CMOS.Register.century
CALL CMOS_RD
CP #1A ;20
jp c,.error
@@ -139,7 +139,7 @@ GETTIME:
LD (HL),A
INC HL
LD D,9 ;YEAR
LD D,CMOS.Register.year
CALL CMOS_RD
CP #9A ;100
jp nc,.error