68 lines
2.0 KiB
NASM
68 lines
2.0 KiB
NASM
|
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
|
|||
|
|
|