мелочи

This commit is contained in:
Tolik committed 2025-04-29 03:41:19 +10:00
1 parent 5629c4dc1d
commit bc1413f28d
3 files changed
+10 -12

No files matched your search

+1 -1
View File
@@ -6428,7 +6428,7 @@ READR_X:
NEW_NAME:
DB 22,1,3, "* Sprinter TR-DOS v.7.03 *"
DB 22,3,6, "(c) 2024 Sprinter Team"
DB 22,3,6, "(c) 2025 Sprinter Team"
DB 22,5,14, "*R.F.*"
DB 22,7,9, "BETA 4Mb",0
+8 -10
View File
@@ -113,7 +113,9 @@ MSD_cmd5:
EX AF,AF'
JR MSD_RWU1
MSD_cmd6:
LD A,255
; A=0
;LD A,255
DEC A
LD (ZX_VARS.RD_WR_COM),A
EX AF,AF'
JR MSD_RWU1
@@ -128,7 +130,7 @@ PREPARE1:
OUT (SLOT2),A
LD A,(SYS_PAGE.DS_1440-4000H)
AND BIT_MASK_1440
AND SYS_PAGE.DS_1440.IS_SET
SET 0,A
LD (SYS_PAGE.DS_1440-4000H),A
LD A,C
@@ -345,18 +347,14 @@ SWITCH_DT:
LD A,(SYS_PAGE.DS_1440-4000H)
BIT 0,A
JR Z,NO_SW_DT
XOR BIT_MASK_1440
XOR SYS_PAGE.DS_1440.IS_SET
LD (SYS_PAGE.DS_1440-4000H),A
AND BIT_MASK_1440
AND SYS_PAGE.DS_1440.IS_SET
LD A,C
OUT (SLOT2),A
EI
;!TEST
;CALL Z,RES_1440
;CALL NZ,SET_1440
;RET
JR Z,RES_1440
JR SET_1440
JR Z,RES_1440
JR SET_1440
;
NO_SW_DT:
LD A,C