Fixed some spelling mistakes in MS-DOS v2.0 source code

This commit is contained in:
Purify 2018-10-28 23:53:28 -04:00
commit 0b1b809428
15 changed files with 80 additions and 80 deletions

View file

@ -130,7 +130,7 @@ FDX_OPER:
XCHG AL,AH
MOV WORD PTR [ASSEM1],AX
;
; aad and aam instrucions
; aad and aam instructions
;
AA_OPER:INC BYTE PTR [ASSEM_CNT]
;
@ -404,7 +404,7 @@ ESC_OPER:
SHL AL,CL
JMP GROUPE
;
; 8087 arithmetic instuctions
; 8087 arithmetic instructions
;
;
@ -1261,4 +1261,4 @@ DB7: INC BYTE PTR [ASSEM_CNT]
CODE ENDS
END ASSEM

View file

@ -471,7 +471,7 @@ CONTC:
; Re-entry point from breakpoint. Need to decrement instruction
; pointer so it points to location where breakpoint actually
; occured.
; occurred.
BREAKFIX:
PUSH BP

View file

@ -632,7 +632,7 @@ ASSUME DS:NOTHING,ES:NOTHING
; Call BIOS to perform disk read
; Outputs:
; DI = CX on entry
; CX = Number of sectors unsuccessfully transfered
; CX = Number of sectors unsuccessfully transferred
; AX = Status word as returned by BIOS (error code in AL if error)
; Zero set if OK (from BIOS)
; Zero clear if error
@ -683,7 +683,7 @@ ASSUME DS:NOTHING,ES:NOTHING
; Call BIOS to perform disk read
; Outputs:
; DI = CX on entry
; CX = Number of sectors unsuccessfully transfered
; CX = Number of sectors unsuccessfully transferred
; AX = Status word as returned by BIOS (error code in AL if error)
; Zero set if OK (from BIOS)
; Zero clear if error
@ -848,7 +848,7 @@ ASSUME DS:DOSGROUP,ES:NOTHING
; Inputs:
; CX = Length of disk transfer in bytes
; ES: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
@ -1020,7 +1020,7 @@ RDLAST:
LES SI,[THISFCB]
MOV AX,[NEXTADD]
MOV DI,AX
SUB AX,WORD PTR [DMAADD] ; Number of bytes transfered
SUB AX,WORD PTR [DMAADD] ; Number of bytes transferred
XOR DX,DX
MOV CX,ES:[SI.fcb_RECSIZ]
DIV CX ; Number of records
@ -1028,7 +1028,7 @@ RDLAST:
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
@ -1299,4 +1299,4 @@ do_ext
CODE ENDS
END

View file

@ -940,7 +940,7 @@ Dup_PDB EQU 85 ; 85 55
Rename EQU 86 ; 86 56
File_Times EQU 87 ; 87 57
AllocOper EQU 88 ; 88 58
; Network extention system calls
; Network extension system calls
GetExtendedError EQU 89 ; 89 59
CreateTempFile EQU 90 ; 90 5A
CreateNewFile EQU 91 ; 91 5B

View file

