Deja Vu
#0A
30 сентября 2000 |
|
Программирование - Загрузчик для рабочей дискеты.
__________________________________________ (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. Можно добавить опрос на нажатие ка- кой-нибудь другой клавиши для загрузки еще чего-нибудь. Ну как, удобнее стало? ------------------------------------------
Другие статьи номера:
Похожие статьи:
В этот день... 9 октября