end;

        end};

        {tag="on_learr", "Что ты думаешь о Леарр?", function(s)

            if (atl_rep_dyp < 0) then

                char_ryveerr.learr_asked = 1;

                return [[Ривеерр отказывается отвечать:"Я не-говорю-с-тобой-об-этом". ]];

            else

                char_ryveerr.learr_asked = 2;

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

            end;

        end};

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

		{tag="more_on_relic"};

		{"Тем же?", [[Ривеерр щелкает зубами: "Мы светодиск-из-их-храма-забрали. Мы вернем его, ysl они вернут нашу-реликвию". ]]};

		{"Вы уверены, что кража -- их рук дело?", [[Ривеерр уверенно кивает: "Только-они могли сделать. Я расскажу", -- Ривеерр на небольшое время замолкает, собираясь с мыслями, после чего продолжает: "Na'vji'a'yhe'iraa'pha’anot’rr ночью-в-наш-храм-пришли и охранников-убили. Они реликвию-украли и в-свой-город-унесли". ]], code [[ psub("why"); ]]};

		{tag="why", empty=code [[ atl_iyh_ryveerr_spoken = true; psub("generic"); ]]};

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

		{"Как выглядит ваша реликвия?", [[Ривеерр отвечает: "Небольшая-металлическая-со-стеклами-трубка-наша-реликвия". ]]};

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

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

        {tag="on_iyh2"};

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

        {tag="learr_comes", "Со мной отправится Леарр.", [[Ривеерр отвечает: "Ты туда-не-идешь. He'vji'a'rr нельзя-в-храм". ]]};

	};

};

char_evans_dlg = dlg {

	var {

		state = 0;

	};

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

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

	enter = function(s)

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

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

		else

			psub("generic");

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

		end;

	end;

	phr = {

		{tag="first_meeting"};

		{"Я Дэвид Дрейк, очень приятно.", [[Кристиан улыбается и отвечает: "Очень рад вас видеть. У вас есть вопросы? Я слушаю". ]], code [[ psub("generic"); ]]};

		{tag="generic"};

        {"Что вы можете рассказать о Леарр?", function(s)

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

        end};

        {"Что вы можете сказать об Ривеерре?", [[Кристиан задумчиво: "Из жителей Дипатреанотра, Ривеерр, наверное, лучше всех относится к нам. При том, что он достаточно отстранен, чувствуется, что он готов вкладывать силы в улучшение отношений между нами всеми -- Дипатреанотром, Атлантидой и Ираафаанотром". ]]};

        {"Что вы можете сказать о навьярах?", [[Кристиан отвечает: "Поразительные существа. Конечно, мы первый раз сталкиваемся с подобным и толком не знаем как себя вести и как стоит их изучать, но, как мне кажется, мы многого достигли -- мы знаем их язык, имеем доступ к их текстам и общаемся с их представителями практически на равных. Вообще, мы поразительно легко наладили с ними контакт -- они не стали воспринимать нас ни как богов, ни как дьяволов, как это случается с племенами людей в далеких от цивилизации местах. Однозначно, они не так просты, как кажется, но мы пока не знаем что за этим скрывается".]]};

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

	};

};

char_winterlight_dlg = dlg {

	var {

		state = 0;

	};

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

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

	enter = function(s)

		if (s.state == 0) then

			psub("first_meeting");

            s.state = 1;

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

		else

			psub("generic");

			return [[Сильвия отрывает взгляд от карты: "Приветствую, что вы хотели?" ]];

		end;

	end;

	phr = {

		{tag="first_meeting"};

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

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

		{tag="generic"};

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

        {"Расскажите о себе.", [[Сильвия усмехается: "Не думаю, что тут есть что-то интересное, но слушайте -- я едва закончила университет и была в поисках работы, когда встретилась с госпожой Светловой. Уж не знаю, что привлекло ее во мне, но она предложила мне работу. Я сперва удивилась -- с чего транспортной компании нанимать таких видных ученых, как она? Да и зачем там такие, как я? Когда господин Дрейк рассказал о своем открытии, я загорелась идеей обустроить автономную подводную станцию -- чтобы иметь возможность находиться ближе к навьярам и изучать их. Изначально планы не были столь грандиозны, но благодаря нашим с господином Райтом успехам мы смогли построить Атлантиду такой, какой вы ее видите. Тогда же я впервые встретила живого навьяра. Нет, госпожа Светлова рассказывала мне про них и даже показывала фотографии и рисунки, но увидеть их вживую ни с чем не сравнимо. И еще более странно, когда такое существо тебя приветствует на твоем языке". ]]};

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

	};

};

char_jack_wright_atlantis_dlg = dlg {

	var {

		state = 0;

	};

	nam = 'char_jack_wright_atlantis_dlg';

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

	enter = function(s)

        if (rel_jack < 0) then

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

            if (char_wright.on_leviathan == 0) then pon("on_leviathan"); end;

            if (char_wright.on_jack == 0) then pon("on_jack"); end;

        else

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

            if (char_wright.on_leviathan < 2) then pon("on_leviathan"); end;

            if (char_wright.on_jack < 2) then pon("on_jack"); end;

        end;

        if where(char_jack_wright_atlantis) == atl_luna_common_room then

            if (where(char_learr_atlantis) == atl_luna_common_room) then

                psub("business_or_no");

                return [[Джек отворачивается от Леарр, и обращается к вам: "Привет, ты по делу или просто так?" ]];

            else

                psub("generic");

                return [[Джек откладывает книгу и обращается к вам: "Добрый день. Тебе что-то нужно?"]];

            end;

        else

            psub("generic");

            return [[Джек откладывает книгу и встает с койки и обращается к вам: "Добрый день. Тебе что-то нужно?"]];

        end;

	end;

	phr = {

        {tag = "business_or_no"};

		{tag="station1", "Как тебе станция?", [[Джек не скрывая восхищения восклицает: "Невероятно! Трудно поверить в возможность такого -- полностью автономное подводное поселение. Я никогда на сомневался в таланте отца, но это выше всех моих ожиданий". ]], code [[ poff("station2"); ]]};

		{always = "true", "Я пришел поговорить с Леарр. ", function(s)

			if (char_learr_atlantis.offended) then

				return [[Джек ухмыльнулся: "Удачи, я пойду к себе", -- с этими словами, Джек выходит из зала. ]];

			else

				return [["Надеюсь, я вам не помешаю? В любом случае мне уже пора уходить", -- с этими словами, Джек выходит из зала. ]];

			end;

		end, code [[

            remove('char_jack_wright_atlantis', 'atl_luna_common_room');

			put('char_jack_wright_atlantis', 'atl_luna_jack_room');

			back();

		]]};

        {always = "true", "Мне нужно поговорить с тобой. ", [[Джек сообщает: "Я слушаю". ]], code [[psub("generic");]]};

        {tag="generic"};

        {tag="station2", "Как тебе станция?", [[Джек не скрывая восхищения восклицает: "Невероятно! Трудно поверить в возможность такого -- полностью автономное подводное поселение. Я никогда на сомневался в таланте отца, но это выше всех моих ожиданий". ]], code [[ poff("station1"); ]]};

        {always=true, "Я хочу кое-что спросить.", [[Джек вопросительно смотрит на вас: "Я слушаю". ]], code [[ psub("more_questions"); ]]};

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

        {tag = "more_questions"};

        {tag="on_learr", "Что ты думаешь о Леарр?", function()

            if (rel_jack < 0) then

                char_wright.on_learr = 1;

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

            else

                char_wright.on_learr = 2;

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

            end;

        end};

        {tag="on_leviathan", "Как впечатления от Левиафана?", function()

            if (rel_jack < 0) then

                char_wright.on_leviathan = 1;

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

            else

                char_wright.on_leviathan = 2;

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

            end;

        end};

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

            if (rel_jack < 0) then

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

            else

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

            end;

        end};

        {"Вернемся к делу", [[Джек молча кивает. ]], code [[ pret(); ]]};

	};

};

