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

...

Browse Source
This commit is contained in:
Anatoliy Belyanskiy 2023-12-30 03:05:24 +10:00
parent f655cad1fc
commit 91c22e8e58
6 changed files with 20 additions and 71 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Shared_Includes

@ -1 +1 @@
Subproject commit 226dbc13e8cacb202848245b7f11de3df2f0cbd7 Subproject commit 54298bfb52826572bda5ccd0609320a9418d08c9

50
hidden/LZ4_DEC.asm
View File

@ -1,50 +0,0 @@
LUA PASS1
SettingsTabsOrder = {
[1]={
"Lang",
"MemTest",
"SaveRAMdrvs",
"UpdBios",
"StartDelay",
"TypRate",
"TypDelay",
"RebootMsg",
"SysDsk",
"AltSysDsk",
"FddFirst",
"FddSecond",
"PriIdeMA",
"PriIdeSl",
"SecIdeMA",
"SecIdeSl",
"HddWrPr"
},
[2]={
"ScreenY",
"ScreenX",
"FrameInt",
"VSync",
"QuickStartROM",
"TrDosA",
"TrDosB",
"TrDosC",
"TrDosD"
}
}
ENDLUA
MACRO itemName?
@.itemName? EQU $
DEFINE TmpDef Suffix?
LUA ALLPASS
function get_key_for_value(t, value)
for k,v in pairs(t) do
if v==value then return k end
end
return nil
end
print(get_key_for_value(SettingsTabsOrder, sj.get_define("TmpDef")))
ENDLUA
UNDEFINE TmpDef
ENDM

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

