global {

	atl_jack_in_party = false;

	atl_lev_state = 0;

	atl_iof_completed = false;

	atl_iof_learr_dead = false;

	atl_iof_learr_suit = false;

	atl_nih_state = 0;

	atl_iyh_state = 0;

    atl_iyh_learr_spoken = false;

	atl_iyh_ryveerr_spoken = false;

	atl_iyh_shockfish_dead = false;

	atl_iyh_shockfish_left = false;

	atl_iyh_shockfish_away = 0;

	atl_iyh_entrance_destroyed = false;

	atl_iyh_artifacts_on_atlantis = false;

	atl_lfc_state = 0;

	atl_lfc_panic = 0;

    atl_lfc_panic_warning = 0;   

	atl_lfc_hallrooms = 0;

	atl_lfc_electric = 0;

	atl_lfc_board = 0;

	atl_lfc_suspect = nil;

	atl_lfc_leroy_spoken = 0;

	atl_lfc_goldman_spoken = 0;

	atl_lfc_goldman_known = false;

	atl_lfc_goldman_exposed = false;

	atl_lfc_saboteur_known = false;

	atl_lfc_sab_active = false;

	atl_lfc_sab_alive = false;

	atl_fta_state = 0;

	atl_rep_moreau = 0;

	atl_rep_darkstar = 0;

	atl_rep_svetlova = 0;

	atl_rep_wright = 0;

};

atl_illuminators = obj {

	nam = "Иллюминаторы";

	dsc = [[Через равные промежутки в стены встроены небольшие круглые {иллюминаторы}. ]];

	act = [[Через иллюминаторы видны несколько других секций и коридоров. В лучах света, проникающих с поверхности вы видите массивные металлические конструкции непонятного вам назначения. На покрытом илом дне видно большое количество следов от тяжелых металлическых подошв персонала станции. ]];

};

atl_illuminator = obj {

    nam = "Иллюминатор";

    dsc = [[В стену встроен небольшой {иллюминатор}. ]];

    act = [[Через иллюминатор вы видите несколько других секций и коридоров. В лучах света, проникающих с поверхности вы видите массивные металлические конструкции непонятного вам назначения. На покрытом илом дне видно большое количество следов от тяжелых металлическых подошв персонала станции. ]];

};

atl_intersect_phone = obj {

    nam = "Телефон";

    dsc = [[На одной из стен укреплен {телефонный аппарат} в герметичном контейнере. ]];

    act = function(s)

        if (atl_lfc_state == 1 and atl_lfc_panic == 1 and atl_lfc_panic_warning == 0) then

            walkin("panic_first_warning_dlg");

        else

            return [[Вам незачем кому-то звонить. ]];

        end;

    end;

};

atl_intersect_suit = obj {

    nam = "Скафандр";

    dsc = [[В углу стоит {скафандр}. ]];

    act = [[Сейчас нет смысла это делать. ]];

}

atl_aqua_corridor_b = room {

	nam = "Атлантида, Аква, коридор B";

	dsc = [[Широкий коридор, заполненный ярким светом электрических ламп. В одном конце коридора расположена шлюзовая дверь, ведущая в основной коридор секции _"Аква"_. По бокам коридора находятся еще несколько дверей, ведущих в другие помещения секции: гостевые доки A, B и С. ]];

	way = {

		kh_vroom("В гостевой док A", function()

			if (atl_lev_state == 0) then

				pr("Люк наглухо задраен. Вы не сможете его открыть. ");

				return false;

			elseif (atl_lev_state == 1) then

				return "atl_lev_radcliffe_dlg";

			else

				return "atl_aqua_leviathan_dock";

			end;

		end);

		kh_vroom("В гостевой док B", function()

			pr("Люк наглухо задраен. Вы не сможете его открыть. ");

			return false;

		end);

		kh_vroom("В гостевой док C", function()

			pr("Люк наглухо задраен. Вы не сможете его открыть. ");

			return false;

		end);

		kh_vroom("В главный коридор", "atl_aqua_main_corridor");

	};

	obj = {

		"atl_illuminators",

		"atl_nih_tubes_aqua_b"

	};

};

