2015-08-16 20:10:30 +00:00
|
|
|
|
2015-08-17 00:53:43 +00:00
|
|
|
string asis
|
2015-08-16 20:10:30 +00:00
|
|
|
|
2015-08-11 22:56:19 +00:00
|
|
|
include 'gsos.equ'
|
|
|
|
|
stubs proc
|
|
|
|
|
|
2015-08-12 00:06:51 +00:00
|
|
|
export change_path
|
2015-08-11 22:56:19 +00:00
|
|
|
export create
|
|
|
|
|
export destroy
|
2015-08-12 00:06:51 +00:00
|
|
|
export erase_disk
|
|
|
|
|
export format
|
|
|
|
|
export get_dev_num
|
|
|
|
|
export judge_name
|
2015-08-11 22:56:19 +00:00
|
|
|
export set_eof
|
2015-08-12 00:06:51 +00:00
|
|
|
export set_file_info
|
|
|
|
|
export write
|
2015-08-11 22:56:19 +00:00
|
|
|
|
|
|
|
|
|
2015-08-12 00:06:51 +00:00
|
|
|
change_path
|
|
|
|
|
close
|
2015-08-11 22:56:19 +00:00
|
|
|
create
|
|
|
|
|
destroy
|
2015-08-12 00:06:51 +00:00
|
|
|
erase_disk
|
|
|
|
|
flush
|
|
|
|
|
format
|
|
|
|
|
get_dev_num
|
|
|
|
|
get_dir_entry
|
|
|
|
|
get_eof
|
2015-08-11 22:56:19 +00:00
|
|
|
get_file_info
|
2015-08-12 00:06:51 +00:00
|
|
|
get_mark
|
|
|
|
|
judge_name
|
2015-08-11 22:56:19 +00:00
|
|
|
open
|
|
|
|
|
read
|
|
|
|
|
set_eof
|
2015-08-12 00:06:51 +00:00
|
|
|
set_file_info
|
|
|
|
|
set_mark
|
|
|
|
|
write
|
|
|
|
|
volume
|
2015-08-11 22:56:19 +00:00
|
|
|
|
|
|
|
|
|
|
|
|
|
lda #invalid_fst_op
|
|
|
|
|
sec
|
|
|
|
|
rtl
|
|
|
|
|
endp
|
|
|
|
|
end
|
