__________________________________________
(C) Колесников Сергей aka SKL-KEEPER
__________________________________________
Загрузчик для рабочей дискеты
Наверняка у каждого из вас есть рабочая
дискета, на которой записаны самые нужные
для Вас программы, которые Вам нужны пос-
тоянно (не будете же Вы держать на разных
дисках ассемблер, коммандер и рабочие фай-
лы?). Вот и у меня такая есть.
Для удобства работы Вы, скорее всего,
переименовали коммандер в boot, и, если
нужно загрузить ассемблер,подводите курсор
к нужному файлу и нажимаете ENTER (естест-
венно)...
Но можно сделать так, что при запуске
диска, если не нажата ни одна клавиша, бу-
дет грузиться коммандер, а если в момент
загрузки держать нажатой "пробел", будет
загружаться ассемблер. Очень удобно, по-
верьте!
Вот элементарно простая программа на
BASIC'е, набрав которую, работать с диске-
той станет чуть-чуть удобнее:
1 BORDER 0: PAPER 0: INC 7: CLS
5 IF INKEY$ =" "THEN GO TO 20
10 PRINT "LOADING ZX-ASM!": RANDOMIZE
USR 15619: REM : RUN "ZASM3.10"
11 PRINT "ZX-ASM NOT FOUND!!"
20 PRINT "LOADING COMMANDER!": RANDOMIZE
USR 15619: REM : RUN "RC_1.9f"
25 PRINT "COMMANDER NOT FOUND!!!"
30 PAUSE 50: RANDOMIZE USR 15616
Как водится, краткое пояснение: в пер-
вой строке задаются атрибуты экрана, за-
тем проверяется, не нажат ли "пробел". Ес-
ли нажат, печатается надпись "LOADING ZX-
-ASM!", и загружается ассемблер, если ни-
чего не было нажато, грузится REAL COMMAN-
DER (или другой, какой Вам больше нравит-
ся). Если таких файлов на диске нет, прог-
рамма сообщит об этом и выйдет в TR-DOS.
Можно добавить опрос на нажатие ка-
кой-нибудь другой клавиши для загрузки еще
чего-нибудь.
Ну как, удобнее стало?
------------------------------------------
Other articles:
