This commit is contained in:
Tolik 2025-03-02 23:24:40 +10:00
parent 29df4ae54f
commit d47e126730
4 changed files with 5 additions and 3 deletions

View File

@ -21,7 +21,8 @@ OPEN_FN: ;!TEST Current Dir ;[x] 15/10/23
RET C RET C
;!FIXIT ᤥ« âì ª ª ¢ mkdir ¨«¨ rmdir? ;!FIXIT ᤥ« âì ª ª ¢ mkdir ¨«¨ rmdir?
;R008 ; ;R008 ;
.start: CALL SetPath_GetName ;.start: ;
CALL SetPath_GetName
RET C RET C
CALL MASK CALL MASK
RET C RET C

View File

@ -103,7 +103,7 @@ SetPath_GetName:
JR C,.next JR C,.next
CP 'z'+1 CP 'z'+1
JR NC,.next JR NC,.next
SUB #20 SUB %0010'0000
.next: SUB 'A' .next: SUB 'A'
INC HL INC HL
INC HL INC HL

View File

@ -670,7 +670,7 @@ MediaCheck: PUSH IY
; [ ] custorm sector size ; [ ] custorm sector size
CHECK_IDE_SECTOR_SIZE: CHECK_IDE_SECTOR_SIZE: ;RET
LD E,(IY+LOGDRV.SECTOR_SIZE) LD E,(IY+LOGDRV.SECTOR_SIZE)
LD D,(IY+LOGDRV.SECTOR_SIZE+1) LD D,(IY+LOGDRV.SECTOR_SIZE+1)
; LD HL,DSS_MAX_SECTOR_SIZE ; LD HL,DSS_MAX_SECTOR_SIZE

View File

@ -39,6 +39,7 @@ COMP: call EVALCMD ; (batch.asm)
.start: call RUN_COMMAND .start: call RUN_COMMAND
jr nc,.skip ; NC ¥á«¨ ­¥ ­ ©¤¥­  ª®¬ ­¤  jr nc,.skip ; NC ¥á«¨ ­¥ ­ ©¤¥­  ª®¬ ­¤ 
jp (hl) jp (hl)
;
.skip: ; <20>¥ ¤®á-ª®¬ ­¤ë. ’¥áâ ­  § ¤ ­¨¥ ¤¨áª  ¨ § ¯ã᪠䠩«  .skip: ; <20>¥ ¤®á-ª®¬ ­¤ë. ’¥áâ ­  § ¤ ­¨¥ ¤¨áª  ¨ § ¯ã᪠䠩« 
ld h,d ld h,d
ld l,e ld l,e