Tolik-Trek/Estex-DSS
1
0
Fork 0
mirror of https://github.com/Tolik-Trek/Estex-DSS.git synced 2026-06-15 17:31:47 +03:00
Code Issues Actions Packages Projects Releases Wiki Activity

bug fixes

Browse Source
This commit is contained in:
Anatoliy Belyanskiy 2024-04-22 03:47:11 +10:00
parent ed82bbff78
commit 2f0db9fa98
8 changed files with 42 additions and 44 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
BOOT/DSSBOOT.ASM
View File

@ -59,7 +59,7 @@ GOOD_DRIVE: LD DE,#8200 ;!HARDCODE
; ;
; CONTINUE ; CONTINUE
;!TEST 26/03/2024 ;!TEST 26/03/2024
LD SP,#C000 ;LD SP,#C000
; ;
LD HL,0 LD HL,0
LD (DISKL),HL LD (DISKL),HL

2
DSS/API/Find.asm
View File

@ -23,9 +23,9 @@ F_FIRST:
CALL DIR_PATH_CHECK CALL DIR_PATH_CHECK
RET C RET C
; ;
CALL LOADDIR
POP HL POP HL
CALL GETWORD CALL GETWORD
;CALL LOADDIR
RET C RET C
CALL MASK CALL MASK
RET C RET C

64
DSS/API/ScanDRV.asm
View File

@ -10,52 +10,48 @@
SCANDRV: SCANDRV:
; 1. § ¯®¬¨­ ¥¬ á®áâ®ï­¨¥ ¯à¥à뢠­¨© ; 1. § ¯®¬¨­ ¥¬ á®áâ®ï­¨¥ ¯à¥à뢠­¨©
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
LD A,R LD A,R
DI DI
PUSH AF PUSH AF
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
; 2. 㧭 ñ¬ ¡ãª¢ã ¡ãâ-¤¨áª  ; 2. 㧭 ñ¬ ¡ãª¢ã ¡ãâ-¤¨áª 
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
CALL BOOTDSK.GET CALL BOOTDSK.GET
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
; 3. ¢ë§ë¢ ¥¬ à¥áª ­ ; 3. ¢ë§ë¢ ¥¬ à¥áª ­
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
; A = Boot disk ; A = Boot disk
LD B,A LD B,A
LD A,Dss.DRV.RescanDRV LD A,Dss.DRV.RescanDRV
LD C,Dss.DRV.RescanDRV LD C,Dss.DRV.RescanDRV
RST ToDSS.DRV RST ToDSS.DRV
; ¯à®¢¥àª  ­  ®è¨¡ªã boot disk lost ; ¯à®¢¥àª  ­  ®è¨¡ªã boot disk lost
LD HL,.BOOT_DSK_LOST LD HL,.BOOT_DSK_LOST
LD E, +(80-.BOOT_DSK_LOST.size)/2 ; coord X LD E, +(80-.BOOT_DSK_LOST.size)/2 ; coord X
LD BC,.BOOT_DSK_LOST.size LD BC,.BOOT_DSK_LOST.size
JP C,KERNEL_PANIC JP C,KERNEL_PANIC
; ;
LD (LDRIVE),A LD (LDRIVE),A
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
; 4. ­  ¢á直© á«ãç © ¯¥à¥ç¨â뢠¥¬ ¤¨à४â®à¨î ; 4. ­  ¢á直© á«ãç © ¯¥à¥ç¨â뢠¥¬ ¤¨à४â®à¨î
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
LD A,(CurrentPath) LD A,(CurrentPath)
SUB 'A' SUB 'A'
CALL CHNDISK CALL OPENDSK
; LD HL,CurrentDirectory
LD HL,CurrentDirectory CALL CHDIR
CALL CHDIR JR NC,.exit
JR NC,.exit LD HL,CurrentDirectory
LD HL,CurrentDirectory LD (HL),0
LD (HL),0
; LD HL,CurrentPath
; CALL CHDIR
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
; 5. ¢ë室 ; 5. ¢ë室
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
.exit: POP AF .exit: POP AF
RET PO RET PO
EI EI
RET RET
; ;
.BOOT_DSK_LOST: .BOOT_DSK_LOST: DZ "Boot drive lost o_O"
DZ "Boot drive lost o_O"
.BOOT_DSK_LOST.size EQU $-.BOOT_DSK_LOST .BOOT_DSK_LOST.size EQU $-.BOOT_DSK_LOST
; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -; ; - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -;
;/////////////////////////////////////////////////////////////////////// ;///////////////////////////////////////////////////////////////////////

9
DSS/FS/FAT/FAT.asm
View File

