Subversion Repositories pentevo

Rev

Rev 875 | Rev 964 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed | ?url?

  1.  
  2. ;LAST UPDATE: 10.03.2020 savelij
  3.  
  4. ;ОПИСАТЕЛЬ ОКНА (АДРЕС В IX)
  5. ;+00 X КООРДИНАТА
  6. ;+01 Y КООРДИНАТА
  7. ;+02 V ВЫСОТА
  8. ;+03 H ШИРИНА
  9. ;+04 C ЦВЕТ
  10. ;+05 C ЦВЕТ КУРСОРА
  11. ;+06 F ФЛАГОВЫЙ
  12. ;+07 N НОМЕР ПУНКТА В ОКНЕ
  13. ;  БИТ 7-0=БАЙТЫ 8-9 ТЕКУЩИЙ ПУНКТ МЕНЮ,
  14. ;        1=БАЙТЫ 8-9 АДРЕС ХРАНЕНИЯ
  15. ;+08 | ТЕКУЩИЙ
  16. ;+09 | ПУНКТ МЕНЮ
  17. ;+0A : КОЛИЧЕСТВО
  18. ;+0B : ПУНКТОВ МЕНЮ
  19. ;+0C | АДРЕС
  20. ;+0D | ТЕКСТА
  21. ;+0E : СПИСОК АДРЕСОВ
  22. ;+0F : ПОДПРОГРАММ
  23. ;+10 | АДРЕС СПИСКА АКТИВНЫХ
  24. ;+11 | ЗОН ДЛЯ МЫШИ
  25. ;+12 : АДРЕС СПИСКА
  26. ;+13 : ГОРЯЧИХ КЛАВИШ
  27.  
  28. ;ФОРМАТ ФЛАГОВОГО БАЙТА ОКНА
  29. ;IX+6
  30. ;7-0-НЕТ, 1-ЕСТЬ НИЖНИЙ ЗАГОЛОВОК
  31. ;6-0-С РАМКОЙ,1-БЕЗ РАМКИ
  32. ;5-0-НЕТ, 1-ЕСТЬ ВЕРХНИЙ ЗАГОЛОВОК
  33. ;4-0-НЕТ, 1-ЕСТЬ ТЕКСТ
  34. ;3
  35. ;2-
  36. ;1-
  37. ;0-
  38.  
  39. ;РАСКЛАДКА БАЙТ ВЫДЕЛЕНИЙ
  40. ;+0 ФЛАГОВЫЙ
  41. ;    7 ПРИ АКТИВНОСТИ УСТАНОВЛЕН
  42. ;    6 УСТАНОВЛЕН, НЕ ВЫДЕЛЯЕТСЯ
  43. ;    5 УСТАНОВЛЕН, ВЫЗОВ ВЕКТОРА
  44. ;    4
  45. ;    3 \
  46. ;    2  } ФОРМА КУРСОРА
  47. ;    1  } ПРИ ПОПАДАНИИ
  48. ;    0 /
  49. ;+1 X КООРДИНАТА
  50. ;+2 Y КООРДИНАТА
  51. ;+3 V ВЫСОТА
  52. ;+4 H ШИРИНА
  53. ;+5 K КОД КЛАВИШИ
  54.  
  55. ;[МЫШИНЫЙ КУРСОР В ДВУХ ВИДАХ]
  56. SPRAR           DB 0X3F,0X00,0X1F,0X40,0X0F,0X60,0X07,0X50,0X03,0X48,0X01,0X4C,0X01,0X70,0X07,0X00
  57. SPRAR2          DB 0X3F,0X00,0X1F,0X40,0X0F,0X60,0X07,0X70,0X03,0X78,0X01,0X7C,0X01,0X70,0X07,0X00
  58. ;===============МЫШИНЫЙ КУРСОР В ДВУХ ВИДАХ================
  59.        
  60. ;[МЕНЮ ДИСКОВОЙ ОШИБКИ]
  61. DSK_ERR         DB 0X08,0X08,LOW ((D_ERR2-D_ERR1)/2)+2,0X11,0X17,0X3A,%00100000,0
  62.                 DW 0,((D_ERR2-D_ERR1)/2)
  63.                 DW DSKERRTXT,D_ERR1,0,DSK_ERR_KEY
  64. DSKERRTXT       DB 0X17,0XFF,"DOS MEDITATE!"
  65.                 DB 0X0D," R.Retry:  "
  66. NUM_TRK_TXT     DB "  /"
  67. NUM_SEC_TXT     DB "  /"
  68. SIDE_DISK       DB " "                          ;r
  69.                 DB 0X0D," I.Ignore sector"      ;i
  70.                 DB 0X0D," B.Break",0            ;b
  71. DSK_ERR_KEY     DB LOW (D_ERR1-$-1),"rib"
  72.  
  73. D_ERR1          DW _RETRY
  74.                 DW _IGNORE
  75.                 DW _STUPID
  76. D_ERR2
  77. ;===============МЕНЮ ДИСКОВОЙ ОШИБКИ=======================
  78.  
  79. ;[СЕРВИСНОЕ МЕНЮ]
  80. MKILLS          DB 0X0A,0X07,LOW ((KILL2-KILL1)/2)+2,0X12,0X0F,0X1F,%00100000,0
  81.                 DW 0,((KILL2-KILL1)/2)
  82.                 DW MKILLSTXT,KILL1,0,MKILLS_KEY
  83. MKILLSTXT       DB 0X17,0XFF,"Services"
  84.                 DB 0X0D," R.Reset NeoGS"                ;r
  85.                 DB 0X0D," E.Reset CMOS"                 ;e
  86.                 DB 0X0D," K.Format ramdisk 640k"        ;k
  87.                 DB 0X0D," V.Basic 48 standart"          ;v
  88.                 DB 0X0D," B.Basic 128 standart"         ;b
  89.                 DB 0X0D," M.Edit CMOS"                  ;m
  90.                 DB 0X0D," S.Test PC keyboard"           ;s
  91.                 DB 0X0D," D.HDD detector"               ;d
  92.                 DB 0X0D," C.ATM CP/M"                   ;c
  93.                 DB 0X0D," T.IS-DOS boot"                ;t
  94.                 DB 0X0D," F.Fast update ROM"            ;f
  95.                 DB 0X0D," U.Update custom ROM"          ;u
  96.                 DB 0X0D," N.Dismount image"             ;n
  97.                 DB 0X0D," X.Exit",0                     ;x
  98. MKILLS_KEY      DB LOW (KILL1-$-1),"rekvbmsdctfunx"
  99.  
  100. KILL1           DW RESETNGS                     ;r
  101.                 DW RESET_CMOS                   ;e
  102.                 DW RAM_640                      ;k
  103.                 DW BAS48STD                     ;v
  104.                 DW BAS128STD                    ;b
  105.                 DW EDIT_CMOS                    ;m
  106.                 DW PC_KEYS_TEST                 ;s
  107.                 DW HDD_DETECTOR                 ;d
  108.                 DW ATM_CPM                      ;c
  109.                 DW ISDOS_BOOT                   ;t
  110.                 DW LOAD4FLASH_FULL              ;f
  111.                 DW LOAD4FLASH_CUST              ;u
  112.                 DW UMOUNTIMAGE                  ;n
  113.                 DW RESTART                      ;x
  114. KILL2
  115. ;===============СЕРВИСНОЕ МЕНЮ=============================
  116.  
  117. ;[ДЕМОНТИРОВАНИЕ ОБРАЗОВ]
  118. WDISMOUNT       DB 0X0F,0X08,LOW ((WDISM2-WDISM1)/2)+2,0X0C,0X07,0X1F,%00100000,0
  119.                 DW 0,((WDISM2-WDISM1)/2)
  120.                 DW WDISMTXT,WDISM1,0,WDISMKEY
  121. WDISMTXT        DB 0X17,0XFF,"Dismount"
  122.                 DB 0X0D," 1.Dismount A:"        ;1
  123.                 DB 0X0D," 2.Dismount B:"        ;2
  124.                 DB 0X0D," 3.Dismount C:"        ;3
  125.                 DB 0X0D," 4.Dismount D:"        ;4
  126.                 DB 0X0D," X.Exit",0             ;x
  127.  
  128. WDISMKEY        DB LOW (WDISM1-$-1),"1234x"
  129.  
  130. WDISM1          DW DISMOUNT_A                   ;1
  131.                 DW DISMOUNT_B                   ;2
  132.                 DW DISMOUNT_C                   ;3
  133.                 DW DISMOUNT_D                   ;4
  134.                 DW RESTART                      ;x
  135. WDISM2
  136. ;===============ДЕМОНТИРОВАНИЕ ОБРАЗОВ=====================
  137.  
  138. ;[МЕНЮ УСТАНОВОК]
  139. SETUPER         DB 0X07,0X07,LOW ((SETUPER2-SETUPER1)/2)+2,0X15,0X0F,0X1F,%00100000,0
  140.                 DW 0,((SETUPER2-SETUPER1)/2)
  141.                 DW SETUPERTXT,SETUPER1,0,SETUPERKEY
  142. SETUPERTXT      DB 1,0X17,0XFF,"Setup"
  143.                 DB "\r S.Sound on keys:      off"
  144. SNDKEYS_STAT    EQU $-2
  145.                 DB "\r G.Access SD NeoGS:    ofN"
  146. ACCSSDG_STAT    EQU $-2
  147.                 DB "\r K.DRV AY printer:     off"
  148. ETXT_AYPRINTER  EQU $-2
  149. ;ДЛЯ РЕЗИДЕНТА HONEY COMANDER
  150.         IFDEF REZIDENT
  151.                 DB "\r R.Resident Honey Cmd: off"
  152. TXT_REZIDENT    EQU $-2
  153.                 DB "\r E.Kill rezident:      off"
  154. TXT_KILLREZID   EQU $-2
  155.         ENDIF;REZIDENT
  156.                 DB "\r T.Autostart tape:     off"
  157. TXT_AUTOTAPE    EQU $-2
  158.                 DB "\r H.Delay for HDD, secs  5"
  159. TXT_HDDTIMEOUT  EQU $-1
  160. ;               DB "\r L.Screensaver, minute: 5"
  161. ;TXT_SCRSAVDELAY        EQU $-1
  162.                 DB "\r X.Exit"
  163.                 DB 0
  164. ;ДЛЯ РЕЗИДЕНТА HONEY COMANDER
  165.         IFDEF REZIDENT
  166. SETUPERKEY      DB LOW (SETUPER1-$-1),"sgkrethx"
  167.         ELSE
  168. SETUPERKEY      DB LOW (SETUPER1-$-1),"sgkthx"
  169.         ENDIF;REZIDENT
  170.  
  171. SETUPER1        DW SOUND_KEYS                   ;s
  172.                 DW ACS_SDNGS                    ;g
  173.                 DW AYPRN_SETUP                  ;k
  174. ;ДЛЯ РЕЗИДЕНТА HONEY COMANDER
  175.         IFDEF REZIDENT
  176.                 DW REZID_SETUP                  ;r
  177.                 DW KILL_REZID                   ;e
  178.         ENDIF;REZIDENT
  179.                 DW AUTO_TAPE                    ;t
  180.                 DW HDDTIMEOUT                   ;h
  181. ;               DW SCRSAVTIMEOUT                ;l
  182.                 DW RESTART                      ;x
  183. SETUPER2
  184. ;===============МЕНЮ УСТАНОВОК=============================
  185.  
  186. ;[ВЫБОР FAT УСТРОЙСТВА]
  187. SEL_FAT_DEV     DB 0X03,0X04,0X00,0X16,0X07,0X1F,%00100000,0
  188.                 DW 0,0
  189.                 DW SEL_FAT_DRV,0,0,0
  190. SELFATDEVEXE    EQU $-6
  191. TXT_FAT_SEL     DB 0X17,0XFF,"Drive select"
  192. ETXT_FAT_SEL
  193. ;===============ВЫБОР FAT УСТРОЙСТВА=======================
  194.  
  195. ;[ГЛАВНОЕ МЕНЮ]
  196. MAINMENU        DB 0X11,0X06,LOW ((MAIN2-MAIN1)/2)+2,0X0C,0X0F,0X1F,%00100000,0
  197.                 DW 0,((MAIN2-MAIN1)/2)
  198.                 DW MAINTXT,MAIN1,MAIN_ZONE,MAINMENU_KEY
  199. MAINTXT         DB 0X17,0XFF,"Main menu"
  200.                 DB 0X0D," Z.TR-DOS boot"        ;z
  201.                 DB 0X0D," F.File browse"        ;f
  202.                 DB 0X0D," T.Tape load"          ;t
  203.                 DB 0X0D," B.HDD boot"           ;b
  204.                 DB 0X0D," D.CD boot"            ;d
  205.                 DB 0X0D," 5.SDcard boot"        ;5
  206.                 DB 0X0D," X.Perfect Cmd"        ;x
  207.                 DB 0X0D," S.TR-DOS"             ;s
  208.                 DB 0X0D," I.48k basic"          ;i
  209.                 DB 0X0D," U.128k basic"         ;u
  210.                 DB 0X0D," C.Setup"              ;c
  211.                 DB 0X0D," R.Service"            ;r
  212.                 DB 0
  213. MAINMENU_KEY    DB LOW (MAIN1-$-1),"zftbd5xsiucrwmlg123489vyhejn";,0XAC
  214.  
  215. MAIN1           DW GLUBOOT                      ;z ДИСКЕТОЗАГРУЗЧИК
  216.                 DW FILES_BROWSE                 ;f ЗАГРУЗЧИК С ФАТА
  217.                 DW TAPELOAD                     ;t ЗАГРУЗКА С ЛЕНТЫ
  218.                 DW HDD_BOOT                     ;b СТАРЫЙ ЗАГРУЗЧИК С ВИНТА
  219.                 DW CDBOOT                       ;d СТАРЫЙ ЗАГРУЗЧИК С СИДЮКА
  220.                 DW SDCARDBOOT                   ;5 ЗАГРУЗЧИК С SD КАРТЫ
  221.                 DW PERFECT                      ;x PERFECT COMANDER
  222.                 DW DOS128                       ;s ПЕРЕХОД В TR-DOS
  223.                 DW BAS48                        ;i ПЕРЕХОД В БЕЙСИК 48
  224.                 DW BAS128                       ;u ПЕРЕХОД В БЕЙСИК 128
  225.                 DW SETUPM                       ;c УСТАНОВКИ
  226.                 DW _KILLS                       ;r СЕРВИС МЕНЮ
  227. MAIN2           DW CHNGTURBO                    ;w ИЗМЕНЕНИЕ ТУРБО
  228.                 DW CHNGMODE                     ;m ИЗМЕНЕНИЕ РЕЖИМА ПАМЯТИ
  229.                 DW CHNGTAPMODE                  ;l ПЕРЕКЛЮЧЕНИЕ ЭМУЛЯЦИИ ЛЕНТЫ
  230.                 DW CHNGGLUKMOD                  ;g РАЗРЕШЕНИЕ СБРОСА В ГЛЮК
  231.                 DW SELDRV                       ;1 ВЫБОР ДИСКОВОДА A
  232.                 DW SELDRV                       ;2 ВЫБОР ДИСКОВОДА B
  233.                 DW SELDRV                       ;3 ВЫБОР ДИСКОВОДА C
  234.                 DW SELDRV                       ;4 ВЫБОР ДИСКОВОДА D
  235.                 DW MOUSE_ONOFF                  ;8 ВКЛ/ВЫКЛ КУРСОРА МЫШИ
  236.                 DW CMOS_ONOFF                   ;9 ВКЛ/ВЫКЛ ОТОБРАЖЕНИЯ ЧАСОВ
  237.                 DW NEXTDRIVE                    ;v ПЕРЕБОР РЕАЛЬНЫХ ДИСКОВОДОВ
  238.                 DW NEXTVIRT                     ;y ПЕРЕБОР ВИРТУАЛЬНЫХ ДИСКОВОДОВ
  239.                 DW VIEW_HELP                    ;h ВЫВОД ХЕЛПА
  240.                 DW EN_LOADFONT                  ;e РАЗРЕШЕНИЕ ПЕРЕЗАГРУЗКИ ШРИФТА ПО СБРОСУ
  241.                 DW SET_TYPEFONT                 ;j ВЫБОР ТИПА ШРИФТА
  242.                 DW EN_AUTOMNT                   ;n ВКЛ/ВЫКЛ АВТОМОНТИРОВАНИЯ ИЗ ФАЙЛА
  243. ;===============ГЛАВНОЕ МЕНЮ===============================
  244.  
  245. ;[ДЛЯ ЗАГРУЗКИ С ЛЕНТЫ]
  246. BAS4TAPE        binclude "BAS4TAPE.BIN"
  247. EBAS4TAPE
  248.  
  249. ;ДЛЯ ЗАГРУЗКИ С ЛЕНТЫ
  250. TAPE_LDT        DB 0X06,0X08,0X04,0X14,0X0E,0X0F,%00000000,0
  251.                 DW 0,0
  252.                 DW TAPELDTTXT,0,0,0
  253. TAPELDTTXT      DB 0X17,0XFF,0X0D,3,"Tape loading..."
  254.                 DB 0X0D,3,"Press PLAY on tape",0
  255. ;===============ДЛЯ ЗАГРУЗКИ С ЛЕНТЫ=======================
  256.  
  257. ;[НЕ TR-DOS ДИСК]
  258. NONETRDOS       DB 0X06,0X08,0X03,0X16,0X16,0X0F,%00000000,0
  259.                 DW 0,0
  260.                 DW TXT_NONETRDOS,0,0,0
  261. TXT_NONETRDOS   DB 0X17,0XFF,0X0D,3,"Not TR-DOS disk",0
  262. ;===============НЕ TR-DOS ДИСК=============================
  263.  
  264. ;[МОНТИРОВАТЬ ИЛИ ЗАГРУЖАТЬ В РАМДИСК]
  265. SEL_MOUNT       DB 0X07,0X07,LOW ((SELMOUNT2-SELMOUNT1)/2)+2,0X0B,0X07,0X1F,%00100000,0
  266.                 DW 0,((SELMOUNT2-SELMOUNT1)/2)
  267.                 DW SELMOUNTTXT,SELMOUNT1,0,SELMOUNTKEYS
  268. SELMOUNTTXT     DB 0X17,0XFF,"Mounter"
  269.                 DB 0X0D," L.Ramdisk"
  270.                 DB 0X0D," 1.Mount A:"
  271.                 DB 0X0D," 2.Mount B:"
  272.                 DB 0X0D," 3.Mount C:"
  273.                 DB 0X0D," 4.Mount D:"
  274.                 DB 0X0D," X.Exit",0
  275.  
  276. SELMOUNTKEYS    DB LOW (SELMOUNT1-$-1),"l1234x"
  277.  
  278. SELMOUNT1       DW LOADIMAGE
  279.                 DW MOUNT_A
  280.                 DW MOUNT_B
  281.                 DW MOUNT_C
  282.                 DW MOUNT_D
  283.                 DW RESTART
  284. SELMOUNT2
  285. ;===============МОНТИРОВАТЬ ИЛИ ЗАГРУЖАТЬ В РАМДИСК========
  286.  
  287. ;[ОКНО ВЫВОДА НАЙДЕННЫХ ФАЙЛОВ TR-DOS]
  288. WIN_FILES       DB 0X00,0X00,0X00,0X0C,0X0F,0X1F,%00010010,0
  289.                 DW 0,0
  290.                 DW SEL_FAT_DRV,WFILES1,0,WFILESKEYS
  291.  
  292. WFILESKEYS      DB LOW (WFILES1-$-1)
  293.                 REPT FH_FILE-2
  294.                 DB 0
  295.                 ENDM
  296.                 DB "x"
  297.  
  298. WFILES1         REPT FH_FILE-2
  299.                 DW RUNFILE
  300.                 ENDM
  301.                 DW SEL_FILES_WIN
  302. ;===============ОКНО ВЫВОДА НАЙДЕННЫХ ФАЙЛОВ TR-DOS========
  303.  
  304. ;[ОКНО ВЫВОДА НАЙДЕННЫХ ФАЙЛОВ FAT]
  305. FAT_FILES       DB 0X00,0X00,0X00,0X0C,0X0F,0X1F,%10100010,0
  306.                 DW 0,0
  307.                 DW FATFILESTXT,FATFILES1,FB_ZONE,FATFILESKEYS
  308. FATFILESTXT     DB 0X17,0XFF,"File browser"
  309.                 DB 0X16,0X17,8,"D.Drive  ENTER.Run/Load  V.View",0
  310.  
  311. FATFILESKEYS    DB LOW (FATFILES1-$-1)
  312.                 REPT FH_FILE
  313.                 DB 0X0D
  314.                 ENDM
  315.                 DB "dvx"
  316.  
  317. FATFILES1       REPT FH_FILE
  318.                 DW RUN_HOB
  319.                 ENDM
  320.                 DW SELECT_DEVICE
  321.                 DW VIEW_IMAGE
  322.                 DW RESTART
  323.  
  324. FB_ZONE         DB 0,0X00,FH_FILE-1,0X01,0X07,"d"
  325.                 DB 0,0X07,FH_FILE-1,0X01,0X0C,0X0D
  326.                 DB 0,0X13,FH_FILE-1,0X01,0X07,"v"
  327.                 DB 0XFF
  328. ;===============ОКНО ВЫВОДА НАЙДЕННЫХ ФАЙЛОВ FAT===========
  329.  
  330. ;[ОКНО ПОДСКАЗКИ ДЛЯ ФАЙЛОВ FAT]
  331. ;===============ОКНО ПОДСКАЗКИ ДЛЯ ФАЙЛОВ FAT==============
  332.  
  333. ;[НЕТ БЕЙСИК ФАЙЛОВ]
  334. NOBASIC         DB 0X00,0X00,0X03,0X0C,0X0F,0X27,%00000000,0
  335.                 DW 0,0
  336.                 DW TXTNOBASIC,ADRNOBAS,0,0
  337. TXTNOBASIC      DB 0X17,0XFF,0X0D,3,"No Progs",0
  338. ADRNOBAS        DW RESTART
  339. ;===============НЕТ БЕЙСИК ФАЙЛОВ==========================
  340.  
  341. ;[HDD НЕ НАЙДЕН]
  342. HDDBOOT_ERROR   DB 0X08,0X08,0X04,0X10,0X17,0X00,%00000000,0
  343.                 DW 0,0
  344.                 DW TXT_HDDBOOTERR,0,0,0
  345. TXT_HDDBOOTERR  DB 0X17,0XFF,0X0D,3,"HDD not found",0X0D,3,"Press any key",0
  346. ;===============HDD НЕ НАЙДЕН==============================
  347.  
  348. ;[IMAGE FDI ERROR]
  349. LDFDIERROR      DB  0X08,0X08,0X04,0X10,0X17,0X00,%00000000,0
  350.                 DW 0,0
  351.                 DW TXT_LDFDIERR,0,0,0
  352. TXT_LDFDIERR    DB 0X17,0XFF,0X0D,3,"FDI image error",0X0D,3,"Press any key",0
  353. ;===============IMAGE FDI ERROR============================
  354.  
  355. ;[FILE NOT FOUND]
  356. FILENONE        DB 0X08,0X08,0X04,0X10,0X17,0X00,%00000000,0
  357.                 DW 0,0
  358.                 DW TXT_FILENONE,0,0,0
  359. TXT_FILENONE    DB 0X17,0XFF,0X0D,3,"File not found",0X0D,3,"Press any key",0
  360. ;===============FILE NOT FOUND=============================
  361.  
  362. ;[VIRTUAL ERROR]
  363. ERR_VIRTUAL     DB 0X05,0X08,0X04,0X18,0X17,0X00,%00000000,0
  364.                 DW 0,0
  365.                 DW TXT_ERRVIRTUAL,0,0,0
  366. TXT_ERRVIRTUAL  DB 0X17,0XFF,0X0D,3,"Virtual drive not formatted"
  367.                 DB 0X0D,3,"or image not loaded",0
  368. ;===============VIRTUAL ERROR==============================
  369.  
  370. ;[UPDATE ROM]
  371. UPDATE_WIN      DB 0X09,0X08,0X0B,0X12,0X17,0X00,%00100000,0
  372.                 DW 0,0
  373.                 DW TXT_UPDATEWIN,0,0,0
  374. TXT_UPDATEWIN   DB 0X17,0XFF,"Update FLASH ROM",0X0D
  375.                 DB 0X0D,3,"Page 0"
  376.                 DB 0X0D,3,"Page 1"
  377.                 DB 0X0D,3,"Page 2"
  378.                 DB 0X0D,3,"Page 3"
  379.                 DB 0X0D,3,"Page 4"
  380.                 DB 0X0D,3,"Page 5"
  381.                 DB 0X0D,3,"Page 6"
  382.                 DB 0X0D,3,"Page 7",0
  383. ;===============UPDATE ROM=================================
  384.  
  385. ;[UPDATE CUSTOM ROM]
  386. UPDATE_CUSTOM   DB 0X09,0X08,0X04,0X12,0X17,0X00,%00100000,0
  387.                 DW 0,0
  388.                 DW TXT_UPDATECUST,0,0,0
  389. TXT_UPDATECUST  DB 0X17,0XFF,"Update custom ROM",0
  390. ;===============UPDATE CUSTOM ROM==========================
  391.  
  392. ;[ERASE ROM]
  393. ERASE_ROM       DB 0X0D,0X03,0X05,0X0A,0X17,0X00,%00000000,0
  394.                 DW 0,0
  395.                 DW TXT_ERASEROM,0,0,0
  396. TXT_ERASEROM    DB 0X17,0XFF,0X0D,3,"Erase FLASH",0
  397. ;===============ERASE ROM==================================
  398.  
  399. ;[СТРАНИЦА ПОМОЩИ]
  400. WIN_HELP        DB 0X01,0X03,0X14,0X1A,0X0F,0X00,%00100000,0
  401.                 DW 0,0
  402.                 DW TXT_WINHELP,0,0,0
  403. TXT_WINHELP     DB 0X17,0XFF,"Help"
  404.                 DB 0X0D," Key+RESET:"
  405.                 DB 0X0D," Space=TRDOS"
  406.                 DB 0X0D," CS=Basic128"
  407.                 DB 0X0D," SS=Basic48"
  408.                 DB 0X0D," D=Grass!512b(PSB^Halloween CC04)"
  409.                 DB 0X0D," C=ColorTable+border keys+COVOX"
  410.                 DB 0X0D," S=old CMOS SetUp"
  411.                 DB 0X0D," 0=return to EVO Reset Service"
  412.                 DB 0X0D,"----------------------------------"
  413.                 DB 0X0D," In main menu:"
  414.                 DB 0X0D," 1-4=TR-DOS drive"
  415.                 DB 0X0D," V=TR-DOS drive"
  416.                 DB 0X0D," Y=Virtual drive"
  417.                 DB 0X0D," M=memory mode"
  418.                 DB 0X0D," W=turbo 3,5-7-14 MHz"
  419.                 DB 0X0D," 8=on/off mouse"
  420.                 DB 0X0D," 9=on/off time"
  421.                 DB 0X0D," & uppercased option keys.",0
  422. ;===============СТРАНИЦА ПОМОЩИ============================
  423.  
  424. ;[SD КАРТА УДАЛЕНА]
  425. SDCARD_LOST     DB 0X08,0X08,0X04,0X10,0X17,0,%00000000,0
  426.                 DW 0,0
  427.                 DW TXT_SDLOST,0,0,0
  428. TXT_SDLOST      DB 0X17,0XFF,0X0D,3,"SD card lost",0X0D,3,"Press RESET",0
  429. ;===============SD КАРТА УДАЛЕНА===========================
  430.  
  431. ;[ТЕКСТЫ И ПРОЧАЯ ФИГНЯ]
  432. TXTFULLSCR      DB 0X16,0X00,0X00,0X17,GREEN,"EVO Reset Service v",VERSBIOS
  433.                 DB 0X16,0X01,0X00,0X17,YELLOW,"ZX-Evolution 4096 Kb "
  434.                 DB 0X16,0X02,0X00,0X17,CYAN+BR_INK,"www.nedopc.com "
  435.                 DB 0X16,0X03,0X00,0X17,CYAN,"Baseconf: ",0X17,0XFF
  436. VERS_CONF       DB "NONE                            "
  437.                 DB 0X16,0X04,0X00,0X17,CYAN,"AVR Boot: ",0X17,0XFF
  438.                 ;   12345678901234567890123456789012
  439. VERS_BOOT       DB "NONE                            "
  440. ;РАСПЕЧАТКА ВРЕМЕНИ И ДАТЫ СБОРКИ ERS
  441.         IF BUILD_DEBUG=1
  442.                 DB 0X16,0X05,0X00,0X17,BLUE,"Build ERS:  ",TIME,"  "
  443.                 TEXTDATE
  444.                 DB "  "
  445.         ENDIF
  446.                 DB 0X16,0X17,0X00,0X17,MAGENTA+BR_INK,"H.Help ",0X17,0XFF,0
  447.  
  448. ;[ТЕКСТ СМОНТИРОВАННЫХ ДИСКОВ]
  449. MOUNTED_DRV     DB 0X16,0X12,0X00,0X17,GREEN,"Mount A: ",0X17,YELLOW
  450. MNT_DRV_A       DB "NONE        "
  451.                 DB 0X16,0X13,0X00,0X17,GREEN,"Mount B: ",0X17,YELLOW
  452. MNT_DRV_B       DB "NONE        "
  453.                 DB 0X16,0X14,0X00,0X17,GREEN,"Mount C: ",0X17,YELLOW
  454. MNT_DRV_C       DB "NONE        "
  455.                 DB 0X16,0X15,0X00,0X17,GREEN,"Mount D: ",0X17,YELLOW
  456. MNT_DRV_D       DB "NONE        "
  457.                 DB 0X16,0X11,0X00,0X17,GREEN,"Ramdisk: ",0X17,YELLOW
  458. IN_RAMDISK      DB "NONE        "
  459.                 DB 0X17,0XFF,0
  460.  
  461. ;[ТЕКСТ НАСТРОЕК ГЛАВНОГО МЕНЮ]
  462. TRDDRV_MODE     DB 0X16,0X06,0X00,0X17,MAGENTA,"1-4.TR-DOS Drive:  ",0X17,0XFF,"A",0
  463. TXT_DRIVE       EQU $-2
  464. SPEED_MODE      DB 0X16,0X09,0X00,0X17,MAGENTA,"W.CPU frequency: ",0X17,0XFF,"14.0",0
  465. TXT_SPEED       EQU $-5
  466. MEM_MODE        DB 0X16,0X08,0X00,0X17,MAGENTA,"M.Memory Lock:    ",0X17,0XFF
  467. TXT_MEM         DB "128",0
  468. VIRTUAL_DRV     DB 0X16,0X07,0X00,0X17,MAGENTA,"Y.Virtual Drive:  ",0X17,0XFF," A ",0
  469. VIRT_DRIVE      EQU $-4
  470. EMUTAPLOAD      DB 0X16,0X0A,0X00,0X17,MAGENTA,"L.Emu tape load:  ",0X17,0XFF,"off",0
  471. EMTAPLOAD       EQU $-3
  472. SET_RESET       DB 0X16,0X0B,0X00,0X17,MAGENTA,"G.RESET=>",0X17,0X46,"            ",0X17,0XFF,0
  473. TXT_RESET       EQU $-0X0F
  474. ROMLOADFONT     DB 0X16,0X0C,0X00,0X17,MAGENTA,"E.Reload FONT:    ",0X17,0XFF,"off",0
  475. EROMLOADFONT    EQU $-3
  476. TYPESFONT       DB 0X16,0X0D,0X00,0X17,MAGENTA,"J.Type FONT:    ",0X17,0XFF,"  ATM",0
  477. ETYPESFONT      EQU $-6
  478. TXT_AUTOMOUNT   DB 0X16,0X0E,0X00,0X17,MAGENTA,"N.Automount TRD:  ",0X17,0XFF,"off",0
  479. ETXT_AUTOMOUNT  EQU $-3
  480.  
  481. ;[СПИСОК КЛАВИШ ПРОВЕРЯЕМЫХ ВСЕГДА]
  482. MAIN_KEYS       DB LOW (EMAIN_KEYS-$-1),"qaop ",0X07,0X08,0X09,0X0A,0X0B,0X0D
  483. EMAIN_KEYS
  484.  
  485. ADREXEKEYS      DW UP                                   ;q
  486.                 DW DOWN                                 ;a
  487.                 DW LEFT                                 ;o
  488.                 DW RIGHT                                ;p
  489.                 DW ENTER                                ;SPACE
  490.                 DW RESTART                              ;EDIT
  491.                 DW LEFT                                 ;0X08
  492.                 DW RIGHT                                ;0X09
  493.                 DW DOWN                                 ;0X0A
  494.                 DW UP                                   ;0X0B
  495.                 DW ENTER                                ;0X0D
  496. EADREXEKEYS
  497.  
  498. ;[ПРОВЕРЯЕМЫЕ ЗОНЫ МЫШИ]
  499. ;F,X,Y,V,H,SYM
  500. MAIN_ZONE       DB 0,0X00,0X06,0X01,0X10,"v"            ;ПЕРЕБОР ДИСКОВОДОВ
  501.                 DB 0,0X00,0X07,0X01,0X10,"y"            ;ПЕРЕБОР ВИРТУАЛЬНЫХ ДИСКОВОДОВ
  502.                 DB 0,0X00,0X08,0X01,0X10,"m"            ;ПЕРЕБОР РЕЖИМОВ ПАМЯТИ
  503.                 DB 0,0X00,0X09,0X01,0X10,"w"            ;ПЕРЕБОР ТУРБО
  504.                 DB 0,0X00,0X0A,0X01,0X10,"l"            ;ПЕРЕБОР ЭМУЛЯЦИИ ЛЕНТЫ
  505.                 DB 0,0X00,0X0B,0X01,0X10,"g"            ;ПЕРЕБОР РАЗРЕШЕНИЯ ГЛЮКА
  506.                 DB 0,0X00,0X0C,0X01,0X10,"e"            ;ПЕРЕБОР РАЗРЕШЕНИЯ ПЕРЕЗАГРУЗКИ ФОНТА
  507.                 DB 0,0X00,0X0D,0X01,0X10,"j"            ;ПЕРЕБОР ТИПА ШРИФТА
  508. ;               DB 0,0X00,0X0E,0X01,0X10,"k"            ;ПЕРЕБОР ДРАЙВЕРА ПРИНТЕРА
  509. ;               DB 0,0X00,0X17,0X01,0X05,"h"            ;ВЫЗОВ ПОМОЩИ
  510.                 DB 0,0X00,0X0E,0X01,0X10,"n"            ;ВКЛ/ВЫКЛ АВТОМОНТИРОВАНИЯ ИЗ ФАЙЛА
  511. ;               DB 0,0X1D,0X15,0X03,0X03,0XAC
  512.                 DB 0XFF
  513.  
  514. BUFF_TIME       DB 0X16,0X00,0XD0,0X17,BLUE<<3+YELLOW+BR_INK
  515. TXT_TIME        DB "00:00:00",0X16,0X01,0XD0
  516. TXT_DATA        DB "00.00.00",0X17,0XFF
  517.  
  518. ;000    PENT    TV      71680
  519. ;001    PENT    VGA     71680
  520. ;010    60Hz    TV      58688
  521. ;011    60Hz    VGA     58688
  522. ;100    48K     TV      69888
  523. ;101    48K     VGA     69888
  524. ;110    128K    TV      70908
  525. ;111    128K    VGA     70908
  526. TXT_VMODE       DB 0X16,2,0XD0,0X17,GREEN+BR_INK
  527.                 DB "        ",0
  528. TV_VGA          EQU $-9
  529.  
  530. TXT_TVVGA       DB "TV VGA"
  531. TXT_HZ          DB "PENT60Hz 48K128K"
  532.  
  533. TIME_OFF        DB 0X16,0X00,0XD0,0X17,WHITE,"        ",0X16,0X01,0XD0,"        ",0X17,0XFF,0
  534.  
  535. TXT_RESETTO     DB " EVO Service"
  536.                 DB "GLUK Service"
  537.                 DB " EVO ProfROM"
  538.                 DB "  Custom ROM"
  539.  
  540. TXT_SELDOS      DB "EVO-DOS"
  541.                 DB " TR-DOS"
  542.  
  543. TXTMODTYPE      DB "  ATMCP866"
  544. TXTTURBOMODE    DB " 3,5 7,014,0"
  545.  
  546. ;[ПОДДЕРЖИВАЕМЫЕ РАСШИРЕНИЯ]
  547. SUPPORT_EXT     DB "TRDSCLFDITAPSPG$C BMPSNA",0
  548.  
  549. ;[НОМЕРА ПОДДЕРЖИВАЕМЫХ РАСШИРЕНИЙ]
  550. NUM_SUP_EXT     DUPL 17,0
  551.  
  552. TYPE_FILE       DB 0
  553.  
  554. SIGN_SCL        DB "SINCLAIR"
  555. IMAGES          DB "FDIBMP"
  556. VIEW_IMAGES     DB "TRDSCL",0
  557. TAPES           DB "TAP",0
  558. HOBETA          DB "$C SPGSNA",0
  559. ROMS            DB "ROM",0
  560. FONTS           DB "FNT",0
  561.  
  562. ;ТЕКСТ ДЛЯ ОТОБРАЖЕНИЯ НАЙДЕННЫХ РАЗДЕЛОВ, ПО 16 БАЙТ СТРОКА
  563. TXT4MENU_DEVICE    ;12345678901234567890
  564.                 DB ".HDDNemo     MASTER:"
  565.                 DB ".HDDNemo      SLAVE:"
  566.                 DB ".HDDSmuc     MASTER:"
  567.                 DB ".HDDSmuc      SLAVE:"
  568.                 DB ".HDDDIVIDE   MASTER:"
  569.                 DB ".HDDDIVIDE    SLAVE:"
  570.                 DB ".HDDProfi    MASTER:"
  571.                 DB ".HDDProfi     SLAVE:"
  572.                 DB ".HDDTURBO2   MASTER:"
  573.                 DB ".HDDTURBO2    SLAVE:"
  574.                 DB ".NeoGS       SDCard:"
  575.                 DB ".ZContr      SDCard:"
  576.  
  577. ;ТИП РАЗДЕЛА
  578. TXT4MENU_TYPE   DB "FAT12"
  579.                 DB "FAT16"
  580.                 DB "FAT32"
  581.  
  582. ;ИНФА ДЛЯ СОЗДАНИЯ 9 СЕКТОРА НОВОГО ДИСКА
  583. DSKINFO         DB 0                    ;+0XE1-НОМЕР ПЕРВОГО СВОБОДНОГО СЕКТОРА
  584.                 DB 1                    ;+0XE2-НОМЕР ПЕРВОГО СВОБОДНОГО ТРЕКА
  585.                 DB 0X16                 ;+0XE3-ТИП ДИСКЕТЫ
  586.                 DB 0                    ;+0XE4-КОЛИЧЕСТВО ФАЙЛОВ НА ДИСКЕТЕ
  587. SECFREE         DW 2544                 ;+0XE5-КОЛИЧЕСТВО СВОБОДНЫХ СЕКТОРОВ
  588.                 DB 0X10                 ;+0XE7-ИДЕНТИФИКАЦИОННЫЙ КОД TRDOS
  589.                 DW 0                    ;+0XE8-2 БАЙТА 0
  590.                 DUPL 9,0X20             ;+0XEA-9 БАЙТ 0X20
  591.                 DB 0                    ;+0XF3-1 БАЙТ 0
  592.                 DB 0                    ;+0XF4-КОЛИЧЕСТВО УДАЛЕННЫХ ФАЙЛОВ
  593.                 DB "RAMDISKO"           ;+0XF5-ИМЯ ДИСКЕТЫ
  594. DSK_END
  595.  
  596. TXT_EDITCMOS1   DB "Press cursor keys, 0..9, A..F for edit,  X.Exit",0
  597. TXT_EDITCMOS2   DB "CMOS Editor",0
  598.  
  599. ;                   0    1    2    3    4    5    6    7    8    9    A    B    C    D    E    F
  600. ;80                 А    Б    В    Г    Д    Е    Ж    З    И    Й    К    Л    М    Н    О    П
  601. CONV_CP866_ATM  DB 0XC1,0XC2,0XD7,0XC7,0XC4,0XC5,0XD6,0XDA,0XC9,0XCA,0XCB,0XCC,0XCD,0XCE,0XCF,0XD0
  602. ;90                 Р    С    Т    У    Ф    Х    Ц    Ч    Ш    Щ    Ъ    Ы    Ь    Э    Ю    Я
  603.                 DB 0XD2,0XD3,0XD4,0XD5,0XC6,0XC8,0XC3,0XDE,0XDB,0XDD,0XDF,0XD9,0XD8,0XDC,0XC0,0XD1
  604. ;A0                 а    б    в    г    д    е    ж    з    и    й    к    л    м    н    о    п
  605.                 DB 0XE1,0XE2,0XF7,0XE7,0XE4,0XE5,0XF6,0XFA,0XE9,0XEA,0XEB,0XEC,0XED,0XEE,0XEF,0XF0
  606. ;B0                 ░    ▒    ▓    │    ┤    ╡    ╢    ╖    ╕    ╣    ║    ╗    ╝    ╜    ╛    ┐
  607.                 DB 0X80,0X81,0X82,0X83,0X84,0X85,0X86,0X87,0X88,0X89,0X8A,0X8B,0X8C,0X8D,0X8E,0X8F
  608. ;C0                 └    ┴    ┬    ├    ─    ┼    ╞    ╟    ╚    ╔    ╩    ╦    ╠    ═    ╬    ╧
  609.                 DB 0X90,0X91,0X92,0X93,0X94,0X95,0X96,0X97,0X98,0X99,0X9A,0X9B,0X9C,0X9D,0X9E,0X9F
  610. ;D0                 ╨    ╤    ╥    ╙    ╘    ╒    ╓    ╫    ╪    ┘    ┌    █    ▄    ▌    ▐    ▀
  611.                 DB 0XA0,0XA1,0XA2,0XA3,0XA4,0XA5,0XA6,0XA7,0XA8,0XA9,0XAA,0XAB,0XAC,0XAD,0XAE,0XAF
  612. ;E0                 р    с    т    у    ф    х    ц    ч    ш    щ    ъ    ы    ь    э    ю    я
  613.                 DB 0XF2,0XF3,0XF4,0XF5,0XE6,0XE8,0XE3,0XFE,0XFB,0XFD,0XFF,0XF9,0XF8,0XFC,0XE0,0XF1
  614. ;F0                 Ё    ё    Є    є    Ї    ї    Ў    ў    °    ∙    ·    √    №    ¤    ■
  615.                 DB 0XB0,0XB1,0XB2,0XB3,0XB4,0XB5,0XB6,0XB7,0XB8,0XB9,0XBA,0XBB,0XBC,0XBD,0XBE,0XBF
  616.  
  617.         if 0
  618. ;                   0    1    2    3    4    5    6    7    8    9    A    B    C    D    E    F
  619. ;80                 ░    ▒    ▓    │    ┤    ╡    ╢    ╖    ╕    ╣    ║    ╗    ╝    ╜    ╛    ┐
  620. CONV_ATM_CP866  DB 0XB0,0XB1,0XB2,0XB3,0XB4,0XB5,0XB6,0XB7,0XB8,0XB9,0XBA,0XBB,0XBC,0XBD,0XBE,0XBF
  621. ;90                 └    ┴    ┬    ├    ─    ┼    ╞    ╟    ╚    ╔    ╩    ╦    ╠    ═    ╬    ╧
  622.                 DB 0XC0,0XC1,0XC2,0XC3,0XC4,0XC5,0XC6,0XC7,0XC8,0XC9,0XCA,0XCB,0XCC,0XCD,0XCE,0XCF
  623. ;A0                 ╨    ╤    ╥    ╙    ╘    ╒    ╓    ╫    ╪    ┘    ┌    █    ▄    ▌    ▐    ▀
  624.                 DB 0XD0,0XD1,0XD2,0XD3,0XD4,0XD5,0XD6,0XD7,0XD8,0XD9,0XDA,0XDB,0XDC,0XDD,0XDE,0XDF
  625. ;B0                 Ё    ё    Є    є    Ї    ї    Ў    ў    °    ∙    ·    √    №    ¤    ■     
  626.                 DB 0XF0,0XF1,0XF2,0XF3,0XF4,0XF5,0XF6,0XF7,0XF8,0XF9,0XFA,0XFB,0XFC,0XFD,0XFE,0XFF
  627. ;C0                 Ю    А    Б    Ц    Д    Е    Ф    Г    Х    И    Й    К    Л    М    Н    О
  628.                 DB 0X9E,0X80,0X81,0X96,0X84,0X85,0X94,0X83,0X95,0X88,0X89,0X8A,0X8B,0X8C,0X8D,0X8E
  629. ;D0                 П    Я    Р    С    Т    У    Ж    В    Ь    Ы    З    Ш    Э    Щ    Ч    Ъ
  630.                 DB 0X8F,0X9F,0X90,0X91,0X92,0X93,0X86,0X82,0X9C,0X9B,0X87,0X98,0X9D,0X99,0X97,0X9A
  631. ;E0                 ю    а    б    ц    д    е    ф    г    х    и    й    к    л    м    н    о
  632.                 DB 0XEE,0XA0,0XA1,0XE6,0XA4,0XA5,0XE4,0XA3,0XE5,0XA8,0XA9,0XAA,0XAB,0XAC,0XAD,0XAE
  633. ;F0                 п    я    р    с    т    у    ж    в    ь    ы    з    ш    э    щ    ч    ъ
  634.                 DB 0XAF,0XEF,0XE0,0XE1,0XE2,0XE3,0XA6,0XA2,0XEC,0XEB,0XA7,0XE8,0XED,0XE9,0XE7,0XEC
  635.         endif
  636.  
  637. ;[TXT_HELP]
  638. ;                   0123456789ABCDEF0123456789ABCDEF
  639. TXT_HELPREG     DB "SECOND                         ",0          ;00
  640.                 DB "SECOND ALARM                   ",0          ;01
  641.                 DB "MINUTE                         ",0          ;02
  642.                 DB "MINUTE ALARM                   ",0          ;03
  643.                 DB "HOUR                           ",0          ;04
  644.                 DB "HOUR ALARM                     ",0          ;05
  645.                 DB "DAY OF WEEK                    ",0          ;06
  646.                 DB "DAY                            ",0          ;07
  647.                 DB "MONTH                          ",0          ;08
  648.                 DB "YEAR                           ",0          ;09
  649.                 DB "#20                            ",0          ;0A
  650.                 DB "#02                            ",0          ;0B
  651.                 DB "#00                            ",0          ;0C
  652.                 DB "#80                            ",0          ;0D
  653.                 DB "BIT 7=TURBO,BIT 2-0=MEMORY MODE",0          ;0E
  654.                 DB "                               ",0          ;0F
  655.                 DB "NUMBER TR-DOS DRIVE            ",0          ;10
  656.                 DB "#AA OR #55                     ",0          ;11
  657. EMPTY_STROKA    DB "                               ",0
  658.  
  659.                 DUPL 0X10,0
  660. DSTUPID         DW _STUPID
  661.  
  662. MSTUPID         DB 3,8,3,26,0XEA
  663.                 DC "GO SLEEP,STUPID USER!!!"
  664.                 DB 0XFF
  665.  
  666. TXT_BETA        DB " beta"
  667. TXT_NONE        DB "NONE        "
  668. ETXT_NONE
  669.  
  670. T_ALL           DB "off"        ;0
  671. T_128           DB "128"        ;2
  672. T_48            DB " 48"        ;1
  673.  
  674. STOP_SEC        DB 0
  675. STOP_MIN        DB 0
  676. STOP_HOUR       DB 0
  677. TIMEOUTSCRSAV   DB 0
  678. CURR_SEC        DB 0
  679. CURR_MIN        DB 0
  680. CURR_HOUR       DB 0
  681.  
  682. TXT_DOSTYPES0   DB "EVO-DOS"
  683. TXT_DOSTYPES1   DB " TR-DOS"
  684. ETXT_DOSTYPES
  685.  
  686. DRV_SYM         DB 0    ;НОМЕР ВЫБРАННОГО ДИСКОВОДА
  687. MEMMODE         DB 0    ;РЕЖИМ ПАМЯТИ
  688. SYSREG1         DB 0    ;КОПИЯ ДЛЯ ВЫВОДА В ПОРТ EFF7
  689. TURBO_NUM       DB 0    ;НОМЕР ТУРБОРЕЖИМА
  690. ERS_FLAGS       DB 0
  691.                         ;BIT 7
  692.  BITMASK LOAD_IMG,6     ;BIT 6-=1-ЗАГРУЗКА ОБРАЗА В РАМДИСК
  693.  BITMASK VIEW_IMG,5     ;BIT 5-=1-ПОКАЗ СОДЕРЖИМОГО ОБРАЗА (SCL TRD ONLY),=0-ОБЫЧНАЯ РАБОТА
  694.  BITMASK EMU_TAPE,4     ;BIT 4-=1-ЭМУЛЯЦИЯ ЗАГРУЗКИ С ЛЕНТЫ, =0-ЗАГРУЗКА ЧЕРЕЗ МАГНИТОФОННЫЙ ВХОД
  695.  BITMASK RUN_FAT,3      ;BIT 3-=1-ЗАПУСК С ФАТА, =0-ЗАПУСК С ДИСКЕТЫ
  696.  BITMASK CLOCK_ON,2     ;BIT 2-=1-ЧАСЫ НАЙДЕНЫ, =0-НЕТ
  697.  BITMASK MOUSE_ON,1     ;BIT 1-=1-МЫШЬ ЕСТЬ, =0-НЕТ
  698.  BITMASK NUM_CURSOR,0   ;BIT 0-=КАКОЙ КУРСОР РИСОВАТЬ, ДЛЯ МИГАНИЯ
  699.  
  700. ;[RUN_BASIC]
  701. RUN_BASIC       DW 1                                    ;НОМЕР СТРОКИ БЕЙСИК ПРОГИ
  702.                 DW ERUN_BASIC-RUN_BASIC-5               ;ДЛИНА БЕЙСИК СТРОКИ
  703.                 DB __CLEAR,__VAL,"\"65368\":"
  704.                 DB __RANDOMIZE,__USR,__VAL,"\"15619\":"
  705.                 DB __REM,":",__RUN,"\""
  706. RUNNAM          DUPL 8,0                                ;МЕСТО ПОД 8 СИМВОЛОВ ИМЕНИ ДЛЯ ЗАПУСКА ФАЙЛА
  707.                 DB 0X22,0X0D,0X80
  708. ERUN_BASIC
  709.  
  710. ;[RUN_CODE]
  711. RUN_CODE        DW 0X100
  712.                 DW ERUN_CODE-RUN_CODE-5
  713.                 DB __RANDOMIZE,__USR,"0",0X0E,0,0,0,0,0,0X0D,0X80
  714. ERUN_CODE
  715.  
  716. OUT_NAME_FILE   DB 0X16,0,0,0X17,0XFF
  717. OUT_NAME_FILET  DUPL 0X100,0
  718.  
  719. TRSTPAL         DB 0X00,0X21,0X42,0X63,0X90,0XB1,0XD2,0XF3
  720.                 DB 0XE0,0XE1,0XE2,0XE3,0XF0,0XF1,0XF2,0XF3
  721.  
  722. ;[БУМКАЛКА В AY]
  723. DIN             DW 0X10
  724.                 DUPL 4,0
  725.                 DB 0X0F,0X36,0XF0,0,0
  726.                 DW 0X100
  727. gFenv           EQU $-1
  728.                 DB 9
  729.  
  730. ;***********************************
  731.  
  732. ;[ПЕРЕМЕННЫЕ ДЛЯ КОШАКА]
  733. WAITINGH        DW 0            ;СЧЕТЧИК ОЖИДАНИЯ НАЖАТЫХ КЛАВИШ ИЛИ ДВИЖЕНИЯ МЫШИ
  734. WAITINGL        DB 0            ;СЧЕТЧИК ПАУЗЫ ПЕРЕРИСОВКИ ФАЗЫ КОШАКА
  735. NUMKOSHAK       DB 0            ;НОМЕР ВЫВОДИМОГО СПРАЙТА КОШАКА
  736. ZEVOK           DB 0            ;КОЛИЧЕСТВО ЗЕВАНИЙ КОШАКА
  737.  
  738. KOSHAK          binclude kot_anim.bin,9
  739. ICON            binclude icon.bin,9
  740.                        
  741. BAS_VAR         binclude bas_var.bin
  742. EBAS_VAR
  743.