Updates and new folder structure
This commit is contained in:
@@ -26,7 +26,7 @@ SYSTEM: EQU 5
|
||||
|
||||
MOV SP,STACK
|
||||
CLD
|
||||
MOV DL,0 ;Start with A:
|
||||
MOV DL,0 ;Start with drive A
|
||||
SETDRV:
|
||||
MOV CL,SELDRV
|
||||
CALL SYSTEM
|
||||
@@ -60,7 +60,7 @@ GETCOM:
|
||||
CALL SYSTEM ;Print drive letter
|
||||
MOV DL,":"
|
||||
MOV CL,OUTCH
|
||||
CALL SYSTEM ;Print :
|
||||
CALL SYSTEM ;Print ":"
|
||||
MOV DX,LINBUF
|
||||
MOV CL,INBUF
|
||||
CALL SYSTEM
|
||||
@@ -199,7 +199,7 @@ FILEDRV:
|
||||
JZ NOMATCH
|
||||
CMP B,[SI],":"
|
||||
JNZ NOMATCH
|
||||
SUB AL,40H ;A => 1, B => 2
|
||||
SUB AL,40H ;Convert to drive number
|
||||
INC SI
|
||||
RET
|
||||
|
||||
@@ -439,7 +439,7 @@ NOSPCE: DB "Insufficient disk space$"
|
||||
FCBFIL: DB 11,"?"
|
||||
DB 0
|
||||
|
||||
SPECDRV: DS 1
|
||||
SPECDRV:DS 1
|
||||
NUMREC: DS 2
|
||||
|
||||
IDLEN: DS 1
|
||||
@@ -476,4 +476,4 @@ COMTAB:
|
||||
DB 0
|
||||
|
||||
TPA:
|
||||
|
||||
|
||||
Reference in New Issue
Block a user