atl_entry = lcutscene("atl_entry", "Левиафан, рубка", function(s)

    if (ArrayUtils.indexOf(pl.party, "wright") ~= 0) then

        return [[Несколько недель Левиафан полным ходом несется по направлению к танственной точке, отмеченной на карте. Путешествие происходит спокойно -- могучие машины субмарины уверенно двигают ее вперед. Хотя субмарина явно требует большего экипажа, вы неплохо справляетесь вдвое и добираетесь до места назначения. Здесь, на океанском дне вы видите несколько больших металлических и стеклянных куполов, освещенных электрическими огнями. Приблизившись, вы быстро находите путь в одно из строений. Как только Левиафан проникает внутрь, массивные ворота закрываются, оставляя вас взаперти. ]];

    else

        return [[Несколько недель Левиафан полным ходом несется по направлению к танственной точке, отмеченной на карте. Путешествие происходит спокойно -- могучие машины субмарины уверенно двигают ее вперед. Управлять субмариной в одиночку нелегкая работа. Вы почти не спите, опасаясь оставлять движение корабль без внимания. К счатью, вы без проблем добираетесь до места назначения. Здесь, на океанском дне вы видите несколько больших металлических и стеклянных куполов, освещенных электрическими огнями. Приблизившись, вы быстро находите путь в одно из строений. Как только Левиафан проникает внутрь, массивные ворота закрываются, оставляя вас взаперти. ]];

    end;

end, "Вы прибыли на Атлантиду", leviathan_wheelhouse);

atl_aqua_leviathan_dock = room {

	var {

		visited = false;

	};

	nam = "Атлантида, Аква, гостевой док A";

	enter = function(s)

		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_iof_learr_dead) then

				walk('iyh_outro_aikerjarr');

			else

				walk('iyh_outro_learr');

			end;

		end;

	end;

	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Левиафан. Под потолком, на высоте примерно в пять метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Снизу, под водой, огромный люк закрывает доступ внутрь дока. Несколько легких подвижных мостиков находятся на поверхности воды. ]];

	view = [[Левиафан находится в просторном доке. Под потолком на высоте пяти метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Внизу расположен закрытый люк, закрывающий вам путь наружу. ]];

	way = {

		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("В док \"Наутилуса\"", function()

			if (atl_lfc_state == 2) then

				return "atl_lfc_dock_s";

			else

				return "atl_aqua_nautilus_dock";

			end;

		end);

		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()

			pr("Люк наглухо задраен. Вы не сможете его открыть. ");

			return false;

		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_intersection = inherit(room, function(v)

        end};

        {tag="on_drake", "Расскажите об Уильяме Дрейке. ", function(s)

            if (rel_anna < 0) then

                char_anna.on_drake = 1;

                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];

            else

                char_anna.on_drake = 2;

                return [[Анна Рэдклифф отвечает: "Хотя Дрейк -- руководитель Атлантиды, он проводит больше времени здесь, в Окулусе, чем в своем кабинете в Доминусе. Сейчас он в экспедиции -- они с Блэком отправились на поиски отдаленных навьярских поселений". ]];

            end;

        end};

        {always=true, "Вернемся к делу.", [[Анна Рэдклифф кивает: "Хорошо".]], code [[ pret(); ]]};

		{tag="generic"};

        {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="sabotage", "Вы знаете, что пожар в Игнисе - следствие саботажа?", function(s)

			atl_lfc_panic = atl_lfc_panic + 1;

			atl_rep_darkstar = atl_rep_darkstar - 1;

			rel_walter = rel_walter - 1;

			rel_anna = rel_anna - 1;

			return [[Анна удивленно смотрит на вас: "Зачем вы это говорите? Кому может прийти в голову подобное?" ]];

		end};

		{tag="ignis_what", "Вы знаете, что произошло в Игнисе?", [[Анна отрицательно качает головой: "Мне почти ничего неизвестно. Поговорите с Даркстаром или Райтом. Или спросите моего брата, Уолтера. Я думаю он в курсе". ]]};

        {always=true, "У меня есть несколько вопросов.", [[Анна отвечает: "Да, я слушаю".]], code [[ psub('ask_more'); ]]};

		{always=true, "Я пойду", [[Анна прощается с вами: "До встречи". ]], code [[ back(); ]]};

	};

};

