pon('show_clock');

		end;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

			return [[Перед вами на койке лежит человек лет пятидесяти с густыми светлыми волосами. Пышные золотистые усы украшают его слегка печальное лицо. Взгляд его голубых глаз устремлен на вас. Он приветствует вас: "Добро пожаловать на Атлантиду. Я Леонард Голдман. Занимаюсь электросистемами станции". ]];

		else

			psub("generic");

			return [[Леонард Голдман печально смотрит на вас: "Что вы хотели?" ]];

		end;

	end;

	phr = {

		{tag="first_meeting"};

        {"Вас что-то тревожит?", [[Леонард сперва отрицательно мотает головой, но затем, видимо подумав спрашивает: "Вы не видели мои часы?"]], code [[ poff("clock0"); pon("clock1"); ]]};

		{"Я Дэвид Дрейк. Рад знакомству.", [[Леонард кивает, но ничего не говорит. ]], code [[ psub("generic"); ]]};

		{tag="generic"};

        {tag="clock0", "Вас что-то тревожит?", [[Леонард сперва отрицательно мотает головой, но затем, видимо подумав спрашивает: "Вы не видели мои часы?"]], code [[ pon("clock1"); ]]};

        {tag="clock1", false, "Расскажите больше про ваши часы.", function(s)

            return [[Леонард рассказывает: "Это часы моего отца, Френсиса Голдмана. Я уже несколько дней ищу их по всей станции и не могу найти. Я оставил их в общем зале, кажется. Мы обедали там с Мишелем и Чарльзом, но никто из них часы не трогал. Куда они могли деться? -- Леонард пожимает плечами, после чего дополняет -- Если увидите их -- дайте знать". ]]

        end, code [[atl_mtr_know_goldman_lost_clock=true; ]]};

        {tag="solis", false, "Когда вы были в Солисе последний раз?", [[Леонард заметно нервничает, отвечая на ваш вопрос: "Около месяца назад. Я вчера должен был там работать, но мы с Чарли договорились, чтобы он поработал в Солисе вместо меня, так что меня там не было. Спросите у Райта, он в курсе". ]], code [[ atl_mtr_know_jones_replaced_goldman = true; ]]};

		{tag="show_clock", false, "[Отдать часы] Я нашел ваши часы.", [[Голдман прячет часы в нагрудный карман и удивленно спрашивает: "Где вы их нашли?" ]], code [[ remove(item_goldmans_clock, pl); psub("give_clock"); atl_mtr_know_goldman_lost_clock=true; ]]};

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

		{always=true, "Я пойду.", [[Голдман кивает: "Поговорим позже". ]], code [[ back(); ]]};

		{tag="give_clock"};

		{"Часы были в Солисе.", [[Голдман испуганно вскакивает с койки: "Но как они там оказались?!"]], code [[ psub("give_clock_2"); ]]};

		{"Нашел их в Терре.", [[Голдман пожимает плечами: "Как они там оказались? Неважно, главное, что нашлись". ]], code [[ pret(); ]]};

        {"Нашел их в общем зале.", [[Голдман пожимает плечами: "Удивительно, наверное завалились куда-нибудь". ]], code [[ pret(); ]]};

        {tag="give_clock_2"};

        {"Вы точно не могли их там оставить?", [[Голдман делает глубокий вдох и дрожащим голосом отвечает: "Я не был в Солисе почти месяц. Часы же я потерял дней пять назад. Я не мог их там оставить". Он ложится обратно на койку. ]], code [[ poff("clock0"); pon("solis"); psub("generic"); ]]};

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

	};

};

char_jones_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Чарльз Джонс";

	disp = "Чарльз Джонс";

	enter = function(s)

		if (char_jones.on_atlantis == 0) then

            pon("on_atlantis");

        end;

        poff("mtr_on_clock", "mtr_on_replace");

        if atl_mtr_started then

                pon("mtr_on_clock");

            end;

            if (atl_mtr_know_jones_replaced_goldman or atl_mtr_ask_radcliffe) and not atl_mtr_know_leroy_replaced_jones then

                pon("mtr_on_replace");

            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="on_atlantis", false, "Вы считаете, что станцию необходимо закрыть?", [[Чарльз кивает: "Станция старая, разваливается на глазах. Нас слишком мало, чтобы своевременно устранять возрастающее число неполадок". ]], code [[ char_jones.on_atlantis = 1; psub("on_leaving");]]};

        {tag="generic"};

            atl_mtr_jones_asked_on_clock = true;

            psub("mtr_clock_more")

        ]]};

        {tag="mtr_on_replace", false, "Вы были вчера в Солисе?", [[Чарльз отрицательно качает головой: "Вы думаете, взрыв произошел по моей вине? Нет, я не был в Солисе уже недели две. Да, мы договорились с Голдманом, что я подменю его, но я нехорошо себя чувствовал -- возраст сказывается. Поэтому вместо меня в Солис пошел Мишель. Не знаю, в курсе ли Райт -- у нас обычное дело так меняться местами. Единственный кто возражает -- Даркстар, но к счастью, он далеко". ]], code [[

            atl_mtr_know_leroy_replaced_jones = true;

            pon("mtr_comment_replace_a", "mtr_comment_replace_b");

        ]]};

        {tag="mtr_comment_replace_a", false, "Я согласен с Даркстаром. Сейчас мы бы знали, кто виноват в аварии в Солисе. ", [[Чарльз нехотя соглашается с вами: "Наверное, вы все же правы". ]], code [[poff("mtr_comment_replace_b");]]};

        {tag="mtr_comment_replace_b", false, "Я согласен с вами, это лишняя бюрократия. ", [[Чарльз молча кивает. ]], code [[poff("mtr_comment_replace_a");]]};

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

			"До встречи".

		]], code [[ poff("mtr_comment_replace_a", "mtr_comment_replace_b"); back(); ]]};

        {tag="on_leaving"};

        {"Да. соглашусь с вами. ", [[Чарли понимающе кивает. ]], code [[ pret(); ]]};

        {"Но ведь станция в отличном состоянии. ", [[Чарли вздыхает: "Просто, вы еще не пробыли здесь достаточно и многого не видели". ]], code [[ pret(); ]]};

        {tag="mtr_clock_more"};

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

	};

};

atl_lev_radcliffe_dlg = dlg {

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

	entered = function(s)

        char_radcliffe.rel_on_join = rel_walter;

        char_anna.rel_on_join = rel_anna;

        atl_lev_state = 2;

        psub("step1");

        if char_radcliffe_atlantis_dlg.state == 0 then

            char_radcliffe_atlantis_dlg.state = 1;

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

        else

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

        end;

    end;

	phr = {

        {tag="step1"};

        {"Благодарю.", [[Уолтер кивает и продолжает: "Я хотел бы присоединиться к экипажу Левиафана и предложить вам свою помощь в поисках Уильяма". ]], code [[psub("step2");]]};

        {tag="step2"};

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

		{"Добро пожаловать на борт.", [["Отлично, благодарю. У меня есть еще одна просьба. Я хотел бы, чтобы моя сестра отправилась вместе с нами. Она знает язык навьяров и может оказаться крайне полезна во множестве ситуаций, кроме того -- так она остается под моим присмотром". ]], code [[

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

            move(char_radcliffe, char_radcliffe.home);

			psub("sister");

		]]};

		{tag="sister"};

		{"Я не думаю, что ей место на Левиафане -- экспедиция может быть опасна.", function(s)

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

				walk(atl_lev_first_sail);