games/Awakening Changeset - 62388ae47422

Changeset - 62388ae47422

Parent rev.

Child rev.

[Not reviewed]

default

0 3 0

Silverwing - 6 years ago 2018-12-22 14:26:29

Chapter 1: Learr and jack intro changes

3 files changed with 13 insertions and 7 deletions:

atlantis.lua

atlantis_dlg.lua

atlantis_ignis.lua

0 comments (0 inline, 0 general)

atlantis.lua

➞

Show inline comments

@@ @@ -766,385 +766,385 @@ atl_lift_lever = obj { @@
 ]]
 char_darkstar = npc {
     var {
         drake_asked = 0;
         black_asked = 0;
         darkstar_asked = 0;
         svetlova_asked = 0;
         moreau_asked = 0;
         wright_asked = 0;
         leroy_asked = 0;
         jones_asked = 0;
         goldman_asked = 0;
         atlantis_asked = 0;
         navjiarr_asked = 0;
         learr_asked = 0;
         ryveerr_asked = 0;
         aikerjarr_asked = 0;
     };
     nam = "Винсент Даркстар";
     dsc = function(s)
         if (char_darkstar_dlg.state == 0) then
             return [[В одном из кресел сидит средних лет {мужчина} с короткими черными волосами. Он одет в строгий деловой костюм черного цвета. Лицо его гладко выбрито. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он ждет ваших дальнейших действий. ]];
         else
             return [[В одном из кресел сидит {Винсент Даркстар}. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он ждет ваших дальнейших действий. ]];
         end;
     end;
     dlg = "char_darkstar_dlg";
 };
 char_moreau = npc {
     var {
         drake_asked = 0;
         black_asked = 0;
         darkstar_asked = 0;
         svetlova_asked = 0;
         moreau_asked = 0;
         wright_asked = 0;
         leroy_asked = 0;
         jones_asked = 0;
         goldman_asked = 0;
         atlantis_asked = 0;
         navjiarr_asked = 0;
         learr_asked = 0;
         ryveerr_asked = 0;
         aikerjarr_asked = 0;
     };
     nam = "Фредерик Моро";
     dsc = function(s)
         if (char_moreau_dlg.state == 0) then
             return [[За столом в кресле сидит немолодой {мужчина}. Кудрявые седые волосы обрамляют его лицо. Он носит длинные седые усы. Одет человек в строгий деловой костюм бежевого цвета. Его серые глаза, скрытые очками, внимательно рассматривают вас. В руках он вертит перо. ]];
         else
             return [[За столом в кресле сидит {Фредерик Моро} и внимательно наблюдает за вами сквозь стекла очков. В руках он вертит перо. ]];
         end;
     end;
     dlg = "char_moreau_dlg";
 };
 char_svetlova = npc {
     var {
         drake_asked = 0;
         black_asked = 0;
         darkstar_asked = 0;
         svetlova_asked = 0;
         moreau_asked = 0;
         wright_asked = 0;
         leroy_asked = 0;
         jones_asked = 0;
         goldman_asked = 0;
         atlantis_asked = 0;
         navjiarr_asked = 0;
         learr_asked = 0;
         ryveerr_asked = 0;
         aikerjarr_asked = 0;
     };
     nam = "Екатерина Светлова";
     dsc = function(s)
         if (char_svetlova_dlg.state == 0) then
             return [[За столом сидит {женщина} лет сорока-пяти. Золотистые волосы собраны в пучок на затылке. Она одета в простое синее платье. В правой руке она держит карандаш, которым периодически делает пометки в бумагах, лежащих на столе. Кажется, она не обращает на вас никакого внимания. ]];
         else
             return [[За столом сидит {Екатерина Светлова}. Периодически она делает какие-то пометки карандашом в бумагах, лежащих на столе. ]];
         end;
     end;
     dlg = "char_svetlova_dlg";
 };
 char_anna_atlantis = npc {
     nam = "Анна Рэдклифф";
     disp = "Анна Рэдклифф";
     dsc = function(s)
         if (where(char_learr_atlantis) ~= atl_oculus_lab_c) then
             if (char_anna_atlantis_dlg.state == 0) then
                 return [[{Девушка} лет двадцати-пяти--тридцати внимательно слушает навьяра, иногда что-то спрашивая. ]];
             else
                 return [[{Анна Рэдклифф} внимательно слушает навьяра, иногда что-то спрашивая. ]];
             end;
         else
             if (char_anna_atlantis_dlg.state == 0) then
                 return [[{Девушка} лет тридцати внимательно слушает навьяров, иногда что-то спрашивая. ]];
             else
                 return [[{Анна Рэдклифф} внимательно слушает навьяров, иногда что-то спрашивая. ]];
             end;
         end;
     end;
     dlg = "char_anna_atlantis_dlg";
 };
 char_learr_atlantis = npc {
     var {
         offended = false;
     };
     nam = "Леарр";
     dsc = function(s)
         if stead.deref(here()) == "atl_oculus_library" then
             return [[{Леарр} сидит за одним из столов, листая какую-то книгу. ]];
         elseif stead.deref(here()) == "atl_oculus_library" then
             return [[{Леарр} спокойно стоит рядом с Екатериной Светловой. ]];
         else
             if (stead.deref(where(char_jack_wright_atlantis)) == atl_ignis_hall_a) then
                 return [[{Леарр} стоит перед иллюминатором и что-то рассказывает ]];
             else
                 return [[{Леарр} стоит перед иллюминатором и смотрит вдаль. ]];
             end;
         end;
     end;
     dlg = function(s)
         if stead.deref(where(s)) == atl_oculus_lab_a then
             return "char_svetlova_dlg";
         else
             return "char_learr_atlantis_dlg";
         end;
     end;
 };
 char_aikerjarr = npc {
     nam = "Аикерьярр";
     dsc = function(s)
         if (char_aikerjarr_dlg.state == 0) then
             return [[У одного из столов неподвижно стоит {навьяр}. ]];
         else
             return [[У одного из столов неподвижно стоит {Аикерьярр}. ]];
         end;
     end;
     dlg = "char_aikerjarr_dlg";
 };
 char_ryveerr = npc {
     var {
         learr_asked = 0;
         ryveerr_asked = 0;
         atlantis_asked = 0;
         aikerjarr_asked = 0;
     };
     nam = "Ривеерр";
     dsc = function(s)
         if (char_ryveerr_dlg.state == 0) then
             return [[У одного из столов стоит {навьяр} и что-то рассказывает. ]];
         else
             return [[У одного из столов стоит {Ривеерр} и что-то рассказывает. ]];
         end;
     end;
     dlg = "char_ryveerr_dlg";
 };
 char_evans = npc {
     nam = "Кристиан Эванс";
     dsc = function(s)
         if (char_evans_dlg.state == 0) then
             return [[Там же стоит пожилой {мужчина} с блокнотом и делает какие-то записи. ]];
         else
             return [[Там же стоит {Кристиан Эванс} с блокнотом и делает какие-то записи. ]];
         end;
     end;
     dlg = "char_evans_dlg";
 };
 char_winterlight = npc {
     nam = "Сильвия Уинтерлайт";
     dsc = function(s)
         if (char_winterlight_dlg.state == 0) then
             return [[{Женщина} лет тридцати-пяти--сорока стоит, склонишись над картой. Длинные темные волосы спадают на плечи. Она одета в длинную черную юбку и серую блузку. Ее серые глаза внимательно изучают документ, лежащий перед ней. ]];
         else
             return [[{Сильвия Уинтерлайт} стоит возле одного из столов, рассматривая карту. ]];
         end;
     end;
     dlg = "char_winterlight_dlg";
 };
 char_jack_wright_atlantis = npc {
     nam = "Джек Райт";
     dsc = function(s)
         if (where(char_jack_wright_atlantis) == atl_ignis_hall_a) then
-            return [[{Джеку Райт}, стоящему рядом. ]];
+            return [[{Джеку Райту}, стоящему рядом. ]];
         else
             return [[{Джек Райт} лежит на койке, листая какую-то книгу. Рядом лежит блокнот, в котором он время от времени он делает пометки карандашом. ]];
         end;
     end;
     dlg = "char_jack_wright_atlantis_dlg";
 };
 char_michael_wright = npc {
     nam = "Майкл Райт";
     var {
         drake_asked = 0;
         black_asked = 0;
         darkstar_asked = 0;
         svetlova_asked = 0;
         moreau_asked = 0;
         wright_asked = 0;
         leroy_asked = 0;
         jones_asked = 0;
         goldman_asked = 0;
         atlantis_asked = 0;
         navjiarr_asked = 0;
         learr_asked = 0;
         ryveerr_asked = 0;
         aikerjarr_asked = 0;
         jack_asked = 0;
     };
     dsc = function(s)
         return [[{Майкл Райт} просматривает какие-то чертежи. ]];
     end;
     dlg = "char_michael_wright_dlg";
 };
 char_legrand = npc {
     nam = "Мари Легран";
     dsc = function(s)
         if (char_legrand_dlg.state == 0) then
             return [[На стуле в углу сидит {женщина} лет сорока--сорока-пяти и листает какую-то книгу.]];
         else
             return [[На стуле в углу сидит {Мари Легран} и листает какую-то книгу. ]];
         end;
     end;
     dlg = "char_legrand_dlg";
 };
 char_radcliffe_atlantis = npc {
     nam = "Уолтер Рэдклифф";
     dsc = function(s)
         if (char_radcliffe_atlantis_dlg.state == 0) then
             return [[{Человек} лет сорока--сорока-пяти стоит, навалившись на стену. ]];
         else
             return [[{Уолтер Рэдклифф} стоит, навалившись на стену. ]];
         end;
     end;
     dlg = "char_radcliffe_atlantis_dlg";
 };
 char_page = npc {
     nam = "Фрэнсис Пейдж";
     dsc = function(s)
         if (char_page_dlg.state == 0) then
             return [[Пожилой {мужчина} в рабочей одежде осматривает Наутилус. ]];
         else
             return [[{Фрэнсис Пейдж} осматривает Наутилус. ]];
         end;
     end;
     dlg = "char_page_dlg";
 };
 char_leroy = npc {
     nam = "Мишель Леруа";
     dsc = function(s)
         if (char_leroy_dlg.state == 0) then
             return [[{Мужчина} лет пятидесяти работает над каким-то чертежом. ]];
         else
             return [[{Мишель Леруа} работает над каким-то чертежом. ]];
         end;
     end;
     dlg = "char_leroy_dlg";
 };
 char_goldman = npc {
     nam = "Леонард Голдман";
     dsc = function(s)
         if (char_goldman_dlg.state == 0) then
             return [[На койке, закинув руки за голову, лежит светловолосый {мужчина} лет пятидесяти. ]];
         else
             return [[На койке, закинув руки за голову, лежит {Леонард Голдман}. ]];
         end;
     end;
     dlg = "char_goldman_dlg";
 };
 char_jones = npc {
     var {
         on_atlantis = 0;
     };
     nam = "Чарли Джонс";
     dsc = function(s)
         if (char_jones_dlg.state == 0) then
             return [[Пожилой {человек}, одетый в простой серый костюм, сидит на койке и задумчиво вертит в руках карандаш. ]];
         else
             return [[{Чарли Джонс} сидит на койке и задумчиво вертит в руках карандаш. ]];
         end;
     end;
     dlg = "char_jones_dlg";
 };
 atl_item_tube_spec = obj {
     nam = "atl_item_tube_spec";
     disp = "Документация по воздуховодам Атлантиды";
     inv = [[Внушительной толщины книжка описывает все особенности и случаи применения различных труб в качестве воздуховодов на станции. Пролистав ее, вы узнаете, что всего существует четыре типа соединения, маркируемые соответственно: RT, KT, NF и TQ. Полная маркировка трубы состоит из типа, длины, указываемой в дециметрах и диаметра, указываемого в миллиметрах. Например RT-17-7 означает трубку RT с длиной 17 дециметров и диаметром 7 миллиметров. Согласно документации, трубы каждого типа можно соединять только с трубами такого же типа, однако на последней странице вы замечаете карандашные пометки: ^При необходимости, можно заменять трубы одного типа на другой с учетом следующих правил: ^KT -> RT -- Диаметр на 1 меньше. ^NF -> KT -- Диаметр на 1 больше. ^TQ -> NF -- Диаметр на 2 больше. ^Другие замены недопустимы и могут вызвать поломки. ]];
 };
 atl_nih_tubes_gen = function(nam, dsc, tube_type, tube_len, tube_d)
     return obj {
         var {
             broken = false;
             fixed = false;
         };
         tube_type = tube_type;
         tube_len = tube_len;
         tube_d = tube_d;
         nam = nam;
         dsc = dsc;
         act = function(s)
             if (s.fixed) then
                 return "Трубы в порядке. ";
             elseif (s.broken) then
                 return "Трубы повреждены и воздух со слабым шипением вырывается из них. На трубе имеется маркировка: " .. tube_type .. "-" .. tube_len .. "-" .. tube_d;
             else
                 return "Трубы в порядке. ";
             end;
         end;
         used = function(s, o)
             if s.broken and not s.fixed and o.is_tube and o.l == s.tube_len then
                 print(s.tube_type, s.tube_d, o.t, o.d);
                 local f = false;
                 if o.t == s.tube_type and o.d == s.tube_d then
                     remove(o, pl);
                     s.fixed = true;
                     for i = 1, #nih_tubes_array do
                         f = f or (nih_tubes_array[i].broken and not nih_tubes_array[i].fixed);
                     end;
                     if f then
                         atl_nih_state = 2;
                     end;
                     return "Вы заменяете поврежденный фрагмент трубы. ";
                 elseif s.tube_type == "KT" and o.t == "RT" and o.d + 1 == s.tube_d then
                     remove(o, pl);
                     s.fixed = true;
                     for i = 1, #nih_tubes_array do
                         f = f or (nih_tubes_array[i].broken and not nih_tubes_array[i].fixed);
                     end;
                     if f then
                         atl_nih_state = 2;
                     end;
                     return "Вы заменяете поврежденный фрагмент трубы. ";
                 elseif s.tube_type == "NF" and o.t == "KT" and o.d - 1 == s.tube_d then
                     remove(o, pl);
                     s.fixed = true;
                     for i = 1, #nih_tubes_array do
                         f = f or (nih_tubes_array[i].broken and not nih_tubes_array[i].fixed);
                     end;
                     if f then
                         atl_nih_state = 2;
                     end;
                     return "Вы заменяете поврежденный фрагмент трубы. ";
                 elseif s.tube_type == "TQ" and o.t == "NF" and o.d - 2 == s.tube_d then
                     remove(o, pl);
                     s.fixed = true;
                     for i = 1, #nih_tubes_array do
                         f = f or (nih_tubes_array[i].broken and not nih_tubes_array[i].fixed);
                     end;
                     if f then
                         atl_nih_state = 2;
                     end;
                     return "Вы заменяете поврежденный фрагмент трубы. ";
                 end;
             end;
         end;
     };
 end;
 atl_nih_tubes_near_aqua = atl_nih_tubes_gen("atl_nih_tubes_near_aqua", [[Рядом со шлюзом из стены выходят несколько {труб}, по которым подается воздух. ]], "RT", 12, 8);
 atl_nih_tubes_near_a = atl_nih_tubes_gen("atl_nih_tubes_near_a", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "RT", 11, 9);
 atl_nih_tubes_near_admin = atl_nih_tubes_gen("atl_nih_tubes_near_admin", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "RT", 15, 7);
 atl_nih_tubes_near_luna = atl_nih_tubes_gen("atl_nih_tubes_near_luna", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "KT", 12, 6);
 atl_nih_tubes_near_oculus = atl_nih_tubes_gen("atl_nih_tubes_near_oculus", [[Вдоль стены протянуто несколько {труб}, по которым подается воздух. ]], "NF", 13, 7);

atlantis_dlg.lua

➞

Show inline comments

@@ @@ -938,712 +938,718 @@ char_michael_wright_dlg = dlg { @@
                 return part1 .. [[Я доложу Даркстару о вашем неповиновении". ]];
             else
                 return part1 .. [[". ]];
             end;
         end};
         {tag="ignis_what", false, "Из-за чего начался пожар в Игнисе?", [[Майкл Райт отвечает: "Короткое замыкание. Рядом, к сожалению, никого не оказалось и потушить возгорание вовремя не удалось. Огонь быстро распространился по всей секции, ну а дальше вы все знаете". ]]};
         {tag="more_questions", "У меня есть несколько вопросов.", [[Майкл Райт отвечает: "Задавайте, посмотрим чем смогу помочь".]], code [[ psub('ask_more'); ]]};
         {always=true, "Мне пора.", function(s)
             if (atl_nih_state == 0 and atl_jack_in_party) then
                 atl_nih_state = 3;
             end;
             if (atl_nih_state == 0 and not atl_jack_in_party) then
                 atl_nih_init();
                 pr([["Кстати, у меня есть для вас небольшое задание. У нас где-то утечка воздуха. Ничего критичного, но у нас некому заняться этим. Вы могли бы прогуляться по станции и найти и исправить поломку. Проще всего будет просто заменить трубы на такие же. В случае возникновения проблем -- попросите у Мари в библиотеке документацию по воздуховодам, она даст вам все необходимое. Запасные вы найдете здесь или на складе в Акве. До встречи", -- Майкл Райт возвращается к своим делам. ]]);
                 psub("bq");
             else
                 pr([["До встречи", -- Майкл Райт возвращается к своим делам. ]]);
                 back();
             end;
         end};
         {tag="bq"};
         {"Хорошо, я сделаю что смогу.", [["До встречи", -- Майкл Райт возвращается к своим делам. ]], code [[ back(); ]]};
         {tag="son"};
         {"Мать Джека умерла, а сам он прозябает в своем доме ничего не делая. ", [[Майкл Райт вздыхает: "Жаль, что все так вышло. Спасибо, что честно сказали мне. Наверное..."]], code[[pret();]]};
         {"Мать Джека умерла, но с ним все в порядке. Он все еще живет в вашем доме. ", [[Майкл Райт вздыхает: "Элис...". ]], code[[pret();]]};
         {"У них все хорошо. ", [[Майкл Райт кивает: "Рад это слышать". ]], code[[pret();]]}
     };
 };
 char_anna_atlantis_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Анна Рэдклифф";
 	disp = "Анна Рэдклифф";
     reset_more = function(s)
         poff("on_anna", "on_walter", "on_atlantis", "on_drake", "more_questions");
         if (rel_anna  < 0) then
             if (char_anna.anna_asked == 0) then
                 pon("on_anna");
                 pon("more_questions");
             end;
             if (char_anna.walter_asked == 0) then
                 pon("on_walter");
                 pon("more_questions");
             end;
             if (char_anna.atlantis_asked == 0) then
                 pon("on_atlantis");
                 pon("more_questions");
             end;
             if (char_anna.drake_asked == 0) then
                 pon("on_drake");
                 pon("more_questions");
             end;
         else
             if (char_anna.anna_asked < 2) then
                 pon("on_anna");
                 pon("more_questions");
             end;
             if (char_anna.walter_asked < 2) then
                 pon("on_walter");
                 pon("more_questions");
             end;
             if (char_anna.atlantis_asked < 2) then
                 pon("on_atlantis");
                 pon("more_questions");
             end;
             if (char_anna.drake_asked < 2) then
                 pon("on_drake");
                 pon("more_questions");
             end;
         end;
     end;
 	enter = function(s)
 		s:reset_more();
 		if (s.state == 0) then
 			s.state = 1;
 			psub("first_meeting");
 			return [[Перед вами стоит девушка лет двадцати-пяти--тридцати. Каштановые волосы ниспадают на плечи. Зеленые глаза внимательно следят за движениями навьяра, с которым она разговаривает. Заметив вас, она просит навьяра подождать и обращается к вам: "Приветствую. Вы, должно быть, господин Дрейк? Мое имя Анна Рэдклифф". ]];
 		else
 			psub("generic");
 			return [[Анна Рэдклифф разговаривает с навьяром, стоящим рядом. Заметив вас, она просит его подождать и обращается к вам: "Приветствую, вы что-то хотели?" ]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting"};
 		{"Да, я Дэвид Дрейк. Рад знакомству. ", [[Анна Рэдклифф улыбается и спрашивает: "Вы что-то хотели?" ]], code = [[ psub('generic'); ]]};
         {tag="ask_more"};
         {tag="on_anna", "Расскажите о себе. ", function(s)
             if (rel_anna < 0) then
                 char_anna.anna_asked = 1;
                 return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
             else
                 char_anna.anna_asked = 2;
                 return [[Анна Рэдклифф грустно вздыхает: "Мне почти нечего рассказывать. Я с молодости живу здесь, на Атлантиде. Когда Уолтер сказал, что мы будем жить здесь, я сперва расстроилась -- тогда это казалось мне невероятно скучным -- жить вдалеке от цивилизации, среди людей, которые старше меня на двадцать с лишним лет. На самом деле все оказалось не столь плохо -- помимо навьяров, с которыми всегда интересно, я помогаю Екатерине и Сильвии с расшифровкой текстов или Мари в библиотеке". ]];
             end;
         end};
         {tag="on_walter", "Расскажите об Уолтере. ", function(s)
             if (rel_anna < 0) then
                 char_anna.walter_asked = 1;
                 return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
             else
                 char_anna.walter_asked = 2;
                 return [[Анна Рэдклифф отвечает: "Уолтер -- мой старший брат. Он заботится обо мне с тех пор, как мама с папой покинули нас. Хотя моя жизнь сильно изменилась, когда Уолтер забрал меня с собой на Атлантиду, я не жалею об этом". ]];
             end;
         end};
         {tag="on_atlantis", "Что вы думаете об Атлантиде?", function(s)
             if (rel_anna < 0) then
                 char_anna.atlantis_asked = 1;
                 return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
             else
                 char_anna.atlantis_asked = 2;
                 return [[Анна Рэдклифф отвечает: "Последние десять лет я живу здесь, на Атлантиде. Я хорошо помню, как расстроена я была, приехав сюда. Конечно, я не думала, что мы все проведем здесь столько времени. Первое время мне казалось, что мы вот-вот закончим и вернемся на поверхность,но намерения вашего отца сильно отличались от этого. Почти сразу после прибытия Екатерина и Сильвия познакомили меня с Телнеарром и Хетеарром -- двумя навьярами, которые первыми жили на станции. Потом Хетеарр вернулся домой, а вместо него на станцию прибыл Ривеерр. А затем покинул станцию и Телнеарр. Его заменила Леарр". ]];
             end;
         end};
         {tag="on_drake", "Расскажите об Уильяме Дрейке. ", function(s)
             if (rel_anna < 0) then
                 char_anna.drake_asked = 1;
                 return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
             else
                 char_anna.drake_asked = 2;
                 return [[Анна Рэдклифф отвечает: "Хотя Дрейк -- руководитель Атлантиды, он проводит больше времени здесь, в Окулусе, чем в своем кабинете в Доминусе. Сейчас он в экспедиции -- они с Блэком отправились на поиски отдаленных навьярских поселений". ]];
             end;
         end};
         {tag="on_black", "Расскажите об Адриане Блэке. ", function(s)
             if rel_anna < 0 then
                 char_anna.black_asked = 1;
                 return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
             else
                 char_anna.black_asked = 2;
                 return [[Анна Рэдклифф пожимает плечами: "Все вокруг говорят, что он хороший друг вашего отца, но мне почти не доводилось с ним общаться".]];
             end;
         end};
         {always=true, "Вернемся к делу.", [[Анна Рэдклифф кивает: "Хорошо".]], code [[ char_anna_atlantis_dlg:reset_more(); pret(); ]]};
 		{tag="generic"};
         {tag="more_questions", "У меня есть несколько вопросов.", [[Анна отвечает: "Да, я слушаю".]], code [[ psub('ask_more'); ]]};
 		{always=true, "Я пойду.", [[Анна прощается с вами: "До встречи". ]], code [[ back(); ]]};
 	};
 };
 --[[
     Learr
 ]]
 atlantis_learr_intro = room {
     nam = "Атлантида, Окулус, Главный коридор";
     dsc = [[Вы выходите из межсекционного коридора в главный коридор секции _"Окулус"_ и сталкиваетесь лицом к лицу с неведомым существом. Стройное, покрытое блестящей серо-зеленой чешуей тело слегка покачивается. Рыбья голова с небольшими отростками-плавниками, тонкие ноги и руки с широкими перепонками между длинными пальцами покрыты такой же чешуей. Ярко-оранжевые глаза существа с интересом разглядывают вас. Во рту существа сверкают острые треугольные зубы. Одето оно в белую рубашку и ярко-синюю юбку до колен. На шее существа вы замечаете жабры. Отростки на голове существа принимают слабо уловимый сине-зеленый оттенок. ]];
     obj = {
         vway('continue', '{Продолжить}', 'atlantis_learr_first_dlg')
     };
 };
 atlantis_learr_first_dlg = dlg {
     nam = "Леарр";
     entered = [[Существо начинает говорить: "Я зздессь-рраньшше-не-видела васс". Голос звучит непривычно для вашего слуха -- гласные произносятся очень коротко, между некоторыми словами делаются резкие паузы, другие же сливаются практически в одно, шипящие и "р" произносятся удлиненно. ]];
     phr = {
         {"Кто ты?", [[Существо отвечает: "I'yhe'lea'yhe'na'vji'a'rr", -- вы отчетливо различаете короткие паузы между слогами. ]], code [[ pon('who_are_you'); ]]};
         {tag="who_are_you", false, "Я не понимаю, что ты говоришь.", [[Существо ненадолго застывает в замешательстве. Затем отвечает: "Я Lea'rr. Ты так-понимаешь?". ]], code [[psub('learr'); ]]};
         {"Аааа, монстр, помогите!!!", [[Существо скалит зубы. Плавники меняют цвет на ярко-фиолетовый. Оно рычит на вас: "Прропусти. Нет-врремени". ^Щелкнув зубами, _"Чудовище"_ уходит. ]], code [[
             put(char_learr_atlantis, atl_ignis_hall_a);
             char_learr_atlantis.offended = true;
             walk("atl_oculus_main_corridor");
         ]]};
         {tag="learr"};
         {"Рад знакомству. Я Дэвид Дрейк. ", [[Леарр переспрашивает: "Ты ззнаешшь Уильяма-Дррейка?" -- Вам кажется, вы чувствуете удивление, хотя интонации в словах существа вам совершенно чужды. ]], code [[ psub('drake') ]]};
         {"Что ты такое?", [[Леарр ненадолго задумывается и отвечает: "Мы себя-навьярами-называем. Мы недалеко-живем-в-нескольких-кругах-отсюда".]], code [[ pon('under_water'); ]]};
         {tag="under_water", false, "Под водой?", [[Леарр кивает. Через некоторое время отвечает: "Ты с-поверхности? Никогда-нас-не-видел, похоже". ]]};
         {tag="drake"};
         {"Да, я его сын. Ты знакома с ним?", [[оттенок головных плавников Леарр становится более ярким и смещается ближе к зеленому. Она отвечает: _"Да, я его-ззнаю. Уильям-Дррейк нашшу-иссторрию-иззучал. Он ссейчасс-исскать-уехал Lse'ry'anot'rr. Я что-вы-зздессь рада"_. ]], code [[ psub('follow_drake') ]]};
         {tag="follow_drake"};
         {"Я здесь из-за него. " , [[Леарр кивает: _"Я вам-как-смогу-помогу. Я в-Игниссе-буду, ессли вы говоррить-хотите"_. ^Леарр уходит, а вы остаетесь в одиночестве. ]], code [[ put(char_learr_atlantis, atl_ignis_hall_a); walk("atl_oculus_main_corridor"); ]]};
     };
 };
 char_learr_atlantis_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Леарр";
 	disp = "Леарр";
 	enter = function(s)
         poff('iyh1', 'iyh2');
         if (atl_iyh_state == 1 and not atl_iyh_learr_spoken) then
             pon('iyh1');
         elseif (atl_iyh_state == 2 and ArrayUtils.indexOf(pl.party, 'learr') == 0) then
             pon('iyh2');
         end;
 		if (s.state == 0) then
             if ArrayUtils.indexOf(pl.party, 'wright') ~= 0 and char_jack_wright_atlantis_dlg.state then
                 pr [[Джек райт прощается с Леарр и покидает зал. ]];
                 char_jack_wright_atlantis_dlg.state = 1;
                 remove('char_jack_wright_atlantis', 'atl_ignis_hall_a');
             end;
 			if (char_learr_atlantis.offended) then
 				psub("offended");
-				return [[Леарр поворачивается к вам, плавники ее становятся ярко-фиолетовыми. Она рычит: "Прриветсствую, монсстрр. Мы говоррить-будем?" ]];
+				pr [[Леарр поворачивается к вам, плавники ее становятся ярко-фиолетовыми. Она рычит: "Прриветсствую, монсстрр. Мы говоррить-будем?" ]];
 			else
 				psub("friendly");
-				return [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я прриветсствую тебя-he'vji'a'rr". ]];
+				pr [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я прриветсствую тебя-he'vji'a'rr". ]];
 			end;
 		else
             if (rel_learr < 0) then
                 if (char_learr.on_books == 0) then pon("on_books") end;
             else
                 if (char_learr.on_books < 2) then pon("on_books") end;
             end;
 			psub("generic");
 			if (rel_learr > 0) then
 				return [[Леарр поворачивается к вам, плавники ее принимают сине-зеленый оттенок, а она говорит: "Я рада-видеть тебя". ]];
 			else
 				return [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я приветствую тебя-he'vji'a'rr". ]];
 			end;
 		end;
 	end;
 	phr = {
 		{tag='offended'};
 		{"Монстр?", [[Леарр молча кивает. Оттенок головных плавников на мгновение сменяется на желтый, но затем снова становится фиолетовым: "Ты так-назвал меня. Мы будем-дальше-монстрами-называть друг-друга?" ]], code [[ psub('offended_yes_no') ]]};
 		{tag='offended_yes_no'};
 		{"Не думаю.", [[Леарр кивает, ее плавники медленно теряют цвет. Она говорит: "Я слушаю тебя. Ты говори". ]], code [[
             char_learr_atlantis_dlg.state = 1;
             walk('generic');
         ]]};
 		{"От этого суть не изменится, чудище.", [[Леарр скалится, показывая блестящие острые зубки: "Ты убиррайся, пока я тебя не ссъела". ]], code [[
 			char_learr_atlantis_dlg.state = 1;
 			walk('generic');
 		]]};
 		{tag='friendly'};
 		{"He'vji'a'rr?", [[Леарр кивает: "Мы так-наззываем пришшедшших-сс-поверхноссти-васс". ]]};
 		{"Я хотел кое-что спросить.", [["Ты говорри", -- просит Леарр. ]], code [[
 			char_learr_atlantis_dlg.state = 1;
 			walk('generic');
 		]]};
 		{tag="generic"};
 		{tag="iyh1", false, "Расскажи о вашем конфликте с Дипатреанотром.", [[Леарр начинает рассказывать, активно жестикулируя: "Рреликвия нессколько-дней-наззад-изз-нашшего-хррама-прропала. Na'vji'a'yhe'dyp'atre'anot'rr вззяли нашшу-рреликвию! Они потом-в-наш-город-пришли и требовали-вернуть их-реликвию! Мы не-брали ее и это-сказали им!" -- Леарр недовольно топает и шипит, -- "Они нам-не-верят! Они украли нашу-вещь и не-верят нам!" ]], code [[ atl_iyh_learr_spoken = true; ]]};
         {tag="iyh2", false, "Я отправляюсь в храм Дипатреанотра. Мне не помешает твоя помощь.", [[Плавники Леарр принимают фиолетовый оттенок: "He'vji'a'rr нельзя туда!"]], code [[ psub("join_me"); ]]};
         {tag="books", false, "[Показать на книгу] Ты читаешь наши книги?", function(s)
             if (rel_learr < 0) then
                 char_learr.on_books = 1;
                 return [[Леарр неохотно отвечает: "Я иногда-читаю". Она явно не хочет говорить с вами об этом сейчас. ]];
             else
                 char_learr.on_books = 2;
                 psub("more_on_books");
                 return [[Леарр отвечает: "Я иногда-читаю". Она опускает глаза на книгу, потом смотрит на вас. Немного подумав, она отвечает, как-бы нехотя: "Я не-умею-ваш-язык-читать. Я пытаюсь-учусь. Мари помогает". ]];
             end;
         end};
 		{always=true, "Я пойду.", [[Плавники Леарр медленно теряют цвет и она прощается с вами: "Ты воззврращщайсся". ]], code [[back();]]};
         {tag="join_me"};
         {"Я не собираюсь входить внутрь, но мне нужно осмотреть его окрестности.", [[Цвет плавников Леарр меняется на оранжевый и затем на желтый. Она соглашается: "Я с-тобой-пойду. Я давно-в-Ираафаанотре-не-была". ]], code [[
             remove("char_learr_atlantis", where("char_learr_atlantis"));
             table.insert(pl.party, 'learr');
             move(char_learr, char_learr.home);
             pret();
         ]]};
         {"Для этого ты мне и нужна.", [[Цвет плавников Леарр меняет цвет на синий. Она соглашается: "Я согласна. Я с-тобой-пойду". ]], code [[
             remove("char_learr_atlantis", where("char_learr_atlantis"));
             table.insert(pl.party, 'learr');
             move(char_learr, char_learr.home);
             pret();
         ]]};
         {tag="more_on_books"};
         {"Я могу помочь?", [[Леарр кивает: "Я думаю-ты-дрругим-делом-ззанят. Я не-хчочу-мешшать". ]], code[[ char_learr.on_books = 3; pret(); ]]};
         {"Давно ты этим занимаешься?", [[Леарр кивает: "Я с-ссамого-пррибытия-вашши-книги-учуссь-читать. Я надеюссь-вссе-пойму ссо-врременем". ]]};
         {"Как у тебя успехи?", [[Леарр смущенно отвечает: "Я ещще-многое-не-понимаю. Но я ссо-врременем-пойму-надеюссь". ]]};
         {"Давай поговорим о другом.", [[Леарр кивает: "Ты говорри". ]], code [[pret();]]};
+    }
 };
 char_aikerjarr_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Аикерьярр";
 	enter = function(s)
         poff('iyh1', 'iyh2', 'iyh4', 'iyh5');
         if (atl_iyh_state == 1 and not atl_iyh_aikerjarr_spoken) then
             pon('iyh1');
         elseif (atl_iyh_state == 2 and not atl_iyh2_aikerjarr_spoken) then
             if atl_iyh2_ryveerr_spoken then
                 pon("iyh2_ryveerr");
             end;
             pon('iyh2');
         end;
         if (s.state == 0) then
             psub("first_meeting");
             return [[Перед вами стоит высокий стройный навьяр. Серебристая чешуя сверкает в свете электрических ламп. Неприязненный взгляд его зеленых глаз направлен на вас. Существо одето в темно-зеленые облегающие штаны и куртку из водорослей. В правой руке навьяр держит коралловое копье. ]];
 		elseif (s.state == 1) then
 			psub("generic");
 		end;
 		return [[Аикерьярр презрительно смотрит на вас, не говоря ни слова. ]];
 	end;
 	phr = {
         {tag = "first_meeting"};
         {always=true, "Ты Аикерьярр?", [[Навьяр нехотя отвечает: "I'yhe'Aike'rya'yhe'iraa'pha-anot'rr". ]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_2a"); ]]};
         {always=true, "Добрый день.", [[Навьяр нехотя отвечает: "I'yhe'Aike'rya'yhe'iraa'pha-anot'rr vta'lyt'nn ty'yhe'he'vji'a'rr". ]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_2b"); ]]};
         {always=true, "Приветствую.", [[Навьяр нехотя отвечает: "I'yhe'Aike'rya'yhe'iraa'pha-anot'rr vta'lyt'nn ty'yhe'he'vji'a'rr". ]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_2b"); ]]};
         {tag="first_meeting_2a"};
         {always=true, "Нам нужно поговорить.", [[Навьяр надменно бросает: "I'rr vtre'za'nn he'vji'a'za'rr".]], code [[ char_aikerjarr_dlg.state = 1; psub("first_meeting_3a");]]};
         {tag="first_meeting_2b"};
         {always=true, "Я тебя не понимаю", [[Навьяр довольно ухмыляется: "Ty'rr zee'vee'nn". ]], code [[char_aikerjarr_dlg.state = 1; psub("first_meeting_2a");]]};
         {always=true, "Кончай дурить, я знаю, что ты меня понимаешь.", [[Навьяр скалит зубы: "Ты-ххевьярр так-ссо-мной-не-говорри". ]], code [[ psub("first_meeting_3b");]]};
         {always=true, "Я приду позже.", [[Навьяр довольно ухмыляется: "Ty'rr zee'vee'nn". ]], code [[ back(); ]]};
         {tag="first_meeting_3a"};
         {always=true, "I'rr vtre'za'nn na'vji'a'za'rr. Нам все еще нужно поговорить. ", [[Навьяр вздыхает: "Ty'rr не-отсстанет. I'rr тебя-сслушшает"]], code [[ char_aikerjarr_dlg.state = 1; psub("generic"); ]]};
         {always=true, "Нам все еще нужно поговорить.", [[Навьяр надменно бросает: "I'rr vtre'za'nn he'vji'a'za'rr".]], code [[ back(); ]]};
         {always=true, "Я приду позже.", [[Навьяр довольно ухмыляется: "Ty'rr zee'vee'nn". ]], code [[ back(); ]]};
         {tag="first_meeting_3b"};
         {always=true, "Значит, ты все-таки меня понимаешь. У меня есть вопросы.",  [[Навьяр вздыхает: "Ty'rr не-отсстанет. I'rr тебя-сслушшает"]], code [[char_aikerjarr_dlg.state = 1; psub("generic")]]};
         {always=true, "Значит, ты все-таки меня понимаешь. Хватит тратить мое время.", [[Навьяр недовольно рычит: "Ты говорри". ]], code [[char_aikerjarr_dlg.state = 1; psub("generic")]]};
         {always=true, "Значит, ты все-таки меня понимаешь, чертов рыбень. Теперь слушай и отвечай.", [[Навьяр стучит копьем об пол и отворачивается от вас. ]], code [[back();]]};
 		{tag = "generic"};
 		{tag="iyh1", false, "Расскажи о вашем конфликте с Дипатреанотром.", [[Аикерьярр недовольно смотрит на вас:"He'vji'a'rr не-помочь". ^Немного подумав, он рассказывает: "Na'vji'a'yhe'dyp'atre'anot'rr говоррить yhe мы украссть реликвия-изз-ихх-ххррама, -- Аикерьярр злобно стучит зубами и в ярости сжимает кулаки, -- Мы не-делали-этого-ссказзали им! Но они в-ответ-на-нашш-ххррам-напали и нашши-рреликвии-вззяли!" ]], code [[ atl_iyh_aikerjarr_spoken = true; ]]};
         {tag="iyh2", false, "Я собираюсь в храм Дипатреанотра.", [[Аикерьярр пожимает плечами: "Ты туда-не-идешь. Ты спроси Ривеерра".]], code [[ psub("on_iyh2"); ]]};
 		{always=true,"Я вернусь позже.", [[Аикерьярр отворачивается от вас, даже не удостоив ответом. ]], code [[back(); ]]};
         {tag="on_iyh2"};
         {tag="iyh2_ryveerr", false, "Ривеерр дал мне разрешение на осмотр окрестностей храма. ", [[Аикерьярр недовольно рычит: "Никчемный-глупец-Ривеерр. Я ссс-тобой-иду". ]], code [[ atl_iyh2_aikerjarr_spoken = true; table.insert(pl.party, 'aikerjarr'); move(char_aikerjarr_lev, char_aikerjarr_lev.home); psub("on_iyh22"); ]]};
         {always=true,"Я вернусь позже.", [[Аикерьярр отворачивается от вас, даже не удостоив ответом. ]], code [[back(); ]]};
         {tag="on_iyh22"};
         {"Хорошо.", [[Аикерьярр отворачивается от вас, не удостоив ответом. ]], code [[back(); ]]};
         {"Ты мне там не нужен.", [[Аиверьярр отвечает: "Я ссс-тобой-иду или ты не-идешшь-туда". ]]};
 	};
 };
 char_ryveerr_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Ривеерр";
 	disp = "Ривеерр";
     reset_more = function(s)
         poff("on_atlantis", "on_learr", "on_ryveerr", "on_aikerjarr", "more_questions");
         if (atl_rep_dyp < 0) then
             if (char_ryveerr.atlantis_asked == 0) then pon("on_atlantis", "more_questions"); end;
             if (char_ryveerr.learr_asked == 0) then pon("on_learr", "more_questions"); end;
             if (char_ryveerr.ryveerr_asked == 0) then pon("on_ryveerr", "more_questions"); end;
         else
             if (char_ryveerr.atlantis_asked < 2) then pon("on_atlantis", "more_questions"); end;
             if (char_ryveerr.learr_asked < 2) then pon("on_learr", "more_questions"); end;
             if (char_ryveerr.ryveerr_asked < 2) then pon("on_ryveerr", "more_questions"); end;
         end;
     end;
 	enter = function(s)
         s:reset_more();
         poff('iyh1', 'iyh2', 'learr_comes');
         if (atl_iyh_state == 1 and not atl_iyh_ryveerr_spoken) then
             pon('iyh1');
         elseif (atl_iyh_state == 2 and not atl_iyh2_ryveerr_spoken) then
             pon('iyh2');
         end;
         if (ArrayUtils.indexOf(pl.party, 'learr') ~= 0) then
             pon('learr_comes');
         end;
         if (s.state == 0) then
             s.state = 1;
             psub("first_meeting");
             return [[Перед вами стоит навьяр. Серо-зеленая чешуя, несколько более темная, чем у Леарр блестит в свете электрических ламп. Красно-оранжевые глаза внимательно смотрят на вас. Он одет в темно-зеленые облегающие шорты и куртку из водорослей. Навьяр приветствует вас: "Ривеерр-из-Дипатреанотра рад-видеть тебя". ]];
         else
             psub("generic");
             return [[Ривеерр оборачивается к вам: "Ты говори". ]];
         end;
 	end;
 	phr = {
         {tag="first_meeting"};
         {"Мое имя Дэвид Дрейк. Рад знакомству.", [[Плавники Ривеерра окрашиваются в зеленый: "Ты-Уильяма-сын". ]], code[[psub("first_meeting_2");]]};
         {"Мое имя Дэвид Дрейк.", [[Плавники Ривеерра окрашиваются в зеленый: "Ты-Уильяма-сын". ]], code[[psub("first_meeting_2");]]};
         {tag="first_meeting_2"};
         {"Да, все верно.", [[Ривеерр: "Я рад-помочь тебе. Ты говори". ]], code [[psub("generic");]]};
         {"Я хотел кое-что спросить. ", [[Ривеерр: "Ты говори". ]], code [[psub("generic");]]};
 		{tag="generic"};
 		{tag="iyh1", false, "Расскажи о конфликте Ираафаанотра с Дипатреанотром.", [[Ривеерр рассказывает вам: "Na'vji'a'yhe'iraa'pha’anot’rr нашу-реликвию-украли. Мы тем-же-ответили им". ]], code [[ atl_iyh_ryveerr_spoken = true; psub("more_on_relic"); ]]};
         {tag="iyh2", false, "Я собираюсь в храм Дипатреанотра.", [[Плавники на голове Ривеерра меняют цвет на сине-фиолетовый: "Ты туда-не-идешь". ]], code [[ atl_iyh2_ryveerr_spoken = true; psub("on_iyh2"); ]]};
         {tag="more_questions", always=true, "Я хочу кое-что спросить.", [[Ривеерр кивает: "Ты спрашивай". ]], code [[ psub("ask_more"); ]]};
         {always=true, "Я пойду.", [[Ривеерр прощается с вами: "Мы позже-поговорим". ]], code [[ back(); ]]};
         {tag="ask_more"};
         {tag="on_atlantis", "Что ты думаешь об Атлантиде?", function(s)
             if (atl_rep_dyp < 0) then
                 char_ryveerr.atlantis_asked = 1;
                 return [[Ривеерр отвечает: "Хевьяры-с-Атлантиды уже-помогли-нам-немало. Я надеюсь-на-продолжение-плодотворного-сотрудничества". ]];
             else
                 char_ryveerr.atlantis_asked = 2;
                 return [[Ривеерр отвечает: "Хевьяры-с-Атлантиды уже-помогли-нам-немало. Я надеюсь-на-продолжение-плодотворного-сотрудничества. Я продолжаю-доказывать-пользу-нашего-с-вами-хевьярами-общения и многие-в-Дипатреанотре уже-согласны-со-мной. Если план-Дрейка успешен-будет, то наша-благодарность будет-неизмерима. Хевьяры наследие-древних-ищут, как легенды гласят". ]];
             end;
         end};
         {tag="on_aikerjarr", "Что ты думаешь об Аикерьярре?", function(s)
             if (atl_rep_dyp < 0) then
                 char_ryveerr.aikerjarr_asked = 1;
                 return [[Ривеерр отказывается отвечать:"Я не-говорю-с-тобой-об-этом". ]];
             else
                 char_ryveerr.aikerjarr_asked = 2;
                 return [[Плавники Ривеерра окрашиваются фиолетовым и он отвечает: "Этот все-сделает-нас-из-себя-вывести. Я считаю-он-войны-хочет-с-Атлантидой. Я не-хочу-этого, но в-Дипатреанотре-некоторые хотят. Я не-знаю-что-получится". ]];
             end;
         end};
         {tag="on_ryveerr", "Расскажи о себе.", function(s)
             if (atl_rep_dyp < 0) then
                 char_ryveerr.ryveerr_asked = 1;
                 return [[Ривеерр отказывается отвечать:"Я не-говорю-с-тобой-об-этом". ]];
             else
                 char_ryveerr.ryveerr_asked = 2;
                 return [[Плавники Ривеерра окрашиваются синим и он отвечает: "Я-Дипатреанотра-посол. Я желаю-с-хевьярами-долгого-и-плодотворного-сотрудничества. Мое-мнение большинство-в-Дипатреанотре-разделяют, поэтому я здесь". ]];
             end;
         end};
         {tag="on_learr", "Что ты думаешь о Леарр?", function(s)
             if (atl_rep_dyp < 0) then
                 char_ryveerr.learr_asked = 1;
                 return [[Ривеерр отказывается отвечать:"Я не-говорю-с-тобой-об-этом". ]];
             else
                 char_ryveerr.learr_asked = 2;
                 return [[Плавники Ривеерра окрашиваются зеленым и он отвечает: "Леарр из Ираафаанотра. Мы часто-разногласия с-ними, но с-Леарр всегда-понимание-находим. Это с-Ираафаанотр-отношениям-помогает и хорошо-есть. Я что-она-на-Атлантиде-рад и друг-с-другом-и-с-вами-что-мы-можем общаться-постоянно. Это с-вами-нашим-отношениям-помогает и тоже-хорошо-есть". ]];
             end;
         end};
         {always=true, "Давай поговорим о другом.", [[Ривеерр кивает: "Ты говори". ]], code [[ char_ryveerr_dlg:reset_more(); pret(); ]]};
 		{tag="more_on_relic"};
 		{"Тем же?", [[Ривеерр щелкает зубами: "Мы светодиск-из-их-храма-забрали. Мы вернем его, ysl они вернут нашу-реликвию". ]]};
 		{"Вы уверены, что кража -- их рук дело?", [[Ривеерр уверенно кивает: "Только-они могли сделать. Я расскажу", -- Ривеерр на небольшое время замолкает, собираясь с мыслями, после чего продолжает: "Na'vji'a'yhe'iraa'pha’anot’rr ночью-в-наш-храм-пришли и охранников-убили. Они реликвию-украли и в-свой-город-унесли". ]], code [[ psub("why"); ]]};
 		{tag="why", empty=code [[ atl_iyh_ryveerr_spoken = true; psub("generic"); ]]};
 		{"Вы уверены, что это они?", [[Ривеерр отвечает: "Другой-никто не-мог-сделать". ]]};
         {"Как убили охранников?", [[Ривеерр отвечает: "Их копьями-проткнули. Мы раны-видели". ]]};
 		{always=true, "Я вернусь позже.", [[Ривеерр прощается с вами: "Мы поззжже-поговоррим". ]], code [[ back(); ]]};
         {tag="on_iyh2"};
         {"Я не собираюсь внутрь храма, мне нужно лишь осмотреть окрестности.", [[Ривеерр кивает: "Я это-разрешу. Ты иди". ]], code [[ pret(); ]]};
         {tag="learr_comes", "Со мной отправится Леарр.", [[Ривеерр отвечает: "Ты туда-не-идешь. He'vji'a'rr нельзя-в-храм". ]]};
 	};
 };
 char_evans_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Кристиан Эванс";
 	disp = "Кристиан Эванс";
 	enter = function(s)
 		if (s.state == 0) then
 			s.state = 1;
 			psub("first_meeting");
 			return [[Немолодой мужчина внимательно смотрит на вас через стекла старых очков. Он приветствует вас: "Добро пожаловать на нашу станцию. Я Кристиан Эванс, занимаюсь языком навьяров". ]];
 		else
 			psub("generic");
 			return [[Кристиан Эванс приветствует вас: "Добрый день". ]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting"};
 		{"Я Дэвид Дрейк, очень приятно.", [[Кристиан улыбается и отвечает: "Очень рад вас видеть. У вас есть вопросы? Я слушаю". ]], code [[ psub("generic"); ]]};
 		{tag="generic"};
         {"Что вы можете рассказать о Леарр?", function(s)
             return [[Кристиан отвечает: "С ней приятно иметь дело. Мы многое узнали о навьярах только благодаря ее открытости и желанию общаться с нами. Хотя Ривеерр тоже довольно дружелюбен, он чрезмерно осторожен при общении с нами. Леарр и сама интересуется нами и нашими достижениями -- большую часть времени она проводит в библиотеке и в Игнисе, читая наши книги и газеты и просматривая наши фото- и видеоархивы". ]];
         end};
         {tag="on_aikerjarr", false, "Что вы можете сказать об Аикерьярре?", [[Кристиан чешет подбородок: "Не знаю, почему Ираафаанотр отправил на Атлантиду этого... Наверное, было бы проще, не будь на станции вообще никого из Ираафаанотра. И безопаснее для наших отношений тоже. Этот... Да он словно намеренно пытается вывести тут всех из себя".]]};
         {"Что вы можете сказать об Ривеерре?", [[Кристиан задумчиво: "Из жителей Дипатреанотра, Ривеерр, наверное, лучше всех относится к нам. При том, что он достаточно отстранен, чувствуется, что он готов вкладывать силы в улучшение отношений между нами всеми -- Дипатреанотром, Атлантидой и Ираафаанотром". ]]};
         {"Что вы можете сказать о навьярах?", [[Кристиан отвечает: "Поразительные существа. Конечно, мы первый раз сталкиваемся с подобным и толком не знаем как себя вести и как стоит их изучать, но, как мне кажется, мы многого достигли -- мы знаем их язык, имеет доступ к их текстам и общаемся с их представителями практически на равных. Вообще, мы поразительно легко наладили с ними контакт -- они не стали воспринимать нас ни как богов, ни как дьяволов, как это случается с племенами людей в далеких от цивилизации местах. Они однозначно не так просты, как кажется, но мы пока не знаем в чем причина этого".]]};
 		{always=true, "Я пойду.", [[Кристиан прощается с вами: "До встречи". ]], code [[ back(); ]]};
 	};
 };
 char_winterlight_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Сильвия Уинтерлайт";
 	disp = "Сильвия Уинтерлайт";
 	enter = function(s)
 		if (s.state == 0) then
 			psub("first_meeting");
             s.state = 1;
 			return [[Женщина лет тридцати-пяти--сорока с длинными темными волосами стоит, склонившись над картой и внимательно изучает ее. Увидев вас, она отвлекается от карты и проницательный взгляд ее серых глаз устремляется на вас. Она спрашивает: "Господин Дрейк? Я уже осведомлена о вашем прибытии, как видите. Мое имя Сильвия Уинтерлайт. Я химик и биолог на станции. По-крайней мере официально. На самом деле занимаюсь чем придется". ]];
 		else
 			psub("generic");
 			return [[Сильвия отрывает взгляд от карты: "Приветствую, что вы хотели?" ]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting"};
         {"Рад знакомству. Я хотел бы кое-что спросить.", [[Сильвия улыбается и кивает: "Конечно, господин Дрейк, я слушаю". ]], code [[ psub("generic"); ]]};
 		{"Рад знакомству. Я чем-то могу быть полезен?", [[Сильвия улыбается и отвечает: "Вам лучше поговорить с госпожой Светловой, у нее наверняка найдется поручение для вас". ]], code [[ psub("generic"); ]]};
 		{tag="generic"};
         {"Расскажите об Атлантиде,", [[Сильвия отвечает: "Об этом я могу долго рассказывать -- мы с господином Райтом многое придумывали вместе -- в частности, системы подачи кислорода, я же помогала в разработке Аэриса. Аэрис, если говорить открыто, крайне значительное достижение -- мы сумели адаптировать некоторые виды растений с поверхности к условиям станции. Конечно, пришлось потрудиться -- очень много энергии уходит на освещение и обогрев секции, но и результат себя оправдывает -- думаю, нам быстро надоело бы питаться одними морепродуктами, а так у нас есть практически все, что может предложить поверхность. Ну, кроме мяса", -- она улыбается, -- "Также мы выращиваем там несколько видов водорослей -- некоторые производят кислород, другие идут в пищу, третьи отправляются прямиком в печь".]]};
         {"Расскажите о себе.", [[Сильвия усмехается: "Не думаю, что тут есть что-то интересное, но слушайте -- я едва закончила университет и была в поисках работы, когда встретилась с госпожой Светловой. Уж не знаю, что привлекло ее во мне, но она предложила мне работу. Я сперва удивилась -- с чего транспортной компании нанимать таких видных ученых, как она? Да и зачем там такие, как я? Когда господин Дрейк рассказал о своем открытии, я загорелась идеей обустроить автономную подводную станцию -- чтобы иметь возможность находиться ближе к навьярам и изучать их. Изначально планы не были столь грандиозны, но благодаря нашим с господином Райтом успехам мы смогли построить Атлантиду такой, какой вы ее видите. Тогда же я впервые встретила живого навьяра. Нет, госпожа Светлова рассказывала мне про них и даже показывала фотографии и рисунки, но увидеть их вживую ни с чем не сравнимо. И еще более странно, когда такое существо тебя приветствует на твоем языке". ]]};
 		{always=true, "Я пойду.", [[Сильвия молча кивает и возвращается к своим делам. ]], code [[ back(); ]]};
 	};
 };
 char_jack_wright_atlantis_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = 'char_jack_wright_atlantis_dlg';
 	disp = "Джек Райт";
 	enter = function(s)
         if (rel_jack < 0) then
             if (char_wright.on_learr == 0) then pon("on_learr"); end;
             if (char_wright.on_leviathan == 0) then pon("on_leviathan"); end;
             if (char_wright.on_jack == 0) then pon("on_jack"); end;
         else
             if (char_wright.on_learr < 2) then pon("on_learr"); end;
             if (char_wright.on_leviathan < 2) then pon("on_leviathan"); end;
             if (char_wright.on_jack < 2) then pon("on_jack"); end;
         end;
         if (s.state == 0) then
 			psub("business_or_no");
 			return [[Джек отворачивается от Леарр, и обращается к вам: "Привет, ты по делу или просто так?" ]];
         else
             psub("generic");
             return [[Джек откладывает книгу и встает с койки и обращается к вам: "Добрый день. Тебе что-то нужно?"]];
 		end;
 	end;
 	phr = {
         {tag = "business_or_no"};
 		{"Как тебе станция?", [[Джек не скрывая восхищения восклицает: "Невероятно! Трудно поверить в возможность такого -- полностью автономное подводное поселение. Я никогда на сомневался в таланте отца, но это выше всех моих ожиданий". ]]};
 		{always = "true", "Я пришел поговорить с Леарр. ", function(s)
 			if (char_learr_atlantis.offended) then
-				return [[Джек ухмыльнулся: "Удачи, я подожду в главном зале", -- с этими словами, Джек выходит из зала. ]];
+				return [[Джек ухмыльнулся: "Удачи, я пойду к себе", -- с этими словами, Джек выходит из зала. ]];
 			else
-				return [["Надеюсь, я вам не помешаю? В любом случае, я подожду в главном зале", -- с этими словами, Джек выходит из зала. ]];
+				return [["Надеюсь, я вам не помешаю? В любом случае, мне уже пора уходить", -- с этими словами, Джек выходит из зала. ]];
 			end;
 		end, code [[
 		end, code [[
             char_jack_wright_atlantis_dlg.state = 1;
 			remove('char_jack_wright_atlantis', 'atl_ignis_hall_a');
 			back();
 		]]};
         {tag="generic"};
         {tag="sabotage", "Ты знаешь, что пожар начался из-за саботажа?", [[Джек кивает: "Да, Даркстар сказал мне это. Он просил меня никому не говорить об этом и не вмешиваться в расследование. Я думаю, все подозреваемые, которых он назвал так или иначе связаны. Не случайно, все трое выступают в пользу закрытия станции. Надеюсь, Даркстар сообщит о результах расследования". ]], code [[poff("ignis_what");]]};
         {tag="ignis_what", "Ты знаешь, почему начался пожар в Игнисе?", [[Джек кивает: "Да, Даркстар сказал, что на станции саботажник. Он назвал нескольких подозреваемых, но просил никому не говорить. Он с тобой говорил об этом?"]], code [[poff("sabotage");psub("ignis");]]};
         {always=true, "Я хочу кое-что спросить.", [[Джек вопросительно смотрит на вас: "Я слушаю". ]], code [[ psub("more_questions"); ]]};
         {always=true, "Я пойду.", [[Джек прощается с вами: "До встречи", -- после  чего возвращается к своему занятию. ]]};
         {tag = "more_questions"};
         {tag="on_learr", "Что ты думаешь о Леарр?", function()
             if (rel_jack < 0) then
                 char_wright.on_learr = 1;
                 return [[Джек отказывается отвечать: "Не хочу это обсуждать".]];
             else
                 char_wright.on_learr = 2;
                 return [[Джек отвечает: "Я не так много с ней общался, однако, она производит приятное впечатление. Там в Игнисе она спрашивала меня про Атлантиду и Левиафан достаточно интересные вещи. Мне кажется, из нее бы вышел неплохой инженер".]];
             end;
         end};
         {tag="on_leviathan", "Как впечатления от Левиафана?", function()
             if (rel_jack < 0) then
                 char_wright.on_leviathan = 1;
                 return [[Джек отвечает: "Левиафан, без сомнения, превосходный корабль. Жаль, что ему не нашлось лучшего капитана". ]];
             else
                 char_wright.on_leviathan = 2;
                 return [[Джек не скрывает своего восхищения: "Никогда не видел ничего подобного. Неудивительно, что отец оставил жизнь на поверхности в пользу возможности создавать подобное здесь. Пока мы были в пути, я подробно изучил субмарину. Многие решения до сих пор кажутся мне невероятными, например, использование электричества в качестве движущей силы или звуковая пушка. Я уже успел обсудить с отцом детали диагностических цепей. Это совершенно непостижимо, чтобы машина сама сообщала, что с ней что-то не так. И все это в одном месте". ]];
             end;
         end};
         {tag="on_jack", "Чем ты занимался все это время?", function()
             if (rel_jack < 0) then
                 return [[Джек отказывается отвечать: "Не хочу это обсуждать".]];
             else
                 return [[Джек отвечает: "Да, в общем-то, ничем. Отец оставил нам с матерью достаточно денег, чтобы мы могли ни в чем не нуждаться. Мать оплатила мое образование в том же университете, где учился отец. Получив диплом с отличием, я просто поставил его на полку. Не нашел дела по душе, да и необходимости не было. Позже, когда мать умерла, я вообще практически прекратил связи с внешним миром. Думаю, что хоть я и бросил идею найти отца, я все-таки продолжал надеяться -- практически все время я посвящал чтению газет со всех уголков света, в поисках известий о случившемся с Вестхейвен Трансоушен. Впрочем, как только первоначальный ажиотаж спал, никто толком и не писал о случившемся. "]];
             end;
         end};
         {"Вернемся к делу", [[Джек молча кивает. ]], code [[ pret(); ]]};
         {tag = "ignis"};
         {"Да.", [[Джек кивает: "Тогда ты и без меня все знаешь. Я думаю, все трое подозреваемых замешаны, но не хочу лезть в это дело". ]], code [[ pret(); ]]};
         {"Нет.", [[Джек на мгновение задумался. Потом снова заговорил: "Я не должен тебе этого говорить, наверное. Но все же. Даркстар подозревает Голдмана, Леруа и Джонса -- они все трое, вроде как, достаточно знают об устройстве станции и, опять же, все трое активно выступают за закрытие станции и возвращение на поверхность. От себя скажу, что не удивлюсь, если все трое в сговоре, но не буду судить поспешно". ]], code [[ pret(); ]]};
 	};
 };
 char_legrand_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Мари Легран";
 	disp = "Мари Легран";
 	enter = function(s)
         poff("tube_spec");
         if (atl_nih_state == 1 and not have(atl_item_tube_spec)) then
             pon("tube_spec");
         end;
 		if (s.state == 0) then
 			s.state = 1;
 			psub("first_meeting");
 			return [[Перед вами, склонившись над какой-то книгой, сидит женщина лет сорока--сорока-пяти. Длинные темные волосы убраны в хвост. На носу очки в тяжелой оправе. Не обращая внимания на вас, она продолжает водить пальцем по строчкам, периодически делая какие-то пометки. ]];
 		else
 			psub("generic");
 			return [[Не обращая внимания на вас, Мари Легран продолжает водить пальцем по строчкам, периодически делая какие-то пометки. ]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting"};
 		{"Извините?", [[Женщина поднимает голову и отрывается от работы. Она выпрямляется и улыбаясь приветствует вас: "Добро пожаловать в библиотеку Атлантиды. Я Мари Легран". ]], code [[psub("first_meeting_2"); ]]};
 		{tag="first_meeting_2"};
 		{"Я Дэвид Дрейк, рад знакомству.", [[Она кивает и спрашивает вас: "Как вы нашли Левиафан?"]], code [[psub("first_meeting_3"); ]]};
 		{tag="first_meeting_3"};
 		{"Это долгая история.", [[Мари Легран кивает: "Хорошо, тогда в другой раз".]], [[ psub("generic") ]]};
 		{"Я нашел тайник отца со старыми схемами. Пришлось побегать, чтобы восстановить субмарину. Я чудом собрал все необходимое.", [[Мари Легран удивленно смотрит на вас: "Поразительно. Скорее всего Уильям хотел, чтобы вы нашли Левиафан. Жаль, что вы прибыли слишком поздно. Когда он узнал про этот древний город, он собрал несколько помощников и отправился на Надежде на его поиски". ]], code [[ pon("father_more", "ancient_city");psub("generic"); ]]};
 		{tag="generic"};
         {tag="tube_spec", false, "Мне нужна документация по системам воздуховодов.", [[Мари Легран удивленно спрашивает: "Райт просил? Удачи в изучении", -- и кладет на стол перед вами толстую книжицу. ]], code [[ take(atl_item_tube_spec); ]]};
 		{tag="father_more", false, "Кто отправился вместе с моим отцом?", [[Мари Легран отвечает: "Немногие. Они вообще хотел отправиться вдвоем с Блэком, но Блэк уговорил Уильяма взять Джона Брауна и Антонио Гарсия". ]], code [[psub("more_people");]]};
         {tag="ancient_city", false, "Какой еще город?", [[Мари Легран отвечает: "Да, вы же не в курсе. Лсэрианотр, или как-то так. Древний навьярский город по легенде скрывает какое-то древнее знание, которое, как и всегда в легендах, сторожит непобедимое чудовище. Дрейк и Блэк, вроде как, сумели найти какие-то карты, якобы указывающие путь к этому городу". ]]};
 		{always=true, "Я пойду.", [[Мари Легран возвращается к книге, прощаясь с вами: "Приходите еще".]], code [[ back(); ]]};
 		{tag="more_people"};
 		{"Расскажите больше об Адриане Блэке.", [[Мари Легран рассказывает: "Блэк -- заместитель Дрейка. По-крайней мере, официально он занимал именно эту должность. По факту, он был близким другом вашего отца и компанией они управляли вместе". ]]};
 		{"Расскажите больше о Джоне Брауне.", [[Мари Легран рассказывает: "У Джона золотые руки, наверное, именно поэтому Дрейк взял в экспедицию именно его". ]]};
 		{"Расскажите больше о Антонио Гарсии.", [[Мари Легран рассказывает: "Талантливый молодой человек. Он хорошо знает язык навьяров и много с ними общался". ]]};
 		{"Поговорим в другой раз.", [[Мари Легран кивает: "Хорошо".]], code [[pret();]]};
 	};
 };
 char_radcliffe_atlantis_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Уолтер Рэдклифф";
 	disp = "Уолтер Рэдклифф";
     reset_more = function(s)
         poff("on_anna", "on_walter", "on_atlantis", "on_drake", "on_black", "on_join", "talk");
         if (rel_walter < 0) then
             pon("talk");
         else
             if (char_radcliffe.on_anna < 2) then
                 pon("on_anna");
                 pon("talk");
             end;
             if (char_radcliffe.on_black < 2) then
                 pon("on_black");
                 pon("talk");
             end;
             if (char_radcliffe.on_walter < 2) then
                 pon("on_walter");
                 pon("talk");
             end;
             if (char_radcliffe.on_atlantis < 2) then
                 pon("on_atlantis");
                 pon("talk");
             end;
             if (char_radcliffe.on_drake < 2) then
                 pon("on_drake");
                 pon("talk");
             end;
             if (char_radcliffe.on_join < 2) then
                 pon("on_join");
                 pon("talk");
             end;
         end;
     end;
 	enter = function(s)
         s:reset_more();
         poff("on_leroy_in_terra");
         if atl_mtr_ask_radcliffe and not atl_mtr_know_leroy_in_terra then
             pon("on_leroy_in_terra");
         end;
 		if (s.state == 0) then
 			s.state = 1;
 			psub("first_meeting");
 			return [[Перед вами стоит человек лет сорока--сорока-пяти, одетый в рабочий халат. Как только вы входите, он протягивает вам руку: "Добро пожаловать, господин Дрейк. Уолтер Рэдклифф, инженер". ]];
 		else
 			psub("generic");
 			return [[Уолтер Рэдклифф приветствует вас: "Добрый день". ]];
 		end;
 	end;
 	phr = {
         {tag="questions"};
         {tag="on_black", "Что ты можешь сказать о Блэке?", function(s)
             char_radcliffe.on_black = 2;
             return [[Уолтер пожимает плечами: "Что я могу сказать про него? Он хороший друг Дрейка и вполне искренне радеет за благополучие нашей миссии. Однако, я думаю, его истинные цели могут отличаться от наших". ]];
         end};
         {tag="on_walter", "Расскажи о себе.", function(s)
             char_radcliffe.on_walter = 2;
             return [[Уолтер пожимает плечами: "Да мне нечего рассказать. Мы с сестрой жили в Лондоне, я уже работал в Вестхейвен Трансоушен, когда наши родители погибли -- пароход, на котором они отправились в США просто не прибыл в порт назначения. Мы с Анной остались одни. Она еще даже школу не закончила тогда. А потом мы построили Надежду, Атлантиду и далее по списку. Потом мне предложили работать внизу, на станции. Я, конечно, мог тогда отказаться, уйти в другую компанию, но направление, избранное Дрейком слишком меня привлекало. Я согласился". ]];
         end};
         {tag="on_anna", "Расскажи о своей сестре, Анне.", function(s)
             char_radcliffe.on_anna = 2;
             return [[Уолтер вздыхает: "Будь у меня выбор тогда, я ни за что не взял бы ее на Атлантиду. И жалел бы сейчас об этом. Не думаю, что на поверхности она стала бы той, кто она сейчас. Все-таки общество поглощенных своей работой людей накладывает определенный отпечаток, я думаю". ]];
         end};
         {tag="on_drake", "Что ты можешь сказать о Дрейке?", function(s)
             char_radcliffe.on_drake = 2;
             return [[Уолтер отвечает: "Не думаю, что скажу про него больше чем кто-то еще. Послушайте Райта, Моро, быть может Даркстара, хотя черт знает, что у этого типа на уме. Они скажут вам все и даже больше. "]];
         end};
         {tag="on_atlantis", "Что ты думаешь об Атлантиде?", function(s)
             char_radcliffe.on_atlantis = 2;
             return [[Уолтер отвечает: "Думаю только Райт и Уинтерлайт в полной мере осознают, насколько большим достижением для нас, для всего человечества, является постройка этой станции. Тем не менее, они, отчего-то, не спешат поделиться своими знаниями с другими. Не думаю, что сегодняшнее общество сможет по достоинству оценить новые возможности, даруемые этими технологиями. Да и что станет с навьярами? Вспомните Новый Свет, посмотрите на другие наши колонии -- хотите ли вы этого для Леарр и других?"]];
         end};
         {tag="quit", always=true, "Поговорим в другой раз. ", [[Уолтер кивает: "Хорошо".]], code [[ char_radcliffe_atlantis_dlg:reset_more(); pret();]]};
 		{tag = "first_meeting"};
 		{"[Пожать руку] Рад знакомству.", [[
 			"Мы с Майклом вместе работали над Левиафаном. Многие решения в вашей субмарине -- мои. Если вы не против, я хотел бы продолжить путешествие вместе с вами. Во-первых, вам пригодится мой опыт, а во-вторых, я хочу увидеть Левиафан в деле".
 		]], code [[
 			rel_walter = rel_walter + 1;
 			psub("leviathan");
 		]]};
 		{"Рад знакомству.", [[
 			Уолтер убирает руку и продолжает: "Я думаю, вы не просто так пришли. Спрашивайте".
 		]], code [[
 			psub("generic");
 		]]};
 		{"[Промолчать]", [[
 			Уолтер убирает руку и продолжает: "Я думаю, вы не просто так пришли. Спрашивайте".
 		]], code [[
 			rel_walter = rel_walter - 1;
 			psub("generic");
 		]]};
 		{tag = "leviathan"};
 		{"Интересно, и что вы можете рассказать о Левиафане?", [[Уолтер снимает очки, убирая их в нагрудный карман: "Левиафан строился как Надежда -- для дальних путешествий и максимальной автономности. После успеха предыдущих субмарин, Райт решил сделать Левиафан заметно крупнее этих кораблей. Сверхмощная батарея обеспечивает субмарину энергией более месяца при максимальных оборотах двигателей. Также есть паровой двигатель -- он используется не только для движения, но и генерирует электричество. До Левиафана мы не экспериментировали с этим". ]]};
 		{"Вы знаете, куда отправился мой отец отсюда?", [[Уолтер отрицательно качает головой: "Не больше, чем остальные на станции". ]]};
 		{"Буду рад, если вы присоединитесь к нам. ", [[Уолтер улыбается: "Отлично. Но вы ведь, еще поговорить хотите?" ]], code [[ psub("generic");]]};
 		{"Я не думаю, что вы поможете. ", [[Уолтер разводит руками: "Очень жаль. Впрочем, у вас есть время подумать. Насколько я знаю, Даркстар и Моро собираются держать вас здесь какое-то время". ]], code [[ psub("generic");]]};
 		{tag = "generic"};
         {tag="on_leroy_in_terra", false, "Райт сказал, что вы были в Терре во время обслуживания Солиса. Вы не видели, кто входл в секцию?", [[Уолтер пожимает плечами: "Я думал, что я один в Терре, но мне попался Мишель. Он сказал, что пришел за инструментами для ремонта скафандров. Правда в Доминус он ушел почему-то с пустыми руками". ]], code [[atl_mtr_know_leroy_in_terra=true;]]};
         {tag="questions", "У меня есть несколько вопросов. ", function(s)
             if (rel_anna < 0) then
                 return [[Уолтер отрицательно качает головой: "Не сейчас, я занят". ]];
             else
                 psub("questions");

atlantis_ignis.lua

➞

Show inline comments

 atl_ignis_main_center = room {
 	nam = "Атлантида, Игнис, у лифта";
     dsc = [[Вы в центре огромного круглого зала. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана и проплывающих над вами рыб. Рядом с вами расположена шахта лифта. В юго-западной, южной, юго-восточной, северо-восточной и северной частях зала расположены шлюзовые двери. ]];
 	way = {
 		vroom("В лифт", "atl_dom_lift");
 		vroom("На север", "atl_ignis_main_toa");
 		vroom("На юго-запад", "atl_ignis_main_toc");
 		vroom("На юго-восток", "atl_ignis_main_tob");
 		vroom("На юг", "atl_ignis_main_emex");
 		vroom("На северо-запад", "atl_ignis_main_nw_wall");
 		vroom("На северо-восток", "atl_ignis_main_tos");
 	};
 };
 atl_ignis_main_emex = room {
 	nam = "Атлантида, Игнис, у аварийного выхода";
 	dsc = [[Вы находитесь в южной части огромного круглого зала, рядом со шлюзом аварийного выхода. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана и проплывающих над вами рыб. ]];
 	way = {
 		kh_vroom("В шлюз", function()
 			pr("Вам там нечего делать. ");
 			return false;
 		end);
 		vroom("На север", "atl_ignis_main_center");
 		vroom("На запад", "atl_ignis_main_toc");
 		vroom("На восток", "atl_ignis_main_tob");
 	};
 };
 atl_ignis_main_toc = room {
 	nam = "Атлантида, Игнис, у входа в зал C";
 	dsc = [[Вы находитесь в юго-западной части огромного круглого зала, рядом со входом в зал C. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана и проплывающих над вами рыб. ]];
 	way = {
 		kh_vroom("В зал C", function()
 			pr("Дверь заклинило");
 			return false;
 		end);
 		vroom("На северо-восток", "atl_ignis_main_center");
 		vroom("На север", "atl_ignis_main_nw_wall");
 		vroom("На восток", "atl_ignis_main_emex");
 	};
 };
 atl_ignis_main_nw_wall = room {
 	var {
 		seen = 0;
 	};
 	nam = "Атлантида, Игнис, у стены";
 	dsc = [[Вы находитесь в северо-западной части огромного круглого зала. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана и проплывающих над вами рыб. ]];
 	way = {
 		vroom("На юго-восток", "atl_ignis_main_center");
 		vroom("На юг", "atl_ignis_main_toc");
 		vroom("На восток", "atl_ignis_main_toa");
 	};
 	obj = {
 		'atl_ignis_main_nw_wall_panel';
 	};
 };
 atl_ignis_main_nw_wall_panel = obj {
 	nam = "Щиток";
 	dsc = [[В стену вмонтирован {электрический щиток}. Сейчас он открыт. ]];
 };
 atl_ignis_main_toa = room {
 	nam = "Атлантида, Игнис, у входа в зал A";
 	dsc = [[Вы находитесь в северо-западной части огромного круглого зала, рядом со входом в зал A. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана и проплывающих над вами рыб. ]];
 	way = {
 		vroom("В зал A", "atl_ignis_hall_a");
 		vroom("На юг", "atl_ignis_main_center");
 		vroom("На запад", "atl_ignis_main_nw_wall");
 		vroom("На восток", "atl_ignis_main_tos");
 	};
 };
 atl_ignis_main_tos = room {
 	nam = "Атлантида, Игнис, у входа в служебное помещение";
 	dsc = [[Вы находитесь в северо-восточной части огромного круглого зала, рядом со входом в служебное помещение. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана и проплывающих над вами рыб. ]];
 	way = {
 		kh_vroom("В служебное помещение", function()
 			pr("Вам там нечего делать сейчас");
 			return false;
 		end);
 		vroom("На юго-запад", "atl_ignis_main_center");
 		vroom("На юг", "atl_ignis_main_tob");
 		vroom("На запад", "atl_ignis_main_toa");
 	};
 };
 atl_ignis_main_tob = room {
 	nam = "Атлантида, Игнис, у входа в зал B";
 	dsc = [[Вы находитесь в юго-западной части огромного круглого зала, рядом со входом в зал B. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана и проплывающих над вами рыб. ]];
 	way = {
 		kh_vroom("В зал B", function()
 			pr("Дверь заклинило");
 			return false;
 		end);
 		vroom("На северо-запад", "atl_ignis_main_center");
 		vroom("На север", "atl_ignis_main_tos");
 		vroom("На запад", "atl_ignis_main_emex");
 	};
 };
 atl_ignis_hall_a = room {
 	nam = "Атлантида, Игнис, зал А";
 	enter = function(s)
 		if (seen(char_learr_atlantis, atl_ignis_hall_a) and ArrayUtils.indexOf(pl.party, 'wright') ~= 0) then
 			if (where(char_jack_wright_atlantis) ~= atl_ignis_hall_a) then
+			if (where(char_jack_wright_atlantis) ~= atl_ignis_hall_a and char_jack_wright_atlantis_dlg.state == 0) then
 				put('char_jack_wright_atlantis', 'atl_ignis_hall_a');
 			end;
 		end;
 	end;
 	dsc = [[Средних размеров прямоугольный зал погружен во тьму. ]];
 	obj = {
 		'atl_ignis_illuminator';
 		'atl_ignis_screen';
 		'atl_ignis_projector';
 		--'atl_ignis_lightswitch';
 	};
 	way = {
 		vroom("В коридор", "atl_ignis_main_toa");
 	};
 };
 atl_ignis_illuminator = obj {
 	var {
 		state = 1;
 	};
 	nam = "Иллюминатор";
 	dsc = function(s)
 		if (s.state == 1) then
 			return [[Огромное панорамное {окно} открывает великолепный вид на океан вокруг. ]];
 		else
 			return [[Металлические жалюзи скрывают огромное панорамное {окно}. ]];
 		end;
 	end;
 	act = function(s)
 		if (s.state == 1) then
 			s.state = 0;
 			return [[Вы дергаете рычаг рядом с окном и металлические жалюзи со скрежетом закрывают его, полностью блокируя проникновение света извне. ]];
 		else
 			s.state = 1;
 			return [[Вы дергаете рычаг рядом с окном и металлические жалюзи со скрежетом отъезжают в стороны, открывая его. ]];
 		end;
 	end;
 };
 atl_ignis_screen = obj {
 	nam = "Экран";
 	dsc = function(s)
 		return [[На одной из стен закреплен экран. ]];
 	end;
 };
 atl_ignis_projector = obj {
 	var {
 		state = 0;
 	};
 	nam = "Проектор";
 	dsc = function(s)
 		if (s.state == 0) then
 			return [[{Проектор} готов к работе. ]];
 		else
 			return [[{Проектор} не работает. ]];
 		end;
 	end;
 	act = function(s)
 		if (s.state == 0) then
 			s.state = 1;
 			return [[Вы включаете проектор, однако он не работает. ]];
 		elseif (s.state == 1) then
 			s.state = 2;
 			return [[Вы выключаете проектор. ]];
         else
             return [[Проектор не работает. ]];
 		end;
 	end;
 };
@@ \ No newline at end of file @@

0 comments (0 inline, 0 general)