end;

    phr = {

        {tag="lfc_warning"};

        {always=true, "Мне пора", [["До встречи", -- Майкл Райт возвращается к своим делам. ]], code [[ back(); ]]};

        {tag="iof_learr_dead"};

        {"Мне очень жаль.", [[Майкл Райт кивает: "Утерянного не вернуть. Мы сделали выводы и постараемся не допустить опасных инцидентов в будущем". ]], code [[psub("generic");]]};

        {"Я чуть не погиб там!", [[Майкл Райт отворачивается от вас и произносит: "Приходите позже, я занят"]], code [[ atl_rep_wright = atl_rep_wright - 1; back(); ]]};

        {tag="iof_learr_suit"};

        {"Я сделал, что должен был. ", [[Майкл Райт кивает: "И все же, не каждому пришла бы в голову идея облачить навьяра в скафандр".]], code [[psub("generic");]]};

        {tag="iof_learr"};

        {"Рад, что никто не пострадал. ", [[Майкл Райт кивает. ]], code [[ psub("generic"); ]]};

        {tag="fta_deb"};

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

        {"Просто верните мне Левиафан", [[Майкл Райт с сожалением произносит: "Не все так просто. Нужно, чтобы согласие дали еще Моро, Даркстар и Светлова". ]], code [[ psub('generic'); ]]};

        {tag="generic"};

        {tag="nih_fixed", false, "Я нашел утечку", [[Майкл Райт кивает: "Спасибо, я отправлю туда человека, чтобы он все поправил. Пока у меня больше нет для вас заданий". ]], code [[ atl_nih_state = 3; atl_rep_wright = atl_rep_wright + 1; ]]};

        {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="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.drake_asked = 1;

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

            else

                char_michael_wright.drake_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_leroy", false, "Что вы думаете о Мишеле Леруа? ", function()

            if (atl_rep_wright < 0) then

                char_michael_wright.leroy_asked = 1;

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

            else

                char_michael_wright.leroy_asked = 2;

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

            end;

        end};

        {tag="on_jones", false, "Что вы думаете о Чарли Джонсе? ", function()

            if (atl_rep_wright < 0) then

                char_michael_wright.jones_asked = 1;

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

            else

                char_michael_wright.jones_asked = 2;

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

            end;

        end};

        {tag="on_goldman", false, "Что вы думаете о Леонарде Голдмане? ", function()

            if (atl_rep_wright < 0) then

                char_michael_wright.goldman_asked = 1;

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

            else

                char_michael_wright.goldman_asked = 2;

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

            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

                if (atl_iof_learr_dead) then

                    char_michael_wright.learr_asked = 3;

                    return [[Майкл Райт отвечает: "Леарр часто бывала здесь. Рассматривала все. Было приятно с ней общаться. Ее гибель -- большая утрата для всех нас". ]];

                else

                    char_michael_wright.learr_asked = 2;

                    return [[Майкл Райт отвечает: "Она часто бывает здесь. Рассматривает все, изучает. Это не может меня не радовать". ]];

                end;

            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, "Мне пора", 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([["Кстати, у меня есть для вас небольшое задание. У нас где-то утечка воздуха. Ничего критичного. Просто прогуляйтесь по станции и если обнаружите, где это - сообщите мне. До встречи", -- Майкл Райт возвращается к своим делам. ]]);

            else

                pr([["До встречи", -- Майкл Райт возвращается к своим делам. ]]);

            end;

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

        {tag="son"};

        {"Мать Джека умерла, а сам он прозябает в своем доме ничего не делая. ", [[Майкл Райт вздыхает: "Жаль, что все так вышло. Спасибо, что честно сказали мне. Наверное..."]], code[[pret();]]};

        {"Мать Джека умерла, но с ним все в порядке. Он все еще живет в вашем доме. ", [[Майкл Райт вздыхает: "Элис...". ]], code[[pret();]]};

        {"У них все хорошо. ", [[Майкл Райт кивает: "Рад это слышать". ]], code[[pret();]]}

    };

};

char_anna_atlantis_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;

        --[[

            anna_asked = 0;

            walter_asked = 0;

            atlantis_asked = 0;

            drake_asked = 0;

        ]]

        poff("on_anna", "on_walter", "on_atlantis", "on_drake");

        if (rel_anna  < 0) then

            if (char_anna.anna_asked == 0) then

                pon("on_anna");

            end;

            if (char_anna.walter_asked == 0) then

                pon("on_walter");

            end;

            if (char_anna.atlantis_asked == 0) then

                pon("on_atlantis");

            end;

            if (char_anna.drake_asked == 0) then

                pon("on_drake");

            end;

        else

            if (char_anna.anna_asked < 2) then

                pon("on_anna");

            end;

            if (char_anna.walter_asked < 2) then

                pon("on_walter");

            end;

            if (char_anna.atlantis_asked < 2) then

                pon("on_atlantis");

            end;

            if (char_anna.drake_asked < 2) then

                pon("on_drake");

            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="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="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.on_atlantis = 1;

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

            else

                char_anna.on_atlantis = 2;

                return [[Анна Рэдклифф отвечает: "Последние десять лет я живу здесь, на Атлантиде. Я хорошо помню, как расстроена я была, приехав сюда. Конечно, я не думала, что мы все проведем здесь лет десять. Мне казалось, что уже через полгода-год мы вернемся на поверхность, но намерения вашего отца сильно отличались от этого. Потом Екатерина и Сильвия познакомили меня с Телнеарром и Хетеарром -- двумя навьярами, которые первыми жили на станции. Потом Хетеарр вернулся домой, а вместо него на станцию прибыл Ривеерр. А затем покинул станцию и Телнеарр. Его заменила Леарр". ]];

            end;

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

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

			if (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"};

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

        {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="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(); 

		]]};

		{"Лучше я отправлюсь один", [[

			"Нельзя-так. Священное-место-храм. Другие-yhe-na'vji'a'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");

		elseif (s.state == 1) then

			psub("generic");

				pon("iyh4");

			elseif (atl_iyh_state == 5) then

				pon("iyh5");

			end;

		end;

		return [[Аикерьярр презрительно смотрит на вас, не говоря ни слова. ]];

	end;

	phr = {

        {tag = "first_meeting"};

        {tag="first_meeting_2a"};

        {tag="first_meeting_2b"};

        {always = "true", "Я приду позже", [[Навьяр довольно ухмыляется: "Ty'rr zee'vee'nn". ]], code [[ back(); ]]};

        {tag="first_meeting_3a"};

        {"Нам все еще нужно поговорить", [[Навьяр надменно бросает: "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", "Значит, ты все-таки меня понимаешь, чертов рыбень. Теперь слушай и отвечай. ", [[Навьяр стучит копьем об пол и отворачивается от вас. ]], code [[back();]]};

		{tag = "generic"};

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

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

			atl_iyh_state = 2;

		]]};

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

		]], 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 > 0 and atl_iyh_state < 4) then

                    pon("about_relic");

                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="about_relic", 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(); ]]};

		{tag="cancel"};

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