mirror of
https://github.com/Microsoft/MS-DOS.git
synced 2025-08-24 07:15:25 -07:00
Fixed some spelling mistakes in MS-DOS v2.0 source code
This commit is contained in:
parent
d28f7e6e51
commit
0b1b809428
15 changed files with 80 additions and 80 deletions
|
@ -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
|
||||
;
|
||||
|
||||
;
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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.
|
||||
|
|
|
@ -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 ;
|
||||
; ;
|
||||
|
|
|
@ -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
|
||||
|
||||
|
|
|
@ -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 ;
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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:
|
||||
|
|
|
@ -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
|
||||
|
|
|
@ -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:
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue