small bug fixes
This commit is contained in:
parent
46ee3ff1d3
commit
0ef0c41481
@ -1 +1 @@
|
|||||||
Subproject commit 1b6a539aea8d46b09a617a90a04a2e45dcb37b3f
|
Subproject commit 25ac1c89f4ce070e041437ddbcdd18ab2ab223be
|
||||||
@ -29,8 +29,7 @@
|
|||||||
; A - D0 - "1" - Removable media
|
; A - D0 - "1" - Removable media
|
||||||
;[]===========================================================[]
|
;[]===========================================================[]
|
||||||
;!FIXIT ¢á¥£¤ ¨¤¥â à ¡®â á ¤ 묨 ¤«ï ¤¨áª €
|
;!FIXIT ¢á¥£¤ ¨¤¥â à ¡®â á ¤ 묨 ¤«ï ¤¨áª €
|
||||||
FDD_5x_GET_PAR:
|
FDD_5x_GET_PAR: IN A,(SLOT3)
|
||||||
IN A,(SLOT3)
|
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
LD A,SYS_PAGE
|
LD A,SYS_PAGE
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
@ -42,8 +41,8 @@ FDD_5x_GET_PAR:
|
|||||||
LD B,A
|
LD B,A
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
LD A,%0000'0001 ; removable media
|
XOR A
|
||||||
AND A
|
INC A ; removable media. CF=0, LD A,1
|
||||||
RET
|
RET
|
||||||
|
|
||||||
;[]===========================================================[]
|
;[]===========================================================[]
|
||||||
|
|||||||
@ -117,6 +117,7 @@ ATA_5x_GET_PAR:
|
|||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
OUT (SLOT3),A
|
OUT (SLOT3),A
|
||||||
EX AF,AF'
|
EX AF,AF'
|
||||||
|
AND A
|
||||||
RET
|
RET
|
||||||
;[]================================================================[#58]
|
;[]================================================================[#58]
|
||||||
|
|
||||||
|
|||||||
@ -59,7 +59,8 @@ RMD_5x_GET_PAR: AND #0F
|
|||||||
LD HL,1*256 + #4000/.SectorSize
|
LD HL,1*256 + #4000/.SectorSize
|
||||||
LD D,0
|
LD D,0
|
||||||
LD IX,.SectorSize
|
LD IX,.SectorSize
|
||||||
LD A,%0000'0001 ; removable media
|
XOR A
|
||||||
|
INC A ; removable media. CF=0, LD A,1
|
||||||
RET
|
RET
|
||||||
;
|
;
|
||||||
.SectorSize EQU 512 ;!HARDCODE
|
.SectorSize EQU 512 ;!HARDCODE
|
||||||
|
|||||||
Binary file not shown.
Loading…
Reference in New Issue
Block a user