char_legrand_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Мари Легран";

	disp = "Мари Легран";

	enter = function(s)

        poff("tube_spec");

        if (atl_nih_state == 1 and not have(atl_item_tube_spec)) then

            pon("tube_spec");

        end;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

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

		else

			psub("generic");

			return [[Не обращая внимания на вас, Мари Легран продолжает водить пальцем по строчкам, периодически делая какие-то пометки. ]];

		end;

	end;

	phr = {

		{tag="first_meeting"};

		{"Извините?", [[Женщина поднимает голову и отрывается от работы. Она выпрямляется и улыбаясь приветствует вас: "Добро пожаловать в библиотеку Атлантиды. Я Мари Легран". ]], code [[psub("first_meeting_2"); ]]};

		{tag="first_meeting_2"};

		{"Я Дэвид Дрейк, рад знакомству.", [[Она кивает и спрашивает вас: "Как вы нашли Левиафан?"]], code [[psub("first_meeting_3"); ]]};

		{tag="first_meeting_3"};

		{"Это долгая история.", [[Мари Легран кивает: "Хорошо, тогда в другой раз".]], [[ psub("generic") ]]};

		{"Я нашел тайник отца со старыми схемами. Пришлось побегать, чтобы восстановить субмарину. Я чудом собрал все необходимое.", [[Мари Легран удивленно смотрит на вас: "Поразительно. Скорее всего, Уильям хотел, чтобы вы нашли Левиафан. Жаль, что вы прибыли слишком поздно. Когда он узнал про этот древний город, он собрал несколько помощников и отправился на Надежде на его поиски". ]], code [[ pon("father_more", "ancient_city");psub("generic"); ]]};

		{tag="generic"};

        {tag="tube_spec", false, "Мне нужна документация по системам воздуховодов.", [[Мари Легран удивленно спрашивает: "Райт просил? Удачи в изучении", -- и кладет на стол перед вами толстую книжицу. ]], code [[ take(atl_item_tube_spec); ]]};

        {tag="ancient_city", false, "Какой еще город?", [[Мари Легран отвечает: "Да, вы же не в курсе. Лсэрианотр, или как-то так. Древний навьярский город по легенде скрывает какое-то древнее знание, которое, как и всегда в легендах, сторожит непобедимое чудовище. Дрейк и Блэк, вроде как, сумели найти какие-то карты, якобы указывающие путь к этому городу". ]]};

		{always=true, "Я пойду.", [[Мари Легран возвращается к книге, прощаясь с вами: "Приходите еще".]], code [[ back(); ]]};

		{tag="more_people"};

		{"Расскажите больше об Адриане Блэке.", [[Мари Легран рассказывает: "Блэк -- заместитель Дрейка. По-крайней мере, официально он занимал именно эту должность. По факту, он был близким другом вашего отца и компанией они управляли вместе". ]]};

		{"Расскажите больше о Джоне Брауне.", [[Мари Легран рассказывает: "У Джона золотые руки, наверное, именно поэтому Дрейк взял в экспедицию именно его". ]]};

		{"Расскажите больше о Антонио Гарсии.", [[Мари Легран рассказывает: "Талантливый молодой человек. Он хорошо знает язык навьяров и много с ними общался". ]]};

		{"Поговорим в другой раз.", [[Мари Легран кивает: "Хорошо".]], code [[pret();]]};

	};

};

