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_leroy", false, "Расскажите о Мишеле Леруа. ", function()

            if (atl_rep_svetlova < 0) then

                char_svetlova.leroy_asked = 1;

                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];

            else

                char_svetlova.leroy_asked = 2;

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

            end;

        end};

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

            if (atl_rep_svetlova < 0) then

                char_svetlova.jones_asked = 1;

                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];

            else

                char_svetlova.jones_asked = 2;

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

            end;

        end};

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

            if (atl_rep_svetlova < 0) then

                char_svetlova.goldman_asked = 1;

                return [[Екатерина Светлова отвечает: "Спросите кого-нибудь другого". ]];

            else

                char_svetlova.goldman_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

                if (atl_iof_learr_dead) then

                    char_darkstar.learr_asked = 3;

                    return [[Екатерина Светлова отвечает: "Помимо самого факта гибели этой замечательной юной девушки, это событие имеет далеко идущие последствия для Атлантиды". ]];

                else

                    char_darkstar.learr_asked = 2;

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

                end;

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

		{tag = "sabotage", false, "Даркстар считает, что причиной пожара в Игнисе был саботаж. Что вы об этом думаете?", function(s)

			if (atl_iof_learr_dead) then

				atl_rep_darkstar = atl_rep_darkstar - 1;

				return [[Екатерина Светлова отвечает: "Даркстар просил вас об этом никому не говорить. Разговор окончен". ]];

			else

			    char_svetlova_dlg.lfc_sabotage = true;

				atl_rep_svetlova = atl_rep_svetlova + 1;

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

			end;

		end};

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

			if (char_svetlova_dlg.lfc_sabotage) then

				return [[Екатерина Светлова отвечает: "Вы же только что сами сказали - саботаж". ]];

			elseif (atl_iof_learr_dead) then

				return [[Екатерина Светлова отказывается отвечать: "Мне кажется, это не ваше дело. И не мое. Этим занимается служба безопасности". ]];

			else

				poff("sabotage");

				psub("ignis_sabotage");

				return [[Екатерина Светлова отвечает: "Я думаю вы и сами прекрасно знаете. Может расскажете?". ]];

			end;

		end};

		{tag = "hard_to_understand", false, "Я поговорил с Аикерьярром, но я почти ничего не понял из его слов[Кратко пересказать диалог с Аикерьярром]", [[Екатерина Светлова откладывает бумаги в сторону и задумывается. Через некоторое время она сообщает: "Интересно. Аикерьярр упорно отрицает причастность Ираафаанотра к краже реликвии. Что говорит Ривеерр по этому поводу?" ]], code [[ char_svetlova_dlg.state = 2; psub('ryveerr_on_steal');]]};

		{tag = "explanation", false, "Я поговорил с Леарр. Она отрицает причастность Ираафаанотра к краже[Кратко пересказать диалог с Ираафаанотром]", [[Екатерина Светлова откладывает бумаги в сторону и задумывается. Через некоторое время она спрашивает: "Что говорит Ривеерр по этому поводу?" ]], code [[ char_svetlova_dlg.state = 2; psub('ryveerr_on_steal');]]};

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

		{tag = "ignis_sabotage"};

		{"Даркстар считает, что причиной пожара был саботаж", function(s)

			psub("generic");

			atl_rep_svetlova = atl_rep_svetlova + 1;

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

		end};

		{"Понятия не имею", [[Екатерина Светлова разочарованно отвечает: "Очень жаль". ]], code [[ psub("generic"); ]]};

		{tag = "ryveerr_on_steal"};

		{tag = "ryveerr_spoken", false, "Ривеерр рассказал о нападении на храм Дипатреанотра и краже реликвии оттуда. Он уверен, что это сделали именно жители Ираафаанотра. Он говорит, что Дипатреанотр готов обменять реликвии обратно. То есть реликвия Ираафаанотра, судя по всему, находится в Дипатреанотре. ", [[Светлова задумчиво потирает лоб: "Как видите, мы в тупике. Но у меня есть идея". ]], code [[ pon("ryveerr_more"); ]]};

		{tag = "ryveerr_more", false, "Идея?", [[Екатерина Светлова открывает ящик стола и что-то там ищет. Судя по всему, она не находит искомого. Махнув рукой, она продолжает: "Есть еще один храм - очень старый, его даже навьяры не посещают. В этом храме живет гигантский скат и эта ситуация очень похожа на описанную в одной из навьярских легенд. Если хотите узнать больше -- спросите Сильвию Уинтерлайт. Она расскажет все гораздо лучше меня". ^Екатерина закрывает ящик стола и продолжает: "Я хочу, чтобы вы отправились в этот храм. Навьярам не стоит ничего знать -- я думаю, вы догадываетесь, как они отреагируют, если им сообщить". ]], code [[ atl_iyh_state = 4; psub("secret_op"); ]]};

		{"Я пойду", [[Светлова возвращается ко своим бумагам: "До встречи". ]], code [[ back(); ]]};

		{tag="secret_op"};

		{"Хорошо, я ничего не скажу навьярам. ", [[Екатерина Светлова отвечает: "Отлично. Осталось дождаться, когда вам позволят покидать станцию". ]], code [[ back(); ]]};

		{"Мне кажется, нам стоит поставить их в известность. Как они отреагируют, если мы просто принесем им реликвию? ", [[Екатерина Светлова отвечает: "Они будут благодарить нас. А теперь представьте, что вы сообщаете им, что отправляетесь в их священное место охотиться на их священную рыбу. Что будет?" ]], code [[ psub("so_answer"); ]]};

		{tag="so_answer"};

		{"Да, пожалуй вы правы", [[Екатерина Светлова отвечает: "Отлично. Осталось дождаться, когда вам позволят покидать станцию". ]]};

		{"А что будет, если мы принесем им реликвию, которая должна по их мнению быть в Ираафаанотре? Разве они не посчитают, что мы украли ее оттуда? ", [[Екатерина Светлова недовольно отвечает: "Поступайте как знаете. Если ваши действия повредят станции, то Левиафана вам не видать". ]], code [[ back(); ]]};

		{tag="iyh_more"};

		{"Я могу чем-то еще помочь?", [[Екатерина Светлова отвечает: "Пока у нас нет для вас заданий, но возможно позже появится что-то. Сейчас вы можете продолжать ваши поиски". ]]};

		{"Спасибо за помощь, я пойду", [[Екатерина Светлова прощается с вами: "До встречи. Удачи в поисках Уильяма".]], code [[ back(); ]]};

	};

};

