MS-DOS/v2.0/source/FCMES.ASM

68 lines
2.0 KiB
NASM
Raw Normal View History

1983-08-13 01:53:34 +01:00
title File Compare Routine for MSDOS 2.0
CR equ 0dh
LF equ 0ah
FALSE equ 0
TRUE equ 0ffh
const segment public byte
PUBLIC vers_err,opt_err,opt_e,crlf,opt_err_len
PUBLIC found_err_pre,found_err_pre_len,found_err_post
PUBLIC found_err_post_len,read_err_pre,read_err_pre_len
PUBLIC read_err_post,read_err_post_len,file_err,file_err_len
PUBLIC bf1ne,bf1ne_len,bf2ne,bf2ne_len,bhead,bhead_len
PUBLIC int_err,int_err_len,dif_err,dif_err_len,diff_sep,diff_sep_len
PUBLIC args_err,args_err_len,fname_sep,fname_sep_len
vers_err db "Incorrect DOS version$"
opt_err db "Invalid parameter:"
opt_e db 0
crlf db CR,LF
opt_err_len db $ - opt_err
;"found_err_pre<name of file>found_err_post"
found_err_pre db "File not found:"
found_err_pre_len db $ - found_err_pre
found_err_post label byte
found_err_post_len db $ - found_err_post
;"read_err_pre<name of file>read_err_post"
read_err_pre db "Read error in:"
read_err_pre_len db $ - read_err_pre
read_err_post label byte
read_err_post_len db $ - read_err_post
file_err db "Bad file"
file_err_len db $ - file_err
int_err db "Internal Error"
int_err_len db $ - int_err
dif_err db "*** Files are different ***"
dif_err_len db $ - dif_err
args_err db "Invalid number of parameters"
args_err_len db $ - args_err
fname_sep db CR,LF,"----------"
fname_sep_len db $ - fname_sep
diff_sep db CR,LF,"-----------------------------------------------",CR,LF
diff_sep_len db $ - diff_sep
bf1ne db CR,LF,"*** Data left in F1 ***",CR,LF
bf1ne_len db $ - bf1ne
bf2ne db CR,LF,"*** Data left in F2 ***",CR,LF
bf2ne_len db $ - bf2ne
bhead db CR,LF,'--ADDRS----F1---F2-',CR,LF
bhead_len db $ - bhead
const ends
end