процедура загрузки с диска

[necroTrue]

нужна процедура загрузки, что бы принимала имя файла и куда читать.

---------- Post added at 18:15 ---------- Previous post was at 18:05 ----------

нашел, может кому пригодится. но остался вопрос - а как указать что я хочу конкретный адрес? я так понимаю сейчас оно смотрит свойства файла

http://zxdn.narod.ru/coding/adv6dver.txt

LOAD
CALL SET_NAME ; готовим сист.
; переменные
LD C,10 ; ищем файл
CALL 15635
LD A,C
BIT 7,C
JR Z,LD_1
; Сообщение "файл не найден" или...
RET
LD_1 ; грузим...
LD A,C
LD C,8
CALL 15635
XOR A
LD (23801),A
LD (23824),A
LD C,14
CALL 15635
RET

SET_NAME ; Подпрограмма установки сист.переменных
LD HL,NAME ; перекидываем
LD DE,23773 ; имя файла
LD BC,8
LDIR
LD A,"C" ; тип файла м.б.
LD (23781),A ; любой, кроме "#","D","B"
LD A,9 ; поиск файла
LD (23814),A ; по 9 символам
RET

NAME DEFM "filename"

[Advertiser]