@ -8,7 +8,7 @@
; V2.00 9/13/82 M.A. Ulloa ;
; Modified to use Pathnames in command line file ;
; specification, modified REPLACE to use an empty ;
; string intead of the old replace string when this ;
; string instead of the old replace string when this ;
; is missing, and search and replace now start from ;
; first line of buffer (like old version of EDLIN) ;
; instead than current+1 line. Also added the U and ;
@ -44,7 +44,7 @@
; ;
; 10/15/82 Rev. 4 M.A. Ulloa ;
; Param4 if specified must be an absolute number that ;
; reprecents the count. ;
; represents the count. ;
; ;
; 10/18/82 Rev. 5 M.A. Ulloa ;
; Fixed problem with trying to edit files with the ;
@ -84,7 +84,7 @@
; ;
; ;
; 7/23/83 Rev. 14 N.Panners ;
; Split EDLIN into two seperate modules to ;
; Split EDLIN into two separate modules to ;
; allow assembly of sources on an IBM PC ;
; EDLIN and EDLPROC ;
; ;
@ -181,7 +181,7 @@ DATA SEGMENT PUBLIC WORD
PUBLIC LSTNUM,SRCHCNT,POINTER,START,ENDTXT,USER_DRIVE
;-----------------------------------------------------------------------;
; Be carefull when adding parameters, they have to follow the
; Be careful when adding parameters, they have to follow the
; order in which they apperar here. (this is a table, ergo it
; is indexed thru a pointer, and random additions will cause the
; wrong item to be accessed). Also param4 is known to be the
@ -820,8 +820,8 @@ COMTAB DB "QTCMWASRDLPIE;",13
NUMCOM EQU $-COMTAB
;-----------------------------------------------------------------------;
; Carefull changing the order of the next two tables. They are
; linked and chnges should be be to both.
; Careful changing the order of the next two tables. They are
; linked and changes should be be to both.
TABLE DW NOCOM ;No command--edit line
DW NOCOM
@ -1171,7 +1171,7 @@ DISPLAY:
; SI = Pointer to text buffer
; DI = No. of lines
; Function:
; Ouputs specified no. of line to terminal, each
; Outputs specified no. of line to terminal, each
; with leading line number.
; Outputs:
; BX = Last line output.
@ -1843,4 +1843,4 @@ DELBAK:
CODE ENDS
END EDLIN



View file

@ -141,7 +141,7 @@ LF equ 0ah
;-----------------------------------------------------------------------;
; Offsets to buffer structure
; For text comparations:
; For text comparisons:
fname equ 0 ;file name ptr
fname_len equ 2 ;file name length
@ -154,7 +154,7 @@ dat_end equ 14 ;ptr to last char of the buffer
buf_end equ 16 ;pointer to the end of the buffer
buf equ 18 ;pointer to the buffer
; For binary comparations:
; For binary comparisons:
by_read equ 6 ;bytes read into buffer
@ -181,7 +181,7 @@ const segment public word
make db "MAUlloa/Microsoft/V10"
rev db "2"
;----- CAREFULL WITH PRESERVING THE ORDER OF THE TABLE -----
;----- CAREFUL WITH PRESERVING THE ORDER OF THE TABLE -----
opt_tbl equ $ ;option table
flg_b db FALSE
@ -208,7 +208,7 @@ bend db 0 ;binary end of file flag, 0= none yet,
; 1= file 1 ended, 2= file 2 ended
base dd 0 ;base address of files for binary
; comparations
; comparisons
bhead_flg db false ;true if heading for binary comp.
; has been printed already.
@ -786,7 +786,7 @@ go_quit:
page
;-----------------------------------------------------------------------;
; CAPIALIZES THE CHARACTER IN AL ;
; CAPITALIZES THE CHARACTER IN AL ;
; ;
; entry: ;
; AL has the character to Capitalize ;
@ -891,7 +891,7 @@ sc3:
; Print a binary difference ;
; ;
; entry: ;
; AX,BX file address of diference ;
; AX,BX file address of difference ;
; SI pointer to one past byte in buffer1 ;
; DI pointer to one past byte in buffer2 ;
; ;
@ -1681,4 +1681,4 @@ stack ends
end start

View file

@ -135,7 +135,7 @@ NOSTAR:
IF KANJI
CALL TESTKANJ
JZ NOTDUAL3
JCXZ BNDERR ; Attempt to straddle boundry
JCXZ BNDERR ; Attempt to straddle boundary
MOVSB ; Transfer second byte
DEC CX
JMP SHORT NOTDUAL3
@ -372,7 +372,7 @@ STOLET:
JZ MOVLP ;No
LODSB ;Get second byte
DEC CX
JZ BOUNDERR ;Attempt to cross boundry
JZ BOUNDERR ;Attempt to cross boundary
STOSB
MOVLP:
LOOP MOVCHK
@ -391,7 +391,7 @@ STOLET2:
LODSB ;Get second byte
DEC CX
JNZ DOSTORE
BOUNDERR: ;Attempt to cross boundry
BOUNDERR: ;Attempt to cross boundary
STC
return

View file

