?login_element?

Subversion Repositories NedoOS

Rev

Rev 1001 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  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 "water of life",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 flask",0
  261.        endif
  262. v8      DB 0,9,10,30
  263.         DW SPR
  264.  
  265.        if RUS
  266. V9      DB "Маленький",13
  267. ;V9     DB "Уменьшеный",13
  268.         DB "Зловет",0
  269.        else
  270. V9      DB "Tiny",13
  271.         DB "Evilon",0
  272.        endif
  273. v9      DB 0,8,10,30
  274.         DW SPR
  275.  
  276.        if RUS
  277. V10     DB "Зловет",13
  278.         DB "во флаконе",0
  279.        else
  280. V10     DB "Evilon in",13
  281.         DB "a flask",0
  282.        endif
  283. v10     DS 4
  284.         DW SPR
  285.  
  286.        if RUS
  287. V11     DB "Бутерброд",13
  288.         DB "с сыром",0
  289.        else
  290. V11     DB "Cheese",13
  291.         DB "sandwich",0
  292.        endif
  293. v11     DS 4
  294.         DW SPR
  295.  
  296.        if RUS
  297. V12     DB "Метла",0
  298.        else
  299. V12     DB "Broom",0
  300.        endif
  301. v12     DB 128+58
  302.         DS 3
  303.         DW SPR
  304.  
  305.        if RUS
  306. V13     DB "Книга",0
  307.        else
  308. V13     DB "Book",0
  309.        endif
  310. v13     DS 4
  311.         DW SPR
  312.  
  313.        if RUS
  314. V14     DB "Чеснок",0
  315.        else
  316. V14     DB "Garlic",0
  317.        endif
  318. v14     DB 19
  319.         DS 3
  320.         DW SPR
  321.  
  322.        if RUS
  323. V15     DB "Бочонок пива",0
  324.        else
  325. V15     DB "Keg of beer",0
  326.        endif
  327. v15     DS 4
  328.         DW SPR
  329.  
  330.        if RUS
  331. V16     DB "Деньги",0
  332.        else
  333. V16     DB "Money",0
  334.        endif
  335. v16     DS 4
  336.         DW SPR
  337.  
  338.        if RUS
  339. V17     DB "Зерна",13
  340.         DB "пшеницы",0
  341.        else
  342. V17     DB "Ground",13
  343.         DB "wheat",0
  344.        endif
  345. v17     DS 4
  346.         DW SPR
  347.  
  348.        if RUS
  349. V18     DB "Колокол",0
  350.        else
  351. V18     DB "Bell",0
  352.        endif
  353. v18     DS 4
  354.         DW SPR
  355.  
  356.        if RUS
  357. V19     DB "Посох",13
  358.         DB "Зловета",0
  359.        else
  360. V19     DB "Evilon's",13
  361.         DB "staff",0
  362.        endif
  363. v19     DB 27
  364.         DS 3
  365.         DW SPR
  366.  
  367.        if RUS
  368. V20     DB "Флакон меда",0
  369.        else
  370. V20     DB "Flask",13,"of honey",0
  371.        endif
  372. v20     DS 4
  373.         DW SPR
  374.  
  375.        if RUS
  376. V21     DB "Пучок хмеля",0
  377.        else
  378. V21     DB "Bunch",13,"of hops",0
  379.        endif
  380. v21     DS 4
  381.         DW SPR
  382.  
  383.        if RUS
  384. V22     DB "Серп",0
  385.        else
  386. V22     DB "Sickle",0
  387.        endif
  388. v22     DS 4
  389.         DW SPR
  390.  
  391.        if RUS
  392. V23     DB "Зелье",13
  393.         DB "невидимости",0
  394.        else
  395. V23     DB "Invisibility",13
  396.         DB "potion",0
  397.        endif
  398. v23     DB 22
  399.         DS 5
  400.  
  401.        if RUS
  402. V24     DB "Зелье",13
  403.         DB "видимости",0
  404.        else
  405. V24     DB "Visibility",13
  406.         DB "potion",0
  407.        endif
  408. v24     DB 26
  409.         DS 5
  410.  
  411.        if RUS
  412. V25     DB "Свеча",0
  413.        else
  414. V25     DB "Candle",0
  415.        endif
  416. v25     DS 4
  417.         DW SPR
  418.  
  419.        if RUS
  420. V26     DB "Амулет",13
  421.         DB "здоровья",0
  422.        else
  423. V26     DB "Health",13
  424.         DB "amulet",0
  425.        endif
  426. v26     DS 4
  427.         DW SPR
  428.  
  429.        if RUS
  430. V27     DB "Сушеный",13
  431.         DB "таракан",0
  432.        else
  433. V27     DB "Dried",13
  434.         DB "cockroach",0
  435.        endif
  436. v27     DB 0,29,23,21
  437.         DW SPR
  438.  
  439.        if RUS
  440. V28     DB "Перо",0
  441.        else
  442. V28     DB "Feather",0
  443.        endif
  444. v28     DS 4
  445.         DW SPR
  446.  
  447.        if RUS
  448. V29     DB "Волчьи ягоды",0
  449.        else
  450. V29     DB "Nightshade",0
  451.        endif
  452. v29     DB 0,27,23,21
  453.         DW SPR
  454.  
  455.        if RUS
  456. V30     DB "Кастрюля",0
  457.        else
  458. V30     DB "Saucepan",0
  459.        endif
  460. v30     DS 4
  461.         DW SPR
  462.  
  463.        if RUS
  464. V31     DB "Спички",0
  465.        else
  466. V31     DB "Matches",0
  467.        endif
  468. v31     DS 4
  469.         DW SPR
  470.  
  471.        if RUS
  472. V32     DB "Лезвие",0
  473.        else
  474. V32     DB "Blade",0
  475.        endif
  476. v32     DS 4
  477.         DW SPR
  478.  
  479.        if RUS
  480. V33     DB "Ноготь",13
  481.         DB "колдуна",0
  482.        else
  483. V33     DB "Sorcerer's",13
  484.         DB "nail",0
  485.        endif
  486. v33     DS 4
  487.         DW SPR
  488.  
  489.        if RUS
  490. V34     DB "Вставные",13
  491.         DB "зубы",0
  492.        else
  493. V34     DB "False",13
  494.         DB "teeth",0
  495.        endif
  496. v34     DS 4
  497.         DW SPR
  498.  
  499.        if RUS
  500. V35     DB "Трубка",0
  501.        else
  502. V35     DB "Pipe",0
  503.        endif
  504. v35     DS 4
  505.         DW SPR
  506.  
  507.        if RUS
  508. V36     DB "Огрызок",13
  509.         DB "яблока",0
  510.        else
  511. V36     DB "Apple core",0
  512.        endif
  513. v36     DS 4
  514.         DW SPR
  515.  
  516.        if RUS
  517. V37     DB "Венец победы",0
  518.        else
  519. V37     DB "Crown",13,"of victory",0
  520.        endif
  521. v37     DS 4
  522.         DW SPR
  523.  
  524.        if RUS
  525. V38     DB "Ведро",13
  526.         DB "с водой",0
  527.        else
  528. V38     DB "Bucket",13
  529.         DB "of water",0
  530.        endif
  531. v38     DS 4
  532.         DW SPR
  533.  
  534. TASKS
  535. ;       DB 0   ;кол-во отложенных задач
  536. ;       DW X,Y ;X-счетчик, Y-адрес подпрогр.
  537.         DS MAXTASK*4
  538.  
  539. COLOUR
  540.        if EGA
  541.         DB 3 ;цвет фона игрового экрана ;EGA: номер части суток
  542.        else
  543.         DB 64+(8*7) ;цвет фона игрового экрана ;EGA: номер части суток
  544.        endif
  545. MUSNUM  DB 0 ;текущий номер мелодии
  546. TIME    DB 0,0,0 ;час,мин,сек
  547. SUTKI   DB 0 ;течение игровых суток 0-152-длина в пикс спрайта
  548. KARM    DB 0 ;вещь в кармане взятая из мешка
  549. ONHERO  DB 0 ;0/<>0 Лежит ли курсор на герое. 0 - на герое
  550. DISTV   DB 0 ;0/1/2 0 нельзя прим. вещь, 1 можно, 2 только факт
  551. DISTP   DB 0 ;0/1/2 0 не говорим, 1 говорим, 2 факт разговора
  552. PERSON  DB 0 ;код персонажа под курсором
  553. ITEM    DB 0 ;код предмета под курсором с кот. возможно взаимод.
  554. ;Абсолютные координаты героя на карте в системе 2*2 знакоместа
  555. HEROCRD DW #3906 ;X,Y
  556.         DB 255
  557. OLDpath DW 0     ;координаты след. шага пути в случ.
  558.                  ;когда герой уже идет, а ему нужно поменять
  559.                  ;направление
  560. ;Вещи которые лежат в мешке
  561. MESHOK
  562.         display "MESHOK=",$
  563.         DB 11 ;бутерброд
  564.        db 23 ;зелье невидимости
  565.        db 24 ;зелье видимости
  566.         DS MESHOK+QVESH-$;QVESH-1
  567.  
  568. ;VESH    EQU 0
  569. ;        DUP QVESH ;кол-во вещей
  570. ;        DB VESH ;код вещи
  571. ;VESH=VESH+1
  572. ;        EDUP
  573.  
  574. ;Провидец Глеб
  575. GLB     DB 1 ;текущий номер реплики с данным персонажем
  576.         DB 0 ;номер реплики на ненужную персонажу вещь
  577.         DW GL;адрес упаков. диалогов с персонажем
  578. ;Зловет
  579. ZLO     DB 1,0
  580.         DW ZL
  581.  
  582. ;Старейшина Хевор
  583. HEV     DB 1,0
  584.         DW HV
  585.  
  586. ;Библиотекарь Буквин
  587. BUK     DB 1,0
  588.         DW BK_
  589.  
  590. ;Волк Жора
  591. JOR     DB 1,0
  592.         DW JO
  593.  
  594. ;Бармен Петро
  595. PET     DB 1,0
  596.         DW PT
  597.  
  598. ;Аленушка
  599. ALE     DB 1,0
  600.         DW AL
  601.  
  602. ;Фекла
  603. FEK     DB 1,0
  604.         DW FK
  605.  
  606. ;Кузнец
  607. ZAD     DB 1,0
  608.         DW ZD_
  609.  
  610. ;Выполнение квестов (заданий)
  611. ;0-не выполн. 1-выполн.
  612. ;См. файл "QUESTS.H"
  613. QUEST
  614.         DS 44;43
  615. curmagic
  616.         dw reter
  617. P3p1
  618.         db 0 ;0/1 для колдовства Зловетом
  619.