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

	dsc = function(s)

        if (char_radcliffe_atlantis_dlg.state == 0) then

            return [[{Человек} лет сорока--сорока-пяти стоит, навалившись на стену. ]];

        else

            return [[{Уолтер Рэдклифф} стоит, навалившись на стену. ]];

        end;

    end;

	dlg = "char_radcliffe_atlantis_dlg";

};

char_page = npc {

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

	dsc = function(s)

        if (char_page_dlg.state == 0) then

            return [[Пожилой {мужчина} в рабочей одежде осматривает Наутилус. ]];

        else

            return [[{Фрэнсис Пейдж} осматривает Наутилус. ]];

        end;   

    end;   

	dlg = "char_page_dlg";

};

char_leroy = npc {

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

	dsc = function(s)

        if (char_leroy_dlg.state == 0) then

            return [[{Мужчина} лет пятидесяти работает над каким-то чертежом. ]];

        else

            return [[{Мишель Леруа} работает над каким-то чертежом. ]];

        end;

    end;   

    dlg = "char_leroy_dlg";   

};

char_goldman = npc {

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

	dsc = function(s)

        if (char_goldman_dlg.state == 0) then

            return [[На койке, закинув руки за голову, лежит светловолосый {мужчина} лет пятидесяти. ]];

        else

            return [[На койке, закинув руки за голову, лежит {Леонард Голдман}. ]];

        end;   

    end;   

	dlg = "char_goldman_dlg";

};

char_jones = npc {

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

	dsc = function(s)

        if (char_jones_dlg.state == 0) then

            return [[Пожилой {человек}, одетый в простой серый костюм, сидит на койке и задумчиво вертит в руках карандаш. ]];

        else

            return [[{Чарли Джонс} сидит на койке и задумчиво вертит в руках карандаш. ]];

        end;

    end;

	dlg = "char_jones_dlg";

};

atl_nih_tubes_gen = function(nam, dsc)

	return obj {

		var {

			broken = false;

			fixed = false;

		};

		nam = nam;

		dsc = dsc;

		act = function(s)

			if (s.fixed) then

				return "Поврежденные трубы замотаны изолентой";

			elseif (s.broken) then

				return "Трубы повреждены и воздух со слабым шипением вырывается из них";

			else

				return "Трубы в порядке";

			end;

		end;

		use = function(s, o)

			if (o == item_ducttape and s.broken and not s.fixed) then

				s.fixed = true;

				atl_nih_state = 2;

				return [[

					Вы заматываете разрыв изолентой. На какое-то время такое решение сгодится. 

				]];

			end;

		end;

	};

end;

atl_nih_tubes_near_aqua = atl_nih_tubes_gen("atl_nih_tubes_near_aqua", [[Рядом со шлюзом из стены выходят несколько {труб}, по которым подается воздух. ]]);

atl_nih_tubes_near_a = atl_nih_tubes_gen("atl_nih_tubes_near_a", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);

atl_nih_tubes_near_admin = atl_nih_tubes_gen("atl_nih_tubes_near_admin", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);

atl_nih_tubes_near_luna = atl_nih_tubes_gen("atl_nih_tubes_near_luna", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);

		]], code [[ psub('promise'); ]]};

		{tag="promise"};

		{always = true, "Я сделаю все, что в моих силах", [[

			"Это все Мишель придумал. У меня бы мозгов не хватило. Он и в Игнисе пожар устроил. Солис он тоже хотел взорвать сам, но Даркстар, кажется подозревает его. Поэтому он упросил меня это сделать... И зачем я согласился?!"

		]], code [[ atl_lfc_saboteur_known = true; psub("leroy");]]};

		{always = true, "Я ничего не обещаю",[[

			"Тогда я ничего не скажу"

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

		{tag = "threaten"};

		{always = true, "Тогда пусть Даркстар с тобой разбирается", [[

			"Это все Мишель придумал. У меня бы мозгов не хватило. Он и в Игнисе пожар устроил. Солис он тоже хотел взорвать сам, но Даркстар, кажется подозревает его. Поэтому он упросил меня это сделать... И зачем я согласился?!"

		]], code [[ atl_lfc_saboteur_known = true; psub("leroy");]]};

		{"[Отдать часы]Черт с тобой, забирай свои часы", [[

			Голдман крайне удивлен: "Вот так просто?"

		]], code [[ remove("item_goldmans_clock"); psub("tired_of_you"); ]]};

		{"[Уйти]", code = [[ back(); ]]};

		{tag = "tired_of_you"};

		{"Даю тебе последний шанс сказать все, что знаешь", [[

			"Я назвал свои условия"

		]], code [[ psub('promise'); ]]};

		{"[Уйти]", code = [[ back(); ]]};

		{tag = "leroy"};

		{"И что вы еще намереваетесь сломать?", [[

			"Не знаю. Мишель хотел сломать станцию... Так чтобы никто не пострадал. Все бы просто вернулись на поверхность и дело с концом".

		]]};

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

			"Помни, что ты обещал!"

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

	};

};

char_jones_dlg = dlg {

	var {

		state = 0;

		lfc_dialog = false;

	};

	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;

		if (s.state == 0) then

			s.state = 1;

			psub("first_meeting");

		else

			psub("generic");

		end;

	end;

	phr = {

			atl_lfc_panic = atl_lfc_panic + 1;

			atl_rep_darkstar = atl_rep_darkstar - 1;

			if (atl_lfc_panic == 1) then

			elseif (atl_lfc_panic == 2) then

			elseif (atl_lfc_panic == 3) then

			end;

		end};

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

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

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

	};

};

atl_lev_radcliffe_dlg = room {

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

	dsc = [[

		В доке Левиафана вы встречаете Уолтера Рэдклиффа. Завидев вас он говорит: "Дрейк, какая встреча. Я только что поместил на Левиафан два скафандра, которые вам выделили Моро с Райтом. Хорошо, что я вас встретил. Я хотел бы присоединиться к экипажу Левиафана и предложить вам свою помощь в поисках Уильяма".

	]];

	phr = {

		{"Как к этому отнесутся на Атлантиде?", [[

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

		]]};

		{"Благодарю, добро пожаловать на борт", [[

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

		]], code [[

			lifeon("char_radcliffe");

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

			psub("sister");

		]]};

		{tag="sister"};

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

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

				walk(atl_lev_first_sail);

				return [[

					"Вы правы, Анне будет безопаснее остаться на Атлантиде. Я знаю, что с вами отправляется Леарр, которая достаточно хорошо знает наш язык, так что я надеюсь, что мы справимся без помощи моей сестры. Я скоро прибуду" - с этими словами он выходит из дока.

				]];

			else

				return [[

					"Я хотел бы, чтобы Анна отправилась с нами - я лично позабочусь о ее безопасности, а вам понадобится человек, долгое время посвятивший изучению культуры навьяров".

				]];

			end;

		end};

		{"Хорошо, ее помощь нам не помешает", [[

			"Отлично, мы скоро будем готовы" - с этим словами он выходит из дока.

		]], [[

			lifeon("char_anna");

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

			walk(atl_lev_first_sail);

		]]};

	};

};