Subversion Repositories NedoOS

Rev

Rev 918 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | Download

  1. ;Начало срхраняемых переменных
  2. ;VARS
  3.  
  4. ;Формат таблицы:
  5. ;       DB A,B,C,D
  6. ;       A-кому
  7. ;       B-что
  8. ;       C-номер диалога с персонажем
  9. ;       D-номер скрипта+1 перед отдачей вещи
  10. ;         1-не выполнять скрипт
  11. ;      или
  12. ;       C=255 - команда для перехода в режим реплики
  13. ;       D-номер реплики+1
  14.  
  15. ;Кому какую вещь можно отдать
  16. FORTAB
  17.         DB 6,11,3,1  ;Волк-бутерброд
  18.         DB 4,7,3,20  ;Хевор-письмо
  19.         DB 4,26,11,1 ;Хевор-амулет
  20.         DB 4,34,14,66 ;Хевор-зубы
  21.         DB 7,21,4,31 ;Петро-хмель
  22.         DB 7,20,5,30 ;Петро-мед
  23.         DB 7,3,6,1   ;Петро-пшеница
  24.         DB 7,17,7,31 ;Петро-зерна
  25.         DB 7,30,16,1 ;Петро-кастрюля
  26.         DB 10,15,6,1 ;Кузнец-пиво
  27. ZD      DB 0,0,11,1  ;Кузнец-трубка
  28. BK      DB 0,0,5,1   ;Буквин-деньги
  29.         DB 8,6,7,1   ;Алена-веревка
  30. FTZL    DB 0,0,255,23;Зловет-магнит
  31.         DB 3,19,255,25;Зловет-посох
  32.         DB 9,13,3,1  ;Фекла-книга
  33.         DB 9,33,8,67 ;Ф-ноготь
  34.         DB 8,4,3,1   ;Алена-флакон воды
  35.  
  36. LENTAB  EQU ($-FORTAB)/4
  37.  
  38. ;Какую вещь на какой объект можно применить
  39. FORTAB2
  40.         DB 15 ;на какой объект
  41.         DB 8  ;какой предмет
  42.         DB 4  ;номер реплики+1
  43.         DB 1  ;скрипт+1/1-нет скрипта
  44.  
  45.         DB 14,4,5,1  ;1 козленок-флакон
  46. VED     DB 12,5,6,1  ;2 колодец-ведро
  47.         DB 8,5,7,12  ;3 статуя-ведро
  48. FSR     DB 10,22,8,1 ;4 пшеница-серп
  49.         DB 9,22,9,1  ;5 хмель-серп
  50. FLZ     DB 10,32,12,1;6 пшеница-лезвие
  51.         DB 9,32,13,1 ;7 хмель-лезвие
  52. ULEY    DB 11,8,11,1 ;8 улей-пуст.флакон
  53.         DB 3,1,15,1  ;9 склет-топор
  54.         DB 4,1,15,1  ;10склет-топор
  55.         DB 5,1,15,1  ;11склет-топор
  56.         DB 6,1,15,1  ;12склет-топор
  57.         DB 1,3,16,1  ;13мельница-колосья
  58. FT2     DB 2,19,17,1 ;14костер-посох
  59.         DB 2,31,18,1 ;15костер-спички
  60.         DB 2,25,24,1 ;16костер-свеча
  61.         DB 7,14,20,1 ;17мышь-чеснок
  62.         DB 2,9,28,57 ;18костер-Зловет
  63.         DB 2,10,28,57;19костер-Зловет во флаконе
  64.         DB 13,18,29,1;20Храм-колокол
  65.         DB 14,36,32,1;21козленок-яблоко
  66.  
  67. LENTAB2 EQU ($-FORTAB2)/4
  68.  
  69. ;Костер
  70. FIRS    DB 2,2
  71.         DB 1,0,4
  72.         DW FR1,FR2,FR3,FR4
  73.  
  74. ;Писающий мальчик
  75. PBOY    DB 2,2
  76.         DB 1
  77.         DB 0 ;/3 кол-во фаз
  78.         DB 0
  79.         DW PB1,PB2,PB3,PB4,PB5,PB6
  80.  
  81. ;Замок Зловета
  82. RUMB    DB 3,3
  83.         DB 1,0,0
  84.         DW RU1,RU2,RU3,RU4,RU5,RU6,RU7,RU8,RU9
  85.  
  86. ;Появление провидца Лео
  87. LEO1    DB 6,6
  88.         DB 13,14,0
  89.         DW LE11,LE12,LE13,LE14
  90. LE11    DW (188*32)+SPR,(190*32)+SPR,(192*32)+SPR,(194*32)+SPR
  91.         DW (196*32)+SPR,(199*32)+SPR,(202*32)+SPR,(202*32)+SPR
  92.         DW (202*32)+SPR,(202*32)+SPR,(208*32)+SPR,(210*32)+SPR
  93.         DW (210*32)+SPR,(210*32)+SPR,(210*32)+SPR
  94.  
  95. LE12    DW SPR,SPR,SPR,SPR,SPR,SPR
  96.         DW (204*32)+SPR,(205*32)+SPR,(206*32)+SPR,(207*32)+SPR
  97.         DW (209*32)+SPR,(211*32)+SPR,(212*32)+SPR,(213*32)+SPR
  98.         DW (214*32)+SPR
  99.  
  100. LE13    DW (189*32)+SPR,(191*32)+SPR,(193*32)+SPR,(195*32)+SPR
  101.         DW (197*32)+SPR,(200*32)+SPR,(203*32)+SPR,(203*32)+SPR
  102.         DW (203*32)+SPR,(203*32)+SPR,(203*32)+SPR,(203*32)+SPR
  103.         DW (203*32)+SPR,(203*32)+SPR,(203*32)+SPR
  104.  
  105. LE14    DW SPR,SPR,SPR,SPR
  106.         DW (198*32)+SPR,(201*32)+SPR,(201*32)+SPR,(201*32)+SPR
  107.         DW (201*32)+SPR,(201*32)+SPR,(201*32)+SPR,(201*32)+SPR
  108.         DW (201*32)+SPR,(201*32)+SPR,(201*32)+SPR
  109.  
  110. ;Исчезание провидца Лео
  111. LEO2    DB 6,6
  112.         DB 2,11,0
  113.         DW LE21,LE22,LE23,LE24
  114.  
  115. LE21    DW (208*32)+SPR,(202*32)+SPR,(202*32)+SPR,(202*32)+SPR
  116.         DW (202*32)+SPR,(199*32)+SPR,(196*32)+SPR,(194*32)+SPR
  117.         DW (192*32)+SPR,(190*32)+SPR,(188*32)+SPR
  118.         DW SPR
  119.  
  120. LE22    DW (209*32)+SPR,(207*32)+SPR,(206*32)+SPR,(205*32)+SPR
  121.         DW (204*32)+SPR,SPR,SPR,SPR,SPR,SPR,SPR
  122.         DW SPR
  123.  
  124. LE23    DW (203*32)+SPR,(203*32)+SPR,(203*32)+SPR,(203*32)+SPR
  125.         DW (203*32)+SPR,(200*32)+SPR,(197*32)+SPR,(195*32)+SPR
  126.         DW (193*32)+SPR,(191*32)+SPR,(189*32)+SPR
  127.         DW SPR
  128.  
  129. LE24    DW (201*32)+SPR,(201*32)+SPR,(201*32)+SPR,(201*32)+SPR
  130.         DW (201*32)+SPR,(201*32)+SPR,(198*32)+SPR,SPR,SPR
  131.         DW SPR,SPR
  132.         DW SPR
  133.  
  134. ;Появление вещи - 14
  135. INVT    DB 4,4
  136.         DB 2,5,0
  137.         DW INV1
  138. INV1    DW (147*32)+SPR,(146*32)+SPR
  139.         DW (145*32)+SPR,(144*32)+SPR
  140.         DW (143*32)+SPR
  141. INVENT  DW SPR ;код вещи, которая появится
  142.  
  143. ;Исчезание вещи
  144. INVT2   DB 4,4
  145.         DB 2,5,0
  146.         DW INV2
  147. INV2    DW (143*32)+SPR,(144*32)+SPR
  148.         DW (145*32)+SPR,(146*32)+SPR
  149.         DW (147*32)+SPR
  150. UNDR    DW SPR ;код спрайта кот. лежал под вещью
  151.  
  152. ;Исчезание вещи 2
  153. INVT3   DB 4,4
  154.         DB 2,5,0
  155.         DW INV3
  156. INV3    DW (143*32)+SPR,(144*32)+SPR
  157.         DW (145*32)+SPR,(146*32)+SPR
  158.         DW (147*32)+SPR
  159. UNDR2   DW SPR ;код спрайта кот. лежал под вещью
  160.  
  161.  
  162. ;Ссылки на названия вещей (patched)
  163. V
  164.         DW V0,V1,V2,V3,V4,V5,V6,V7,V8,V9,V10
  165.         DW V11,V12,V13,V14,V15,V16,V17,V18,V19,V20
  166.         DW V21,V22,V23,V24,V25,V26,V27,V28,V29,V30
  167.         DW V31,V32,V33,V34,V35,V36,V37,V38
  168.         DW V39,V40,V41,V42,V43,V44,V45,V46
  169.         DW V47,V48,V49
  170. VV      DW V50,V51,V51,V51,V51
  171.         DW V52,V53,V54,V55,V56,V57,V58,V59
  172.         DW V60,V64
  173.  
  174. ;Ссылки на свойства вещей (patched)
  175. VSVOY   DW v1,v1,v2,v3,v4,v5,v6,v7,v8,v9,v10
  176.         DW v11,v12,v13,v14,v15,v16,v17,v18,v19,v20
  177.         DW v21,v22,v23,v24,v25,v26,v27,v28,v29,v30
  178.         DW v31,v32,v33,v34,v35,v36,v37,v38
  179.  
  180. ;Список вещей
  181.        if RUS
  182. V0      DB "Пусто",0
  183.        else
  184. V0      DB "Nothing",0
  185.        endif
  186.  
  187.        if RUS
  188. V1      DB "Топор",0 ;название вещи
  189.        else
  190. V1      DB "Axe",0 ;название вещи
  191.        endif
  192. v1      DB 0 ;0 - Нельзя применить вещь на героя
  193.              ;<>0 - можно применить
  194.              ;если BIT 7=0 - номер реплики
  195.              ;если BIT 7=1 - %01111111 - номер скрипта, кот.
  196.              ;должен выдать номер реплики+1 (см. метлу)
  197.         DB 0 ;код вещи с которой можно взаимодействовать в мешке
  198.         DB 0 ;код вещи-результата взаимодействия
  199.         DB 0 ;номер реплики+1 на удачное применение
  200.         DW SPR ;код спрайта лежащего под
  201.                ;вещью на игровом экране (нужно при взятии вещи)
  202.  
  203.        if RUS
  204. V2      DB "Магнит",0
  205.        else
  206. V2      DB "Magnet",0
  207.        endif
  208. v2      DS 4
  209.         DW SPR
  210.  
  211.        if RUS
  212. V3      DB "Колосья",13
  213.         DB "пшеницы",0
  214.        else
  215. V3      DB "Ears of",13
  216.         DB "wheat",0
  217.        endif
  218. v3      DS 4
  219.         DW SPR
  220.  
  221.        if RUS
  222. V4      DB "Флакон",13
  223.         DB "живой воды",0
  224.        else
  225. V4      DB "Flask of",13
  226.         DB "living water",0
  227.        endif
  228. v4      DS 4
  229.         DW SPR
  230.  
  231.        if RUS
  232. V5      DB "Пустое ведро",0
  233.        else
  234. V5      DB "Empty bucket",0
  235.        endif
  236. v5      DS 4
  237.         DW SPR
  238.  
  239.        if RUS
  240. V6      DB "Моток",13
  241.         DB "веревки",0
  242.        else
  243. V6      DB "Rope",0
  244.        endif
  245. v6      DS 4
  246.         DW SPR
  247.  
  248.        if RUS
  249. V7      DB "Письмо",0
  250.        else
  251. V7      DB "Letter",0
  252.        endif
  253. v7      DB 2,0,0,0
  254.         DW SPR
  255.  
  256.        if RUS
  257. V8      DB "Пустой",13
  258.         DB "флакон",0
  259.        else
  260. V8      DB "Empty",13
  261.         DB "flask",0
  262.        endif
  263. v8      DB 0,9,10,30
  264.         DW SPR
  265.  
  266.        if RUS
  267. V9      DB "Маленький",13
  268. ;V9     DB "Уменьшеный",13
  269.         DB "Зловет",0
  270.        else
  271. V9      DB "Tiny",13
  272.         DB "Evilon",0
  273.        endif
  274. v9      DB 0,8,10,30
  275.         DW SPR
  276.  
  277.        if RUS
  278. V10     DB "Зловет",13
  279.         DB "во флаконе",0
  280.        else
  281. V10     DB "Evilon in",13
  282.         DB "a flask",0
  283.        endif
  284. v10     DS 4
  285.         DW SPR
  286.  
  287.        if RUS
  288. V11     DB "Бутерброд",13
  289.         DB "с сыром",0
  290.        else
  291. V11     DB "Cheese",13
  292.         DB "sandwich",0
  293.        endif
  294. v11     DS 4
  295.         DW SPR
  296.  
  297.        if RUS
  298. V12     DB "Метла",0
  299.        else
  300. V12     DB "Broom",0
  301.        endif
  302. v12     DB 128+58
  303.         DS 3
  304.         DW SPR
  305.  
  306.        if RUS
  307. V13     DB "Книга",0
  308.        else
  309. V13     DB "Book",0
  310.        endif
  311. v13     DS 4
  312.         DW SPR
  313.  
  314.        if RUS
  315. V14     DB "Чеснок",0
  316.        else
  317. V14     DB "Garlic",0
  318.        endif
  319. v14     DB 19
  320.         DS 3
  321.         DW SPR
  322.  
  323.        if RUS
  324. V15     DB "Бочонок пива",0
  325.        else
  326. V15     DB "Keg of beer",0
  327.        endif
  328. v15     DS 4
  329.         DW SPR
  330.  
  331.        if RUS
  332. V16     DB "Деньги",0
  333.        else
  334. V16     DB "Money",0
  335.        endif
  336. v16     DS 4
  337.         DW SPR
  338.  
  339.        if RUS
  340. V17     DB "Зерна",13
  341.         DB "пшеницы",0
  342.        else
  343. V17     DB "Wheat",13
  344.         DB "grains",0
  345.        endif
  346. v17     DS 4
  347.         DW SPR
  348.  
  349.        if RUS
  350. V18     DB "Колокол",0
  351.        else
  352. V18     DB "Bell",0
  353.        endif
  354. v18     DS 4
  355.         DW SPR
  356.  
  357.        if RUS
  358. V19     DB "Посох",13
  359.         DB "Зловета",0
  360.        else
  361. V19     DB "Evilon's",13
  362.         DB "staff",0
  363.        endif
  364. v19     DB 27
  365.         DS 3
  366.         DW SPR
  367.  
  368.        if RUS
  369. V20     DB "Флакон меда",0
  370.        else
  371. V20     DB "Flask",13,"of honey",0
  372.        endif
  373. v20     DS 4
  374.         DW SPR
  375.  
  376.        if RUS
  377. V21     DB "Пучок хмеля",0
  378.        else
  379. V21     DB "Bunch",13,"of hops",0
  380.        endif
  381. v21     DS 4
  382.         DW SPR
  383.  
  384.        if RUS
  385. V22     DB "Серп",0
  386.        else
  387. V22     DB "Sickle",0
  388.        endif
  389. v22     DS 4
  390.         DW SPR
  391.  
  392.        if RUS
  393. V23     DB "Зелье",13
  394.         DB "невидимости",0
  395.        else
  396. V23     DB "Invisibility",13
  397.         DB "potion",0
  398.        endif
  399. v23     DB 22
  400.         DS 5
  401.  
  402.        if RUS
  403. V24     DB "Зелье",13
  404.         DB "видимости",0
  405.        else
  406. V24     DB "Visibility",13
  407.         DB "potion",0
  408.        endif
  409. v24     DB 26
  410.         DS 5
  411.  
  412.        if RUS
  413. V25     DB "Свеча",0
  414.        else
  415. V25     DB "Candle",0
  416.        endif
  417. v25     DS 4
  418.         DW SPR
  419.  
  420.        if RUS
  421. V26     DB "Амулет",13
  422.         DB "здоровья",0
  423.        else
  424. V26     DB "Health",13
  425.         DB "amulet",0
  426.        endif
  427. v26     DS 4
  428.         DW SPR
  429.  
  430.        if RUS
  431. V27     DB "Сушеный",13
  432.         DB "таракан",0
  433.        else
  434. V27     DB "Dried",13
  435.         DB "cockroach",0
  436.        endif
  437. v27     DB 0,29,23,21
  438.         DW SPR
  439.  
  440.        if RUS
  441. V28     DB "Перо",0
  442.        else
  443. V28     DB "Feather",0
  444.        endif
  445. v28     DS 4
  446.         DW SPR
  447.  
  448.        if RUS
  449. V29     DB "Волчьи ягоды",0
  450.        else
  451. V29     DB "Nightshade",0
  452.        endif
  453. v29     DB 0,27,23,21
  454.         DW SPR
  455.  
  456.        if RUS
  457. V30     DB "Кастрюля",0
  458.        else
  459. V30     DB "Saucepan",0
  460.        endif
  461. v30     DS 4
  462.         DW SPR
  463.  
  464.        if RUS
  465. V31     DB "Спички",0
  466.        else
  467. V31     DB "Matches",0
  468.        endif
  469. v31     DS 4
  470.         DW SPR
  471.  
  472.        if RUS
  473. V32     DB "Лезвие",0
  474.        else
  475. V32     DB "Blade",0
  476.        endif
  477. v32     DS 4
  478.         DW SPR
  479.  
  480.        if RUS
  481. V33     DB "Ноготь",13
  482.         DB "колдуна",0
  483.        else
  484. V33     DB "Sorcerer's",13
  485.         DB "nail",0
  486.        endif
  487. v33     DS 4
  488.         DW SPR
  489.  
  490.        if RUS
  491. V34     DB "Вставные",13
  492.         DB "зубы",0
  493.        else
  494. V34     DB "False",13
  495.         DB "teeth",0
  496.        endif
  497. v34     DS 4
  498.         DW SPR
  499.  
  500.        if RUS
  501. V35     DB "Трубка",0
  502.        else
  503. V35     DB "Pipe",0
  504.        endif
  505. v35     DS 4
  506.         DW SPR
  507.  
  508.        if RUS
  509. V36     DB "Огрызок",13
  510.         DB "яблока",0
  511.        else
  512. V36     DB "Apple core",0
  513.        endif
  514. v36     DS 4
  515.         DW SPR
  516.  
  517.        if RUS
  518. V37     DB "Венец победы",0
  519.        else
  520. V37     DB "Crown",13,"of victory",0
  521.        endif
  522. v37     DS 4
  523.         DW SPR
  524.  
  525.        if RUS
  526. V38     DB "Ведро",13
  527.         DB "с водой",0
  528.        else
  529. V38     DB "Bucket",13
  530.         DB "with water",0
  531.        endif
  532. v38     DS 4
  533.         DW SPR
  534.  
  535. TASKS
  536. ;       DB 0   ;кол-во отложенных задач
  537. ;       DW X,Y ;X-счетчик, Y-адрес подпрогр.
  538.         DS MAXTASK*4
  539.  
  540. COLOUR
  541.        if EGA
  542.         DB 3 ;цвет фона игрового экрана ;EGA: номер части суток
  543.        else
  544.         DB 64+(8*7) ;цвет фона игрового экрана ;EGA: номер части суток
  545.        endif
  546. MUSNUM  DB 0 ;текущий номер мелодии
  547. TIME    DB 0,0,0 ;час,мин,сек
  548. SUTKI   DB 0 ;течение игровых суток 0-152-длина в пикс спрайта
  549. KARM    DB 0 ;вещь в кармане взятая из мешка
  550. ONHERO  DB 0 ;0/<>0 Лежит ли курсор на герое. 0 - на герое
  551. DISTV   DB 0 ;0/1/2 0 нельзя прим. вещь, 1 можно, 2 только факт
  552. DISTP   DB 0 ;0/1/2 0 не говорим, 1 говорим, 2 факт разговора
  553. PERSON  DB 0 ;код персонажа под курсором
  554. ITEM    DB 0 ;код предмета под курсором с кот. возможно взаимод.
  555. ;Абсолютные координаты героя на карте в системе 2*2 знакоместа
  556. HEROCRD DW #3906 ;X,Y
  557.         DB 255
  558. OLDpath DW 0     ;координаты след. шага пути в случ.
  559.                  ;когда герой уже идет, а ему нужно поменять
  560.                  ;направление
  561. ;Вещи которые лежат в мешке
  562. MESHOK
  563.         display "MESHOK=",$
  564.         DB 11 ;бутерброд
  565.        db 23 ;зелье невидимости
  566.        db 24 ;зелье видимости
  567.         DS MESHOK+QVESH-$;QVESH-1
  568.  
  569. ;VESH    EQU 0
  570. ;        DUP QVESH ;кол-во вещей
  571. ;        DB VESH ;код вещи
  572. ;VESH=VESH+1
  573. ;        EDUP
  574.  
  575. ;Провидец Глеб
  576. GLB     DB 1 ;текущий номер реплики с данным персонажем
  577.         DB 0 ;номер реплики на ненужную персонажу вещь
  578.         DW GL;адрес упаков. диалогов с персонажем
  579. ;Зловет
  580. ZLO     DB 1,0
  581.         DW ZL
  582.  
  583. ;Старейшина Хевор
  584. HEV     DB 1,0
  585.         DW HV
  586.  
  587. ;Библиотекарь Буквин
  588. BUK     DB 1,0
  589.         DW BK_
  590.  
  591. ;Волк Жора
  592. JOR     DB 1,0
  593.         DW JO
  594.  
  595. ;Бармен Петро
  596. PET     DB 1,0
  597.         DW PT
  598.  
  599. ;Аленушка
  600. ALE     DB 1,0
  601.         DW AL
  602.  
  603. ;Фекла
  604. FEK     DB 1,0
  605.         DW FK
  606.  
  607. ;Кузнец
  608. ZAD     DB 1,0
  609.         DW ZD_
  610.  
  611. ;Выполнение квестов (заданий)
  612. ;0-не выполн. 1-выполн.
  613. ;См. файл "QUESTS.H"
  614. QUEST
  615.         DS 44;43
  616. curmagic
  617.         dw reter
  618. P3p1
  619.         db 0 ;0/1 для колдовства Зловетом
  620.