global {

    atl_jack_in_party = false;

    atl_lev_state = 0;

    atl_nih_state = 0;

    atl_iyh_state = 0;

    atl_iyh_learr_spoken = false;

    atl_iyh_aikerjarr_spoken = false;

    atl_iyh_ryveerr_spoken = false;

    atl_iyh2_ryveerr_spoken = false;

    atl_iyh2_aikerjarr_spoken = false;

    atl_iyh_shockfish_dead = false;

    atl_iyh_shockfish_left = false;

    atl_iyh_shockfish_away = 0;

    atl_iyh_entrance_destroyed = false;

    atl_iyh_artifacts_on_atlantis = false;

    atl_mtr_started = false;

    atl_mtr_know_goldman_lost_clock = false;

    atl_mtr_know_jones_replaced_goldman = false;

    atl_mtr_goldman_accused = false;

    atl_mtr_know_more_about_clock = false;

    atl_mtr_jones_replace_confirm = false;

    atl_mtr_leroy_known = false;

    atl_mtr_jones_known = false;

    atl_mtr_goldman_known = false;

    atl_mtr_know_radcliffe_worked = false;

    atl_mtr_know_leroy_in_terra = false;

    atl_mtr_finished = false;

    atl_fta_state = 0;

    atl_fta_darkstar_debrief = false;

    atl_rep_moreau = 0;

    atl_rep_darkstar = 0;

    atl_rep_svetlova = 0;

    atl_rep_wright = 0;

    atl_rep_iraa = 0;

    atl_rep_dyp = 0;

    atl_ctt_iraa_refusal = false;

    atl_star_map_copied = false;

};

atl_illuminators = obj {

    nam = "Иллюминаторы";

    dsc = [[Через равные промежутки в стены встроены небольшие круглые {иллюминаторы}. ]];

    act = [[Через иллюминаторы видны несколько других секций и коридоров. В лучах света, проникающих с поверхности вы видите массивные металлические конструкции непонятного вам назначения. На покрытом илом дне видно большое количество следов от тяжелых металлическых подошв персонала станции. ]];

};

atl_illuminator = obj {

    nam = "Иллюминатор";

    dsc = [[В стену встроен небольшой {иллюминатор}. ]];

    act = [[Через иллюминатор вы видите несколько других секций и коридоров. В лучах света, проникающих с поверхности вы видите массивные металлические конструкции непонятного вам назначения. На покрытом илом дне видно большое количество следов от тяжелых металлическых подошв персонала станции. ]];

};

atl_intersect_phone = obj {

    nam = "Телефон";

    dsc = [[На одной из стен укреплен {телефонный аппарат} в герметичном контейнере. ]];

    act = [[Вам незачем кому-то звонить. ]];

};

atl_intersect_suit = obj {

    nam = "Скафандр";

    dsc = [[В углу стоит {скафандр}. ]];

    act = [[Сейчас нет смысла это делать. ]];

}

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

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

	};

};

char_leroy_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_goldman_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Леонард Голдман";

	disp = "Леонард Голдман";

	enter = function(s)

		poff('show_clock');

		if (have(item_goldmans_clock)) then

			pon('show_clock');

		end;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

		else

			psub("generic");

		end;

	end;

	phr = {

		{tag="first_meeting"};

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

		{tag="generic"};

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

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

		{tag="give_clock"};

	};

};

char_jones_dlg = dlg {

	var {

		state = 0;

	};

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

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

	enter = function(s)

		if (char_jones.on_atlantis == 0) then

            pon("on_atlantis");

        end;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

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

		else

			psub("generic");

			return [[Чарльз Джонс приветствует вас, отвлекаясь от своего занятия: "Добрый день". ]];

		end;

	end;

	phr = {

		{"Я Дэвид Дрейк. Рад знакомству.", [[Чарльз тяжело вздыхает: "Взаимно". ]], code [[ psub("generic"); ]]};

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

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

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

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

        {tag="on_leaving"};

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

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

	};

};

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;

atl_mtr_intro = dlg {

    nam = "Атлантида";

    disp = "Атлантида";

    entered = function(s)

        atl_mtr_started = true;

        if have(item_goldmans_clock) then

            pon("clock");

        else

            pon("no_clock");

        end;

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

    end;

    phr = {

        {tag="start"};

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

        {tag="solis", "[Рассказать все]", [[Как только вы заканчиваете рассказ, Даркстар кивает: "Вы отлично справились, Дрейк".]]};

        {tag="why_me"};

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

    };

};