@ -471,7 +471,7 @@ LP_PRINT_LINE6:
; ;
;------------------------------------------------------------------[#84] ;------------------------------------------------------------------[#84]
LP_SET_PLACE: ; !!!!! ®¦¨¤ ¥âáï, çâ® ¯®àâïâáï ⮫쪮  «ìâ¥à­ â¨¢­ë¥ ॣ¨áâàë ¨ â¥, çâ® ª ª ¯ à ¬¥âàë ­  ¢å®¤¥ LP_SET_PLACE: ; ¯®àâïâáï ⮫쪮  «ìâ¥à­ â¨¢­ë¥ ॣ¨áâàë ¨ â¥, çâ® ª ª ¯ à ¬¥âàë ­  ¢å®¤¥
CALL LP_BEG_P CALL LP_BEG_P
CALL LP_AT_D CALL LP_AT_D
CALL LP_TAB_E CALL LP_TAB_E
@ -1533,8 +1533,8 @@ WIN_GET_SYM:
INC L INC L
EXX EXX
CALL LP_END_P JP LP_END_P
RET ;RET
; DE - ¬¥á⮠ᨬ¢®«  ¢ ®ª­¥ ; DE - ¬¥á⮠ᨬ¢®«  ¢ ®ª­¥
; € - ­®¬¥à ®ª­  ; € - ­®¬¥à ®ª­ 

4
src/bios/exp/FUNC_SERVICE.asm
View File

@ -13,7 +13,7 @@ PG_Sp2000 EQU #FE
RST_CONF: RST_CONF:
;--[] ZX Spectrum ;--[] ZX Spectrum
.AY8910: .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 CALL CMOS_RD
OR 1 OR 1
CALL CMOS_WR CALL CMOS_WR
@ -30,7 +30,7 @@ RST_CONF:
;--[] Sprinter ZX ;--[] Sprinter ZX
.SP97_1: .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 CALL CMOS_RD
AND #FE AND #FE
CALL CMOS_WR CALL CMOS_WR

13
src/bios/rom/SETUP/KEY.asm
View File

@ -1,10 +1,10 @@
; ;
_mInfoALIGN 256,0 ; ˘ëŕ ˘­¨˘ ­¨Ľ ­   ¤ŕĽá #XX00 _mInfoALIGN 256,0 ; ˘ëŕ ˘­¨˘ ­¨Ľ ­   ¤ŕĽá #XX00
SBUF: BLOCK 64,0 SBUF: BLOCK 64,0
HEAD: DB 0 HEAD: DB 0
HOST: DB 0 HOST: DB 0
; ;
K_LOCK EQU $-KEYFLAG K_LOCK EQU $-KEYFLAG
@ -16,7 +16,7 @@ NUM_L EQU 3
SCRL_L EQU 2 SCRL_L EQU 2
INS_L EQU 1 INS_L EQU 1
CAPS_L EQU 0 CAPS_L EQU 0
KEYFLAG DB 2 ;D0-Key Pressed KEYFLAG: DB 2 ;D0-Key Pressed
; ;
K_SHIFT EQU $-KEYFLAG K_SHIFT EQU $-KEYFLAG
L_SHIFT EQU 7 L_SHIFT EQU 7
@ -27,7 +27,7 @@ L_CTRL EQU 3
L_ALT EQU 2 L_ALT EQU 2
R_CTRL EQU 1 R_CTRL EQU 1
R_ALT EQU 0 R_ALT EQU 0
KEYCTRL DB 0 KEYCTRL: DB 0
; ;
KEYFLG EQU $-KEYFLAG KEYFLG EQU $-KEYFLAG
FLAG_E0 EQU 7 FLAG_E0 EQU 7
@ -110,8 +110,7 @@ CTRLKEY:
DEC A DEC A
RET RET
PUTSYM: PUTSYM: LD HL,HEAD
LD HL,HEAD
LD A,(HOST) LD A,(HOST)
SUB 4 SUB 4
AND #3F AND #3F

16
src/bios/rom/SETUP/MAIN.asm
View File

@ -95,42 +95,42 @@ RET_TO_EXP_ADDR: WORD 0000 ; p
; ¨ ¢ ॣ¨áâॠA ­  ¢ë室¥ ¨§ ä㭪樨 #F6 (CMOS_RD) BIOS §­ ç¥­¨ï ¤¥áïâ¨ç­ë¥. ; ¨ ¢ ॣ¨áâॠA ­  ¢ë室¥ ¨§ ä㭪樨 #F6 (CMOS_RD) BIOS §­ ç¥­¨ï ¤¥áïâ¨ç­ë¥.
GETTIME: GETTIME:
PUSH HL PUSH HL
LD D,4 ;HOURS LD D,CMOS.Register.hours
CALL CMOS_RD CALL CMOS_RD
CP #24 ;24 CP #24 ;24
jp nc,.error jp nc,.error
LD (HL),A LD (HL),A
INC HL INC HL
LD D,2 ;MINUTES LD D,CMOS.Register.minutes
CALL CMOS_RD CALL CMOS_RD
CP #5A ; 60 CP #5A ; 60
jp nc,.error jp nc,.error
LD (HL),A LD (HL),A
INC HL INC HL
LD D,0 ;SECONDS LD D,CMOS.Register.seconds
CALL CMOS_RD CALL CMOS_RD
CP #5A ; 60 CP #5A ; 60
jp nc,.error jp nc,.error
LD (HL),A LD (HL),A
INC HL INC HL
LD D,7 ;DAY LD D,CMOS.Register.date ; ç¨á«®
CALL CMOS_RD CALL CMOS_RD
CP #32 ;32 CP #32
jp nc,.error jp nc,.error
LD (HL),A LD (HL),A
INC HL INC HL
LD D,8 ;MONTH LD D,CMOS.Register.month
CALL CMOS_RD CALL CMOS_RD
CP #13 ;13 CP #13 ;13
jp nc,.error jp nc,.error
LD (HL),A LD (HL),A
INC HL INC HL
LD D,#32 ;CENTURY LD D,CMOS.Register.century
CALL CMOS_RD CALL CMOS_RD
CP #1A ;20 CP #1A ;20
jp c,.error jp c,.error
@ -139,7 +139,7 @@ GETTIME:
LD (HL),A LD (HL),A
INC HL INC HL
LD D,9 ;YEAR LD D,CMOS.Register.year
CALL CMOS_RD CALL CMOS_RD
CP #9A ;100 CP #9A ;100
jp nc,.error jp nc,.error