char_learr_atlantis_dlg = dlg {

	var {

		state = 0;

        lfc_dialog = false;    

        sabotage_explained = false;

	};

	nam = "Леарр";

	disp = "Леарр";

	entered = function(s)

        if (atl_lfc_state == 1 and not s.lfc_dialog) then

            s.lfc_dialog = true;

            pon('sabotage', 'ignis_what');

        elseif (atl_lfc_state ~= 1) then

            poff('sabotage', 'ignis_what');

        end;    

		if (s.state == 0) then

			if (char_learr_atlantis.offended) then

				psub("offended");

				return [[Леарр поворачивается к вам, плавники ее становятся ярко-фиолетовыми. Она рычит: "Прриветсствую, монсстрр. Мы говоррить-будем?" ]];

			else

				psub("pre_iof");

				return [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я прриветсствую тебя-he'vji'a'rr". ]];

			end;

		elseif (s.state == 1) then

			s.state = 2;

			psub("after_iof");

			if (atl_iof_learr_suit) then

				return [[При виде вас, плавники Леарр меняют цвет на ярко-зеленый. Она плавно опускает руки вниз и слегка наклоняется вперед. Выпрямившись, она произносит: "Я благодарю тебя. Мне твоя-идея-понравилась". ]];

			else

				return [[При виде вас, плавники Леарр меняют цвет на ярко-зеленый. Она плавно опускает руки вниз и слегка наклоняется вперед. Выпрямившись, она произносит: "Я благодарю тебя". ]];

			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;

            poff('iyh1', 'iyh4', 'iyh5');

            if (atl_iyh_state == 1) then

                pon('iyh1');

            elseif (atl_iyh_state == 2 and ArrayUtils.indexOf(pl.party, 'learr') == 0) then

                pon('iyh2');

			elseif (atl_iyh_state == 4) then

				pon("iyh4");

			elseif (atl_iyh_state == 5) then

				pon("iyh5");

			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('atl_iof_intro'); 

        ]]};

		{"От этого суть не изменится, чудище", [[Леарр скалится, показывая блестящие острые зубки: "Ты убиррайся, пока я тебя не ссъела". ]], code [[ 

			char_learr_atlantis_dlg.state = 1;

			walk('atl_iof_intro'); 

		]]};

		{tag='pre_iof'};

		{"He'vji'a'rr?", [[Леарр кивает: "Мы так-наззываем пришшедшших-сс-поверхноссти-васс". ]]};

		{"Я хотел кое-что спросить", [["Ты говорри", - просит Леарр. ]], code [[ 

			char_learr_atlantis_dlg.state = 1;

			walk('atl_iof_intro'); 

		]]};

		{tag="after_iof"};

		{"Рад, что смог помочь", [[Леарр кивает, все еще находясь в явном возбуждении: "Ты говоррить-пришшел? Ты говорри". ]], code [[ psub("generic"); ]]};

		{"У меня не было выбора", [[Леарр непонимающе смотрит на вас, однако говорит: "Я благодаррю тебя. Ты говорри".

		]], code [[ rel_learr = rel_learr - 1; psub("generic"); ]]};

		{tag="generic"};

		{tag="iyh1", "Расскажи о вашем конфликте с Дипатреанотром.", [[Леарр начинает рассказывать, активно жестикулируя: "Рреликвия нессколько-дней-наззад-изз-нашшего-хррама-прропала. Na'vji'a'yhe'dyp'atre'anot'rr вззяли нашшу-рреликвию! Они потом-в-наш-город-пришли и требовали-вернуть их-реликвию! Мы не-брали ее и это-сказали им!" - Леарр недовольно топает и шипит, - "Они нам-не-верят! Они украли нашу-вещь и не-верят нам!" ]], code [[ atl_iyh_learr_spoken = true; ]]};

        {tag="iyh2", "Я отправляюсь в храм Дипатреанотра. Мне не помешает твоя помощь.", [[Плавники Леарр принимают фиолетовый оттенок: "He'vji'a'rr нельзя туда!"]], code [[ psub("join_me"); ]]};      

		{tag="iyh4", "Здесь неподалеку есть старый навьярский храм. Я прошу разрешения посетить его.", [[Леарр задумчиво произносит: "He'vji'a'rr нельзя-туда... Я место-не-знаю".^Немного постояв в задумчивости, Леарр восклицает: "Мы-вместе туда-пойдем! Ривеерр это-не-одобрит, но я с-ним-поговорю". ]], code [[ psub("iyh_agree"); ]]};

        {tag="sabotage", false, "Ты знаешь, что пожар начался из-за саботажа?", [[Леарр непонимающе крутит головой: "Я что-ты-говоришь-не-понимаю. Что саботаж?" ]], code [[ poff("ignis_what");psub("sabotage_explain"); ]]};

        {tag="ignis_what", false, "Ты знаешь, почему начался пожар в Игнисе?", [[Леарр неуверенно пожимает плечами: "Я ты-лучше-знаешь-думаю. Ты расскажешь?"]], code [[ psub("sabotage_reason"); ]]};

        {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};

		{"Я пойду", [[Плавники Леарр медленно теряют цвет и она прощается с вами: "Ты воззврращщайсся". ]], code [[back();]]};

        {tag="join_me"};

        {"Я не собираюсь входить внутрь, но мне нужно осмотреть его окрестности.", [[Цвет плавников Леарр меняется на оранжевый и затем на желтый. Она соглашается: "Я с-тобой-пойду. Я давно-в-Ираафаанотре-не-была". ]], code [[

            lifeon("char_learr");

            table.insert(pl.party, 'learr');

            pret();

        ]]};

        {"Для этого ты мне и нужна.", [[Цвет плавников Леарр меняет цвет на синий. Она соглашается: "Я согласна. Я с-тобой-пойду". ]], code [[

            lifeon("char_learr");

            table.insert(pl.party, 'learr');

            pret();

        ]]};

        {tag="sabotage_explain"};

        {"Кто-то из работников станции устроил пожар.", [[Леарр непонимающе смотрит на вас: "Я зачем-не-понимаю". ]], code [[char_learr_atlantis_dlg.sabotage_explained = true; pon("explanation2", "avoid");]]};

        {tag="explanation2", false, "Он сделал это специально с какой-то собственной целью.", [[Леарр все еще не понимая переспрашивает: "Зачем?"]]};

        {"Не думаю, что есть смысл об этом еще говорить.", function(s)

            if (char_learr_atlantis_dlg.sabotage_explained) then

                return [[Леарр кивает: "Я благодарю-за-объяснение тебя". ]];

            else

                return [[Леарр кивает. ]];

            end;

        end};

        {tag="sabotage_reason"};

        {"Это был саботаж.", [[Леарр непонимающе крутит головой: "Я что-ты-говорришшь-не-понимаю. Что ссаботажж?" ]], code [[ poff("sabotage"); psub("sabotage_explain"); ]]};

        {"Я не знаю. Но хотел бы знать", [[Леарр разочарованно вздыхает: "Ты ессли-уззнаешшь-рассскажжи". ]], code [[psub("generic");]]};

        {tag="more_on_books"};

        {"Я могу помочь?", [[Леарр кивает: "Я думаю-ты-дрругим-делом-ззанят. Я не-хчочу-мешшать". ]], code[[ char_learr.on_books = 3; pret(); ]]};

        {"Давно ты этим занимаешься?", [[Леарр кивает: "Я с-ссамого-пррибытия-вашши-книги-учуссь-читать. Я надеюссь-вссе-пойму ссо-врременем". ]]};

        {"Как у тебя успехи?", [[Леарр смущенно отвечает: "Я ещще-многое-не-понимаю. Но я ссо-врременем-пойму-надеюссь". ]]};

        {"Давай поговорим о другом.", [[Леарр кивает: "Ты говорри". ]], code [[pret();]]};

        {tag="legend2", empty=code [[back();]]};

        {"Значит, вы не брали реликвию?", [[Леарр недовольно шипит: "Ты тожже-мне-не-верришшь?! Ухходи!"]]};

        {"У тебя есть идеи, куда могла пропасть их реликвия?", [[Леарр отрицательно качает головой: "Нет". ]]};

		{tag="iyh_agree"};

		{"Я согласен. Только так мы докажем Дипатреанотру, что вы ни при чем.", [[Леарр отвечает: "Ты сообщщи, когда готов-будешшь. Мы поззжже-поговоррим". ]], code [[ 

			lifeon("char_learr");

			table.insert(pl.party, 'learr');

			atl_iyh_state = 6; 

			back(); 

		]]};

		{"Лучше я отправлюсь один.", [[Леарр недовольно шипит: "Не взздумай! Ты ссебе, мне и Ry'vee'rr-у ххужже ссделаешшь". ]]};

	};

};

char_aikerjarr_dlg = dlg {

	var {

		state = 0;

        lfc_dialog = false;      

	};

	nam = "Аикерьярр";

	dsc = function(s)

        if (atl_lfc_state == 1 and not s.lfc_dialog) then

            s.lfc_dialog = true;

            pon('sabotage', 'ignis_what');

        elseif (atl_lfc_state ~= 1) then

            poff('sabotage', 'ignis_what');

        end;

        if (s.state == 0) then

            psub("first_meeting");

            return [[Перед вами стоит высокий стройный навьяр. Серебристая чешуя сверкает в свете электрических ламп. Неприязненный взгляд его зеленых глаз направлен на вас. Существо одето в темно-зеленые облегающие штаны и куртку из водорослей. В правой руке навьяр держит острозаточенное коралловое копье. ]];

		elseif (s.state == 1) then

			psub("generic");

            if (atl_iyh_state == 1) then

                pon('iyh1');

			elseif (atl_iyh_state == 4) then

				pon("iyh4");

			elseif (atl_iyh_state == 5) then

				pon("iyh5");

			end;

		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'vja'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 [[char_aikerjarr_dlg.state = 1; 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'vja'za'rr. Нам все еще нужно поговорить. ", [[Навьяр вздыхает: "Ty'rr не-отсстанет. I'rr тебя-сслушшает"]], code [[ char_aikerjarr_dlg.state = 1; psub("generic"); ]]};

        {"Нам все еще нужно поговорить", [[Навьяр надменно бросает: "I'rr vtre'za'nn he'vja'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 = "sabotage", "Ты знаешь, что пожар начался из-за саботажа?", [[Аикерьярр лишь слегка усмехается, но не удостаивает вас ответом. ]]};

        {tag = "ignis_what", "Ты знаешь, почему начался пожар в Игнисе?", [[Аикерьярр лишь слегка усмехается, но не удостаивает вас ответом. ]]};

		{tag="iyh1", "Расскажи о вашем конфликте с Дипатреанотром.", [[Аикерьярр недовольно смотрит на вас:"He'vji'a'rr не-помочь".^Немного подумав, он рассказывает: "Na'vji'a'yhe'dyp'atre'anot'rr говоррить yhe мы украссть реликвия-изз-ихх-ххррама", -- Аикерьярр злобно стучит зубами и в ярости сжимает кулаки, -- "Мы не-делали-этого-ссказзали им! Но они в-ответ-на-нашш-ххррам-напали и нашши-рреликвии-вззяли!" ]], code [[ atl_iyh_learr_spoken = true; ]]};

        {tag="iyh4", "Неподалеку отсюда есть старый храм навьяров. Я прошу разрешения посетить его.", [[

            Аикерьярр кивает: "Я не-понимаю, hyd это связано с-текущей-ситуацией. Ты узнай e тогда-приходи"

        ]], code [[ back(); ]]};      

		{"Я вернусь позже", [[Аикерьярр отворачивается от вас, даже не удостоив ответом. ]], code [[back(); ]]};

	};

};

char_ryveerr_dlg = dlg {

	var {

		state = 0;

        lfc_dialog = false;

	};

	nam = "Ривеерр";

	disp = "Ривеерр";

	entered = function(s)

        if (atl_lfc_state == 1 and not s.lfc_dialog) then

            s.lfc_dialog = true;

            pon('sabotage', 'ignis_what');

        elseif (atl_lfc_state ~= 1) then

            poff('sabotage', 'ignis_what');

        end;

        if (s.state == 0) then

            s.state = 1;

            psub("first_meeting");

            return [[Перед вами стоит навьяр. Серо-зеленая чешуя, несколько более темная, чем у Леарр блестит в свете электрических ламп. Красно-оранжевые глаза внимательно смотрят на вас. Он одет в темно-зеленые облегающие шорты и куртку из водорослей. Навьяр приветствует вас: "Ривеерр-из-Дипатреанотра рад-видеть тебя". ]];

        elseif (atl_iof_completed and char_ryveerr.iof_reaction == 0) then

            if (atl_iof_learr_dead) then

                psub("iof_learr_dead");

                return [[Плавники Ривеерра окрашиваются синим. Он произносит: "Хевьяр-ты не-помог Леарр". ]];

            elseif (atl_iof_learr_suit) then

                psub("iof_learr_suit");

                return [[Ривеерр благодарит вас: "Дрейк-ты хорошо-придумал. Я рад, что Леарр-из-Ираафаанотра жива". ]];

            else

                psub("iof_learr");

                return [[Ривеерр сообщает: "Я рад, что никто-в-Игнисе-не-умер". ]];

            end;

        else

            psub("generic");

            if (s.state == 1) then

                if (atl_iyh_state == 1) then

                    pon('iyh1');

                elseif (atl_iyh_state == 4) then

                    psub("situation");

                elseif (atl_iyh_state == 5) then

                    pon("legend");

                end;

            elseif (s.state == 2) then

                if (atl_iyh_state == 6) then

                    if (atl_iof_learr_dead) then

                        pon("take_aikerjarr");

                    else

                        pon("take_learr");

                    end;

                end;

                pon("legend2");

            end;

            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="iof_learr_dead"};

        {"Я сделал все, что мог", [[Ривеерр кивает: "Мне жаль, что ты-помочь-Леарр-не-смог". Через некоторое время он приглашает: "Ты говори". ]], code [[ psub("generic"); ]]};

        {"Я пришел говорить о другом", [[Ривеерр отворачивается от вас. ]], code [[

            back();

        ]]};

        {tag="iof_learr_suit"};

        {"Я сделал то, что был должен", [[Ривеерр кивает и приглашает вас: "Ты говори". ]], code [[psub("generic");]]};

        {tag="iof_learr"};

        {"Я тоже", [[Ривеерр кивает и приглашает вас: "Ты говори". ]], code [[psub("generic");]]};

		{tag="generic"};

		{tag="iyh1", false, "Расскажи о конфликте Ираафаанотра с Дипатреанотром", [[Ривеерр рассказывает вам: "Na'vji'a'yhe'iraa'pha’anot’rr нашу-реликвию-украли. Мы тем-же-ответили им". ]], code [[ psub("more_on_relic"); ]]};

        {tag="sabotage", [[Ты знаешь, что пожар начался из-за саботажа?]], function(s)

            if (atl_iof_learr_dead) then

                return [[Ривеерр недовольно отвечает: "Это-не-значимо. Значимо, что Леарр мертва". ]];

            else

                return [[Ривеерр спокойно отвечает: "Ты со-мной-про-это-не-говори. Это-ваши-дела. Я не-хочу-ими-заниматься". ]];

            end;

        end};

        {tag="ignis_what", "Ты знаешь, почему начался пожар в Игнисе?", function(s)

            if (atl_iof_learr_dead) then

                return [[Ривеерр недовольно отвечает: "Это-не-значимо. Значимо, что Леарр мертва". ]];

            else

                return [[Ривеерр спокойно отвечает: "Ты со-мной-про-это-не-говори. Это-ваши-дела. Я не-хочу-ими-заниматься". ]];

            end;

        end};

		{always=true, "Я пойду", [[Ривеерр прощается с вами: "Мы позже-поговорим". ]], code [[ back(); ]]};

		{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"); ]]};

		{"Вы уверены, что это они?", [[Ривеерр отвечает: "Другой-никто не-мог-сделать". ]]};

        {"Как убили охранников", [[Ривеерр отвечает: "Их копьями-проткнули. Мы раны-видели". ]]};

		{tag="situation"};

		{"Мы знаем об одном древнем храме неподалеку отсюда", [[Ривеерр пожимает плечами: "Я не-понимаю, hyd это поможет нам". ]], code [[ psub("cancel");]]};

		{always=true, "Я пойду", [[Ривеерр прощается с вами: "Мы позже-поговорим". ]], code [[ back(); ]]};

		{tag="legend"};

		{"Мы знаем где ваша реликвия. Мы знаем об одном древнем храме, где живет затмевающий свет. [Кратко пеесказать легенду]", [[

			"Я знаю эту-легенду. Вы возможно-правы. В-храм вам-нельзя-идти. Это наше-священное-место. he'vji'a'rr не-место-там. Затмевающий-свет не-враг-нам. Его нельзя-тревожить".

		]], code [[ psub("legend_more")]]};

		{always=true, "Я пойду", [[

			Ривеерр прощается с вами: "Мы позже-поговорим".

		]], code [[ back(); ]]};

		{tag="legend_more"};

		{"Вы могли бы сопровождать нас. ", [[

			"В-храм нельзя-вам".

		]], code [[ 

			char_ryveerr_dlg.state = 2;

		]]};

		{always=true, "Я вернусь позже", [[Ривеерр прощается с вами: "Мы поззжже-поговоррим". ]], code [[ back(); ]]};

		{tag="legend2"};

		{tag="take_learr", false, "Леарр согласилась сопровождать нас в храм. ", [[

			"Леарр'yhe'iraa’pha’anot’rr. Не-уверен-я что-могу-доверять-ей. Я подумать-должен..." - Некоторое время Ривеерр стоит неподвижно, задумавшись. Наконец, скрестив руки на груди, Ривеерр продолжает: "Я согласен".

		]], code [[ atl_iyh_state = 6; back(); ]]};

		{tag="take_aikerjarr", false, "Аикерьярр согласился сопровождать нас в храм", [[

			"Аикерьярр'yhe'iraa’pha’anot’rr. Не-уверен-я что-могу-доверять-ему. Я подумать-должен..." - Некоторое время Ривеерр стоит неподвижно, задумавшись. Наконец, скрестив руки на груди, Ривеерр продолжает: "Я согласен".

		]], code [[ atl_iyh_state = 6; back(); ]]};

		{always=true, "Я вернусь позже", [[Ривеерр прощается с вами: "Мы поззжже-поговоррим". ]], code [[ back(); ]]};

	};

};

char_evans_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Кристиан Эванс";

	disp = "Кристиан Эванс";

	entered = function(s)

		if (atl_lfc_state ~= 1) then

			poff('sabotage', 'ignis_what');

		end;

		if (atl_lfc_state == 1 and not s.lfc_dialog) then

			s.lfc_dialog = true;

			pon('sabotage', 'ignis_what');

		end;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

			return [[Немолодой мужчина внимательно смотрит на вас через стекла старых очков. Он приветствует вас: "Добро пожаловать на нашу станцию. Я Кристиан Эванс, занимаюсь языком навьяров". ]];

		else

			psub("generic");

			return [[Кристиан Эванс приветствует вас: "Добрый день". ]];

		end;

	end;

	phr = {

		{tag="first_meeting"};

		{"Я Дэвид Дрейк, очень приятно", [[

			Кристиан улыбается и отвечает: "Очень рад вас видеть. У вас есть вопросы? Я слушаю". ]], };

		{tag="generic"};

		{tag="sabotage", "Вы знаете, что пожар в Игнисе - результат саботажа?", function(s)

			atl_lfc_panic = atl_lfc_panic + 1;

			atl_rep_darkstar = atl_rep_darkstar - 1;

			return [[Кристиан недовольно ворчит: "Если это так, то надо не на каждом углу кричать, а предоставить сведения Даркстару или Моро. Они найдут, как решить проблему". ]];

		end};

		{tag="ignis_what", "Вы знаете, что произошло в Игнисе?", [[Кристиан пожимает плечами: "Об этом вам лучше узнать у Райта или Даркстара. Я мало что знаю". ]]};

		{always=true, "Я пойду", [[Кристиан прощается с вами: "До встречи". ]], code [[ back(); ]]};

	};

};

char_winterlight_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Сильвия Уинтерлайт";

	disp = "Сильвия Уинтерлайт";

	entered = function(s)

		if (atl_iyh_state == 4) then

			pon("legend");

		end;

		if (atl_lfc_state ~= 1) then

			poff('sabotage', 'ignis_what');

		end;

		if (atl_lfc_state == 1 and not s.lfc_dialog) then

			s.lfc_dialog = true;

			pon('sabotage', 'ignis_what');

		end;

		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"); ]]};

		{tag="generic"};

		{tag="legend", false, "Ты можешь рассказать мне навьярскую легенду о скате?", [[Сильвия кажется заинтересованной: "У навьяров их много, какую конкретно вы хотите услышать?" ]], code [[ psub("which_legend"); ]]};

		{tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", function(s)

			atl_lfc_panic = atl_lfc_panic + 1;

			atl_rep_darkstar = atl_rep_darkstar - 1;

			if (atl_lfc_panic <= 2) then

				return [[

					Сильвия Уинтерлайт пожимает плечами: "Не поверю, чтобы кто-то это мог сделать".

				]];

			elseif (atl_lfc_panic == 3) then

				return [[

					Сильвия Уинтерлайт удивленно смотрит на вас: "Вы не первый кто так говорит. Но кто это мог сделать?"

				]];

			end;

		end;};

		{tag="ignis_what", false, "Вы знаете, что произошло в Игнисе?", [[

			"Крайней мало. Вам лучше поговорить с Райтом или Даркстаром".

		]]};

		{always=true, "Я пойду", [[

			Сильвия молча кивает и возвращается к своим делам. 

		]], code [[ back(); ]]};

		{tag="which_legend"};

		--TODO добавить несколько легенд

		{"Что-нибудь связанное с храмами и реликвиями", [[

			Сильвия задуиывается: _"Храмы, реликвии и скаты... Да, есть кое-что", -- она откидивыет волосы назад и продолжает: "Согласно этой легенде, хранителей одного из святилищ навьяров был могучий затмевающий свет по имени Излучающий Тьму. Это было в те времена, когда навьяры и затмевающие свет были связаны узами дружбы. Излучающий тьму был мудрым хранителем - он не только принимал священные реликвии на сохранение, но и многое знал о них - об их предназначении и истинной ценности. Однажды Излучающий Тьму узнает о необычнайно ценной реликвии, хранящейся в одном из городов и скрывающей в себе древние знания навьяров. Узнает он и о том, что живущие навьяры не в силах прочитать. Тогда он прибыл в город, чтобы просить навьяров отдать ему реликвию на сохранение. Но навьяры отказывают ему. Вернувшись в святилище, Излучающий Тьму придумал план. Ночью он пробрался в город и выкрал реликвию. Когда наутро навьяры обнаружили пропажу, они направились к Излучающему Тьму с требованием вернуть им реликвию. На это могучий затмевающий свет спросил их: ,,Знаете ли вы, что скрывает этот предмет?''^ -- кстати, в некоторых переводах я встречала слово ,,светодиск'', как описание реликвии. 

			,,Знания наших предков'', -- ответили навьяры. Излучающий Тьму продолжил: ,,Можете ли вы прочитать его?''^

			,,Нет'', --сказали навьяры. Тогда Излучающий Тьму рассказал им легенду о храме в глубинах, которую он прочитал из данной реликвии(Нам, кстати, так и не довелось получить хоть какой-либо целостный текст этой легенды), и сказал им: ,,Можете приходить сюда когда захотите и я расскажу вам то, что вы захотите знать. Но только, если реликвия ваша остается у меня''. Навьяры поняли, что если заберут реликвию, то навсегда утратят древние знания и согласились". 

		]], code [[ psub("more_on_legend"); ]]};

		{tag="more_on_legend"};

		{"Светодиск?", [[

			"Мы плохо понимаем, для чего они служат. У Светловой один такой был. Блестящий диск - сантиметров 10 в диаметре. Правда вот как их ,,читать''... В привычном понимании, по крайней мере, мы не понимаем. Если рассматривать их под микроскопом - там весьма характерный рисунок проступает. Почему светодиск? Мы не знаем - это навьяры их так называют".

		]]};

		{"Что за легенда о храме в глубинах?", [[

			"Мы только приблизительно знаем о ней - она постоянно упоминается в контексте других легенд и у нас есть фрагменты, которые нам рассказывали навьяры. Когда-то давно навьяры построили храм где-то в ущелье, но по какой-то причине были вынуждены покинуть его". 

		]]};

		{"Спасибо, я пойду", [[

			"До встречи. Если захотите еще древних сказаний послушать - приходите".

		]], code [[ atl_iyh_state = 5; psub('back'); ]]};

	};

};

char_jack_wright_atlantis_dlg = dlg {

	var {

		state = 0;

        lfc_dialog = 0;

	};

	nam = 'char_jack_wright_atlantis_dlg';

	disp = "Джек Райт";

	entered = 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;

        else