@ -48,7 +48,7 @@ TRUE equ NOT FALSE
KANJI equ FALSE ;set to true is kanji vers.
;--------------------------------------------------------------------;
; FIND program following the standart UNIX operation. ;
; FIND program following the standard UNIX operation. ;
; ;
; FORMAT: ;
; find {option} string {filename {filename} {...}} ;
@ -56,7 +56,7 @@ KANJI equ FALSE ;set to true is kanji vers.
; NOTES: ;
; 1) String arguments HAVE to be enclosed ;
; in double quotes. (Two double quotes if a ;
; doble quote is to be included). Only ONE ;
; double quote is to be included). Only ONE ;
; string argument is presently allowed. ;
; ;
; 2) Options are available: ;
@ -76,9 +76,9 @@ KANJI equ FALSE ;set to true is kanji vers.
; 4) The maximum line size is determined by ;
; buffer size. Bigger lines will bomb the program. ;
; ;
; 5) If no file name is given then it will asssume ;
; the input is comming from the Standart Input. NO ;
; errors are reported when reading from Standart Input. ;
; 5) If no file name is given then it will assume ;
; the input is coming from the Standard Input. NO ;
; errors are reported when reading from Standard Input. ;
;--------------------------------------------------------------------;
code segment public
@ -386,7 +386,7 @@ regular:
; - Pointer to the next command in the command line
; - Pointer to the program segment prefix (to be loaded into
; DS to access the command line.
; if the imput is from the standart input then NONE of it will be
; if the imput is from the standard input then NONE of it will be
; in the stack.
go_match:
@ -544,7 +544,7 @@ try_again_opt:
;Note: at this point the stack contains (top to bottom)
; - Stuff mentioned before
;
; plus, BP points to begginig of the current line, BX has the length
; plus, BP points to beginning of the current line, BX has the length
;of the current line including the CRLF, and DX the adjusted length of
;the string argument.
@ -570,8 +570,8 @@ no_n_flg:
; The scanning routines have detected that the buffer does not
;contain a full line any more. More lines have to be read into the
;buffer. But first perform a seek on the file in order to re-read
;the non-complete line into the begining of the buffer.
; Uppon entry BP contains points to the begining of the non-complete
;the non-complete line into the beginning of the buffer.
; Upon entry BP contains points to the beginning of the non-complete
;line, and BX has the number of characters left in the buffer.
; The Stack contains (top to bottom):
; - Pointer to the next command in the command line
@ -781,7 +781,7 @@ prt_file_name:
;--------------------------------------------------------------------;
; Print an error message to the Standart error ;
; Print an error message to the Standard error ;
; ;
; entry: ;
; DX has the pointer to the message ;
@ -929,4 +929,4 @@ stack_top equ $
stack ends
end start

View file

@ -346,8 +346,8 @@ CMPTRKS:
BAD100:
; BX is the first bad sector #, SECTORS is the number of bad sectors starting
; at BX. This needs to be converted to clusters. The start sector number may
; need to be rounded down to a cluster boundry, the end sector may need to be
; rounded up to a cluster boundry. Know BX >= STARTSECTOR
; need to be rounded down to a cluster boundary, the end sector may need to be
; rounded up to a cluster boundary. Know BX >= STARTSECTOR
SUB BX,STARTSECTOR ; BX is now DATA area relative
MOV CX,BX
ADD CX,SECTORS
@ -451,8 +451,8 @@ FATWRT:
JNC SYSOK
MOV DX,OFFSET NOTSYS ;Can't transfer a system
CALL PRINT
MOV WORD PTR SYSSIZ+2,0 ;No system transfered
MOV WORD PTR SYSSIZ,0 ;No system transfered
MOV WORD PTR SYSSIZ+2,0 ;No system transferred
MOV WORD PTR SYSSIZ,0 ;No system transferred
JMP SHORT STATUS
SYSOK:
@ -549,7 +549,7 @@ UNSCALE:
;******************************************
; Calculate the size in bytes of the system rounded up to sector and
; cluster boundries, Answer in SYSSIZ
; cluster boundaries, Answer in SYSSIZ
GETSIZE:
MOV AX,WORD PTR BIOSSIZB ;And calculate the system size
@ -577,7 +577,7 @@ FNDSIZ0:
SUB DX,CLUSSIZ
NEG DX
ADD AX,DX ; Round up sector count to cluster
; boundry
; boundary
ONCLUS:
MUL SECSIZ ; Turn it back into bytes
ADD WORD PTR SYSSIZ,AX
@ -1624,4 +1624,4 @@ STACK LABEL BYTE
CODE ENDS
END START



View file

@ -65,7 +65,7 @@ PAGE
; 04/23/82 Added GETDSKPTDL as call 50, similar to GETFATPT(DL), returns
; address of DPB
; 04/29/82 Mod to WRTDEV to look for ^C or ^S at console input when
; writting to console device via file I/O. Added a console
; writing to console device via file I/O. Added a console
; output attribute to devices.
; 04/30/82 Call to en/dis able ^C check in dispatcher Call 51
; 04/30/82 Code to allow assignment of func 1-12 to disk files as well
@ -195,4 +195,4 @@ START SEGMENT BYTE PUBLIC 'START'
JMP DOSINIT
START ENDS



View file

@ -41,7 +41,7 @@ AKPORT EQU 20H ;Interrupt Acknowledge port
ENDIF
;The following values have to do with the ERRCNT variable and the
; CNTMES message. The values define levels at wich it is assumed
; CNTMES message. The values define levels at which it is assumed
; an off-line error exists. ERRCNT1 defines the value of ERRCNT above
; which the CNTMES message is printed by the transient. ERRCNT2
; defines the value of ERRCNT above which the resident will give up
@ -1642,4 +1642,4 @@ move_char endp
CODE ENDS
END START

View file

@ -41,7 +41,7 @@ AKPORT EQU 20H ;Interrupt Acknowledge port
ENDIF
;The following values have to do with the ERRCNT variable and the
; CNTMES message. The values define levels at wich it is assumed
; CNTMES message. The values define levels at which it is assumed
; an off-line error exists. ERRCNT1 defines the value of ERRCNT above
; which the CNTMES message is printed by the transient. ERRCNT2
; defines the value of ERRCNT above which the resident will give up
@ -1642,4 +1642,4 @@ move_char endp
CODE ENDS
END START



View file

@ -48,13 +48,13 @@ INIT: JMP HWINIT
;-----------------------------------------------+
; DWORD pointer to next device | 1 word offset.
; (-1,-1 if last device) | 1 word segement.
; (-1,-1 if last device) | 1 word segment.
;-----------------------------------------------+
; Device attribute WORD ; 1 word.
; Bit 15 = 1 for chacter devices. ;
; Bit 15 = 1 for character devices. ;
; 0 for Block devices. ;
; ;
; Charcter devices. (Bit 15=1) ;
; Character devices. (Bit 15=1) ;
; Bit 0 = 1 current sti device. ;
; Bit 1 = 1 current sto device. ;
; Bit 2 = 1 current NUL device. ;
@ -231,7 +231,7 @@ CON_INT:
JMP SHORT ENTRY
;
; Auxilary interrupt routine for processing I/O packets.
; Auxiliary interrupt routine for processing I/O packets.
;
AUX_INT:
@ -314,7 +314,7 @@ CMDERR: MOV AL,3 ;Set unknown command error #.
; AL contains actual error code.
;
; Error # 0 = Write Protect violation.
; 1 = Unkown unit.
; 1 = Unknown unit.
; 2 = Drive not ready.
; 3 = Unknown command in I/O packet.
; 4 = CRC error.
@ -526,7 +526,7 @@ ST1: CMP AL,ESC ;See if this the first character is ESC.
;
ST2: CMP AL,'[' ;See if a valide state two.
JNZ OUTCHR ;No, treat as regular charcter
JNZ OUTCHR ;No, treat as regular character
MOV BX,OFFSET PARMS ;Yes, get parameter pointer.
MOV WORD PTR [PRMPNT],BX ;Setup in pointer index.
MOV WORD PTR [BX],0 ;Clear first entry.
@ -649,7 +649,7 @@ CUP: CALL GETONE ;Get X position.
ED: CALL GETPARM ;Get trinary command type.
MOV BL,'b'
DEC AL ;See if erase from begining of screen.
DEC AL ;See if erase from beginning of screen.
JZ ED1 ;Yes, perform ZDS function.
MOV BL,'E'
DEC AL ;See if erase from end of screen.
@ -663,7 +663,7 @@ ED1: JMP OUTESC
EL: CALL GETPARM ;Get trinary command type.
MOV BL,'o'
DEC AL ;See if erase from begining of line.
DEC AL ;See if erase from beginning of line.
JZ EL1 ;Yes, perform ZDS function.
MOV BL,'l'
DEC AL ;See if erase whole line.
@ -725,12 +725,12 @@ PRN_WR1:LODS BYTE PTR ES:[SI];Get a data byte.
RET
PAGE
SUBTTL Auxilary I/O routines.
SUBTTL Auxiliary I/O routines.
AUXCHAR DB 0 ;Temporary AUX ahead storage.
;
; Status routine for Auxilary port.
; Status routine for Auxiliary port.
;
AISTAT: MOV AL,[AUXCHAR]
@ -748,7 +748,7 @@ AISTA9: MOV [AUXCHAR],AL
RET
;
; Auxilary port read.
; Auxiliary port read.
;
AIN: CALL AISTAT ;Get status and/or char.
@ -757,7 +757,7 @@ AIN: CALL AISTAT ;Get status and/or char.
RET
;
; Write routine for Auxilary port.
; Write routine for Auxiliary port.
;
AOUT: MOV CX,[ACON]
@ -767,7 +767,7 @@ AOUT: MOV CX,[ACON]
RET
;
; Non-Destructive Auxilary read routine.
; Non-Destructive Auxiliary read routine.
;
AUX_RDND:
@ -778,7 +778,7 @@ AUX_RDN2:
JMP BUS_EXIT
;
; Destructive Auxilary read routine.
; Destructive Auxiliary read routine.
;
AUX_READ:
@ -788,7 +788,7 @@ AUX_READ:
JMP EXIT
;
; Auxilary clear type a head.
; Auxiliary clear type a head.
;
AUX_CLR:
@ -796,14 +796,14 @@ AUX_CLR:
JMP EXIT
;
; Auxilary write port status.
; Auxiliary write port status.
;
AUX_WRST:
JMP EXIT
;
; Auxilary write.
; Auxiliary write.
;
AUX_WRIT:
@ -1374,4 +1374,4 @@ DOSSPOT LABEL WORD
CODE ENDS
END



View file

@ -167,7 +167,7 @@ PAGE
ASSUME DS:NOTHING,ES:NOTHING
; Inputs:
; DS:DX Points to openned FCB
; DS:DX Points to opened FCB
; Function:
; Read next record from file to disk transfer address
; Returns:
@ -184,7 +184,7 @@ ASSUME DS:NOTHING,ES:NOTHING
ASSUME DS:NOTHING,ES:NOTHING
; Inputs:
; DS:DX Points to openned FCB
; DS:DX Points to opened FCB
; Function:
; Write next record to file from disk transfer address
; Returns:
@ -204,7 +204,7 @@ FINSEQ:
ASSUME DS:NOTHING,ES:NOTHING
; Inputs:
; DS:DX Points to openned FCB
; DS:DX Points to opened FCB
; Function:
; Read record addressed by random record field from file to
; disk transfer address
@ -222,7 +222,7 @@ ASSUME DS:NOTHING,ES:NOTHING
ASSUME DS:NOTHING,ES:NOTHING
; Inputs:
; DS:DX Points to openned FCB
; DS:DX Points to opened FCB
; Function:
; Write record addressed by random record field to file from
; disk transfer address
@ -239,7 +239,7 @@ ASSUME DS:NOTHING,ES:NOTHING
ASSUME DS:NOTHING,ES:NOTHING
; Inputs:
; DS:DX Points to openned FCB
; DS:DX Points to opened FCB
; CX = Record count
; Function:
; Read CX records starting at random record field from file
@ -259,7 +259,7 @@ ASSUME DS:NOTHING,ES:NOTHING
ASSUME DS:NOTHING,ES:NOTHING
; Inputs:
; DS:DX Points to openned FCB
; DS:DX Points to opened FCB
; CX = Record count
; Function:
; Write CX records starting at random record field to file
@ -746,4 +746,4 @@ do_ext
CODE ENDS
END



View file

@ -219,7 +219,7 @@ REGCOM:
REP MOVSB ; Transfer it to the cooked buffer
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,ES:TRANGROUP
NEEDENV:
@ -1085,4 +1085,4 @@ NOSINGP2:
TRANCODE ENDS
END