char_michael_wright_dlg = dlg {

    var {

        state = 0;

        lfc_dialog = false;

    };

    nam = "Майкл Райт";

    disp = "Майкл Райт";

    entered = function(s)

        if (atl_nih_state == 2) then

            pon('nih_fixed');

        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 (atl_rep_wright < 0) then

            if (char_michael_wright.drake_asked == 0) then pon("on_drake"); end;

            if (char_michael_wright.black_asked == 0) then pon("on_black"); end;

            if (char_michael_wright.darkstar_asked == 0) then pon("on_darkstar"); end;

            if (char_michael_wright.svetlova_asked == 0) then pon("on_svetlova"); end;

            if (char_michael_wright.moreau_asked == 0) then pon("on_moreau"); end;

            if (char_michael_wright.wright_asked == 0) then pon("on_wright"); end;

            if (atl_iof_completed) then

                if (char_michael_wright.leroy_asked == 0) then pon("on_leroy"); end;

                if (char_michael_wright.jones_asked == 0) then pon("on_jones"); end;

                if (char_michael_wright.goldman_asked == 0) then pon("on_goldman"); end;

            end;

            if (char_michael_wright.atlantis_asked == 0) then pon("on_atlantis"); end;

            if (char_michael_wright.navjiarr_asked == 0) then pon("on_navjiarr"); end;

            if (char_michael_wright.learr_asked == 0) then pon("on_learr"); end;

            if (char_michael_wright.ryveerr_asked == 0) then pon("on_ryveerr"); end;

            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;

        else

            if (char_michael_wright.drake_asked < 2) then pon("on_drake"); end;

            if (char_michael_wright.black_asked < 2) then pon("on_black"); end;

            if (char_michael_wright.darkstar_asked < 2) then pon("on_darkstar"); end;

            if (char_michael_wright.svetlova_asked < 2) then pon("on_svetlova"); end;

            if (char_michael_wright.moreau_asked < 2) then pon("on_moreau"); end;

            if (char_michael_wright.wright_asked < 2) then pon("on_wright"); end;

            if (atl_iof_completed) then

                if (char_michael_wright.leroy_asked < 2) then pon("on_leroy"); end;

                if (char_michael_wright.jones_asked < 2) then pon("on_jones"); end;

                if (char_michael_wright.goldman_asked < 2) then pon("on_goldman"); end;

            end;

            if (char_michael_wright.atlantis_asked < 2) then pon("on_atlantis"); end;

            if (char_michael_wright.navjiarr_asked < 2) then pon("on_navjiarr"); end;

            if (char_michael_wright.learr_asked < 2) then pon("on_learr"); end;

            if (atl_iof_learr_dead and char_michael_wright.learr_asked < 3) then pon("on_learr"); end;

            if (char_michael_wright.ryveerr_asked < 2) then pon("on_ryveerr"); end;

            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;

        end;

        if (atl_nih_state == 3 and atl_iof_completed and atl_fta_state == 0) then

            atl_fta_state = 1;

            return [[

                Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. У меня есть для вас работа. Сейчас все наши бригады заняты, поэтому я прошу вас помочь с обслуживанием Солиса. Приходите туда и свяжитесь со мной по телефону, я дам вам инструкции".

            ]];

        elseif (atl_fta_state == 2) then

            atl_fta_state = 3;

            psub("fta_deb");

            return [[

                Майкл Райт протягивает вам руку: "Только благодаря вам, мы все еще здесь. Я с радостью сообщу Моро, что я за возвращение вам Левиафана".

            ]];

        else

            psub("generic");

            return [[

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

            ]];

        end;        

    end;

    phr = {

        {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 (atl_jack_in_party) then

                return part1 .. [[

                    Почесав подбородок, он добавляет: "Пожалуй, я ничего не скажу Даркстару, но вас еще раз прошу не вмешиваться - Винсент грамотный человек и хорошо подготовлен. Он отлично знает всех на станции и разбирается во многих вопросах. При всем уважении - вы слишком плохо знаете станцию".

                ]];

            else

                atl_rep_darkstar = atl_rep_darkstar - 1;

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

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

            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

                char_michael_wright.learr_asked = 2;

            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;

            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;

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

    };

};

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;

	};

	nam = "Леарр";

	disp = "Леарр";

	entered = function(s)

		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 (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="iyh4", "Здесь неподалеку есть старый навьярский храм. Мы можем посетить его?", [[Леарр задумчиво произносит: "He'vji'a'rr нельзя-туда... Я место-не-знаю", - немного постояв в задумчивости, Леарр восклицает: "Ривеерр это-не-одобрит. Мы-вместе туда-пойдем".

			Леарр задумчиво произносит: "Затмевающий свет. Напоминает нашу-легенду".^

			Немного подумав, Леарр продолжает: "Да! Излучающий-тьму! Мы вместе-пойдем и посмотрим. Я увидеть-хочу другие-реликвии. Излучающий-тьму хранил много-всего. Вы согласны?"

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

		{tag="iyh5", "Мы знаем, где реликвия Дипатреанотра. Есть старый храм навьяров, в котором живет затмевающий свет.", [[

			Леарр задумчиво произносит: "Напоминает нашу-легенду".^

			Немного подумав, Леарр продолжает: "Да! Излучающий-тьму! Мы вместе-пойдем и посмотрим. Я увидеть-хочу другие-реликвии. Излучающий-тьму хранил много-всего. Вы согласны?"

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

		{"Я пойду", [[

			Плавники Леарр медленно теряют цвет и она прощается с вами: "Мы позже-поговорим". 

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

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

	};

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

	dsc = function(s)

		if (s.state == 0) then

			psub("generic");

		elseif (s.state == 1) then

			psub("hard_to_understand");

		elseif (s.state == 2) then

			if (atl_iyh_state == 4) then

				pon("iyh4");

			elseif (atl_iyh_state == 5) then

				pon("iyh5");

			end;

			psub("what_next");

		end;

		return [[

			Аикерьярр медленно поворачивается к вам: "Я слушать ты".

		]];

	end;

	phr = {

		{tag = "generic"};

		--Dyp’atre’anot’rr

		--Iraa’pha’anot’rr

		{"Расскажи о конфликте между вашими городами", [[

			Аикерьярр недовольно смотрит на вас:"Вы не помочь".^

			Немного подумав, он рассказывает: "Na'vji'a'yhe'dyp'atre'anot'rr говорить yhe мы украсть реликвия'yhe'dyp'atre'anot'rr. Мы не-делать!" -- Аикерьярр злобно стучит зубами и в ярости сжимает кулаки. Через некоторое время он успокаивается и продолжает: "Zly'na'a'yhe'dyp'atre'anot'rr после-украсть реликвия'yhe'iraa’pha’anot’rr!"

		]], code [[ 

			char_aikerjarr_dlg.state = 1;

			atl_iyh_state = 2;

			psub("hard_to_understand");

		]]};

		{"Я вернусь позже", [[

			Аикерьярр отворачивается от вас, даже не удостоив ответа.

		]], code [[

			back();

		]]};

		{tag = "hard_to_understand"};

		{"Na'vji'a'yhe'dyp'atre'anot'rr?", [[

			Аикерьярр ворчит: "Ты глупый. Я говорить yhe na'vji'a'rr в-dyp'atre'anot'rr-живут".

		]]};

		{"Yhe'dyp'atre'anot'rr?", [[

			Аикерьярр ворчит: "Ты совсем-глупый".

		]]};

		{"Zly'na'a'yhe'dyp'atre'anot'rr?", [[

			Аикерьярр ворчит: "Ты глупый. Na'vji'a'yhe'dyp'atre'anot'rr".

		]]};

		{"Yhe'iraa’pha’anot’rr?", [[

			Аикерьярр ворчит: "Ты совсем-глупый".

		]]};

		{"Так и что это все значит?", [[

			Аикерьярр злобно рычит: "Война будет. Мы уничтожить zly'a'yhe'dyp'atre'anot'rr".

		]], code [[

			char_aikerjarr_dlg.state = 2;

			psub("what_next");

		]]};

		{"Я вернусь позже", [[

			Аикерьярр отворачивается от вас, даже не удостоив ответа.

		]], code [[

			back();

		]]};

		{tag = "what_next"};

		{tag="iyh4", "Мы знаем, где реликвия Дипатреанотра. Есть старый храм навьяров, в котором живет скат.", [[

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

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

		{tag="iyh5", "Мы знаем, где реликвия Дипатреанотра. Есть старый храм навьяров, в котором живет затмевающий-свет.", [[

			Аикерьярр кивает: "Ты знаешь наши-слова. Ты знаешь наши-легенды?"

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

		{"Я вернусь позже", [[

			Аикерьярр отворачивается от вас, даже не удостоив ответа.

		]], code [[

			back();

		]]};

		{tag="legend"};

		{"[Рассказать легенду об Излучающем Тьму]", [[

			Аикерьярр кивает: "Ты не-совсем-глупый. Ты слушай меня. Я не-хочу-в-храм-пускать тебя. Но я понимаю, yhe ты мои-слова-подтвердишь. Ты скажешь Ry'vee'rr yhe мы вместе-отправимся в-храм и реливкию-вернем. Ты уходи".

		]], code [[ lifeon("char_aikerjarr_lev");table.insert(pl.party, 'aikerjarr'); atl_iyh_state = 6; back(); ]]};

	};

};

char_ryveerr_dlg = dlg {

	var {

		state = 0;

	};

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

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

	entered = function(s)

		psub("generic");

		if (s.state == 0) 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