char_radcliffe_atlantis_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Уолтер Рэдклифф";

	disp = "Уолтер Рэдклифф";

    reset_more = function(s)

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

        if (rel_walter < 0) then

            pon("talk");

        else

            if (char_radcliffe.on_anna < 2) then

                pon("on_anna");

                pon("talk");

            end;

            if (char_radcliffe.on_black < 2) then

                pon("on_black");

                pon("talk");

            end;

            if (char_radcliffe.on_walter < 2) then

                pon("on_walter");

                pon("talk");

            end;

            if (char_radcliffe.on_atlantis < 2) then

                pon("on_atlantis");

                pon("talk");

            end;

            if (char_radcliffe.on_drake < 2) then

                pon("on_drake");

                pon("talk");

            end;

            if (char_radcliffe.on_join < 2) then

                pon("on_join");

                pon("talk");

            end;

        end;

    end;

	enter = function(s)

        s:reset_more();

        poff("on_leroy_in_terra");

        if atl_mtr_ask_radcliffe and not atl_mtr_know_leroy_in_terra then

            pon("on_leroy_in_terra");

        end;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

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

		else

			psub("generic");

			return [[Уолтер Рэдклифф приветствует вас: "Добрый день". ]];

		end;

	end;

	phr = {

        {tag="questions"};

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

            char_radcliffe.on_black = 2;

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

        end};

        {tag="on_walter", "Расскажи о себе.", function(s)

            char_radcliffe.on_walter = 2;

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

        end};

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

            char_radcliffe.on_anna = 2;

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

        end};

        {tag="on_drake", "Что ты можешь сказать о Дрейке?", function(s)

            char_radcliffe.on_drake = 2;

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

        end};

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

            char_radcliffe.on_atlantis = 2;

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

        end};

        {tag="quit", always=true, "Поговорим в другой раз. ", [[Уолтер кивает: "Хорошо".]], code [[ char_radcliffe_atlantis_dlg:reset_more(); pret();]]};

		{tag = "first_meeting"};

		{"[Пожать руку] Рад знакомству.", [[

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

		]], code [[

			rel_walter = rel_walter + 1;

			psub("leviathan");

		]]};

		{"Рад знакомству.", [[

			Уолтер убирает руку и продолжает: "Я думаю, вы не просто так пришли. Спрашивайте".

		]], code [[

			psub("generic");

		]]};

		{"[Промолчать]", [[

			Уолтер убирает руку и продолжает: "Я думаю, вы не просто так пришли. Спрашивайте".

		]], code [[

			rel_walter = rel_walter - 1;

			psub("generic");

		]]};

		{tag = "leviathan"};

		{"Интересно, и что вы можете рассказать о Левиафане?", [[Уолтер снимает очки, убирая их в нагрудный карман: "Левиафан строился как Надежда -- для дальних путешествий и максимальной автономности. После успеха предыдущих субмарин, Райт решил сделать Левиафан заметно крупнее этих кораблей. Сверхмощная батарея обеспечивает субмарину энергией более месяца при максимальных оборотах двигателей. Также есть паровой двигатель -- он используется не только для движения, но и генерирует электричество. До Левиафана мы не экспериментировали с этим". ]]};

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

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

		{"Я не думаю, что вы поможете. ", [[Уолтер разводит руками: "Очень жаль. Впрочем, у вас есть время подумать. Насколько я знаю, Даркстар и Моро собираются держать вас здесь какое-то время". ]], code [[ psub("generic");]]};

		{tag = "generic"};

        {tag="on_leroy_in_terra", false, "Райт сказал, что вы были в Терре во время обслуживания Солиса. Вы не видели, кто входил в секцию?", [[Уолтер пожимает плечами: "Я думал, что я один в Терре, но мне попался Мишель. Он сказал, что пришел за инструментами для ремонта скафандров. Правда в Доминус он ушел почему-то с пустыми руками". ]], code [[atl_mtr_know_leroy_in_terra=true;]]};

        {tag="questions", "У меня есть несколько вопросов. ", function(s)

            if (rel_anna < 0) then

                return [[Уолтер отрицательно качает головой: "Не сейчас, я занят". ]];

            else

                psub("questions");

                return [[Уолтер кивает: "Слушаю". ]];

            end;

        end};

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

	};

};

char_page_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Фрэнсис Пейдж";

	disp = "Фрэнсис Пейдж";

	enter = function(s)

		if (s.state == 0 ) then

			s.state = 1;

			psub("first_meeting");

			return [[Перед вами стоит мужчина лет пятидесяти с густой седой бородой. Он бросает на вас быстрый взгляд и здоровается, продолжая осмотр Наутилуса: "Добро пожаловать на Атлантиду. Я Фрэнсис Пейдж. Я занимаюсь обслуживанием субмарин". ]];

		else

			psub("generic");

			return [[Перед вами стоит Фрэнсис Пейдж. не отрываясь от осмотра Наутилуса он говорит: "Вы вернулись". ]];

		end;

	end;

	phr = {

		{tag="first_meeting"};

		{"Дэвид Дрейк, рад знакомству.", [[Фрэнсис на секунду отвлекается и внимательно смотрит на вас: "Да, я замечаю сходство с Уильямом". ]], code [[ psub("first_meeting_2"); ]]};

		{tag="first_meeting_2"};

		{"Вы хорошо знали отца?", [[Фрэнсис кивает: "Я уважаю его, как, думаю, все на этой станции. Пожертвовать всем ради призрачной мечты -- только великий человек мог пойти на такое. Он отправился на поиски легендарного города древних навьяров. К сожалению, я не смог отправиться с ним -- я нужен на станции. Я знаю, что вы здесь из-за него и я надеюсь, что вы не оставите вашу идею найти Уильяма и доведете свое дело до конца". ]], code [[ psub("generic"); ]]};

		{"У меня к вам несколько вопросов.", [["Слушаю". ]], code [[ psub("generic"); ]]};

		{tag="generic"};

        {"Что вы можете рассказать об Атлантиде?", [[Фрэнсис пожимает плечами: "Если честно, вам лучше расспросить кого-нибудь из управляющих, а лучше всего -- Майкла Райта. Все что я могу сказать -- я до сих пор поражаюсь успеху этого невероятного проекта". ]]};

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

        {"Что вы можете рассказать об Энтерпрайзе?", [[Френсис кивает: "Энтерпрайз мы начали, когда захотели судно побольше. Опыта и знаний нам хватило только на пропорциональное увеличение размеров и немного более мощный двигатель. Райт наверное сказал бы, что получилось из рук вон плохо, но, на мой взгляд, Энтерпрайз вполне неплох, да и с честью служит нам до сих пор". ]]};

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

        {"Что вы можете рассказать о Левиафане?", [[Френсис отвечает: "С первого взгляда ясно, что Левиафан не имеет практически ничего общего с Надеждой, Наутилусом и даже Энтерпрайзом. Отмечу, что Левиафан изначально строился с оглядкой на высокую автономность -- так же, как и Надежда. За это, конечно, пришлось многим поплатиться -- Левиафан большой и неповоротливый в сравнении с другими кораблями". ]]};

		{always=true, "Я пойду.", [[Фрэнсис Пейдж прощается с вами: "Увидимся позже". ]], code [[ back(); ]]};

	};

};

char_leroy_dlg = dlg {

	var {

		state = 0;

        closing = false;

	};

	nam = "Мишель Леруа";

	disp = "Мишель Леруа";

	enter = function(s)

        poff("mtr_on_clock", "mtr_on_replace", "mtr_on_terra");

        if atl_mtr_started and not atl_mtr_finished then

            if atl_mtr_know_goldman_lost_clock and not atl_mtr_leroy_asked_on_clock  then

                pon("mtr_on_clock");

            end;

            if atl_mtr_know_leroy_replaced_jones and not atl_mtr_leroy_denies_replace then

                pon("mtr_on_replace");

            end;

            if atl_mtr_know_leroy_in_terra and not atl_mtr_know_leroy_in_terra_asked then

                pon("mtr_on_terra");

            end;

        end;

        if atl_mtr_know_leroy_views and not s.closing then

            s.closing = true;

            pon('closing')

        end;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

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

		else

			psub("generic");