phr = {

        {tag="questions"};

        {tag="on_black", "Что ты можешь сказать о Блэке?", function(s)

            char_walter.on_black = 2;

            return [[Уолтер пожимает плечами: "Что я могу сказать про него? Его не очень здесь любят, однако он, поверьте, вполне искренне радеет за благополучие нашей миссии". ]];

        end};

            char_walter.on_walter = 2;

            return [[]];

        end};

        {tag="on_anna", "Расскажи о своей сестре, Анне.", function(s)

            char_walter.on_anna = 2;

            if (ArrayUtils.indexOf(pl.party, 'anna') ~= 0) then

	inv = function(s)

        if (pl.language_known) then

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

        else

            return [[Металлическая табличка, на которую нанесены цветные полосы, соответствующие буквам языка навьяров. ]];

        end;

};

item_legend_of_hunter = obj {

	nam = "item_legend_of_hunter";

	disp = "Навьярская табличка";

	dsc = [[На полу в углу валяется какой-то {предмет}. ]];

	inv = function(s)

        if (pl.language_known) then

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

        else

            return [[Металлическая табличка, на которую нанесены цветные полосы, соответствующие буквам языка навьяров. ]];

        end;

};

item_lse_map = obj {

    var {

        state = 1;

    };

        table.insert(dt_buttons, nums[index]);

        table.remove(nums, index);

    end;

    ---game init

    pl.where = intro;

    ---debug

    --pl.where = warehouse_32;

    --put(item_lamp, pl);

    --language_known = true;

    --pl.where = "leviathan_airlock";

    --move(submarine_leviathan, "iyh_rear_entrance_foot");

    --put(item_suit, pl);

        {tag="on_books", "", function() 

        end};

        {tag="on_join", "Почему ты отправилась с нами?", function() 

            char_learr.on_join = 2;

            return [[Леарр отвечает: "Я с-Уильямом-Дрейком-хотела-отправиться, но отец не-разрешил. Он сейчас-изменил-решение и я могу-с-тобой-искать". ]];

        {tag="on_before", "Расскажи о своей жизни в Ираафаанотре.", function() 

            char_learr.on_before = 2;

            return [[Леарр отвечает: "Я вождя-дочь. Я думать-искать-решать-сложно-но-интересно-было-училась. Хевьяры пришли-и-все-изменили. Я теперь-говорить-не-с-навьярами-учусь. Отец будущему-вождю-полезно-это-говорит. Я согласна-с-ним-в-этом".]];

        {tag="on_atlantis", "Что ты думаешь об Атлантиде?", function() 

            char_learr.on_atlantis = 2;

            return [[Леарр отвечает: "Мы многому-научиться-у-вас-должны-и-можем. Вы в-воде-не-дышите-как-мы, но вы машины-делающие-это-за-вас-строите. Легенды гласят, что мы тоже-это-умели, но почему-разучились? Я не умею. Отец не умеет. Другие не умеют. И в-книгах-не-написано". Леарр печально вздыхает. ]];

        {tag="generic"};

        { tag = "talk", always = true, "Я хочу кое-что спросить.", function(s)

            if rel_learr >= 0 then

                psub("more_questions");

                return [[Леарр кивает: "Ты говори". ]];

            else

			end;

		};

		{ tag = "exit", always = "true", "Это все", "Хорошо", 

			function() 

				back();

			end;

	};

};

phaetlarr_home_dlg = dlg {

	nam = "phaetlarr_dlg";

	disp = "Фаэтларр";

                    end;

                elseif atl_iyh_entrance_destroyed then

                    if atl_iyh_artifacts_on_atlantis then

                        return [[Уолтер при виде вас заявляет: "Цель оправдывает средства. Храм и сам развалился бы через пару тысяч лет, только ценные артефакты, остались бы погребены навеки. Теперь они у нас". ]];

                    else

                        return [[Уолтер при виде вас заявляет: "Цель оправдывает средства. Храм и сам развалился бы через пару тысяч лет, только ценные артефакты, остались бы погребены навеки. Теперь они у навьяров". ]];

                else

                    if atl_iyh_artifacts_on_atlantis then

                        return [[Уолтер при виде вас заявляет: "Не ожидал, что получится закончить все настолько гладко там в храме". ]];

                    else

                        return [[Уолтер при виде вас заявляет: "Не ожидал, что получится закончить все настолько гладко там в храме. Жаль, что артефакты мы так и не посмотрели". ]];

                    end;

	phr = {

        {tag="talk"};

        {tag="on_black", "Что ты можешь сказать о Блэке?", function(s)

            char_walter.on_black = 2;

            return [[Уолтер пожимает плечами: "Что я могу сказать про него? Думаю, Дрейк выбрал хорошего партнера". ]];

        end};

            char_walter.on_walter = 2;

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

        end};

        {tag="on_anna", "Расскажи о своей сестре, Анне.", function(s)

            char_walter.on_anna = 2;

            if (ArrayUtils.indexOf(pl.party, 'anna') ~= 0) then

                char_wright.on_leviathan = 1;

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

            else

                char_wright.on_leviathan = 2;

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

            end;

        {tag="on_jack", "Чем ты занимался все это время?", function()

            if (rel_jack < 0) then

                return [[Джек отказывается отвечать: "Не хочу это обсуждать".]];

            else

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

            end;

anna_home_dlg = dlg {

	nam = "anna_home_dlg";

	disp = "Анна Рэдклифф";

	hideinv = true;

	entered = function(s)

		if (atl_iyh_state == 7) then

		else

			poff("on_iyh");

		end;

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

        if (rel_anna < 0) then

            end;

            if (char_anna.walter_asked < 2) then

                pon("on_walter");

                pon("talk");

            end;

            if (char_anna.atlantis_asked < 2) then

                pon("talk");

            end;

            if (char_anna.drake_asked < 2) then

                pon("on_drake");

                pon("talk");

            end;