@ -540,10 +540,11 @@ LOAD_SAVE_DIR_PREPARE:
LD A,(CORE_BUFFERS.FatBuffer.DRIVE) LD A,(CORE_BUFFERS.FatBuffer.DRIVE)
LD (IY+_sFM.DRIVE),A LD (IY+_sFM.DRIVE),A
;!FIXIT ¯¥à¥¤¥« âì ­  à ¡®âã ¡¥§ IY ;!FIXIT ¯¥à¥¤¥« âì ­  à ¡®âã ¡¥§ IY
LD A,(IY+_sFM.FS_REC.FIRST_CLUSTER_L) LD A,(IY+_sFM.FS_REC.FIRST_CLUSTER_L)
OR (IY+_sFM.FS_REC.FIRST_CLUSTER_L+1) OR (IY+_sFM.FS_REC.FIRST_CLUSTER_L+1)
OR (IY+_sFM.FS_REC.FIRST_CLUSTER_H) OR (IY+_sFM.FS_REC.FIRST_CLUSTER_H)
OR (IY+_sFM.FS_REC.FIRST_CLUSTER_H+1) OR (IY+_sFM.FS_REC.FIRST_CLUSTER_H+1)
;
EX AF,AF' EX AF,AF'
RET RET

2
DSS/FS/FAT/FAT_X.asm
View File

@ -680,7 +680,7 @@ WRITE_FAT_TABLE:
LD C,Dss.DRV.Write LD C,Dss.DRV.Write
JP ToDSS.DRV JP ToDSS.DRV
.SAVE_NOT_ALL_BLOCK: .SAVE_NOT_ALL_BLOCK:
; A = CORE_BUFFERS.FatBuffer.CacheBlock ; A = CORE_BUFFERS.FatBuffer.CacheUpdated
; HL:IX - ᬥ饭¨¥ ¢­ãâਠࠧ¤¥«  ­  ­ ç «® ­ã¦­®£® ¡«®ª  FAT ; HL:IX - ᬥ饭¨¥ ¢­ãâਠࠧ¤¥«  ­  ­ ç «® ­ã¦­®£® ¡«®ª  FAT
; B = ¬ ªá¨¬ «ì­®¥ ç¨á«® ¡«®ª®¢ ¤«ï § ¯¨á¨ ; B = ¬ ªá¨¬ «ì­®¥ ç¨á«® ¡«®ª®¢ ¤«ï § ¯¨á¨
EXX EXX

4
DSS/Media_drivers/ReScanDRV.ASM
View File

@ -443,8 +443,8 @@ KILL_FM:;
POP BC POP BC
PUSH AF PUSH AF
; ˜¥àá⨬ ¬ ­¨¯ã«ïâ®àë ­  ­ «¨ç¨¥ ¢ ­¨å £à®å­ã⮣® ¤à ©¢  ; ˜¥àá⨬ ¬ ­¨¯ã«ïâ®àë ­  ­ «¨ç¨¥ ¢ ­¨å £à®å­ã⮣® ¤à ©¢ 
LD IY,CORE_BUFFERS.FM_BUF - CORE_BUFFERS.FM_BUF.Size + #C000 LD IY,CORE_BUFFERS.FM_BUF + #C000 ; - CORE_BUFFERS.FM_BUF.Size
LD B,FMCOUNT LD B,FMCOUNT - 1 ; ¯à®¯ã᪠¥¬ á«ã¦¥¡­ë© ­ã«¥¢®© ¬ ­¨¯ã«ïâ®à
LD DE,CORE_BUFFERS.FM_BUF.Size LD DE,CORE_BUFFERS.FM_BUF.Size
.loop_fm: .loop_fm:
ADD IY,DE ADD IY,DE

2
DSS/build.txt
View File

@ -1 +1 @@
955 957

1
DSS/defines.inc
View File

@ -154,5 +154,6 @@ MOUSE_BAUD:
; ;
;----------------------------------------------------; ;----------------------------------------------------;
; <EFBFBD>­ЈЌ ­ЈЅ, стЅЊ хр ­Јтся Ђ тЎЉ ІЅ стр ­ЈцЅ!
SUBLOAD_SIZE EQU 10 ; ª®«-¢® ᥪâ®à®¢ ª®â®à®¥ ­ ¤® ¯®¤£à㧨âì ¯®á«¥ § £à㧪¨ system.dos ¢ áâà ­¨æã SUBLOAD_SIZE EQU 10 ; ª®«-¢® ᥪâ®à®¢ ª®â®à®¥ ­ ¤® ¯®¤£à㧨âì ¯®á«¥ § £à㧪¨ system.dos ¢ áâà ­¨æã
;----------------------------------------------------; ;----------------------------------------------------;