Fixed some spelling mistakes in MS-DOS v1.25 source code

This commit is contained in:
Purify 2018-10-28 22:58:59 -04:00
commit d28f7e6e51
4 changed files with 17 additions and 17 deletions

View file

@ -105,7 +105,7 @@ L0000:
MOV AH,80H
NOPRN:
MOV [LSTFCB],AL
MOV [LSTDEV],AH ;Flag device for list ouput
MOV [LSTDEV],AH ;Flag device for list output
MOV SI,EXTEND
MOV DI,FCB+9
MOVW
@ -2509,7 +2509,7 @@ DPUT:
JMP FIXLINE
OUTLIN:
;Copy the source line to the ouput device. Line will be preceded by
;Copy the source line to the output device. Line will be preceded by
;assembler-generated line number. This routine may be called several times
;on one line (once for each line of object code bytes), so it sets a flag
;so the line will only be output on the first call.
@ -4003,4 +4003,4 @@ SRCBUF: DS BUFSIZ
ALIGN
STACK: EQU $
START: EQU $



View file

@ -608,7 +608,7 @@ INIT ENDS
;This TAIL segment is used to produce a PARA aligned label in the resident
; group which is the location where the transient segments will be loaded
; initialy.
; initially.
TAIL SEGMENT PARA
ORG 0
@ -678,7 +678,7 @@ ASSUME DS:TRANGROUP
INT 21H ;Get a command
JMP DOCOM
;All batch proccessing has DS set to segment of resident portion
;All batch processing has DS set to segment of resident portion
ASSUME DS:RESGROUP
NEEDPARM:
CALL GETBATBYT
@ -2163,4 +2163,4 @@ TRANCODE ENDS
COMLEN EQU TRANDATASIZE+TRANCODESIZE-102H ;End of COMMAND load. ZERO Needed to make COMLEN absolute
TRNLEN EQU (PRETRLEN+TRANCODESIZE+TRANDATASIZE+15)/16 ;Length of transient in paragraphs
END PROGSTART



View file

@ -1479,7 +1479,7 @@ CURDRV: DB -1
; in TRKTAB.
;
; INITTAB is the initialization table for 86-DOS as described in the
; 86-DOS Programer's Manual under "Customizing the I/O System."
; 86-DOS Programmer's Manual under "Customizing the I/O System."
;
IF SCP*COMBIN*FASTSEEK
;
@ -1931,4 +1931,4 @@ DOSDIF: EQU 16*(DOSSEG-BIOSSEG)
STKSAV: EQU 1701H+DOSDIF
DMAADD: EQU 15B4H+DOSDIF
END



View file

@ -1493,7 +1493,7 @@ SETUP:
; [DSKERR] = 0 (no errors yet)
; [TRANS] = 0 (No transfers yet)
; [THISDRV] = Physical drive unit number
; If SETUP detects no records will be transfered, it returns 1 level up
; If SETUP detects no records will be transferred, it returns 1 level up
; with CX = 0.
PUSH AX
@ -1591,7 +1591,7 @@ BREAKDOWN:
; DS = CS
; CX = Length of disk transfer in bytes
; BP = Base of drive parameters
; [BYTSECPOS] = Byte position witin first sector
; [BYTSECPOS] = Byte position within first sector
;Outputs:
; [BYTCNT1] = Bytes to transfer in first sector
; [SECCNT] = No. of whole sectors to transfer
@ -1921,12 +1921,12 @@ RDLP:
CALL DREAD
POPF ;Restore carry flag
POP DI ;Initial transfer address
POP AX ;First sector transfered
POP AX ;First sector transferred
POP DS
JC NOTBUFFED ;Was one of those sectors in the buffer?
CMP BYTE PTR [DIRTYBUF],0 ;Is buffer dirty?
JZ NOTBUFFED ;If not no problem
;We have transfered in a sector from disk when a dirty copy of it is in the buffer.
;We have transferred in a sector from disk when a dirty copy of it is in the buffer.
;We must transfer the sector from the buffer to correct memory address
SUB AX,[BUFSECNO] ;How many sectors into the transfer?
NEG AX
@ -1956,7 +1956,7 @@ SETFCB:
MOV SI,[FCB]
MOV AX,[NEXTADD]
MOV DI,AX
SUB AX,[DMAADD] ;Number of bytes transfered
SUB AX,[DMAADD] ;Number of bytes transferred
XOR DX,DX
MOV CX,ES:[SI.RECSIZ]
DIV CX ;Number of records
@ -1964,7 +1964,7 @@ SETFCB:
JZ FULLREC
MOV BYTE PTR [DSKERR],1
OR DX,DX
JZ FULLREC ;If remainder 0, then full record transfered
JZ FULLREC ;If remainder 0, then full record transferred
MOV BYTE PTR [DSKERR],3 ;Flag partial last record
SUB CX,DX ;Bytes left in last record
PUSH ES
@ -2285,7 +2285,7 @@ FINCLUS:
POP DX ;Starting cluster
SUB BX,DX ;Number of new clusters accessed
ADD [LASTPOS],BX
POP BX ;BL = sector postion within cluster
POP BX ;BL = sector position within cluster
CALL FIGREC
MOV BX,SI
;Now let's see if any of these sectors are already in the buffer
@ -2316,7 +2316,7 @@ FIGREC:
;Inputs:
; DX = Physical cluster number
; BL = Sector postion within cluster
; BL = Sector position within cluster
; BP = Base of drive parameters
;Outputs:
; DX = physical sector number
@ -4028,4 +4028,4 @@ MEMSTRT LABEL WORD
ADJFAC EQU DIRBUF-MEMSTRT
DATA ENDS
END