Секреты ТR-DОS - Turbo Loader.

ZX-Ревю 1995 №5 · 1995

СЕКРЕТЫ Т R - D О S

TURBO-LOADER

(С) Димыч и Коляныч

г.Екатеринбург, 1995.

Предлагаем Вашему вниманию TURBO-LOADER - функционально завершенный дисковый загрузчик (в дальнейшем именуемый TL), аналог 5-ой функции TR-DOS (загрузка блока секторов через точку входа #3D13 при значении регистра В=5) и оригинальный и непобедимый Advanced Drive FX (ADF).

Положительными чертами TL являются компактность, повышенная скорость чтения - не теряется оборот диска при переходе к следующему цилиндру (физической дорожке), как у 5-ой функции. Повышенная надежность чтения - головки не катаются, подобно безумным рокерам в случае ошибки чтения, а упорно читают. Настраиваемость на диск и дисковод - TL работает с тем дисководом, который определен в системных переменных, одно- или двухсторонним, 40- или 80-доро-жечным, последнее - для соответствующего дисковода. Работа с TR-DOS базовых версий 5.01, 5.03, независимость от наличия системных переменных BASIC и TR-DOS, что особенно ценно при адаптации программ под диск. Ну и само собой разумеется, чтение осуществляется с контролем правильности.

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

Первоначально TL настроен на DOS 5.03, односторонний 80-доро-жечный дисковод. Очевидно, что для настройки TL необходимы системные переменные, а инициализацию можно провести на начальном этапе загрузки, пока переменные целы, и дальше TL будет работать автономно.

Пример использования:

CALL INIT_TL LD В,#1В LD DE,#2000 LD HL,#4000 CALL LOADER EI

Входные параметры аналогичны 5-ой функции TR-DOS: В регистре В - число подряд загружаемых секто- У ров, В регистрах D и Е соответственно начальные трек (логический) и сектор. В HL - адрес загрузки в память.

На выходе из процедуры в регистре DE будут содержаться следующие дорожка/сектор, что существенно облегчает создание полного аналога системной переменной TR-DOS #5CF4. Прерывания после , работы TL запрещены. Опрос на нажатие BREAK можно убрать, если логика работы внешней программы допускает возможность безвыходного зацикливания, и, тем самым, сократить исполняемый код на 5 байт.

Для контроля правильности чтения используется переменная с адресом #5CD6, предварительно TL сохраняет ее, так что беспокоиться не о чем, но, как следствие, недопустима прямая загрузка по этому адресу или наползание стека во время работы TL.

ADF состоит из двух эффектов: плавного разгорания и затухания светодиода дисковода. Точка входа для разгорания - EF_ZP, затухания - EF_ST. Величина эффекта во многом зависит от типа дисковода; наиболее зрелищно было на польском SL/SM 5639, у которого большой квадратный ярко-красный светодиод. На некоторых особо ин- В теллектуальных "буржуйских" дис- 1 ководах на 1.2М ADF выделялся | оригинальной вариацией. Следует У упомянуть значение установки пе- 1 ремычек в дисководе. I

СЕКРЕТЫ TR-DOS

A

C, #FF

TO_WG93

A,#3C

CALL TO_FF LD A,#D0 CALL TO_lF CALL IN1F NZ ,M3

A, #08 T0_1F

B,#10

PUSH ВС CALL OTKL LD B,0 DJNZ Ml CALL WKL LD B,0 DJNZ M2 POP ВС DJNZ BEG RET

PUSH HL PUSH DE PUSH ВС LD

(STPN+1),SP A,(#5CC2) (EX1F+1), A HL,(#5CC3) (SAVHL+1),HL HL,EX1F (#5CC3)j A, #C3 (#5CC2)_; D, 1

При тестировании программы набор был выполнен при помощи пакета FWORD FOR GENS, flpu ассемблировании в GENS'е из-за появления ошибки "No Symbol Table space!", ассемблирование выполняйте, задавая больший размер для таблицы символов, например так:

А,500

Длина блока кодов составляет 330 байт. Шестнадцатиричный дамп:

СЕКРЕТЫ

C4 18 F5 ED CD 11 OE FF СЗ 3E C4 20 10 C5 FE CD CI 10 73 55 C4 2A 49 C4 C2 5C 00 32 СЗ 5C El EE 16 05 14 21 C3 36 21 C3 21 C8 16 5D 32 FF 00 00

Для демонстрации работы дополните программу следующими строками (значение регистра DE, как Вы понимаете, взяты произвольно):

176

В заключение можно добавить, что для того, чтобы получить обособленную версию ADF, пригодную к работе с 5-ой функцией TR-DOS, необходимо взять из листинга на ассемблере строки 70-145, затем расположить строки 62-69 (и дополнить все это процедурой инициализации - строки 146-175).

Пример использования:

CALL EF__ZP LD A,#FF

(#5СЗА),А ВС,#1В05 DE,#2001 HL,#4000 CALL #3D13 CALL EF ST

Строки, отмеченные "*^и необходимы для подавления кода ошибки, который будет мешать работе #3D13. Появление кода ошибки связано с выбранным способом опроса готовности дисковода по р.егистру состояния ВГ93 (подпрограмма IN1F), в данном виде она активно использует системные переменные и TR-DOS и BASIC. Существует несколько вариантов сделать это по-другому, самым кардинальны^ из которых является прошивка в ПЗУ TR-DOS кодов #ED #78 #С9 по адресу #3FF8, в этом случае проблема разрешилась бы легко и изящно. Альтернативным путем является отказ от опроса этого трудноуловимого порта и подбор временных задержек, обеспечивающих удовлетворительную работу.