|
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. Можно добавить опрос на нажатие ка- кой-нибудь другой клавиши для загрузки еще чего-нибудь. Ну как, удобнее стало? ------------------------------------------
Other articles:
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
Similar articles:
В этот день... 1 April
Info Guide #13,
ACNews #50,
Avro News #01,
ACNews #47,
ACNews #40,
ACNews #29,
Black Metall #01,
ACNews #16,
Adventurer #13,
Polesse #19,
Subliminal Extacy #03,
ZX Pilot #37,
Always #03,
Born Dead #0G,
Odyssey paper #08,
Optron #26,
City #08,
Zodiac #02,
Polesse #05,
Nicron #108,
X-Magazine #10,
Nicron #82,
Energy #01,
Sorrow News #03,
Sorrow News #02,
Proton #27,
Think #08,
Wallpaper #01,
Spectrum Progress #03,
Spectrum Expert #02,
Micro #01,
X-Files #02,
Gorodok #05,
Deja Vu #04,
Anecdotes #01,
X-Files #02,
Maximum #35,
Impulse #01,
Spectrofun #01,
Faultless #07,
Breeze #06,
Nicron #27,
Echo #03,
Oberon #01,
Spectrofon #19,
On-Line #30,
Sinclair Town #01,
Sinclair Classic #04,
Spectrofon #04