github/MS-DOS
1
0
Fork 0
mirror of https://github.com/Microsoft/MS-DOS.git synced 2025-08-24 07:15:25 -07:00
Code Issues Projects Releases Packages Wiki Activity Actions

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

Browse source
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
Download patch file Download diff file Expand all files Collapse all files

4
v2.0/source/DEBASM.ASM
View file

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

2
v2.0/source/DEBCOM2.ASM
View file

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

10
v2.0/source/DISK.ASM
View file

@ -632,7 +632,7 @@ ASSUME DS:NOTHING,ES:NOTHING
; Call BIOS to perform disk read ; Call BIOS to perform disk read
; Outputs: ; Outputs:
; DI = CX on entry ; 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) ; AX = Status word as returned by BIOS (error code in AL if error)
; Zero set if OK (from BIOS) ; Zero set if OK (from BIOS)
; Zero clear if error ; Zero clear if error
@ -683,7 +683,7 @@ ASSUME DS:NOTHING,ES:NOTHING
; Call BIOS to perform disk read ; Call BIOS to perform disk read
; Outputs: ; Outputs:
; DI = CX on entry ; 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) ; AX = Status word as returned by BIOS (error code in AL if error)
; Zero set if OK (from BIOS) ; Zero set if OK (from BIOS)
; Zero clear if error ; Zero clear if error
@ -848,7 +848,7 @@ ASSUME DS:DOSGROUP,ES:NOTHING
; Inputs: ; Inputs:
; CX = Length of disk transfer in bytes ; CX = Length of disk transfer in bytes
; ES:BP = Base of drive parameters ; ES:BP = Base of drive parameters
; [BYTSECPOS] = Byte position witin first sector ; [BYTSECPOS] = Byte position within first sector
; Outputs: ; Outputs:
; [BYTCNT1] = Bytes to transfer in first sector ; [BYTCNT1] = Bytes to transfer in first sector
; [SECCNT] = No. of whole sectors to transfer ; [SECCNT] = No. of whole sectors to transfer
@ -1020,7 +1020,7 @@ RDLAST:
LES SI,[THISFCB] LES SI,[THISFCB]
MOV AX,[NEXTADD] MOV AX,[NEXTADD]
MOV DI,AX MOV DI,AX
SUB AX,WORD PTR [DMAADD] ; Number of bytes transfered SUB AX,WORD PTR [DMAADD] ; Number of bytes transferred
XOR DX,DX XOR DX,DX
MOV CX,ES:[SI.fcb_RECSIZ] MOV CX,ES:[SI.fcb_RECSIZ]
DIV CX ; Number of records DIV CX ; Number of records
@ -1028,7 +1028,7 @@ RDLAST:
JZ FULLREC JZ FULLREC
MOV BYTE PTR [DSKERR],1 MOV BYTE PTR [DSKERR],1
OR DX,DX 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 MOV BYTE PTR [DSKERR],3 ; Flag partial last record
SUB CX,DX ; Bytes left in last record SUB CX,DX ; Bytes left in last record
PUSH ES PUSH ES

2
v2.0/source/DOSSYM_v211.ASM
View file

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

14
v2.0/source/EDLIN.ASM
View file

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

12
v2.0/source/FC.ASM
View file

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

6
v2.0/source/FCB.ASM
View file

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

20
v2.0/source/FIND.ASM
View file

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

12
v2.0/source/FORMAT.ASM
View file

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

2
v2.0/source/MSHEAD.ASM
View file

@ -65,7 +65,7 @@ PAGE
; 04/23/82 Added GETDSKPTDL as call 50, similar to GETFATPT(DL), returns ; 04/23/82 Added GETDSKPTDL as call 50, similar to GETFATPT(DL), returns
; address of DPB ; address of DPB
; 04/29/82 Mod to WRTDEV to look for ^C or ^S at console input when ; 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. ; output attribute to devices.
; 04/30/82 Call to en/dis able ^C check in dispatcher Call 51 ; 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 ; 04/30/82 Code to allow assignment of func 1-12 to disk files as well

2
v2.0/source/PRINT.ASM
View file

@ -41,7 +41,7 @@ AKPORT EQU 20H ;Interrupt Acknowledge port
ENDIF ENDIF
;The following values have to do with the ERRCNT variable and the ;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 ; an off-line error exists. ERRCNT1 defines the value of ERRCNT above
; which the CNTMES message is printed by the transient. ERRCNT2 ; which the CNTMES message is printed by the transient. ERRCNT2
; defines the value of ERRCNT above which the resident will give up ; defines the value of ERRCNT above which the resident will give up

2
v2.0/source/PRINT_v211.ASM
View file

@ -41,7 +41,7 @@ AKPORT EQU 20H ;Interrupt Acknowledge port
ENDIF ENDIF
;The following values have to do with the ERRCNT variable and the ;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 ; an off-line error exists. ERRCNT1 defines the value of ERRCNT above
; which the CNTMES message is printed by the transient. ERRCNT2 ; which the CNTMES message is printed by the transient. ERRCNT2
; defines the value of ERRCNT above which the resident will give up ; defines the value of ERRCNT above which the resident will give up

34
v2.0/source/SKELIO.ASM
View file

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

12
v2.0/source/SYSCALL.ASM
View file

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

2
v2.0/source/TCODE.ASM
View file

@ -219,7 +219,7 @@ REGCOM:
REP MOVSB ; Transfer it to the cooked buffer REP MOVSB ; Transfer it to the cooked buffer
JMP DOCOM 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 ASSUME DS:RESGROUP,ES:TRANGROUP
NEEDENV: NEEDENV: