games/Awakening Changeset - 1245f1359474

Changeset - 1245f1359474

Parent rev.

Child rev.

[Not reviewed]

default

0 2 0

Silverwing - 6 years ago 2018-12-22 14:37:58

Chapter 1: stupid text errors

2 files changed with 2 insertions and 2 deletions:

atlantis.lua

atlantis_dlg.lua

0 comments (0 inline, 0 general)

atlantis.lua

➞

Show inline comments

@@ @@ -116,1312 +116,1312 @@ atl_aqua_leviathan_dock = room { @@
         char_learr:accompany(false);
         char_radcliffe:accompany(false);
         char_anna:accompany(false);
         char_wright:accompany(false);
         if (not s.visited) then
             s.visited = true;
             walk(atlantis_intro_dock);
         end;
         if (atl_iyh_state == 8) then
             atl_iyh_state = 9;
             if atl_iyh_shockfish_dead then
                 walk('iyh_outro_learr_shockfish_dead');
             elseif atl_iyh_entrance_destroyed then
                 walk('iyh_outro_learr_temple_destroyed');
             else
                 walk('iyh_outro_learr');
             end;
         end;
     end;
     dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Левиафан. Под потолком, на высоте примерно в пять метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Снизу, под водой, огромный люк закрывает доступ внутрь дока. Несколько легких подвижных мостиков находятся на поверхности воды. ]];
     view = [[Левиафан находится в просторном доке. Под потолком на высоте пяти метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Внизу расположен закрытый люк, закрывающий вам путь наружу. ]];
     way = {
         kh_vroom("В Левиафан", "leviathan_airlock");
         kh_vroom("В коридор B", "atl_aqua_corridor_b");
     };
 };
 atl_aqua_nautilus_dock = room {
     nam = "Атлантида, Аква, док Наутилуса";
     dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус. Под потолком, на высоте примерно в пять метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Снизу, под водой, огромный люк закрывает доступ внутрь дока. Несколько легких подвижных мостиков находятся на поверхности воды. ]];
     way = {
         kh_vroom("В коридор A", "atl_aqua_corridor_a");
     };
     obj = {
         "char_page"
     };
 };
 atl_aqua_corridor_a = room {
     nam = "Атлантида, Аква, коридор A";
     dsc = [[Широкий коридор, заполненный ярким светом электрических ламп. В одном конце коридора расположена шлюзовая дверь, ведущая в основной коридор секции _"Аква"_. По бокам коридора находятся еще несколько дверей, ведущих к докам. ]];
     way = {
         kh_vroom("В док \"Надежды\"", function()
             pr("Люк наглухо задраен. Вы не сможете его открыть. ");
             return false;
         end);
         kh_vroom("В док \"Энтерпрайза\"", function()
             pr("Люк наглухо задраен. Вы не сможете его открыть. ");
             return false;
         end);
         kh_vroom("В док \"Наутилуса\"", "atl_aqua_nautilus_dock");
         kh_vroom("В главный коридор", "atl_aqua_main_corridor");
     };
     obj = {
         "atl_illuminators",
         "atl_nih_tubes_aqua_a"
     };
 };
 atl_aqua_main_corridor = room {
     nam = "Атлантида, Аква, центральный коридор";
     dsc = [[Широкий коридор, заполненный ярким светом электрических ламп. В одном конце коридора расположена шлюзовая дверь, ведущая, в секцию _"Доминус"_. По бокам коридора находятся еще несколько дверей, ведущих в другие помещения секции -- по большей части это склады. Еще две двери ведут в коридоры A и B. ]];
     way = {
         kh_vroom("На склад A", function()
             pr("Люк наглухо задраен. Вы не сможете его открыть. ");
             return false;
         end);
         kh_vroom("На склад B", function()
             if atl_nih_state == 1 or atl_nih_state == 2 then
                 return "atl_aqua_warehouse_b";
             else
                 pr("Люк наглухо задраен. Вы не сможете его открыть. ");
                 return false;
             end;
         end);
         kh_vroom("На склад C", function()
             pr("Люк наглухо задраен. Вы не сможете его открыть. ");
             return false;
         end);
         kh_vroom("На склад D", function()
             pr("Люк наглухо задраен. Вы не сможете его открыть. ");
             return false;
         end);
         kh_vroom("В коридор A", "atl_aqua_corridor_a");
         kh_vroom("В коридор B", "atl_aqua_corridor_b");
         kh_vroom("В секцию \"Доминус\"", "atl_intersection_aqua_dom");
     };
     obj = {
         "atl_illuminators",
         "atl_nih_tubes_aqua"
     };
 };
 atl_aqua_warehouse_b = darkroom {
     var {
         has_light = false;
     };
     nam = "Атлантида, Аква, склад B";
     dsc_dark = [[Большое помещение без окон погружено в кромешный мрак. В темноте вы с трудом различаете очертания предметов. ]];
     dsc_halflit = [[Слабый свет лампы позволяет вам с трудом ориентироваться в помещении,заставленном различными ящиками. ]];
     dsc_lit = [[Большое помещение без окон освещено яркими лектрическим лампами. По всему помещению аккуратно расставлено множество ящиков с различными материалами, необходимыми для поддержания жизнедеятельности станции. ]];
     way = {
         kh_vroom("В коридор", "atl_aqua_main_corridor", nil, 2);
     };
     obj = {
         "atl_aqua_warehouse_b_lightswitch";
         "atl_nih_tube_container2";
     };
 };
 atl_aqua_warehouse_b_lightswitch = obj {
     nam = "atl_aqua_warehouse_b_lightswitch";
     dsc = [[Рядом со входом расположен {выключатель}. ]];
     seen_level = 2;
     act = function(s)
         atl_aqua_warehouse_b.has_light = not atl_aqua_warehouse_b.has_light;
         if atl_aqua_warehouse_b.has_light then
             return [[Вы щелкаете выключателем и яркий свет электрических ламп заливает помещение. ]];
         else
             return [[Вы щелкаете выключателем и лампы гаснут, погружая помещение в кромешную тьму. ]];
         end;
     end;
 };
 atl_intersection = inherit(room, function(v)
     v.disp = "Атлантида, межсекционный коридор";
     v.dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
     if (not v.obj) then
         v.obj = {};
     end;
     table.insert(v.obj, "atl_illuminator");
     table.insert(v.obj, "atl_intersect_phone");
     table.insert(v.obj, "atl_intersect_suit");
     return v;
 end);
 atl_intersection_aqua_dom = atl_intersection {
     nam = "Атлантида, межсекционный коридор";
     way = {
         kh_vroom("В секцию \"Аква\"", "atl_aqua_main_corridor");
         kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_aqua");
     };
 };
 atl_dom_main_near_aqua = room {
     nam = "Атлантида, Доминус, центральный зал, у входа в секцию Аква";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами расположен шлюз, ведущий в соседнюю секцию. ]];
     way = {
         kh_vroom("В секцию \"Аква\"", "atl_intersection_aqua_dom");
         kh_vroom("По часовой стрелке", "atl_dom_main_near_adm");
         kh_vroom("Против часовой стрелки", "atl_dom_main_near_a");
         kh_vroom("К центру зала", "atl_dom_main_c");
     };
     obj = {
         -- TODO добавить скамейки, табличку секции Аква
         "atl_nih_tubes_near_aqua"
     };
 };
 atl_dom_main_near_a = room {
     nam = "Атлантида, Доминус, центральный зал, у входа в коридор А";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Вы находитесь в северной части зала. Рядом с вами расположен шлюз, ведущий в коридор А. ]];
     way = {
         kh_vroom("В коридор A", "atl_dom_corridor_a");
         kh_vroom("По часовой стрелке", "atl_dom_main_near_aqua");
         kh_vroom("Против часовой стрелки", "atl_dom_main_near_luna");
         kh_vroom("К центру зала", "atl_dom_main_c");
     };
     obj = {
         -- TODO добавить табличку
         "atl_nih_panel_near_a"
     };
 };
 atl_dom_main_c = room {
     nam = "Атлантида, Доминус, центральный зал, центр";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Вы находитесь в центральной части зала, рядом с лифтом, ведущим в Игнис. ]];
     way = {
         kh_vroom("В лифт", "atl_dom_lift");
         kh_vroom("К секции Аква", "atl_dom_main_near_aqua");
         kh_vroom("К кабинету администратора", "atl_dom_main_near_adm");
         kh_vroom("К секции Арктос", "atl_dom_main_near_arctos");
         kh_vroom("К секции Терра", "atl_dom_main_near_terra");
         kh_vroom("К секции Окулус", "atl_dom_main_near_oculus");
         kh_vroom("К секции Луна", "atl_dom_main_near_luna");
         kh_vroom("К коридору А", "atl_dom_main_near_a");
     };
     obj = {
         -- TODO добавить скамейки
     };
 };
 atl_dom_main_near_adm = room {
     nam = "Атлантида, Доминус, центральный зал, у входа в кабинет администратора";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в кабинет администратора. ]];
     way = {
         kh_vroom("В кабинет администратора", "atl_dom_administator_room");
         kh_vroom("По часовой стрелке", "atl_dom_main_near_arctos");
         kh_vroom("Против часовой стрелки", "atl_dom_main_near_aqua");
         kh_vroom("К центру зала", "atl_dom_main_c");
     };
     obj = {
         -- TODO добавить скамейки, воздуховоды
         "atl_nih_panel_near_admin"
     };
 };
 atl_dom_main_near_luna = room {
     nam = "Атлантида, Доминус, центральный зал, у входа в секцию Луна";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в секцию "Луна". ]];
     way = {
         kh_vroom("В секцию \"Луна\"", "atl_intersection_luna_dom");
         kh_vroom("По часовой стрелке", "atl_dom_main_near_a");
         kh_vroom("Против часовой стрелки", "atl_dom_main_near_oculus");
         kh_vroom("К центру зала", "atl_dom_main_c");
     };
     obj = {
         "atl_nih_panel_near_luna"
     };
 };
 atl_dom_main_near_oculus = room {
     nam = "Атлантида, Доминус, центральный зал, у входа в секцию Окулус";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в секцию "Окулус". ]];
     way = {
         kh_vroom("В секцию \"Окулус\"", "atl_intersection_oculus_dom");
         kh_vroom("По часовой стрелке", "atl_dom_main_near_luna");
         kh_vroom("Против часовой стрелки", "atl_dom_main_near_terra");
         kh_vroom("К центру зала", "atl_dom_main_c");
     };
     obj = {
         "atl_nih_boxes_near_oculus"
     };
 };
 atl_dom_main_near_terra = room {
     nam = "Атлантида, Доминус, центральный зал, у входа в секцию Терра";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в секцию "Терра". ]];
     way = {
         kh_vroom("В секцию \"Терра\"", "atl_intersection_terra_dom");
         kh_vroom("По часовой стрелке", "atl_dom_main_near_oculus");
         kh_vroom("Против часовой стрелки", "atl_dom_main_near_arctos");
         kh_vroom("К центру зала", "atl_dom_main_c");
     };
     obj = {
         "atl_nih_boxes_near_terra"
     };
 };
 atl_dom_main_near_arctos = room {
     nam = "Атлантида, Доминус, центральный зал, у входа в секцию Арктос";
     dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в секцию "Арктос". ]];
     way = {
         kh_vroom("В секцию \"Арктос\"", "atl_intersection_arctos_dom");
         kh_vroom("По часовой стрелке", "atl_dom_main_near_terra");
         kh_vroom("Против часовой стрелки", "atl_dom_main_near_adm");
         kh_vroom("К центру зала", "atl_dom_main_c");
     };
     obj = {
         "atl_nih_tubes_near_arctos"
     };
 };
 atl_dom_corridor_a = room {
     nam = "Атлантида, Доминус, коридор A";
     dsc = [[Просторный коридор, расположенный в западном крыле секции Доминус, заполнен ярким светом электрических ламп. В одном конце коридора расположена дверь, ведущая в главный зал. Две другие ведут в оружейную и кабинет начальника службы безопасности. ]];
     way = {
         kh_vroom("В кабинет начальника СБ", "atl_dom_security_office");
         kh_vroom("В оружейную", function()
             pr("Люк наглухо задраен и опечатан. Вы не сможете его открыть. ");
             return false;
         end);
         kh_vroom("В центральный зал", "atl_dom_main_near_a");
     };
 };
 atl_dom_security_office = room {
     nam = "Атлантида, Доминус, кабинет начальника СБ";
     dsc = [[Спартанская обстановка кабинета начальника службы безопасности сразу бросается вам в глаза. небольшая комната почти пуста. Здесь нет ничего кроме массивного металлического стола в центре и двух кресел по разные стороны его. ]];
     way = {
         kh_vroom("В коридор", "atl_dom_corridor_a");
     };
     obj = {
         'char_darkstar'
     };
 };
 atl_dom_administator_room = room {
     nam = "Атлантида, Доминус, кабинет администратора";
     dsc = [[Кабинет администратора представляет собой небольшую комнату. Вдоль стен установлено несколько шкафов с какими-то бумагами. В центре расположен металлический стол.
     ]];
     way = {
         kh_vroom("В центральный зал", "atl_dom_main_near_adm");
     };
     obj = {
         'char_moreau'
     };
 };
 atl_intersection_luna_dom = room {
     nam = "Атлантида, межсекционный коридор";
     dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
     way = {
         kh_vroom("В секцию \"Луна\"", "atl_luna_main_corridor");
         kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_luna");
     };
     obj = {
         "atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
     };
 };
 atl_intersection_arctos_dom = room {
     nam = "Атлантида, межсекционный коридор";
     dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
     way = {
         kh_vroom("В секцию \"Арктос\"", "atl_arctos_main_corridor");
         kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_arctos");
     };
     obj = {
         "atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
     };
 };
 atl_luna_main_corridor = room {
     var {
         state = 0;
     };
     nam = "Атлантида, Луна, главный коридор";
     dsc = [[Узкий длинный коридор c дверьми, ведущими в комнаты персонала, по сторонам. Яркий свет электрических ламп заполняет помещение. ]];
     entered = function(s)
         if (s.state == 0) then
             s.state = 1;
             if (where(char_jack_wright_atlantis) == atl_luna_jack_room) then
                 path("В комнату Джека"):enable();
             end;
         end;
     end;
     way = {
         kh_vroom("В вашу комнату", "atl_luna_drake_room");
         kh_vroom("В комнату Джека", "atl_luna_jack_room"):disable();
         kh_vroom("В общую комнату", "atl_luna_common_room");
         kh_vroom("В секцию \"Доминус\"", "atl_intersection_luna_dom");
     };
     obj = {
         "atl_illuminators",
         "atl_nih_tubes_luna"
     };
 };
 atl_luna_jack_room = room {
     nam = "Атлантида, Луна, комната Джека";
     dsc = [[небольшая уютная комната, рассчитанная на двух человек. ]];
     way = {
         kh_vroom("В главный коридор", "atl_luna_main_corridor");
     };
     obj = {
         "atl_illuminators"
     };
 };
 atl_luna_drake_room = room {
     nam = "Атлантида, Луна, ваша комната";
     dsc = [[Небольшая, но уютная комната, выделенная вам на Атлантиде. Хотя она рассчитана на двух человек, пока нет необходимости расселять людей по двое. ]];
     way = {
         kh_vroom("В главный коридор", "atl_luna_main_corridor");
     };
     obj = {
         "atl_illuminators"
     };
 };
 atl_arctos_main_corridor = room {
     nam = "Атлантида, Арктос, главный коридор";
     dsc = [[Узкий длинный коридор c дверьми, ведущими в комнаты персонала, по сторонам. Яркий свет электрических ламп заполняет помещение. ]];
     way = {
         kh_vroom("В комнату Голдмана", function(s)
             if goldman_state == 0 then
                 return "atl_arctos_goldmans_room";
             else
                 p([[Заперто. ]]);
                 return false;
             end;
         end);
         kh_vroom("В комнату Джонса", "atl_arctos_jones_room");
         kh_vroom("В общую комнату", "atl_arctos_common_room");
         kh_vroom("В секцию \"Доминус\"", "atl_intersection_arctos_dom");
     };
     obj = {
         "atl_illuminators",
         "atl_nih_tubes_arctos"
     };
 };
 atl_arctos_goldmans_room = room {
     nam = "Атлантида, Арктос, комната";
     dsc = [[Небольшая комната, рассчитанная на двух постояльцев. ]];
     way = {
         kh_vroom("В главный коридор", "atl_arctos_main_corridor");
     };
     obj = {
         "char_goldman"
     };
 };
 atl_arctos_jones_room = room {
     nam = "Атлантида, Арктос, комната";
     dsc = [[Небольшая комната, рассчитанная на двух постояльцев. ]];
     way = {
         kh_vroom("В главный коридор", "atl_arctos_main_corridor");
     };
     obj = {
         "char_jones"
     };
 };
 atl_luna_common_room = room {
     nam = "Атлантида, Луна, общая комната";
     dsc = [[Средних размеров комната с массивным металлическим столом в центре. Вокруг него расположено несколько стульев. ]];
     way = {
         kh_vroom("В главный коридор", "atl_luna_main_corridor");
     };
     obj = {
         "atl_illuminators"
     };
 };
 atl_arctos_common_room = room {
     nam = "Атлантида, Луна, общая комната";
     dsc = [[Средних размеров комната с массивным металлическим столом в центре. Вокруг него расположено несколько стульев. ]];
     way = {
         kh_vroom("В главный коридор", "atl_arctos_main_corridor");
     };
     obj = {
         "atl_illuminators"
     };
 };
 atl_intersection_terra_dom = room {
     nam = "Атлантида, межсекционный коридор";
     dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
     way = {
         kh_vroom("В секцию \"Терра\"", "atl_terra_main_corridor");
         kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_terra");
     };
     obj = {
         "atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
     };
 };
 atl_terra_main_corridor = room {
     nam = "Атлантида, Терра, главный коридор";
     dsc = [[Широкий просторный коридор, по обе стороны которого расположены двери, ведущие в мастерские. Вдоль стен стоят множество ящиков. В конце коридора находится дверь, ведущая в одну из технических секций станции. ]];
     way = {
         kh_vroom("В мастерскую A", "atl_terra_workshop_a");
         kh_vroom("В мастерскую B", "atl_terra_workshop_b");
         kh_vroom("В мастерскую C", "atl_terra_workshop_c");
         kh_vroom("В мастерскую D", "atl_terra_workshop_d");
         kh_vroom("В секцию Солис", function()
             if (atl_fta_state == 1) then
                 return "atl_fta_is_terra_solis";
             else
                 pr("Люк наглухо задраен. Вы не сможете его открыть. ");
                 return false;
             end;
         end);
 kh_vroom("В секцию Доминус", "atl_intersection_terra_dom");
     };
     obj = {
         "atl_nih_tube_container";
         "atl_nih_boxes_terra";
     };
 };
 atl_terra_workshop_a = room {
     nam = "Атлантида, мастерская А";
     dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
     way = {
         kh_vroom("В коридор", "atl_terra_main_corridor");
     };
     obj = {
         item_electric_lamp:disable(),
         "char_michael_wright"
     };
 };
 atl_terra_workshop_b = room {
     nam = "Атлантида, мастерская B";
     dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
     way = {
         kh_vroom("В коридор", "atl_terra_main_corridor");
     };
     obj = {
         "char_radcliffe_atlantis"
     };
 };
 atl_terra_workshop_c = room {
     nam = "Атлантида, мастерская C";
     dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
     way = {
         kh_vroom("В коридор", "atl_terra_main_corridor");
     };
     obj = {
         "char_leroy"
     };
 };
 atl_terra_workshop_d = room {
     nam = "Атлантида, мастерская D";
     dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
     way = {
         kh_vroom("В коридор", "atl_terra_main_corridor");
     };
     obj = {
         "item_dynamo";
     };
 };
 atl_intersection_oculus_dom = room {
     nam = "Атлантида, межсекционный коридор";
     dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
     way = {
         kh_vroom("В секцию \"Окулус\"", "atl_oculus_main_corridor");
         kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_oculus");
     };
     obj = {
         "atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
     };
 };
 atl_oculus_main_corridor = room {
     var {
         first_visit = true;
     };
     nam = "Атлантида, Окулус, главный коридор";
     dsc = [[Широкий просторный коридор, по обе стороны которого расположены двери, ведущие в лаборатории. В конце коридора находится дверь, ведущая в одну из технических секций станции. ]];
     enter = function(s)
         if (s.first_visit) then
             s.first_visit = false;
             walkin("atlantis_learr_intro");
         end;
     end;
     way = {
         kh_vroom("В лабораторию A", "atl_oculus_lab_a");
         kh_vroom("В лабораторию B", "atl_oculus_lab_b");
         kh_vroom("В лабораторию C", "atl_oculus_lab_c");
         kh_vroom("В библиотеку", "atl_oculus_library");
         kh_vroom("В секцию Аэрис", function()
             pr("Люк наглухо задраен. Вы не сможете его открыть. ");
             return false;
         end);
         kh_vroom("В секцию Доминус", "atl_intersection_oculus_dom");
     };
     obj = {
         "atl_nih_panel_oculus"
     };
 };
 atl_oculus_lab_a = room {
     nam = "Атлантида, Окулус, лаборатория A";
     dsc = [[Просторное помещение уставлено множеством столов, шкафов и различных приборов. Вдоль стен над столами расположены многочисленные решетки вентиляции. ]];
     way = {
         kh_vroom("В коридор", "atl_oculus_main_corridor");
     };
     obj = {
         "char_svetlova"
     };
 };
 atl_oculus_lab_b = room {
     nam = "Атлантида, Окулус, лаборатория B";
     dsc = [[Просторное помещение уставлено множеством столов, шкафов и различных приборов. Вдоль стен над столами расположены многочисленные решетки вентиляции. ]];
     way = {
         kh_vroom("В коридор", "atl_oculus_main_corridor");
     };
     obj = {
         "char_winterlight"
     };
 };
 atl_oculus_lab_c = room {
     nam = "Атлантида, Окулус, лаборатория C";
     dsc = [[Просторное помещение уставлено множеством столов, шкафов и различных приборов. Вдоль стен над столами расположены многочисленные решетки вентиляции. ]];
     way = {
         kh_vroom("В коридор", "atl_oculus_main_corridor");
     };
     obj = {
         "char_ryveerr",
         "char_anna_atlantis",
         "char_evans"
     };
 };
 atl_oculus_library = room {
     nam = "Атлантида, Окулус, библиотека";
     dsc = [[Рядом со входом в библиотеку расположен небольшой столик, на котором покоится каталог. Практически все пространство комнаты занято высокими стеллажами, заполненными книгами, журналами и документами. ]];
     way = {
         kh_vroom("В коридор", "atl_oculus_main_corridor");
     };
     obj = {
         "char_legrand"
     };
 };
 atl_dom_lift = room {
     var {
         state = 0;
     };
     nam = "Атлантида, лифт";
     dsc = [[Герметичная кабина лифта, рассчитанная на 5-6 человек. ]];
     way = {
         kh_vroom("Выйти", function()
             if (atl_dom_lift.state == 0) then
                 return "atl_dom_main_c";
             else
                 return "atl_ignis_main_center";
             end;
         end);
     };
     obj = {
         "atl_lift_lever"
     };
 };
 atl_lift_lever = obj {
     nam = "Рычаг";
     dsc = [[На стене укреплен массивный {рычаг}, повернув который, вы приведете в движение механизм лифта. ]];
     act = function(s)
         if (atl_dom_lift.state == 1) then
             atl_dom_lift.state = 0;
             return [[Вы поворачиваете рычаг и слышите грохот механизмов, плавно опускающих кабину лифта. ]];
         else
             atl_dom_lift.state = 1;
             return [[Вы поворачиваете рычаг и слышите грохот механизмов, плавно поднимающих кабину лифта. ]];
         end;
     end;
 };
 --[[
 Персонажи
 ]]
 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
+            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 [[{Джеку Райту}, стоящему рядом. ]];
         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);
 atl_nih_tubes_near_terra = atl_nih_tubes_gen("atl_nih_tubes_near_terra", [[Вдоль стены протянуто несколько {труб}, по которым подается воздух. ]], "NF", 15, 9);
 atl_nih_tubes_near_arctos = atl_nih_tubes_gen("atl_nih_tubes_near_arctos", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "KT", 13, 7);
 atl_nih_tubes_oculus = atl_nih_tubes_gen("atl_nih_tubes_oculus", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "NF", 9, 8);
 atl_nih_tubes_terra = atl_nih_tubes_gen("atl_nih_tubes_terra", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]], "NF", 12, 6);
 atl_nih_tubes_luna = atl_nih_tubes_gen("atl_nih_tubes_luna", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "KT", 11, 5);
 atl_nih_tubes_arctos = atl_nih_tubes_gen("atl_nih_tubes_arctos", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "KT", 11, 7);
 atl_nih_tubes_aqua = atl_nih_tubes_gen("atl_nih_tubes_aqua", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "TQ", 11, 7);
 atl_nih_tubes_aqua_a = atl_nih_tubes_gen("atl_nih_tubes_aqua_a", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "TQ", 14, 4);
 atl_nih_tubes_aqua_b = atl_nih_tubes_gen("atl_nih_tubes_aqua_b", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]], "TQ", 10, 5);
 atl_nih_panel_near_a = obscured_obj("atl_nih_panel_near_a", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_near_a", true);
 atl_nih_panel_near_admin = obscured_obj("atl_nih_panel_near_admin", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_near_admin", true);
 atl_nih_panel_near_luna = obscured_obj("atl_nih_panel_near_luna", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_near_luna", true);
 atl_nih_panel_oculus = obscured_obj("atl_nih_panel_oculus", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_oculus", true);
 atl_nih_boxes_near_oculus = obscured_obj("atl_nih_boxes_near_oculus", [[За грудой {ящиков}, вы замечаете несколько труб подачи воздуха. ]], [[Вы сдвигаете несколько ящиков, открывая себе доступ к трубам. ]], "atl_nih_tubes_near_oculus", false, [[У стены расположена груда ящиков. ]], [[Вам незачем что-то еще здесь делать. ]]);
 atl_nih_boxes_near_terra = obscured_obj("atl_nih_boxes_near_terra", [[За грудой {ящиков}, вы замечаете несколько труб подачи воздуха. ]], [[Вы сдвигаете несколько ящиков, открывая себе доступ к трубам. ]], "atl_nih_tubes_near_terra", false, [[У стены расположена груда ящиков. ]], [[Вам незачем что-то еще здесь делать. ]]);
 atl_nih_boxes_terra = obscured_obj("atl_nih_boxes_terra", [[За грудой {ящиков}, вы замечаете несколько труб подачи воздуха. ]], [[Вы сдвигаете несколько ящиков, открывая себе доступ к трубам.
 ]], "atl_nih_tubes_terra", false, [[У стены расположена груда ящиков. ]], [[Вам незачем что-то еще здесь делать. ]]);
 atl_nih_tube_container = obj {
     nam = "atl_nih_tube_container";
     dsc = [[Крышка одного из {ящиков} снята и вы видите внутри несколько труб. ]];
     act = function (s)
         walkin("atl_nih_tube_container_inv");
     end;
 };
 atl_nih_tube_container2 = obj {
     nam = "atl_nih_tube_container2";
     dsc = [[У одной из стен аккуратно сложены несколько {труб}. ]];
     act = function (s)
         walkin("atl_nih_tube_container2_inv");
     end;
 };
 tube = function(table)
     table.is_tube = true;
     table.dsc = "{" .. table.t .. "-" .. table.l .. "-" .. table.d .. "}^";
     table.inv = "Труба маркированная " .. table.t .. "-" .. table.l .. "-" .. table.d ;
     table.disp = "Труба " .. table.t .. "-" .. table.l .. "-" .. table.d ;
     table.tak = "Вы забираете трубу. ";
     return obj(table);
 end;
 tube_rt_12_8 = tube { nam = "tube_rt_12_8"; t = "RT"; l = 12; d = 8; };
 tube_rt_11_9 = tube { nam = "tube_rt_11_9"; t = "RT"; l = 11; d = 9; };
 tube_rt_15_7 = tube { nam = "tube_rt_15_7"; t = "RT"; l = 15; d = 7; };
 tube_rt_12_5 = tube { nam = "tube_rt_12_5"; t = "RT"; l = 12; d = 5; };
 tube_rt_13_6 = tube { nam = "tube_rt_13_6"; t = "RT"; l = 13; d = 6; };
 tube_rt_11_4 = tube { nam = "tube_rt_11_4"; t = "RT"; l = 11; d = 4; };
 tube_rt_11_6 = tube { nam = "tube_rt_11_6"; t = "RT"; l = 11; d = 6; };
 tube_kt_13_8 = tube { nam = "tube_kt_13_8"; t = "KT"; l = 13; d = 8; };
 tube_kt_15_10 = tube { nam = "tube_kt_15_10"; t = "KT"; l = 15; d = 10; };
 tube_kt_9_9 = tube { nam = "tube_kt_9_9"; t = "KT"; l = 9; d = 9; };
 tube_kt_12_7 = tube { nam = "tube_kt_12_7"; t = "KT"; l = 12; d = 7; };
 tube_nf_16_7 = tube { nam = "tube_nf_16_7"; t = "NF"; l = 16; d = 7; };
 tube_nf_11_7 = tube { nam = "tube_nf_11_7"; t = "NF"; l = 11; d = 7; };
 tube_nf_12_9 = tube { nam = "tube_nf_12_9"; t = "NF"; l = 12; d = 9; };
 tube_nf_15_7 = tube { nam = "tube_nf_15_7"; t = "NF"; l = 15; d = 7; };
 tube_rt_12_6 = tube { nam = "tube_rt_12_6"; t = "RT"; l = 12; d = 6; };
 tubes_terra = {
     tube_rt_12_8;
     tube_rt_11_9;
     tube_rt_15_7;
     tube_rt_12_5;
     tube_rt_13_6;
     tube_rt_11_4;
     tube_rt_11_6;
     tube_kt_13_8;
     tube_kt_15_10;
     tube_kt_9_9;
     tube_kt_12_7;
     tube_nf_16_7;
     tube_nf_11_7;
     tube_nf_12_9;
     tube_nf_15_7;
     tube_rt_12_6;
 };
 atl_nih_tube_container_inv = room {
     nam = "atl_nih_tube_container_inv";
     disp = "Атлантида, Терра, главный коридор";
     dsc = [[В ящике сложены трубы различных диаметров и размеров. Все трубы промаркированы:]];
     way = {
         kh_vroom("Отойти от ящика", "atl_terra_main_corridor");
     };
     obj = {
     };
 };
 tube_nf_14_6 = tube { nam = "tube_nf_14_6"; t = "NF"; l = 14; d = 6; };
 tube_nf_10_7 = tube { nam = "tube_nf_10_7"; t = "NF"; l = 10; d = 7; };
 tube_nf_11_9 = tube { nam = "tube_nf_11_9"; t = "NF"; l = 11; d = 9; };
 tube_nf_14_7 = tube { nam = "tube_nf_14_7"; t = "NF"; l = 14; d = 7; };
 tube_tq_14_6 = tube { nam = "tube_tq_14_6"; t = "TQ"; l = 14; d = 6; };
 tube_tq_17_5 = tube { nam = "tube_tq_17_5"; t = "TQ"; l = 17; d = 5; };
 tube_rt_12_7 = tube { nam = "tube_rt_12_7"; t = "RT"; l = 12; d = 7; };
 tube_kt_13_9 = tube { nam = "tube_kt_13_9"; t = "KT"; l = 13; d = 9; };
 tubes_aqua = {
     tube_nf_14_6;
     tube_nf_10_7;
     tube_nf_11_9;
     tube_nf_14_7;
     tube_tq_14_6;
     tube_tq_17_5;
     tube_rt_12_7;
     tube_kt_13_9;
 };
 atl_nih_tube_container2_inv = room {
     nam = "atl_nih_tube_container2_inv";
     disp = "Атлантида, Аква, склад B";
     dsc = [[У стены сложены трубы различных диаметров и размеров. Все трубы промаркированы:]];
     way = {
         kh_vroom("Отойти от ящика", "atl_aqua_warehouse_b");
     };
     obj = {
     };
 };
 atl_nih_tube_container:disable();
 atl_nih_tube_container2:disable();
 atl_nih_tubes_near_aqua:disable();
 atl_nih_panel_near_a:disable();
 atl_nih_panel_near_admin:disable();
 atl_nih_panel_near_luna:disable();
 atl_nih_boxes_near_oculus:disable();
 atl_nih_boxes_near_terra:disable();
 atl_nih_tubes_near_arctos:disable();
 atl_nih_panel_oculus:disable();
 atl_nih_boxes_terra:disable();
 atl_nih_tubes_luna:disable();
 atl_nih_tubes_arctos:disable();
 atl_nih_tubes_aqua:disable();
 atl_nih_tubes_aqua_a:disable();
 atl_nih_tubes_aqua_b:disable();
 nih_tubes_array = {
     atl_nih_tubes_near_aqua,
     atl_nih_panel_near_a,
     atl_nih_panel_near_admin,
     atl_nih_panel_near_luna,
     atl_nih_boxes_near_oculus,
     atl_nih_boxes_near_terra,
     atl_nih_tubes_near_arctos,
     atl_nih_panel_oculus,
     atl_nih_boxes_terra,
     atl_nih_tubes_luna,
     atl_nih_tubes_arctos,
     atl_nih_tubes_aqua,
     atl_nih_tubes_aqua_a,
     atl_nih_tubes_aqua_b,
 };
 nih_array = {
     atl_nih_tubes_near_aqua;
     atl_nih_tubes_near_a;
     atl_nih_tubes_near_admin;
     atl_nih_tubes_near_luna;
     atl_nih_tubes_near_oculus;
     atl_nih_tubes_near_terra;
     atl_nih_tubes_near_arctos;
     atl_nih_tubes_oculus;
     atl_nih_tubes_terra;
     atl_nih_tubes_luna;
     atl_nih_tubes_arctos;
     atl_nih_tubes_aqua;
     atl_nih_tubes_aqua_a;
     atl_nih_tubes_aqua_b;
     atl_nih_panel_near_a;
     atl_nih_panel_near_admin;
     atl_nih_panel_near_luna;
     atl_nih_panel_oculus;
     atl_nih_boxes_near_oculus;
     atl_nih_boxes_near_terra;
     atl_nih_boxes_terra;
     atl_nih_tube_container;
     atl_nih_tube_container2;
 };
 nih_array2 = {
     atl_nih_tubes_near_aqua,
     atl_nih_panel_near_a,
     atl_nih_panel_near_admin,
     atl_nih_panel_near_luna,
     atl_nih_boxes_near_oculus,
     atl_nih_boxes_near_terra,
     atl_nih_tubes_near_arctos,
     atl_nih_panel_oculus,
     atl_nih_boxes_terra,
     atl_nih_tubes_luna,
     atl_nih_tubes_arctos,
     atl_nih_tubes_aqua,
     atl_nih_tubes_aqua_a,
     atl_nih_tubes_aqua_b,
     atl_nih_tube_container,
     atl_nih_tube_container2,
 };
 disable_nih = function()
     remove(atl_item_tube_spec, pl);
     for i = 1, #nih_array do
         nih_array[i]:disable();
     end;
     for i = 1, #tubes_terra do
         remove(tubes_terra[i], pl);
     end;
     for i = 1, #tubes_aqua do
         remove(tubes_aqua[i], pl);
     end;
 end;
 function atlantis_init()
     print("init atl");
     for i = 1, #tubes_terra do
         put(tubes_terra[i], atl_nih_tube_container_inv);
     end;
     for i = 1, #tubes_aqua do
         put(tubes_aqua[i], atl_nih_tube_container2_inv);
     end;
 end;
 atl_nih_init = function()
     atl_nih_state = 1;
     local nih_array_rt = {
         atl_nih_tubes_near_aqua;
         atl_nih_tubes_near_a;
         atl_nih_tubes_near_admin;
     };
     local nih_array_kt = {
         atl_nih_tubes_near_luna;
         atl_nih_tubes_near_arctos;
         atl_nih_tubes_luna;
         atl_nih_tubes_arctos;
     };
     local nih_array_nf = {
         atl_nih_tubes_near_oculus;
         atl_nih_tubes_near_terra;
         atl_nih_tubes_oculus;
         atl_nih_tubes_terra;
     };
     local nih_array_tq = {
         atl_nih_tubes_aqua;
         atl_nih_tubes_aqua_a;
         atl_nih_tubes_aqua_b;
     };
     nih_array_rt[rnd(#nih_array_rt)].broken = true;
     nih_array_kt[rnd(#nih_array_kt)].broken = true;
     nih_array_nf[rnd(#nih_array_nf)].broken = true;
     nih_array_tq[rnd(#nih_array_tq)].broken = true;
     for i = 1, #nih_array2 do
         nih_array2[i]:enable();
     end;
 end;
@@ \ No newline at end of file @@

atlantis_dlg.lua

➞

Show inline comments

@@ @@ -363,1525 +363,1525 @@ char_moreau_dlg = dlg { @@
                 return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
             else
                 char_moreau.navjiarr_asked = 2;
                 return [[Фредерик Моро отвечает: "Интересные существа. Наши ученые говорят, что они ближе к рыбам, чем к нам. Однако, они ходят на двух ногах, имеют руки, способны дышать воздухом и мыслить! Более подробно вам расскажут ученые, -- он делает небольшую паузу, -- Атлантида обязана им своим существованием. Если бы мы не встретили их при первой экспедиции, вряд ли кто-то стал бы строить эту станцию, тем более здесь. Первое время они создавали нам проблемы, но, к счастью, нам удалось их разрешить и наладить отношения с ними. Сейчас на станции проживают двое навьяров: Леарр и Ривеерр. Думаю, они не откажутся от разговора с вами". ]];
             end;
         end};
         {tag="on_learr", false, "Что вы думаете о Леарр?", function()
             if (atl_rep_moreau < 0) then
                 char_moreau.learr_asked = 1;
                 return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
             else
                 char_moreau.learr_asked = 2;
                 return [[Фредерик Моро отвечает: "Милая девушка, хоть и рыба. Она, конечно, порой бывает надоедлива ввиду своей излишней, на мой взгляд, любознательности, но вы себя на ее месте представьте -- она родилась и росла в своей примитивной деревне, а тут мы -- неспособные дышать в воде, зато способные строить поразительные машины. Нет ничего удивительного, что она только и делает, что носится между Игнисом, Окулусом и Террой, расспрашивая всех обо всем". ]];
             end;
         end};
         {tag="on_ryveerr", false, "Что вы думаете о Ривеерре?", function()
             if (atl_rep_moreau < 0) then
                 char_moreau.ryveerr_asked = 1;
                 return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
             else
                 char_moreau.ryveerr_asked = 2;
                 return [[Фредерик Моро отвечает: "Я мало что могу о нем сказать. Он почти не покидает Окулус, общаясь только с учеными. Возможно их вам и стоит спросить о нем". ]];
             end;
         end};
         {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре?", function()
             if (atl_rep_moreau < 0) then
                 char_moreau.aikerjarr_asked = 1;
                 return [[Фредерик Моро отвечает: "Я не хочу говорить об этом сейчас". ]];
             else
                 char_moreau.aikerjarr_asked = 2;
                 return [[Фредерик Моро отвечает: "Пренеприятный персонаж. Будь моя воля -- я бы прогнал его со станции, и большая часть руководителей со мной согласна. Однако, понимая, какие у этого будут последствия, я вынужден позволить ему находиться здесь". ]];
             end;
         end};
         {always=true, "Вернемся к делу.", [[Фредерик Моро спрашивает: "Вы что-то хотели?"]], code [[ char_moreau_dlg:reset_more(); pret(); ]]};
 		{tag="generic"};
 		{tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", [[Фредерик Моро несколько раз стучит пальцем по столу. Недовольным тоном он делает вам замечание: "Месье Дрейк, -- он выдерживает небольшую паузу, -- Если вы хотите вернуть себе Левиафан, вам стоит следовать нашим правилам и, в частности, не нарушать прямых наших распоряжений". ]], code [[
 			atl_rep_moreau = atl_rep_moreau - 1;
 			atl_rep_darkstar = atl_rep_darkstar - 1;
 		]]};
 		{tag="ignis_what", false, "Почему начался пожар в Игнисе?", [[Фредерик Моро пожимает плечами и как-то неуверенно проговаривает: "Не знаю. Этим вопросом занимаются инженеры и служба безопасности. Будьте спокойны, наши специалисты не допустят повторения аварии". ]]};
         {tag="more_questions", "У меня есть несколько вопросов.", [[Моро кивает: "Да, конечно. Я слушаю".]], code [[ psub('ask_more'); ]]};
 		{always = true, "Я пойду.", [[Моро прощается с вами: "До встречи, месье Дрейк". ]], code [[ back(); ]]};
 	};
 };
 char_svetlova_dlg = dlg {
 	var {
 		state = 0;
 		flag_help = false;
 		flag_explain = false;
         dyp_quest = false;
 	};
 	nam = "Екатерина Светлова";
 	disp = "Екатерина Светлова";
     reset_more = function(s)
         poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr", "more_questions");
         if (atl_rep_svetlova < 0) then
             if (char_svetlova.drake_asked == 0) then pon("on_drake"); pon("more_questions"); end;
             if (char_svetlova.black_asked == 0) then pon("on_black"); pon("more_questions"); end;
             if (char_svetlova.darkstar_asked == 0) then pon("on_darkstar"); pon("more_questions"); end;
             if (char_svetlova.svetlova_asked == 0) then pon("on_svetlova"); pon("more_questions"); end;
             if (char_svetlova.moreau_asked == 0) then pon("on_moreau"); pon("more_questions"); end;
             if (char_svetlova.wright_asked == 0) then pon("on_wright"); pon("more_questions"); end;
             if (char_svetlova.atlantis_asked == 0) then pon("on_atlantis"); pon("more_questions"); end;
             if (char_svetlova.navjiarr_asked == 0) then pon("on_navjiarr"); pon("more_questions"); end;
             if (char_svetlova.learr_asked == 0) then pon("on_learr"); pon("more_questions"); end;
             if (char_svetlova.ryveerr_asked == 0) then pon("on_ryveerr"); pon("more_questions"); end;
         else
             if (char_svetlova.drake_asked < 2) then pon("on_drake"); pon("more_questions"); end;
             if (char_svetlova.black_asked < 2) then pon("on_black"); pon("more_questions"); end;
             if (char_svetlova.darkstar_asked < 2) then pon("on_darkstar"); pon("more_questions"); end;
             if (char_svetlova.svetlova_asked < 2) then pon("on_svetlova"); pon("more_questions"); end;
             if (char_svetlova.moreau_asked < 2) then pon("on_moreau"); pon("more_questions"); end;
             if (char_svetlova.wright_asked < 2) then pon("on_wright"); pon("more_questions"); end;
             if (char_svetlova.atlantis_asked < 2) then pon("on_atlantis"); pon("more_questions"); end;
             if (char_svetlova.navjiarr_asked < 2) then pon("on_navjiarr"); pon("more_questions"); end;
             if (char_svetlova.learr_asked < 2) then pon("on_learr"); pon("more_questions"); end;
             if (char_svetlova.ryveerr_asked < 2) then pon("on_ryveerr"); pon("more_questions"); end;
         end;
     end;
 	enter = function(s)
         s:reset_more();
         if have(dyp_item_star_map) and not have(dyp_item_star_map_copy) and not atl_star_map_copied then
             pon("copy_star_map");
         end;
         if (atl_star_map_copied) then
             pon("copy_star_map_2");
         end;
         if dyp_quest_state == 1 and not s.dyp_quest then
             s.dyp_quest = true;
             pon('dyp_quest');
         end;
         poff("iyh1_learr", "iyh1_aikerjarr");
         if (atl_iyh_state == 1 and atl_iyh_learr_spoken and atl_iyh_ryveerr_spoken) then
             pon('iyh1_learr');
         elseif (atl_iyh_state == 1 and atl_iyh_aikerjarr_spoken and atl_iyh_ryveerr_spoken) then
             pon('iyh1_aikerjarr');
         end;
 		if (s.state == 0) then
 			psub('first_meeting');
             s.state = 1;
 			return [[За столом сидит женщина лет сорока-пяти. Золотистые волосы собраны в пучок на затылке. Она одета в простое синее платье. В правой руке она держит карандаш, которым периодически делает пометки в бумагах, лежащих на столе. ^Она отрывает взгляд от бумаг и приветствует вас: _"Добрый день, господин Дрейк. Мое имя -- Екатерина Светлова, я управляю исследованиями на Атлантиде. Даркстар сказал, что вы зайдете. ^Должна признать, вы нас всех изрядно напугали, появившись вот так внезапно. Однако, вы будете полезны нам. ^Я знаю, что вы ищете своего отца. Уходя в экспедицию, он не оставил нам почти никаких материалов -- они забрали с собой все: карты, схемы, переводы. Я прошу вас помочь нам решить некоторые проблемы. Взамен мы предоставим вам имеющиеся у нас ресурсы для поисков Уильяма"_.]];
         elseif (s.state == 2) then
 			psub('ryveerr_on_steal');
 			return [[Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Ну как? Поговорили с Ривеерром?" ]];
         else
             if (atl_iyh_state == 9) then
 				atl_iyh_state = 10;
                 conflict_resolved = true;
                 if atl_iyh_shockfish_dead then
                     psub('iyh_more');
                     if (atl_iyh_artifacts_on_atlantis) then
                         -- навьяры не знают про гибель ската. Светловой пофиг
                         return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. Мы изучили артефакты, найденные вами в храме, но, к сожалению для вас, не обнаружили ничего, что могло бы помочь найти Уильяма. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                     else
                         -- навьяры в ярости, светлова тоже
                         return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Дрейк! Вы понимаете, что вы сделали?! Одним маленьким взрывом вы погубили годы работы по налаживанию отношений с навьярами! Конечно, вы решили проблему, но разве не было другого способа?!"^Чуть подождав, она сообщает: "К делу. Покажите фрагмент карты, который вы нашли". ]];
                     end;
                 elseif atl_iyh_entrance_destroyed then
                     if (atl_iyh_artifacts_on_atlantis) then
                         -- навьяры не знают про разрушение храма. Светловой пофиг
                         psub('iyh_more');
                         return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. Мы изучили артефакты, найденные вами в храме, но, к сожалению для вас, не обнаружили ничего, что могло бы помочь найти Уильяма. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                     else
                         -- Леарр все-таки вняла голосу разума и решила вернуться к вам
                         psub('learr_back');
                         return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Мы еще раз обсудили все с Леарр, она хотела бы вернуться в экипаж Левиафана. Вы возьмете ее?" ]];
                     end;
                 else
                     psub('iyh_more');
                     if (atl_iyh_artifacts_on_atlantis) then
                         --Храм в целости, навьяры пляшут, Светлова довольна :)
                         return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. Ваши действия в храме были воистину потрясающи. Мы не зря отправили туда именно вас. Мы изучили артефакты, найденные вами в храме, но, к сожалению для вас, не обнаружили ничего, что могло бы помочь найти Уильяма. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                     else
                         --Храм в целости, навьяры пляшут, Светлова довольна, но без артефактов :(
                         return [[Светлова отрывает взгляд от бумаг, лежащих перед ней, и смотрит на вас: "Добрый день, Дрейк. Благодаря вам отношения между Дипатреанотром и Ираафаанотром восстановлены. К сожалению, мы не смогли получить доступ к артефактам, добытым вами в храме. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]];
                     end;
                 end;
 			else
 				psub('generic');
 				return [[Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Добрый день". ]];
 			end;
 		end;
 	end;
 	phr = {
         {tag = "first_meeting"};
 		{"Как так получилось, что не осталось никакой информации?", [[Екатерина Светлова поясняет: "Блэк сильно торопил Уильяма и, едва закончив минимальные исследования, они отправились в Венаэданотр -- отдаленный навьярский город где-то к западу от Атлантиды. К сожалению, его точное местоположение нам неизвестно". ]], code [[ pon('venaedanotrr'); ]]};
         {"В чем заключается цель экспедиции?", [[Екатерина Светлова отвечает: "Дрейк и Блэк ищут Лсэрианотр -- легендарный навьярский город". ]], code [[pon('lseryanotrr')]]};
         {tag = "venaedanotrr", false, "Венаэданотр?", [[Екатерина светлова отвечает: "Поселения навьяров раскинулись по всему океанскому дну. Мы точно знаем, что Венаэданотр расположен далеко к западу отсюда и точно знаем, что он значительно больше, нежели Ираафаанотр или Дипатреанотр. Дрейк и Блэк смогут рассказать многое рассказать о нем, когда вернутся из своей экспедиции". ]], code [[ pon("dypatreanotrr", "iraaphaanotrr");]]};
 		{tag = "lseryanotrr", false, "Лсэрианотр?", [[Екатерина Светлова отвечает: "По легенде Лсэрианотр -- древний навьярский город, хранящий какие-то тайные знания их народа. Описания разнятся. В одних источниках говорится о страшном монстре, по имени Наэтвьирр, охраняющем город. В других этот же Наэтвьирр предстает как хранитель города и его тайн, призванный самими навьярами. Однако, во всех вариантах легенды именно Наэтвьирр выступает причиной того, что навьяры покидают Лсэрианотр. Мы предполагаем, что Наэтвьирр это кракен или еще какое-то морское чудовище, с которым древние навьяры просто не могли справиться и вынуждены были оставить город". ]], code [[ pon("dypatreanotrr", "iraaphaanotrr");]]};
         {tag = "dypatreanotrr", false, "Дипатреанотр?", [[Екатерина Светлова отвечает: "Дипатреанотр расположен чуть дальше к северу от Атлантиды, чем Ираафаанотр. Как и Ираафаанотр, городом в полной мере он не является. В поселении нет даже улиц -- дома просто нагромождены вокруг центра. Впрочем, как вы понимаете, улицы навьярам и ни к чему". ]]};
         {tag = "iraaphaanotrr", false, "Ираафаанотр?", [[Екатерина Светлова отвечает: "Ираафаанотр -- самое близкое к Атлантиде поселение навьяров. Мы называем его городом, хотя по нашим меркам это даже не деревня. Полтора десятка домов, да несколько полей вокруг. И все же, навьяры Ираафаанотра сильно помогают нам, обменивая ресурсы, которые они добывают здесь на более сложные вещи, производить которые самостоятельно они не способны". ]]};
 		{"В чем заключается ваше предложение?", [[Екатерина Светлова откладывает бумаги в сторону, достает из ящика стола карту и раскладывает ее на столе. После чего продолжает: _"На самом деле, вы прибыли как нельзя вовремя. Наши отношения с навьярами несколько натянулись в последнее время, и, боюсь, разрешить разногласия поможете только вы. Я попробую кратко изложить ситуацию, задавайте вопросы по ходу рассказа, если вам потребуется дополнительная информация, -- Светлова делает небольшую паузу, -- Неподалеку от Атлантиды находятся два навьярских поселения: Ираафаанотр и Дипатреанотр. Первая встреча с жителями Дипатреанотра прошла не совсем гладко и в результате ее погибло несколько человек. К счастью, в дальнейшем отношения удалось наладить. Недавно, между Ираафаанотром и Дипатреанотром произошел конфликт, который может негативно повлиять на нас и наши отношения с этими городами. Мы пытались вмешаться, но это лишь обострило разногласия и в дальнейшем может поставить под угрозу само существование станции"_. ]], code [[ psub('help')]]};
 		{tag = 'help'};
 		{"И как я смогу помочь?", [[Екатерина Светлова поясняет: _"Навьяры не знают вас, никогда не видели на станции. Мы сможем представить вас как нейтральную сторону. Сейчас вам стоит поговорить с Леарр и Ривеерром и узнать их взгляд на ситуацию. Потом приходите ко мне и решим, что делать"_. ]], code [[
 			char_svetlova_dlg.flag_help = true;
 			if (char_svetlova_dlg.flag_explain) then
 				pon("first_meeting_end");
 			end;
 		]]};
 		{"И в чем суть этого конфликта?", [[Екатерина Светлова отвечает: "Все одновременно очень просто и очень сложно. Из Ираафаанотра и Дипатреанотра не так давно пропали ценные реликвии. Города обвиняют друг друга и непонятно, к чему это приведет. Мы не понимаем, что могло быть причиной этому -- никаких предпосылок к такому у навьяров не было. С самого основания станции города жили в мире и согласии. К несчастью, ни Дипатреанотр, ни Ираафаанотр не дают нам доступа в храмы, где хранились реликвии". ]], code [[
 			char_svetlova_dlg.flag_explain = true;
 			if (char_svetlova_dlg.flag_help) then
 				psub("first_meeting_end");
 			end;
 		]]};
 		{tag = "first_meeting_end"};
 		{"Хорошо, я помогу вам. ", function(s)
                 return [[Екатерина Светлова кивает: _"Поговорите с Леарр и Ривеерром, разберитесь, узнайте больше. Ривеерр большую часть времени находится здесь, в Окулусе. Леарр вы, скорее всего, найдете в Игнисе"_. ]];
         end, code [[
 			char_svetlova_dlg.state = 1;
 			atl_iyh_state = 1;
 			psub("generic");
 		]]};
 		{"Я прибыл сюда искать своего отца, а не решать проблемы полуразумных рыбней.", [[Екатерина Светлова недовольно отвечает: "Если вы не станете помогать нам, мы не станем помогать вам. Можете сидеть и ждать возвращения Надежды". ]]};
         {tag = "ask_more"};
         {tag = "on_drake", false, "Расскажите об Уильяме. ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.drake_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.drake_asked = 2;
                 return [[Екатерина Светлова отвечает: "Дрейк смог многого достигнуть и, хотя он работал не один, именно благодаря его таланту Вестхейвен Трансоушен просуществовала многие годы. Меня всегда удивляло его чутье -- он часто принимает странные, но, в конечном итоге, выгодные решения. Боюсь, когда-нибудь это чутье подведет его". ]];
             end;
         end};
         {tag = "on_black", false, "Расскажите об Адриане Блэке. ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.black_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.black_asked = 2;
                 return [[Екатерина Светлова отвечает: "Блэк и Дрейк всегда работали вместе. Там где Дрейк готов пойти на риск, Блэк предлагает поступить осторожно. Зачастую Дрейк полностью передает управление в руки Блэка и Блэк всегда хорошо справляется. В свою очередь, Дрейк всегда умел собирать вокруг себя правильных людей, чего Блэк никогда бы не смог". ]];
             end;
         end};
         {tag="on_darkstar", false, "Расскажите о Винсенте Даркстаре. ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.darkstar_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.darkstar_asked = 2;
                 return [[Екатерина Светлова отвечает: "Если вы уже говорили с ним, то вы итак все знаете. Вы можете посчитать его чрезмерно осторожным, но для его должности это скорее достоинство, чем недостаток. Не знаю, что творится у него в голове и почему он вообще занимается этим здесь, но пока у нас нет причин не доверять ему". ]];
             end;
         end};
         {tag="on_svetlova", false, "Расскажите о себе. ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.svetlova_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.svetlova_asked = 2;
                 return [[Екатерина Светлова отвечает: "Не знаю, что вам рассказать. Я родилась в России, но образование получала уже в Европе, во Франции. После завершения обучения, я занималась некоторыми исследованиями в своей области, отправлялась с несколькими экспедициями в различные уголки света. А потом на меня вышел Фредерик Моро -- я тогда как раз искала возможности для новой экспедиции, Атлантиды тогда еще не было, но уже была Надежда и в Вестхейвен Трансоушен уже знали про навьяров. Потом была построена Атлантида и вот я здесь, занимаюсь делом всей моей жизни". ]];
             end;
         end};
         {tag="on_moreau", false, "Расскажите о Фредерике Моро. ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.moreau_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.moreau_asked = 2;
                 return [[Екатерина Светлова отвечает: "С Фредериком Моро я познакомилась раньше, чем с другими руководителями Вестхейвен Трансоушен. Хотя он и работает в компании с самого ее основания, его имя звучит гораздо реже, чем имена Блэка и Дрейка, однако, вклад Моро в развитие Вестхейвен Трансоушен трудно переоценить. Со всей своей скрупулезностью и точностью, он умело управлял ресурсами компании и продолжает это делать на Атлантиде. Что меня в нем удивляет, так это то, что он, при всех своих способностях, предпочитает оставаться в тени Дрейка и Блэка". ]];
             end;
         end};
         {tag="on_wright", false, "Расскажите о Майкле Райте. ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.wright_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.wright_asked = 2;
                 return [[Екатерина Светлова отвечает: "Без Майкла Райта Вестхейвен Трансоушен никогда не достигла бы вершин. Сперва все более и более быстроходные и комфортабельные суда, а затем и Надежда с Атлантидой -- все было придумано им. Он напоминает мне безумного изобретателя из фантастической книжки, за исключением того, что не пытается захватить мир". ]];
             end;
         end};
         {tag="on_atlantis", false, "Расскажите об Атлантиде. ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.atlantis_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.atlantis_asked = 2;
                 return [[Екатерина Светлова отвечает: "Атлантида была построена с единственной целью -- быть ближе к навьярам, получить возможность изучать их. Майкл Райт, конечно, скажет вам другое и будет по-своему прав -- в конце концов, станцию придумал именно он". ]];
             end;
         end};
         {tag="on_navjiarr", false, "Что вы думаете о навьярах? ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.navjiarr_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.navjiarr_asked = 2;
                 return [[Екатерина Светлова отвечает: "Удивительные создания. Я никогда не поверила бы в их существование, если бы не видела их собственными глазами. Хотя они кажутся крайне примитивными на первый взгляд, у них богатая и интересная культура. К сожалению, сейчас они пребывают в некотором упадке. На многие вопросы, которые мы им задаем -- как они строят свои храмы, откуда достают материалы, кем созданы их реликвии, они отвечают туманными легендами о древних временах и дальних местах. К сожалению, их картографическая система настолько запутана, что многие из них путаются в ней". ]];
             end;
         end};
         {tag="on_learr", false, "Что вы думаете о Леарр? ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.learr_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.learr_asked = 2;
                 return [[Екатерина Светлова отвечает: "Леарр -- просто находка для нас всех. Она гораздо меньше скована догмами, чем другие, более старые, представители ее племени. Приятно наблюдать, как она с легкостью впитывает наши знания и с готовностью делится своими". ]];
             end;
         end};
         {tag="on_ryveerr", false, "Что вы думаете о Ривеерре? ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.ryveerr_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.ryveerr_asked = 2;
                 return [[Екатерина Светлова отвечает: "Ривеерр -- достаточно дружелюбный и приятный навьяр. Его интеллект позволяет нам общаться с ним практически на равных, с поправкой на отсутствие некоторых знаний и понимания многих известных нам вещей". ]];
             end;
         end};
         {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре? ", function()
             if (atl_rep_svetlova < 0) then
                 char_svetlova.aikerjarr_asked = 1;
                 return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];
             else
                 char_svetlova.aikerjarr_asked = 2;
                 return [[Екатерина Светлова отвечает: "Нам всем было бы легче, если бы его не было на Атлантиде. К сожалению, сейчас мы не можем просто взять и прогнать его -- это сделает наше положение еще худшим, чем оно есть". ]];
             end;
         end};
         {always=true, "Вернемся к делу.", [[Светлова кивает: "Говорите".]], code [[ char_svetlova_dlg:reset_more(); pret(); ]]};
         {tag = "generic"};
         {tag = "copy_star_map", false, "[Показать карту небесных огней] Мы можем сделать копию этой карты, такую, чтобы навьяры не заметили бы подмены?", [[Екатерина Светлова удивленно смотрит на вас: "Не знаю, что вы задумали, но мы никогда не делали ничего подобного". Немного погодя она заявляет: "Думаю, Райт сможет сделать достаточно хорошую копию. У навьяров нет точных приборов, чтобы проверить ее как следует, они не смогут определить ее время изготовления иначе чем на глаз, так что -- это вполне в наших силах. Отправляйтесь в свою комнату, я позову вас, когда копия будет готова". ]], code [[ atl_star_map_copied = true; walk("cutscene_wait_for_copy"); remove(dyp_item_star_map, me());]]};
         {tag = "copy_star_map_2", false, "Я пришел за картой небесных огней", [[Екатерина Светлова передает вам две, на первый взгляд, совершенно одинаковые карты. Лишь приглядевшись, вы замечаете отличия -- линии на копии менее ровные, зато лист металла гораздо более ровный и имеет гораздо меньше царапин. Вряд ли вождь Дипатреанотра будет придираться к таким вещам, ведь символы на картах совпадают практически точь-в-точь. ]], code [[ atl_star_map_copied = true; take(dyp_item_star_map_copy);take(dyp_item_star_map);]]};
         {tag = "dyp_quest", false, "Вождь Дипатреанотра просил меня принести \"светяющуюся капсулу\". Что мы можем ему предложить?", [[Екатерина Светлова отвечает: "Поговорите с Райтом, он найдет что-нибудь, что можно отдать навьярам". ]]};
         {tag= "iyh1_learr", false, "Я поговорил с навьярами. Леарр отрицает причастность Ираафаанотра к краже реликвии из Дипатреанотра. Ривеерр же открыто признает, что навьяры Дипатреанотра забрали ценности из Ираафаанотра.", [[Светлова разводит руками: "Теперь вы в курсе ситуации. Однако, у нас есть зацепка -- Записи Уильяма. Он мало что оставил нам, но среди найденного есть следующее сообщение", -- Екатерина достает из ящика блокнот и передает вам.^ Вы читаете следующее: "Карты давно утеряны, но отшельник в старом храме обещал помочь. Понятия не имею, что и как он сделает, но если это поможет найти Лсэрианотр -- пусть делает что считает нужным". ]], code [[ psub('iyh1_sub'); ]]};
         {tag= "iyh1_aikerjarr", false, "Я поговорил с навьярами. Аикерьярр отрицает причастность Ираафаанотра к краже реликвии из Дипатреанотра. Ривеерр же открыто признает, что навьяры Дипатреанотра забрали ценности из Ираафаанотра.", [[Светлова разводит руками: "Теперь вы в курсе ситуации. Аикерьярр, конечно, доверия не заслуживает, но Леарр говорила то же самое. Тем не менее, у нас есть зацепка -- записи Уильяма. Он мало что оставил нам, но среди найденного есть следующее сообщение", -- Екатерина достает из ящика блокнот и передает вам.^ Вы читаете следующее: "Карты давно утеряны, но отшельник в старом храме обещал помочь. Понятия не имею, что и как он сделает, но если это поможет найти Лсэрианотр -- пусть делает, что считает нужным". ]], code [[ psub('iyh1_sub'); ]]};
         {tag="more_questions", "У меня есть несколько вопросов.", [[Светлова кивает: "Спрашивайте".]], code [[ psub('ask_more'); ]]};
 		{always = true, "Я пойду.", [[Светлова возвращается ко своим бумагам: "До встречи". ]], code [[ back(); ]]};
         {tag= "iyh1_sub"};
         {"Старый храм?", [[Светлова пожимает плечами: "К сожалению, у меня нет ничего кроме намеков. Предполагаю, что где-то здесь может быть еще один храм навьяров, возможно стоит расспросить их?" ]]};
         {"Я хотел бы посетить храм Дипатреанотра.", [[Светлова отвечает: "Не думаю, что это хорошая идея. Навьяры не пускают никого внутрь". ]], code [[ pon('outside');]]};
         {tag = "outside", false, "Возможно, самое интересное находится снаружи храма.", [[Светлова соглашается: "Возможно. В любом случае -- прошло уже достаточно много времени, чтобы хоть какие-то следы сохранились. Я даю вам разрешение отправиться туда. Но перед этим, вам лучше поговорить с навьярами на станции". Екатерина достает из ящика стола свернутую карту и передает вам со словами: "Это поможет вам найти храм". ]], code [[ dypatreanotrr_temple_found = true; atl_iyh_state = 2; pret(); ]]};
 		{tag = "ignis_sabotage"};
 		{"Даркстар считает, что причиной пожара был саботаж", function(s)
 			psub("generic");
 			atl_rep_svetlova = atl_rep_svetlova + 1;
             return [[Екатерина Светлова отвечает: "Даркстар просил вас об этом никому не говорить, но я понимаю ваш интерес. Саботажником может быть только кто-то из сторонников закрытия станции. Поговорите с Мишелем Леруа, чтобы больше об этом узнать. О саботаже попробуйте поговорить с Уолтером Рэдклиффом, если вам действительно интересно. И, пожалуйста, постарайтесь не разводить панику на станции". ]];
 		end};
 		{"Понятия не имею", [[Екатерина Светлова разочарованно отвечает: "Очень жаль". ]], code [[ psub("generic"); ]]};
 		{tag="secret_op"};
 		{"Хорошо, я ничего не скажу навьярам. ", [[Екатерина Светлова отвечает: "Отлично. Осталось дождаться, когда вам позволят покидать станцию". ]], code [[ back(); ]]};
 		{"Мне кажется, нам стоит поставить их в известность. Как они отреагируют, если мы просто принесем им реликвию? ", [[Екатерина Светлова отвечает: "Они будут благодарить нас. А теперь представьте, что вы сообщаете им, что отправляетесь в их священное место охотиться на их священную рыбу. Что будет?" ]], code [[ psub("so_answer"); ]]};
 		{tag="so_answer"};
 		{"Да, пожалуй вы правы", [[Екатерина Светлова отвечает: "Отлично. Осталось дождаться, когда вам позволят покидать станцию". ]]};
 		{"А что будет, если мы принесем им реликвию, которая должна по их мнению быть в Ираафаанотре? Разве они не посчитают, что мы украли ее оттуда? ", [[Екатерина Светлова недовольно отвечает: "Поступайте как знаете. Если ваши действия повредят станции, то Левиафана вам не видать". ]], code [[ back(); ]]};
         {tag="learr_back"};
         {"Конечно, Леарр будет крайне полезна в нашей экспедиции.", [[Леарр, все это время молча стоявшая рядом, отвечает: "Я благодарю тебя-Дрейк. Ты помог нам-Ираафаанотру-и-Дипатреанотру. Я разрушение-храма-понимаю. Другого-пути не-было". ^Светлова кивает: "Этот вопрос решен. Переходим к следующему. Вы говорили, что нашли фрагмент карты. Можете показать его?"]], code [[
             table.insert(pl.party, 'learr');
             move(char_learr, char_learr.home);
             remove("char_learr_atlantis", where("char_learr_atlantis"));
             psub("iyh_more");
         ]]};
         {"Нет, мы справимся без ее помощи.", [[Леарр, все это время молча стоявшая рядом, кивает: "Я предпочла-бы-участвовать-в-экспедиции".]], code [[
             psub("learr_back2");
         ]]};
         {tag="learr_back2"};
         {"Хорошо, возвращайся на Левиафан.", [[Леарр отвечает: "Я благодарю тебя-Дрейк. Ты помог нам-Ираафаанотру-и-Дипатреанотру. Я разрушение-храма-понимаю. Другого-пути не-было". ^Светлова кивает: "Этот вопрос решен. Переходим к следующему. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]], code [[
             table.insert(pl.party, 'learr');
             move(char_learr, char_learr.home);
             remove("char_learr_atlantis", where("char_learr_atlantis"));
             psub("iyh_more");
         ]]};
         {"Нет, оставайся на Атлантиде", [[Леарр разочарованно отвечает: "Я на-Атлантиде-останусь", -- и выходит из комнаты. ^Светлова качает головой: "Вы зря отказались от ее помощи, Дрейк. Навьяр на борту мог бы оказаться очень полезен. Но, к делу. Вы говорили, что нашли фрагмент карты. Можете показать его?" ]], [[
             move("char_learr_atlantis", "atl_oculus_library");
             psub("iyh_more");
         ]]};
         {tag="iyh_more"};
         {"[Передать фрагмент карты] Да, конечно. Мы нашли это в скрытом помещении в храме.", [[Екатерина Светлова с интересом рассматривает табличку: "Удивительно, эта карта сильно отличается от других навьярских карт, виденных нами. Обратите внимание, на количество деталей -- здесь не только отмечены условными символами три-четыре ориентира. Здесь их десятки, если не сотни. Попробуйте разузнать побольше в Ираафаанотре и Дипатреанотре". Екатерина Светлова сообщает вам местонахождение Ираафаанотра и Дипатреанотра. ]], code [[
             iraaphaanotrr_found = true;
             dypatreanotrr_found = true;
             psub("generic");
         ]]};
 	};
 };
 char_michael_wright_dlg = dlg {
     var {
         state = 0;
         dyp_quest = false;
         goldman_asked = false;
         leroy_asked = false;
         jones_asked = false;
     };
     nam = "Майкл Райт";
     disp = "Майкл Райт";
     reset_more = function(s)
         poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_aikerjarr", "on_ryveerr", "more_questions");
         if atl_mtr_started and not atl_mtr_finished then
             if not atl_mtr_ask_radcliffe then
                 if atl_mtr_know_jones_replaced_goldman then
                     pon("mtr_on_replace");
                 else
                     pon("mtr_on_solis");
                 end;
             end;
             if not s.goldman_asked then
                 pon("mtr_on_goldman");
             end;
             if atl_mtr_know_goldman_lost_clock and not s.leroy_asked then
                 pon("mtr_on_leroy");
             end;
             if atl_mtr_know_goldman_lost_clock and not s.jones_asked then
                 pon("mtr_on_jones");
             end;
         end;
         if (atl_rep_wright < 0) then
             if (char_michael_wright.drake_asked == 0) then pon("on_drake"); pon("more_questions"); end;
             if (char_michael_wright.black_asked == 0) then pon("on_black"); pon("more_questions"); end;
             if (char_michael_wright.darkstar_asked == 0) then pon("on_darkstar"); pon("more_questions"); end;
             if (char_michael_wright.svetlova_asked == 0) then pon("on_svetlova"); pon("more_questions"); end;
             if (char_michael_wright.moreau_asked == 0) then pon("on_moreau"); pon("more_questions"); end;
             if (char_michael_wright.wright_asked == 0) then pon("on_wright"); pon("more_questions"); end;
             if (char_michael_wright.atlantis_asked == 0) then pon("on_atlantis"); pon("more_questions"); end;
             if (char_michael_wright.navjiarr_asked == 0) then pon("on_navjiarr"); pon("more_questions"); end;
             if (char_michael_wright.learr_asked == 0) then pon("on_learr"); pon("more_questions"); end;
             if (char_michael_wright.ryveerr_asked == 0) then pon("on_ryveerr"); pon("more_questions"); end;
         else
             if (char_michael_wright.drake_asked < 2) then pon("on_drake"); pon("more_questions"); end;
             if (char_michael_wright.black_asked < 2) then pon("on_black"); pon("more_questions"); end;
             if (char_michael_wright.darkstar_asked < 2) then pon("on_darkstar"); pon("more_questions"); end;
             if (char_michael_wright.svetlova_asked < 2) then pon("on_svetlova"); pon("more_questions"); end;
             if (char_michael_wright.moreau_asked < 2) then pon("on_moreau"); pon("more_questions"); end;
             if (char_michael_wright.wright_asked < 2) then pon("on_wright"); pon("more_questions"); end;
             if (char_michael_wright.atlantis_asked < 2) then pon("on_atlantis"); pon("more_questions"); end;
             if (char_michael_wright.navjiarr_asked < 2) then pon("on_navjiarr"); pon("more_questions"); end;
             if (char_michael_wright.learr_asked < 2) then pon("on_learr"); pon("more_questions"); end;
             if (char_michael_wright.ryveerr_asked < 2) then pon("on_ryveerr"); pon("more_questions"); end;
         end;
     end;
     enter = function(s)
         if dyp_quest_state == 1 and not s.dyp_quest then
             s.dyp_quest = true;
             pon('dyp_quest');
         end;
         poff('nih_fixed');
         if atl_nih_state == 2 or atl_nih_state == 1 then
             pon('nih_fixed');
         end;
         s:reset_more();
         if (atl_nih_state == 3 and atl_fta_state == 0) then
             atl_fta_state = 1;
             psub("fta_agree");
             return [[Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. У меня есть для вас работа. Сейчас все наши бригады заняты, поэтому я прошу вас помочь с обслуживанием Солиса. Приходите туда и свяжитесь со мной по телефону, я дам вам инструкции". ]];
         elseif (atl_fta_state == 2) then
             atl_fta_state = 3;
             psub("fta_deb");
             return [[Майкл Райт протягивает вам руку: "Только благодаря вам, мы все еще здесь. Я с радостью сообщу Моро, что я за возвращение вам Левиафана". ]];
         else
             psub("generic");
             return [[Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. Чем могу быть полезен?" ]];
         end;
     end;
     phr = {
         {tag="fta_agree"};
         {"Хорошо, я сделаю, что смогу. ", [[Майкл Райт спрашивает: "Вы что-то еще хотели?" ]], code [[psub("generic"); ]]};
         {tag="fta_deb"};
         {"[Пожать руку] Только я все еще не знаю, куда мне следует плыть.", [[Майкл Райт кивает: "Мы сделаем все возможное, чтобы помочь вам. Светлова сказала мне, что вы помогаете ей в решении каких-то проблем с навьярами. По ее мнению, это может помочь вам в поисках". ]], code [[ psub('generic'); ]]};
         {"Просто верните мне Левиафан.", [[Майкл Райт с сожалением произносит: "Не все так просто. Нужно, чтобы согласие дали еще Моро, Даркстар и Светлова". ]], code [[ psub('generic'); ]]};
         {tag="ask_more"};
         {tag="on_drake", false, "Расскажите об Уильяме. ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.drake_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.drake_asked = 2;
                 return [[Майкл Райт отвечает: "Я познакомился с вашим отцом во время нашей учебы в университете. Он никогда не относился серьезно к учебе, но уже тогда он умел собирать вокруг себя людей. Создание Вестхейвен Трансоушен было его идеей. Я помню, как мы с Моро первое время очень сомневались, стоит ли ввязываться в подобную авантюру. Дрейк активно развивал компанию, пока она существовала. Наверное, любой другой на месте Дрейка отправил бы меня лечиться, услышав мое предложение создать подводный корабль. Уильям тогда внимательно выслушал меня, задал пару вопросов и выделил деньги на проект". ]];
             end;
         end};
         {tag="on_jack", false, "Расскажите о своем сыне. ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.jack_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.jack_asked = 2;
                 if (atl_jack_in_party) then
                     return [[Майкл Райт отвечает: "Мой сын, Джек, остался на поверхности вместе с моей женой, Элис. Я оставил им дом и немаленькое состояние, в надежде, что они справятся сами. Жаль, что все так получилось. Элис умерла, а Джек потратил лучшие годы на безуспешные попытки найти меня. Спасибо, что взяли моего сына с собой". ]];
                 else
                     psub("son");
                     return [[Майкл Райт отвечает: "Мой сын, Джек, остался на поверхности вместе с моей женой, Элис. Я оставил им дом и немаленькое состояние, так что надеюсь, что у них все хорошо". ]];
                 end;
             end;
         end};
         {tag="on_black", false, "Расскажите об Адриане Блэке. ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.black_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.black_asked = 2;
                 return [[Майкл райт отвечает: "Адриан -- университетский друг вашего отца. Он всегда уравновешивал Дрейка во многих отношениях. Там где Дрейк готов был пойти на риск, Блэк призывал к осторожности. Там где Дрейк соглашался на уступки, Блэк стоял до последнего. К слову, мою идею с субмариной Адриан не одобрил. К счастью, ваш отец все же позволил мне этим заняться". ]];
             end;
         end};
         {tag="on_darkstar", false, "Расскажите о Винсенте Даркстаре ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.darkstar_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.darkstar_asked = 2;
                 return [[Майкл Райт отвечает: "Я почти ничего о нем не знаю. Впрочем, не думаю, что кто-то на станции может сказать о нем что-то. Параноидальный тип. Я вообще не понимаю, как он согласился сюда пеерехать. Тогда он мне целый допрос устроил -- чуть ли не в каждую линию на чертеже тыкал и спрашивал для чего это нужно. Думаю, мне стоит гордиться, что Атлантида прошла его проверку". ]];
             end;
         end};
         {tag="on_svetlova", false, "Расскажите о Екатерине Светловой. ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.svetlova_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.svetlova_asked = 2;
                 return [[Майкл Райт отвечает: "Екатерина присоединилась к нам достаточно поздно -- уже после испытаний Надежды. Странно, что ей не пришла в голову идея построить Атлантиду. Впрочем, ее мало интересует техническая сторона вопроса -- она здесь чтобы изучать навьяров и не скрывает это". ]];
             end;
         end};
         {tag="on_moreau", false, "Расскажите о Фредерике Моро. ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.moreau_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.moreau_asked = 2;
                 return [[Майкл Райт отвечает: "Фредерик с нами с самого начала. Хотя его влияние может показаться незначительным -- многие на станции даже не слышали о нем, пока он не занял пост управляющего -- он все же делал важное дело. Благодаря ему мы смогли завершить многие проекты вовремя, ведь за все поставки материалов отвечал именно он. С управлением станцией он так же справляется неплохо, хотя здесь все гораздо проще, чем было на поверхности". ]];
             end;
         end};
         {tag="on_wright", false, "Расскажите о себе. ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.wright_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.wright_asked = 2;
                 if (atl_jack_in_party) then
                     return [[Майкл Райт отвечает: "Родился я в Лондоне. Окончил один из местных университетов, получив специальность инженера-кораблестроителя. Вместе с вашим отцом, Фредериком Моро и Адрианом Блэком мы основали Вестхейвен Трансоушен. Поначалу моя работа была далеко не идеальной -- мы купили несколько старых кораблей и привели их в порядок. Мы довольно быстро заработали хорошую репутацию. Дела шли на подъем и, наконец, у нас появились собственные верфи. К этому времени я уже имел глупость жениться. Я спроектировал несколько судов для компании. Лучшим была Огненная Стрела -- быстроходный комфортабельный пароход, вмещающий больше двух сотен пассажиров. Ну и наконец мы построили Надежду. Сказать, что мы удивилсь, когда встретили навьяров -- ничего не сказать. К сожалению, встреча не прошла бескровно -- наши люди просто вышли поговорить, показать себя. А эти рыбни закидали несчастных супругов Барнз копьями! Блэк тогда не дал мне пустить торпеду в этих уродов, и я до сих пор зол на него за это, хотя умом понимаю, что он был прав. Да и не было бы никакой Атлантиды, убей я тогда тех навьяров. Несколько месяцев мы обсуждали, что делать дальше. Потом мы с Сильвией придумали Атлантиду и переселились сюда, -- Райт вздыхает, -- В своем увлечении я позабыл обо всем. Я оставил свою жену, Элис, и сына, Джека, на поверхности. Если честно, я скорее жалею, что женился, чем что оставил их там. Это не делает мою ошибку меньше". ]];
                 else
                     return [[Майкл Райт отвечает: "Родился я в Лондоне. Окончил один из местных университетов, получив специальность инженера-кораблестроителя. Вместе с вашим отцом, Фредериком Моро и Адрианом Блэком мы основали Вестхейвен Трансоушен. Поначалу моя работа была далеко не идеальной -- мы купили несколько старых кораблей и привели их в порядок. Мы довольно быстро заработали хорошую репутацию. Дела шли на подъем и, наконец, у нас появились собственные верфи. К этому времени я уже имел глупость жениться. Я спроектировал несколько судов для компании. Лучшим была Огненная Стрела -- быстроходный комфортабельный пароход, вмещающий больше двух сотен пассажиров. Ну и наконец мы построили Надежду. Сказать, что мы удивилсь, когда встретили навьяров -- ничего не сказать. К сожалению, встреча не прошла бескровно -- наши люди просто вышли поговорить, показать себя. А эти рыбни закидали несчастных супругов Барнз копьями! Блэк тогда не дал мне пустить торпеду в этих уродов, и я до сих пор зол на него за это, хотя умом понимаю, что он был прав. Да и не было бы никакой Атлантиды, убей я тогда тех навьяров. Несколько месяцев мы обсуждали, что делать дальше. Потом мы с Сильвией придумали Атлантиду и переселились сюда". ]];
                 end;
             end;
         end};
         {tag="on_atlantis", false, "Расскажите об Атлантиде. ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.atlantis_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.atlantis_asked = 2;
                 return [[Майкл Райт отвечает: "Идея построить постоянную подводную станцию пришла мне в голову через некоторое время после завершения Надежды. Думаю, что не встреть мы тогда навьяров, Дрейк не позволил бы мне заниматься этим. Но его явно заинтересовала возможность постоянного пребывания вблизи этих рыбней. Конечно, если бы не Сильвия, я никогда не смог бы сделать станцию автономной -- я долго думал, как обеспечить нас всем необходимым здесь: едой, электричеством, воздухом, инструментами. Еду и воздух мы получаем в секции Аэрис. Электричество получаем сжигая топливо нескольких видов: растения, выращиваемые в Аэрисе и уголь, выменянный у навьяров. С инструментами дела обстоят сложнее всего. Но тут нас снова выручают навьяры, с готовностью предлагая нам металл, который они не умеют обрабатывать". ]];
             end;
         end};
         {tag="on_navjiarr", false, "Что вы думаете о навьярах? ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.navjiarr_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.navjiarr_asked = 2;
                 return [[Майкл Райт отвечает: "Они меня мало волнуют. Хотя станция существует во многом благодаря сотрудничеству с ними, я предпочитаю поменьше общаться с ними. У меня все еще стоят перед глазами проткнутые коралловыми копьями тела Ребекки и Нила". ]];
             end;
         end};
         {tag="on_learr", false, "Что вы думаете о Леарр? ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.learr_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.learr_asked = 2;
                 return [[Майкл Райт отвечает: "Она часто бывает здесь. Рассматривает все, изучает. Это не может меня не радовать". ]];
             end;
         end};
         {tag="on_ryveerr", false, "Что вы думаете о Ривеерре? ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.ryveerr_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.ryveerr_asked = 2;
                 return [[Майкл Райт отвечает: "Не думаю, что смогу много о нем сказать. Большую часть времени он проводит в Окулусе. Если вы хотите узнать о Ривеерре больше, советую поспрашивать там". ]];
             end;
         end};
         {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре ", function()
             if (atl_rep_wright < 0) then
                 char_michael_wright.aikerjarr_asked = 1;
                 return [[Майкл Райт отвечает: "Я не хочу об этом говорить". ]];
             else
                 char_michael_wright.aikerjarr_asked = 2;
                 return [[Майкл Райт отвечает: "Не думаю, что могу что-то о нем сказать. Я видел его один раз, при встрече и не могу сказать, что впечатление было благоприятным. Слишком заносчивый он". ]];
             end;
         end};
         {always=true, "Вернемся к делу.", [[Майкл Райт кивает: "Хорошо".]], code [[ char_michael_wright_dlg:reset_more(); pret(); ]]};
         {tag="generic"};
         {tag="mtr_solis_last", false, "Кто был в Солисе последним?", [[Райт достает записную книжку, пролистывает ее и сообщает: "Вчера обслуживанием Солиса должен был заниматься Чарли Джонс. Меня здесь не было, но вы можете уточнить у Уолтера Рэдклиффа".]], code [[ poff("mtr_on_replace"); atl_mtr_ask_radcliffe = true; ]]};
         {tag="mtr_on_replace", false, "Голдман говорит, что вчера его заменял Джонс. Вы можете это проверить?", [[Райт кивает и достает записную книжку. Пролистав ее он сообщает: "Да, действительно. Вчера обсулуживанием Солиса должен был заниматься Чарли Джонс. Меня здесь на было, но вы можете уточнить у Уолтера Рэдклиффа". ]], code [[ poff("mtr_solis_last"); atl_mtr_ask_radcliffe = true; ]]};
         {tag="mtr_on_leroy", false, "Что вы думаете о Мишеле Леруа? ", [[Майкл рассказывает: "Мишель -- хороший специалист. Он столь же сосредоточен и уверен в работе, сколь и в повседневной жизни". ]], code [[ char_michael_wright_dlg.leroy_asked = true; atl_mtr_leroy_known = true; ]]};
         {tag="mtr_on_jones", false, "Что вы думаете о Чарли Джонсе? ", [[Майкл рассказывает: "Чарли уже староват. Зачастую приходится искать ему менее тяжелую работу, но это компенсируется его незаурядным умом и отличным знанием устройства Атлантиды". ]], code [[ char_michael_wright_dlg.jones_asked = true; atl_mtr_jones_known = true; ]]};
         {tag="mtr_on_goldman", false, "Что вы думаете о Леонарде Голдмане? ", [[Майкл рассказывает: "Вас, наверное, удивляет, что такой неаккуратный и забывчивый человек как Леонард делает на станции, однако, смею вас заверить -- как специалист господин Голдман соврешенно незаменим. Когда дело касается обслуживания станции он ни разу не позволял себе оплошностей". ]], code [[ char_michael_wright_dlg.goldman_asked = true; atl_mtr_goldman_known = true; ]]};
         {tag="dyp_quest", false, "Вождь Дипатреанотра просил меня принести \"светящуюся капсулу\". Что мы можем ему предложить?", [[ Майкл Райт говорит: "Можете взять один из фонарей из того шкафа", -- Майкл показывает рукой на шкаф в другом конце мастерской, -- "И не забудьте захватить пару-тройку запасных батарей. Их можете взять там же". ]], code [[ item_electric_lamp:enable(); ]]};
         {tag="nih_fixed", false, "Я нашел утечку.", function(s)
             if atl_nih_state == 2 then
                 atl_nih_state = 3;
                 disable_nih();
                 atl_rep_wright = atl_rep_wright + 1;
                 return [[Майкл Райт кивает: "Спасибо, Дрейк. Приборы показывают, что утечка устранена". ]]
             else
                 return [[Майкл Райт отрицательно качает головой: "Что-то не так. Приборы показывают, что утечка все еще присутствует. Возможно, были повреждены несколько труб. Перепроверьте, пожалуйста". ]]
             end;
         end};
         {tag="sabotage", false, "Даркстар считает, что пожар начался из-за саботажа.", function(s)
             atl_rep_wright = atl_rep_wright - 1;
             local part1 = [[Майкл Райт недовольно ворчит: "Пожалуйста, не лезьте в это дело. За безопасность станции отвечает Винсент Даркстар и лучше будет, если он будет заниматься этим делом]];
             if (not atl_jack_in_party) then
                 atl_rep_darkstar = atl_rep_darkstar - 1;
                 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 [[Джек райт прощается с Леарр и покидает зал. ]];
+                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");
 				pr [[Леарр поворачивается к вам, плавники ее становятся ярко-фиолетовыми. Она рычит: "Приветствую, монстр. Мы говорить-будем?" ]];
 			else
 				psub("friendly");
 				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 [[Джек ухмыльнулся: "Удачи, я пойду к себе", -- с этими словами, Джек выходит из зала. ]];
 			else
 				return [["Надеюсь, я вам не помешаю? В любом случае, мне уже пора уходить", -- с этими словами, Джек выходит из зала. ]];
 			end;
 		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");
                 return [[Уолтер кивает: "Слушаю". ]];
             end;
         end};
 		{tag="sabotage", false, "Вы знаете, что пожар в Игнисе -- результат саботажа?", [["Безусловно. Системы энергоснабжения проектировал я и абсолютно уверен в их безопасности и надежности. Судя по тому, что произошло -- кто-то весьма грамотный ,,доработал'' систему энергоснабжения Игниса. Я не думаю, что это мог быть один человек... Хотя если он делал это несколько дней -- вполне вероятно. Как это сделать, кроме нас с Райтом знают только трое: Мишель Леруа, Чарльз Джонс и Мари Легран. И еще кое-что. Даркстар просил меня ни с кем про это не разговаривать, поэтому надеюсь на ваше понимание. Отдельно попрошу -- не говорить на эту тему с моей сестрой". ]], code [[
 			rel_walter = rel_walter + 1;
 		]]};
 		{tag="ignis_what", false, "Вы, как инженер, можете рассказать, что произошло в Игнисе?", [[
 			"Пожар. Вам что-то еще известно?"
 		]]};
 		{always=true, "Я пойду.", [["До встречи", -- Уолтер отворачивается от вас и возвращается к своим делам. ]], code [[ back();]]};
 	};
 };
 char_page_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("first_meeting_2"); ]]};
 		{tag="first_meeting_2"};
 		{"Вы хорошо знали отца?", [[Фрэнсис кивает: "Я уважаю его, как, думаю, все на этой станции. Пожертвовать всем ради призрачной мечты -- только великий человек мог пойти на такое. Он отправился на поиски легендарного города древних навьяров. К сожалению, я не смог отправиться с ним -- я нужен на станции. Я знаю, что вы здесь из-за него и я надеюсь, что вы не оставите вашу идею найти Уильяма и доведете свое дело до конца". ]], code [[ psub("generic"); ]]};
 		{"У меня к вам несколько вопросов.", [["Слушаю". ]], code [[ psub("generic"); ]]};
 		{tag="generic"};
         {"Что вы можете рассказать об Атлантиде?", [[Фрэнсис пожимает плечами: "Если честно, вам лучше расспросить кого-нибудь из управляющих, а лучше всего -- Майкла Райта. Все что я могу сказать -- я до сих пор поражаюсь успеху этого невероятного проекта". ]]};
         {"Что вы можете рассказать о Наутилусе?", [[Френсис кивает: "Когда мы создавали Наутилус, я уже работал в Вестхейвен Трансоушен. Атлантида тогда существовала, но была далеко от того, что вы видите. Мы тогда просто строили вторую Надежду. Нам не нужна была высокая автономность, но мы хотели большую маневренность и мощность -- собственно на этом мы и сконцентрировались. Получилось то, что получилось -- рабочая лошадка, которой мы пользуемся по сей день". ]]};
         {"Что вы можете рассказать об Энтерпрайзе?", [[Френсис кивает: "Энтерпрайз мы начали когда захотели судно побольше. Опыта и знаний нам хватило только на пропорциональное увеличение размеров и немного более мощный двигатель. Райт наверное сказал бы, что получилось из рук вон плохо, но, на мой взгляд, Энтерпрайз вполне неплох, да и с честью служит нам до сих пор". ]]};
         {"Что вы можете рассказать о Надежде?", [[Фрэнсис кивает: "Надежда была первой субмариной, построенной нами. Я в этом участия не принимал, так что многие конструктивные решения меня удивляют. Впрочем, более поздние субмарины спроектированы гораздо грамотнее, да и после переоборудования многое удалось решить". ]]};
         {"Что вы можете рассказать о Левиафане?", [[Френсис отвечает: "С первого взгляда ясно, что Левиафан не имеет практически ничего общего с Надеждой, Наутилусом и даже Энтерпрайзом. Интересно, что Левиафан строился с оглядкой на высокую автономность -- так же, как и Надежда. За это, конечно, пришлось многим поплатиться -- Левиафан большой и неповоротливый в сравнении с Надеждой". ]]};
 		{always=true, "Я пойду.", [[Фрэнсис Пейдж прощается с вами: "Увидимся позже". ]], code [[ back(); ]]};
 	};
 };
 char_leroy_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Мишель Леруа";
 	disp = "Мишель Леруа";
 	enter = function(s)
         poff("mtr_on_clock", "mtr_on_replace", "mtr_on_terra");
         if atl_mtr_started then
             if atl_mtr_know_goldman_lost_clock and not atl_mtr_finished then
                 pon("mtr_on_clock");
             end;
             if atl_mtr_know_leroy_replaced_jones and not atl_mtr_leroy_denies_replace then
                 pon("mtr_on_replace");
             end;
             if atl_mtr_know_leroy_in_terra and not atl_mtr_know_leroy_in_terra_asked then
                 pon("mtr_on_terra");
             end;
         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('generic'); ]]};
 		{"Рад знакомству.", [[Мишель кладет руку обратно на стол и спрашивает: "Что вы хотели?" ]], code [[ psub('generic'); ]]};
 		{tag="generic"};
         {tag="mtr_on_clock", false, "Что вы можете сказать о часах Леонарда Голдмана?", [[Тон Мишеля становится очень недружелюбным: "Я уже говорил ему, что не трогал его часы. Да, он оставил их в общем зале, как и всегда -- когда я ушел, они так там и лежали. Наверное кто-то смахнул их со стола и они завалились куда-нибудь в угол. "]], code [[ atl_mtr_leroy_asked_on_clock = true; psub("mtr_clock_more"); ]]};
         {tag="mtr_on_replace", false, "Джонс сказал, что вы вместо него вчера работали в Солисе. Это правда?", [[Мишель отрицательно качает головой: "Понятия не имею о чем вы. Слушайте, вы не Даркстар, чтобы задавать мне такие вопросы". ]], code [[atl_mtr_leroy_denies_replace = true;]]};
         {tag="mtr_on_terra", false, "Рэдклифф сказал, что видел вас вчера в Терре, что вы здесь делали?", [[Джонс начинает выходить из себя: "Работал, что же еще. Хотел забрать инструменты для ремонта скафандров на Энтерпрайзе, да вот беда -- кто-то уже уволок последний комплект. Пришлось плестись обратно". ]], code [[atl_mtr_leroy_in_terra_asked = true; ]]};
         {"Почему вы считаете, что станцию необходимо закрыть?", [[Мишель начинает объяснять, активно жестикулируя: "Вы недавно здесь, и для вас это должно быть гораздо более очевидно, чем для многих из нас. Легко представить, к чему здесь может привести самая мелкая поломка. А эти самонадеянные люди, в лице Дрейка, Блэка, Светловой, Моро, Райта и даже Даркстара не видят дальше собственного носа! Что произойдет, если Доминус даст течь? Мы просто останемся погребенными под тоннами соленой воды и никакие меры предосторожности не помогут. Одно дело -- кратковременные экспедиции и совсем другое -- полное переселение сюда". ]]};
 		{always=true, "Я пойду.", [[Мишель возвращается к чертежу. ]], code [[ back(); ]]};
         {tag="mtr_clock_more"};
         {"Кто был в общем зале, когда вы выходили?", [[Мишель недовольно отвечает: "Вы донимать меня пришли? Я работаю, вообще-то. Джонс был, донимайте лучше его". ]], code [[ psub("generic");]]};
 	};
 };
 char_goldman_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Леонард Голдман";
 	disp = "Леонард Голдман";
 	enter = function(s)
 		poff('show_clock');
 		if (have(item_goldmans_clock)) then
 			pon('show_clock');
 		end;
 		if (s.state == 0) then
 			s.state = 1;
 			psub("first_meeting");
 			return [[Перед вами на койке лежит человек лет пятидесяти с густыми светлыми волосами. Пышные золотистые усы украшают его слегка печальное лицо. Взгляд его голубых глаз устремлен на вас. Он приветствует вас: "Добро пожаловать на Атлантиду. Я Леонард Голдман. Занимаюсь электросистемами станции". ]];
 		else
 			psub("generic");
 			return [[Леонард Голдман печально смотрит на вас: "Что вы хотели?" ]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting"};
         {"Вас что-то тревожит?", [[Леонард сперва отрицательно мотает головой, но затем, видимо подумав спрашивает: "Вы не видели мои часы?"]], code [[ poff("clock0"); pon("clock1"); ]]};
 		{"Я Дэвид Дрейк. Рад знакомству.", [[Леонард кивает, но ничего не говорит. ]], code [[ psub("generic"); ]]};
 		{tag="generic"};
         {tag="clock0", "Вас что-то тревожит?", [[Леонард сперва отрицательно мотает головой, но затем, видимо подумав спрашивает: "Вы не видели мои часы?"]], code [[ pon("clock1"); ]]};
         {tag="clock1", false, "Расскажите больше про ваши часы.", [[Леонард рассказывает: "Это часы моего отца, Френсиса Голдмана. Я уже несколько дней ищу их по всей станции и не могу найти. Я оставил их в общем зале, кажется. Мы обедали там с Мишелем и Чарльзом, но никто из них часы не трогал. Куда они могли деться? -- Леонард пожимает плечами, после чего дополняет -- Если увидите их -- дайте знать". ]], code [[atl_mtr_know_goldman_lost_clock=true; ]]};
         {tag="solis", false, "Когда вы были в Солисе последний раз?", [[Леонард заметно нервничает, отвечая на ваш вопрос: "Около месяца назад. Я вчера должен был там работать, но мы с Чарли договорились, чтобы он поработал в Солисе вместо меня, так что меня там не было. Спросите у Райта, он в курсе". ]], code [[ atl_mtr_know_jones_replaced_goldman = true; ]]};
 		{tag="show_clock", false, "[Отдать часы] Я нашел ваши часы.", [[Голдман прячет часы в нагрудный карман и удивленно спрашивает: "Где вы их нашли?" ]], code [[ psub("give_clock"); ]]};
         {"Почему вы считаете, что станцию стоит закрыть?", [[Голдман объясняет: "Мы уже десять лет здесь. Не видели ни солнца, ни неба, ни травы. Только металлический потолок и километры воды над головой. Мне кажется, что пора бы уже закончить этот эксперимент. В чем-то я согласен с Джонсом -- станция стареет, оборудование выходит из строя. Долго ли до того, как мы потеряем наши субмарины, а вместе с ними и вообще всякую возможность вернуться наверх?"]]};
 		{"Я пойду.", [[Голдман кивает: "Поговорим позже". ]], code [[ back(); ]]};
 		{tag="give_clock"};
 		{"Часы были в Солисе.", [[Голдман испуганно вскакивает с койки: "Но как они там оказались?!"]], code [[ psub("give_clock_2"); pret(); ]]};
 		{"Нашел их в Терре.", [[Голдман пожимает плечами: "Как они там оказались? Неважно, главное, что нашлись". ]], code [[ pret(); ]]};
         {"Нашел их в общем зале.", [[Голдман пожимает плечами: "Удивительно, наверное завалились куда-нибудь". ]], code [[ pret(); ]]};
         {tag="give_clock_2"};
         {"Вы точно не могли их там оставить?", [[Голдман делает глубокий вдох и дрожащим голосом отвечает: "Я не был в Солисе почти месяц. Часы же я потерял дней пять назад. Я не мог их там оставить". Он ложится обратно на койку. ]], code [[ poff("clock0"); pon("solis"); pret(); ]]};
         {"Что вы знаете о взрыве?", [[Голдман с трудом собирается с мыслями: "Я к этому не причастен!" Он садится на койку и достает из кармана карандаш, начинает вертеть его в своих дрожащих руках. ]]};
 	};
 };
 char_jones_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Чарльз Джонс";
 	disp = "Чарльз Джонс";
 	enter = function(s)
 		if (char_jones.on_atlantis == 0) then
             pon("on_atlantis");
         end;
         poff("mtr_on_clock", "mtr_on_replace");
         if atl_mtr_started then
             if atl_mtr_know_goldman_lost_clock and not atl_mtr_leroy_asked_on_clock then
                 pon("mtr_on_clock");
             end;
             if atl_mtr_know_jones_replaced_goldman and not atl_mtr_know_leroy_replaced_jones then
                 pon("mtr_on_replace");
             end;
         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("generic"); ]]};
 		{tag="on_atlantis", false, "Вы считаете, что станцию необходимо закрыть?", [[Чарльз кивает: "Станция старая, разваливается на глазах. Нас слишком мало, чтобы своевременно устранять возрастающее число неполадок". ]], code [[ char_jones.on_atlantis = 1; psub("on_leaving");]]};
         {tag="generic"};
         {tag="mtr_on_clock", false, "Что вы можете сказать о часах Леонарда Голдмана?", [[Чарльз удивленно спрашивает: "Леонард уже и вас к их поисам подключил?" ]], code [[
             atl_mtr_leroy_asked_on_clock = true;
             psub("mtr_clock_more")
         ]]};
         {tag="mtr_on_replace", false, "Вы были вчера в Солисе?", [[Чарльз отрицательно качает головой: "Вы думаете, взрыв произошел по моей вине? Нет, я не был в Солисе уже недели две. Да, мы договорились с Голдманом, что я подменю его, но я нехорошо себя чувствовал -- возраст сказывается. Поэтому вместо меня в Солис пошел Мишель. Не знаю, в курсе ли Райт -- у нас обычное дело так меняться местами. Единственный кто возражает -- Даркстар, но к счастью, он далеко". ]], code [[
             atl_mtr_know_leroy_replaced_jones = true;
             pon("mtr_comment_replace_a", "mtr_comment_replace_b");
         ]]};
         {tag="mtr_comment_replace_a", false, "Я согласен с Даркстаром. Сейчас мы бы знали, кто виноват в аварии в Солисе. ", [[Чарльз нехотя соглашается с вами: "Наверное, вы все же правы". ]]};
         {tag="mtr_comment_replace_b", false, "Я согласен с вами, это лишняя бюрократия. ", [[Чарльз молча кивает. ]]};
 		{always=true, "Я пойду.", [[
 			"До встречи".
 		]], code [[ poff("mtr_comment_replace_a", "mtr_comment_replace_b"); back(); ]]};
         {tag="on_leaving"};
         {"Да. соглашусь с вами. ", [[Чарли понимающе кивает. ]], code [[ pret(); ]]};
         {"Но ведь станция в отличном состоянии. ", [[Чарли вздыхает: "Просто, вы еще не пробыли здесь достаточно и многого не видели". ]], code [[ pret(); ]]};
         {tag="mtr_clock_more"};
         {"Расскажите, где вы их видели в последний раз.", [[Чарльз задумчиво чешет голову: "Около недели назад, в общей зале Арктоса. мы как раз обедали, ну и Леонард быстро проглотив все, как всегда убежал, оставив часы на столе. Потом я ушел работать, Мишель, кажется, еще оставался там". ]], code [[psub("generic");]] }
 	};
 };
 atl_lev_radcliffe_dlg = dlg {
 	nam = "Уолтер Рэдклифф";
 	entered = function(s)
         char_radcliffe.rel_on_join = rel_walter;
         char_anna.rel_on_join = rel_anna;
         atl_lev_state = 2;
         psub("step1");
         if char_radcliffe_atlantis_dlg.state == 0 then
             char_radcliffe_atlantis_dlg.state = 1;
             return [[В доке Левиафана вы встречаете человека лет сорока--сорока-пяти, одетого в рабочий халат. При виде вас, он представляется: "Добрый день, господин Дрейк. Мое имя -- Уолтер Рэдклифф, я инженер. Мы только что перенесли на Левиафан припасы и оборудование, которые вам выделили Моро с Райтом. Хорошо, что я вас встретил. Нужно вас проинструктировать. Вы уже знаете, что скафандры снабжены радиопередатчиком и фонарем, но вы не знаете об еще одном важном устройстве. Мы называем его кодировщиком", -- Рэдклифф показывает вам устройство, которое все это время держал в руке. Аппарат представляет из себя клавиатуру, как у печатной машинки и набор лампочек, расположенных в ряд. Само устройство помещено в водонепроницаемый корпус, чтобы его можно было использовать под водой. Рэдклифф поясняет: "Каждый скафандр снабжен таким устройством. Оно позволяет нам общаться с навьярами. Как вы уже знаете, навьяры общаются посредством последовательностей цветовых сигналов. При нажатии на клавишу кодировщика, зажигается соответствующая лампочка. Лампы горят строго определенное время, которое регулируется ручкой, вот здесь. Вы можете набирать так быстро, как хотите. Кодировщик выведет последовательность целиком с заданной скоростью. Клавиши промаркированы буквами нашего алфавита, сопоставленными буквам навьярского. Если вы прочитаете учебник, что мы поместили в вашу каюту, вы разберетесь". ]];
         else
             return [[В доке Левиафана вы встречаете Уолтера Рэдклиффа. Завидев вас он говорит: "Дрейк, какая встреча. Мы только что перенесли на Левиафан припасы и оборудование, которые вам выделили Моро с Райтом. Хорошо, что я вас встретил. Нужно вас проинструктировать. Вы уже знаете, что скафандры снабжены радиопередатчиком и фонарем, но вы не знаете об еще одном важном устройстве. Мы называем его кодировщиком", -- Рэдклифф показывает вам устройство, которое все это время держал в руке. Аппарат представляет из себя клавиатуру, как у печатной машинки и набор лампочек, расположенных в ряд. Само устройство помещено в водонепроницаемый корпус, чтобы его можно было использовать под водой. Рэдклифф поясняет: "Каждый скафандр снабжен таким устройством. Оно позволяет нам общаться с навьярами. Как вы уже знаете, навьяры общаются посредством последовательностей цветовых сигналов. При нажатии на клавишу кодировщика, зажигается соответствующая лампочка. Лампы горят строго определенное время, которое регулируется ручкой, вот здесь. Вы можете набирать так быстро, как хотите. Кодировщик выведет последовательность целиком с заданной скоростью. Клавиши промаркированы буквами нашего алфавита, сопоставленными буквам навьярского. Если вы прочитаете учебник, что мы поместили в вашу каюту, вы разберетесь". ]];
         end;
     end;
 	phr = {
         {tag="step1"};
         {"Благодарю.", [[Уолтер кивает и продолжает: "Я хотел бы присоединиться к экипажу Левиафана и предложить вам свою помощь в поисках Уильяма". ]], code [[psub("step2");]]};
         {tag="step2"};
 		{"Как к этому отнесутся на Атлантиде?", [["Я уже обговорил это с Моро и Райтом. Они не против моего решения, тем более, что они не меньше вас заинтересованы в успехе вашей экспедиции". ]]};
 		{"Добро пожаловать на борт.", [["Отлично, благодарю. У меня есть еще одна просьба. Я хотел бы, чтобы моя сестра отправилась вместе с нами. Она знает язык навьяров и может оказаться крайне полезна во множестве ситуаций, кроме того -- так она остается под моим присмотром". ]], code [[
 			table.insert(pl.party, 'radcliffe');
             move(char_radcliffe, char_radcliffe.home);
 			psub("sister");
 		]]};
 		{tag="sister"};
 		{"Я не думаю, что ей место на Левиафане -- экспедиция может быть опасна.", function(s)
 			if (ArrayUtils.indexOf(pl.party, 'learr') ~= 0) then
 				walk(atl_lev_first_sail);
 				return [["Вы правы, Анне будет безопаснее остаться на Атлантиде. Я знаю, что с вами отправляется Леарр, которая достаточно хорошо знает наш язык, так что я надеюсь, что мы справимся без помощи моей сестры. Я скоро вернусь", -- с этими словами он выходит из дока. ]];
 			else
 				return [["Я хотел бы, чтобы Анна отправилась с нами -- я лично позабочусь о ее безопасности, а вам понадобится человек, долгое время посвятивший изучению культуры навьяров". ]];
 			end;
 		end};
 		{"Хорошо, ее помощь нам не помешает.", [["Отлично, мы скоро будем готовы", -- с этим словами он выходит из дока. ]], [[
 			table.insert(pl.party, 'anna');
             move(char_anna, char_anna.home);
 			walk(atl_lev_first_sail);
 		]]};
 	};
 };
@@ \ No newline at end of file @@

0 comments (0 inline, 0 general)