mirror of
https://github.com/Tolik-Trek/Estex-DSS.git
synced 2026-06-15 01:11:48 +03:00
...
This commit is contained in:
parent
b38d6ccd48
commit
6e8b58f01c
@ -187,6 +187,16 @@ GET_LOGDRV_ENTRY:
|
||||
;-------------------------------------------------
|
||||
|
||||
|
||||
;-------------------------------------------------
|
||||
CONVERT_SECTOR_SIZE:
|
||||
LD A,XH
|
||||
LD E,XL
|
||||
RL E
|
||||
RLA
|
||||
RET
|
||||
;-------------------------------------------------
|
||||
|
||||
|
||||
;-------------------------------------------------
|
||||
; RST 18h. ‚¥ªâ®à ¤¨áª®¢ëå ãáâனáâ¢
|
||||
; ¢å®¤: a=®¬¥à ãáâனá⢠(0-25)
|
||||
|
||||
@ -503,10 +503,7 @@ GetParams: ;EX DE,HL
|
||||
EXX
|
||||
;[ ] 04/01/2025 ¢®§¢à 饨¥ à §¬¥à ᥪâ®à
|
||||
EX AF,AF'
|
||||
LD A,XH
|
||||
LD E,XL
|
||||
RL E
|
||||
RLA
|
||||
CALL CONVERT_SECTOR_SIZE
|
||||
;
|
||||
; SECTORS ON LOGICAL DISK
|
||||
LD E,(IY+DRIVES_DRIVER.LOGDRV.SIZE_IN_SECTORS+0)
|
||||
|
||||
@ -394,6 +394,10 @@ GenIOCTL: BIT 7,B
|
||||
EX DE,HL
|
||||
; H=0
|
||||
LD C,H ;[x] 17.12.2023 § £à㧪 á ªâ¨¢®£® à §¤¥« , ¥ á ¯¥à¢®£®
|
||||
EXX
|
||||
CALL CONVERT_SECTOR_SIZE
|
||||
EXX
|
||||
LD B,A ;[ ] 25/04/2026 ¢®§¢à 饨¥ à §¬¥à ᥪâ®à
|
||||
EXX
|
||||
POP DE
|
||||
POP HL
|
||||
|
||||
@ -461,40 +461,31 @@ GenIOCTL: BIT 7,B
|
||||
; D5 - "1" RESERVED
|
||||
; D6 - ADDRESSING MODE LBA/CHS
|
||||
; D7 - "1" RESERVED
|
||||
.RGETPRM: ;EX DE,HL
|
||||
;LD BC,Dss.DRV.GenIOCTL.Enter
|
||||
;AND A
|
||||
;SBC HL,BC
|
||||
LD L,A
|
||||
;LD A,BIOS.Error.Failure
|
||||
;SCF
|
||||
;RET NZ
|
||||
;
|
||||
.RGETPRM: LD L,A
|
||||
EX AF,AF'
|
||||
LD A,L
|
||||
CALL GET_RAMDRV_NUM
|
||||
PUSH AF
|
||||
PUSH AF
|
||||
EX AF,AF'
|
||||
|
||||
POP AF
|
||||
LD C,BIOS.DRV_GET_PAR
|
||||
RST ToBIOS
|
||||
|
||||
PUSH HL ;ç¨á«® £®«®¢®ª, ç¨á«® ᥪâ®à®¢ ( 楫¨¤à)
|
||||
PUSH DE ;ª®«¨ç¥á⢮ 樫¨¤à®¢
|
||||
EXX
|
||||
CALL CONVERT_SECTOR_SIZE
|
||||
POP HL ;ª®«¨ç¥á⢮ 樫¨¤à®¢
|
||||
POP BC ;ç¨á«® ᥪâ®à®¢ ( 楫¨¤à)
|
||||
LD D,0
|
||||
LD E,B ;ç¨á«® £®«®¢®ª
|
||||
LD B,D
|
||||
EXX
|
||||
|
||||
LD B,A
|
||||
LD A,L
|
||||
|
||||
RRA
|
||||
JR C,.end
|
||||
;
|
||||
.loopShift: SLA E
|
||||
RL D
|
||||
RRA
|
||||
|
||||
@ -1 +1 @@
|
||||
Subproject commit e1233b24a06f9be0c80349b47ab34cfceacc2486
|
||||
Subproject commit e1dc7ec10dc9c7e9153a05884e42973a57378a63
|
||||
Loading…
Reference in New Issue
Block a user