games/Awakening Changeset - 7a77759c31ff

Changeset - 7a77759c31ff

Parent rev.

Child rev.

[Not reviewed]

default

0 4 0

Silverwing - 8 years ago 2017-02-24 13:53:54

Atlantis overhaul progress; Progress on 238/239

4 files changed with 120 insertions and 170 deletions:

atlantis.lua

116

168

atlantis_dlg.lua

atlantis_ignis_on_fire.lua

main.lua

0 comments (0 inline, 0 general)

atlantis.lua

➞

Show inline comments

@@ @@ -530,560 +530,508 @@ atl_terra_workshop_b = room { @@
 	way = {
 		kh_vroom("В коридор", "atl_terra_main_corridor");
 	};
 	obj = {
 		"char_radcliffe_atlantis"
 	};
 };
 atl_terra_workshop_c = room {
 	nam = "Атлантида, мастерская C";
 	dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
 	way = {
 		kh_vroom("В коридор", "atl_terra_main_corridor");
 	};
 	obj = {
 		"char_legrand",
 		"char_leroy"
 	};
 };
 atl_terra_workshop_d = room {
 	nam = "Атлантида, мастерская D";
 	dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
 	way = {
 		kh_vroom("В коридор", "atl_terra_main_corridor");
 	};
 };
 atl_intersection_oculus_dom = room {
 	nam = "Атлантида, межсекционный коридор";
 	dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
 	way = {
 		kh_vroom("В секцию \"Окулус\"", "atl_oculus_main_corridor");
 		kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_oculus");
 	};
 	obj = {
 		"atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
 	};
 };
 atl_oculus_main_corridor = room {
 	var {
 		first_visit = true;
 	};
 	nam = "Атлантида, Окулус, главный коридор";
     dsc = [[Широкий просторный коридор, по обе стороны которого расположены двери, ведущие в лаборатории. В конце коридора находится дверь, ведущая в одну из технических секций станции. ]];
 	enter = function(s)
 		if (s.first_visit) then
 			s.first_visit = false;
 			walkin("atlantis_learr_intro");
 		end;
 	end;
 	way = {
 		kh_vroom("В лабораторию A", "atl_oculus_lab_a");
 		kh_vroom("В лабораторию B", "atl_oculus_lab_b");
 		kh_vroom("В лабораторию C", "atl_oculus_lab_c");
 		kh_vroom("В библиотеку", "atl_oculus_library");
 		kh_vroom("В секцию Аэрис", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("В секцию Доминус", "atl_intersection_oculus_dom");
 	};
 	obj = {
 		"atl_nih_panel_oculus"
 	};
 };
 atl_oculus_lab_a = room {
 	nam = "Атлантида, Окулус, лаборатория A";
 	dsc = [[Просторное помещение уставлено множеством столов, шкафов и различных приборов. Вдоль стен над столами расположены многочисленные решетки вентиляции. ]];
 	way = {
 		kh_vroom("В коридор", "atl_oculus_main_corridor");
 	};
 	obj = {
 		"char_svetlova"
 	};
 };
 atl_oculus_lab_b = room {
 	nam = "Атлантида, Окулус, лаборатория B";
 	dsc = [[Просторное помещение уставлено множеством столов, шкафов и различных приборов. Вдоль стен над столами расположены многочисленные решетки вентиляции. ]];
 	way = {
 		kh_vroom("В коридор", "atl_oculus_main_corridor");
 	};
 	obj = {
 		"char_winterlight"
 	};
 };
 atl_oculus_lab_c = room {
 	nam = "Атлантида, Окулус, лаборатория C";
 	dsc = [[Просторное помещение уставлено множеством столов, шкафов и различных приборов. Вдоль стен над столами расположены многочисленные решетки вентиляции. ]];
 	way = {
 		kh_vroom("В коридор", "atl_oculus_main_corridor");
 	};
 	obj = {
 		"char_ryveerr",
 		"char_anna_atlantis",
 		"char_loong"
 	};
 };
 atl_oculus_library = room {
 	nam = "Атлантида, Окулус, библиотека";
 	dsc = [[Рядом со входом в библиотеку расположен небольшой столик, на котором покоится каталог. Практически все пространство комнаты занято высокими стеллажами, заполненными книгами, журналами и документами. ]];
 	way = {
 		kh_vroom("В коридор", "atl_oculus_main_corridor");
 	};
 };
 atl_dom_lift = room {
 	var {
 		state = 0;
 	};
 	nam = "Атлантида, лифт";
 	dsc = [[Герметичная кабина лифта, рассчитанная на 5-6 человек. ]];
 	way = {
 		kh_vroom("Выйти", function()
 			if (atl_dom_lift.state == 0) then
 				return "atl_dom_main_c";
 			else
 				return "atl_ignis_main_center";
 			end;
 		end);
 	};
 	obj = {
 		"atl_lift_lever"
 	};
 };
 atl_lift_lever = obj {
 	nam = "Рычаг";
 	dsc = [[На стене укреплен массивный {рычаг}, повернув который, вы приведете в движение механизм лифта. ]];
 	act = function(s)
 		if (atl_dom_lift.state == 1) then
 			atl_dom_lift.state = 0;
 			return [[Вы поворачиваете рычаг и слышите грохот механизмов, плавно опускающих кабину лифта. ]];
 		else
 			atl_dom_lift.state = 1;
 			return [[Вы поворачиваете рычаг и слышите грохот механизмов, плавно поднимающих кабину лифта. ]];
 		end;
 	end;
 };
 --[[
 Персонажи
 ]]
 char_darkstar = npc {
 	nam = "Винсент Даркстар";
 	dsc = function(s)
         if (char_darkstar_dlg == 0) then
             return [[В одном из кресел сидит средних лет {мужчина} с короткими черными волосами. Он одет в строгий деловой костюм черного цвета без каких-либо изысков. Лицо его гладко выбрито. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он ждет ваших дальнейших действий. ]];
         else
             return [[В одном из кресел сидит {Винсент Даркстар}. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он ждет ваших дальнейших действий. ]];
         end;
     end;
 	dlg = "char_darkstar_dlg";
 };
 char_moreau = npc {
 	nam = "Фредерик Моро";
 	dsc = function(s)
         if (char_moreau_dlg.state == 0) then
             return [[За столом в кресле сидит немолодой {мужчина}. Кудрявые седые волосы аккуратно подстрижены. Он одет в строгий деловой костюм. Аккуратные седые усы украшают его лицо. Его серые глаза, скрытые очками, внимательно рассматривают вас. В руках он вертит перо. ]];
         else
             return [[За столом в кресле сидит {Фредерик Моро} и внимательно наблюдает за вами сквозь стекла очков. В руках он вертит перо. ]];
         end;
     end;
 	dlg = "char_moreau_dlg";
 };
 char_svetlova = npc {
 	nam = "Екатерина Светлова";
 	dsc = function(s)
         if (char_svetlova_dlg.state == 0) then
             return [[За столом сидит {женщина} лет сорока-пяти. Золотистые волосы собраны в пучок на затылке. Она одета в синее платье, почти без украшений. В правой руке она держит карандаш, которым периодически делает какие-то пометки в бумагах, лежащих на столе. Кажется, она не обращает на вас никакого внимания. ]];
         else
             return [[За столом сидит {Екатерина Светлова}. Периодически она делает какие-то пометки карандашом в ]];
         end;
     end;
 	dlg = "char_svetlova_dlg";
 };
 char_anna_atlantis = npc {
 	nam = "Анна Рэдклифф";
 	disp = "Анна Рэдклифф";
 	dsc = function(s)
 		if (where(char_learr_atlantis) ~= atl_oculus_lab_c) then
 			return [[
 				{Анна Рэдклифф} внимательно слушает навьяра, иногда что-то спрашивая.
 			]];
             if (char_anna_atlantis_dlg.state == 0) then
                 return [[{Девушка} лет двадцати-пяти внимательно слушает навьяра, иногда что-то спрашивая. ]];
             else
 			    return [[{Анна Рэдклифф} внимательно слушает навьяра, иногда что-то спрашивая. ]];
             end;
 		else
 			return [[
 				{Анна Рэдклифф} внимательно слушает навьяров, иногда что-то спрашивая.
 			]];
             if (char_anna_atlantis_dlg.state == 0) then
                 return [[{Девушка} лет тридцати внимательно слушает навьяров, иногда что-то спрашивая. ]];
             else
 			    return [[{Анна Рэдклифф} внимательно слушает навьяров, иногда что-то спрашивая. ]];
             end;
 		end;
 	end;
 	dlg = "char_anna_atlantis_dlg";
 };
 char_learr_atlantis = npc {
 	var {
 		offended = false;
 	};
 	nam = "Леарр";
 	__where__ = 'atl_oculus_lab_c';
 	dsc = function(s)
 		-- TODO Описание Леарр меняется в зависимости от комнаты, где она находится
 		return [[
 			{Леарр} стоит, опершись одной рукой на стол. Другой рукой она активно жестикулирует, рассказывая что-то.
 		]];
         if (stead.deref(here()) == "atl_oculus_lab_c") then
             return [[{Леарр} стоит, опершись одной рукой на стол. Другой рукой она активно жестикулирует, рассказывая что-то. ]];
         else
             if (where(char_jack_wright_atlantis) == atl_ignis_hall_a) then
                 return [[{Леарр} стоит перед иллюминатором и что-то рассказывает ]];
             else
                 return [[{Леарр} стоит перед иллюминатором и смотрит вдаль. ]];
             end;
         end;
 	end;
 	dlg = "char_learr_atlantis_dlg";
 };
 char_aikerjarr = npc {
 	nam = "Аикерьярр";
 	dsc = function(s)
 		return [[
 			{Аикерьярр} неподвижно стоит у одного из столов.
 		]];
         if (char_aikerjarr_dlg.state == 0) then
             return [[У одного из столов неподвижно стоит {навьяр}. ]];
         else
 		    return [[У одного из столов неподвижно стоит {Аикерьярр}. ]];
         end;
 	end;
 	dlg = "char_aikerjarr_dlg";
 };
 char_ryveerr = npc {
 	nam = "Ривеерр";
 	dsc = function(s)
 		if (where(char_learr_atlantis) ~= atl_oculus_lab_c) then
 			return [[
 				{Ривеерр} что-то рассказывает.
 			]];
 		else
 			return [[
 				{Ривеерр} иногда прерывает рассказ Леарр, добавляя что-то.
 			]];
             if (char_ryveerr_dlg.state == 0) then
 			    return [[У одного из столов стоит {навьяр} и что-то рассказывает. ]];
             else
                 return [[У одного из столов стоит {Ривеерр} и что-то рассказывает. ]];
             end;
 		else
             if (char_ryveerr_dlg.state == 0) then
 			    return [[Рядом стоит {навьяр} и иногда прерывает рассказ Леарр, добавляя что-то. ]];
             else
                 return [[Рядом стоит {Ривеерр} и иногда прерывает рассказ Леарр, добавляя что-то. ]];
             end;
 		end;
 	end;
 	dlg = "char_ryveerr_dlg";
 };
 char_loong = npc {
 	nam = "Джинхэй Лун";
 	dsc = function(s)
 		-- TODO описание должно мелянться, если Леарр не здесь
 		if (where(char_learr_atlantis) ~= atl_oculus_lab_c) then
 			return [[
 				{Джинхэй Лун} стоит рядом с блокнотом и делает записи по ходу рассказа навьяра.
 			]];
 		else
 			return [[
 				{Джинхэй Лун} стоит рядом с блокнотом и делает записи по ходу рассказа навьяров.
 			]];
 		end;
 		if (char_loong_dlg.state == 0) then
             return [[Там же стоит немолодой {китаец} с блокнотом и делает какие-то записи. ]];
         else
             return [[Там же стоит {Джинхэй Лун} с блокнотом и делает какие-то записи. ]];
         end;
 	end;
 	dlg = "char_loong_dlg";
 };
 char_winterlight = npc {
 	nam = "Сильвия Уинтерлайт";
 	dsc = function(s)
         if (char_winterlight_dlg.state == 0) then
             return [[{Женщина} лет тридцати-пяти--сорока стоит, склонишись над картой. Длинные темные волосы спадают на плечи. Она одета в длинную черную юбку и серую блузку. Ее зеленые глаза внимательно изучают документ, лежащий перед ней. ]];
         else
             return [[{Сильвия Уинтерлайт} стоит возле одного из столов, рассматривая карту. ]];
         end;
     end;
 	dlg = "char_winterlight_dlg";
 };
 char_jack_wright_atlantis = npc {
 	nam = "Джек Райт";
 	dsc = function(s)
 		if (where(char_jack_wright_atlantis) == atl_ignis_hall_a) then
 			return [[
 				{Джек Райт} сидит рядом и о чем-то с ней разговаривает.
 			]];
 			return [[{Джеку Райт}, стоящему рядом. ]];
 		else
 			return [[
 				{Джек Райт}
 			]];
 			return [[{Джеком}. ]];
 		end;
 	end;
 	dlg = "char_jack_wright_atlantis_dlg";
 };
 char_michael_wright = npc {
 	nam = "Майкл Райт";
 	dsc = [[
 		{Майкл Райт} просматривает какие-то чертежи.
 	]];
 	dsc = function(s)
         if (where(char_jack_wright_atlantis) == atl_ignis_hall_a) then
             return [[{Майкл Райт} оживленно беседует о чем-то с ]];
         else
             return [[{Майкл Райт} просматривает какие-то чертежи. ]];
         end;
     end;
 	dlg = "char_michael_wright_dlg";
 };
 char_legrand = npc {
 	nam = "Мари Легран";
 	dsc = [[
 		{Мари Легран} стоит у верстака, рассматривая какую-то деталь.
 	]];
 	dsc = function(s)
         if (char_legrand_dlg.state == 0) then
             return [[У верстака стоит {женщина} лет сорока--сорока-пяти и рассматривает какую-то деталь.]];
         else
             return [[У верстака стоит {Мари Легран} и рассматривает какую-то деталь. ]];
         end;
     end;
 	dlg = "char_legrand_dlg";
 };
 char_radcliffe_atlantis = npc {
 	nam = "Уолтер Рэдклифф";
 	dsc = [[
 		{Уолтер Рэдклифф} стоит, навалившись на стену.
 	]];
 	dsc = function(s)
         if (char_radcliffe_atlantis_dlg.state == 0) then
             return [[{Человек} лет пятидесяти стоит, навалившись на стену. ]];
         else
             return [[{Уолтер Рэдклифф} стоит, навалившись на стену. ]];
         end;
     end;
 	dlg = "char_radcliffe_atlantis_dlg";
 };
 char_xiao = npc {
 	nam = "Вейюан Сяо";
 	dsc = [[
 		{Вейюан Сяо} осматривает Наутилус.
 	]];
 	dsc = function(s)
         if (char_xiao_dlg.state == 0) then
             return [[Немолодой {китаец} осматривает Наутилус. ]];
         else
             return [[{Вейюан Сяо} осматривает Наутилус. ]];
         end;
     end;
 	dlg = "char_xiao_dlg";
 };
 char_leroy = npc {
 	nam = "Мишель Леруа";
 	dsc = [[
 		{Мишель Леруа} что-то чертит.
 	]];
 	dsc = function(s)
         if (char_leroy_dlg.state == 0) then
             return [[{Мужчина} лет пятидесяти работает над каким-то чертежом. ]];
         else
             return [[{Мишель Леруа} работает над каким-то чертежом. ]];
         end;
     end;
     dlg = "char_leroy_dlg";
 };
 char_atlantis_guards = npc {
 	nam = "Охранники";
 	dsc = [[
 		Рядом с дверью в оружейную стоят два вооруженных {охранника}.
 	]];
 	phr = {
 		[[
 			"Входа нет".
 		]];
 		[[
 			"Вам сюда нельзя".
 		]];
 		[[
 			"Начальник в соседнем кабинете".
 		]];
 	};
 };
 char_goldman = npc {
 	nam = "Леонард Голдман";
 	dsc = [[
 		{Леонард Голдман} сидит на койке о чем-то раздумывая.
 	]];
 	dsc = function(s)
         if (char_goldman_dlg.state == 0) then
             return [[На койке, закинув руки за голову, лежит светловолосый {мужчина} лет пятидесяти. ]];
         else
             return [[На койке, закинув руки за голову, лежит {Леонард Голдман}. ]];
         end;
     end;
 	dlg = "char_goldman_dlg";
 };
 char_jones = npc {
 	nam = "Чарли Джонс";
 	dsc = [[
 		{Чарли Джонс} осматривает свой револьвер.
 	]];
 	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_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_a = atl_nih_tubes_gen("atl_nih_tubes_near_a", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_near_luna = atl_nih_tubes_gen("atl_nih_tubes_near_luna", [[
 	За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_near_admin = atl_nih_tubes_gen("atl_nih_tubes_near_admin", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_near_oculus = atl_nih_tubes_gen("atl_nih_tubes_near_oculus", [[
 	Вдоль стены протянуто несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_near_luna = atl_nih_tubes_gen("atl_nih_tubes_near_luna", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_near_terra = atl_nih_tubes_gen("atl_nih_tubes_near_oculus", [[
 	Вдоль стены протянуто несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_near_oculus = atl_nih_tubes_gen("atl_nih_tubes_near_oculus", [[Вдоль стены протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_near_arctos = atl_nih_tubes_gen("atl_nih_tubes_near_arctos", [[
 	За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_near_terra = atl_nih_tubes_gen("atl_nih_tubes_near_oculus", [[Вдоль стены протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_oculus = atl_nih_tubes_gen("atl_nih_tubes_oculus", [[
 	За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_terra = atl_nih_tubes_gen("atl_nih_tubes_terra", [[
 	За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_near_arctos = atl_nih_tubes_gen("atl_nih_tubes_near_arctos", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_luna = atl_nih_tubes_gen("atl_nih_tubes_luna", [[
 	Под потолком протянуто несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_arctos = atl_nih_tubes_gen("atl_nih_tubes_arctos", [[
 	Под потолком протянуто несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_oculus = atl_nih_tubes_gen("atl_nih_tubes_oculus", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_aqua = atl_nih_tubes_gen("atl_nih_tubes_aqua", [[
 	Под потолком протянуто несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_terra = atl_nih_tubes_gen("atl_nih_tubes_terra", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_aqua_a = atl_nih_tubes_gen("atl_nih_tubes_aqua_a", [[
 	Под потолком протянуто несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_luna = atl_nih_tubes_gen("atl_nih_tubes_luna", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_aqua_b = atl_nih_tubes_gen("atl_nih_tubes_aqua_b", [[
 	Под потолком протянуто несколько {труб}, по которым подается воздух.
 ]]);
 atl_nih_tubes_arctos = atl_nih_tubes_gen("atl_nih_tubes_arctos", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_panel_near_a = obscured_obj("atl_nih_panel_near_a", [[
 	Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха.
 ]], [[
 	Вы снимаете панель, открывая доступ к трубам.
 ]], "atl_nih_tubes_near_a", true);
 atl_nih_tubes_aqua = atl_nih_tubes_gen("atl_nih_tubes_aqua", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_panel_near_admin = obscured_obj("atl_nih_panel_near_admin", [[
 	Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха.
 ]], [[
 	Вы снимаете панель, открывая доступ к трубам.
 ]], "atl_nih_tubes_near_admin", true);
 atl_nih_tubes_aqua_a = atl_nih_tubes_gen("atl_nih_tubes_aqua_a", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_panel_near_luna = obscured_obj("atl_nih_panel_near_luna", [[
 	Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха.
 ]], [[
 	Вы снимаете панель, открывая доступ к трубам.
 ]], "atl_nih_tubes_near_luna", true);
 atl_nih_tubes_aqua_b = atl_nih_tubes_gen("atl_nih_tubes_aqua_b", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_panel_oculus = obscured_obj("atl_nih_panel_oculus", [[
 	Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха.
 ]], [[
 	Вы снимаете панель, открывая доступ к трубам.
 ]], "atl_nih_tubes_oculus", true);
 atl_nih_panel_near_a = obscured_obj("atl_nih_panel_near_a", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_near_a", true);
 atl_nih_boxes_near_oculus = obscured_obj("atl_nih_boxes_near_oculus", [[
 	За грудой {ящиков}, вы замечаете несколько труб подачи воздуха.
 ]], [[
 	Вы сдвигаете несколько ящиков, открывая себе доступ к трубам.
 ]], "atl_nih_tubes_near_oculus", false, [[
 	У стены расположена груда ящиков.
 ]], [[
 	Вам незачем что-то еще здесь делать.
 ]]);
 atl_nih_panel_near_admin = obscured_obj("atl_nih_panel_near_admin", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_near_admin", true);
 atl_nih_panel_near_luna = obscured_obj("atl_nih_panel_near_luna", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_near_luna", true);
 atl_nih_panel_oculus = obscured_obj("atl_nih_panel_oculus", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_oculus", true);
 atl_nih_boxes_near_terra = obscured_obj("atl_nih_boxes_near_terra", [[
 	За грудой {ящиков}, вы замечаете несколько труб подачи воздуха.
 ]], [[
 	Вы сдвигаете несколько ящиков, открывая себе доступ к трубам.
 ]], "atl_nih_tubes_near_terra", false, [[
 	У стены расположена груда ящиков.
 ]], [[
 	Вам незачем что-то еще здесь делать.
 ]]);
 atl_nih_boxes_near_oculus = obscured_obj("atl_nih_boxes_near_oculus", [[За грудой {ящиков}, вы замечаете несколько труб подачи воздуха. ]], [[Вы сдвигаете несколько ящиков, открывая себе доступ к трубам. ]], "atl_nih_tubes_near_oculus", false, [[У стены расположена груда ящиков. ]], [[Вам незачем что-то еще здесь делать. ]]);
 atl_nih_boxes_terra = obscured_obj("atl_nih_boxes_terra", [[
 	За грудой {ящиков}, вы замечаете несколько труб подачи воздуха.
 ]], [[
 	Вы сдвигаете несколько ящиков, открывая себе доступ к трубам.
 ]], "atl_nih_tubes_terra", false, [[
 	У стены расположена груда ящиков.
 ]], [[
 	Вам незачем что-то еще здесь делать.
 ]]);
 atl_nih_boxes_near_terra = obscured_obj("atl_nih_boxes_near_terra", [[За грудой {ящиков}, вы замечаете несколько труб подачи воздуха. ]], [[Вы сдвигаете несколько ящиков, открывая себе доступ к трубам. ]], "atl_nih_tubes_near_terra", false, [[У стены расположена груда ящиков. ]], [[Вам незачем что-то еще здесь делать. ]]);
 atl_nih_boxes_terra = obscured_obj("atl_nih_boxes_terra", [[За грудой {ящиков}, вы замечаете несколько труб подачи воздуха. ]], [[Вы сдвигаете несколько ящиков, открывая себе доступ к трубам.
 ]], "atl_nih_tubes_terra", false, [[У стены расположена груда ящиков. ]], [[Вам незачем что-то еще здесь делать. ]]);
 atl_nih_tubes_near_aqua:disable();
 atl_nih_panel_near_a:disable();
 atl_nih_panel_near_admin:disable();
 atl_nih_panel_near_luna:disable();
 atl_nih_boxes_near_oculus:disable();
 atl_nih_boxes_near_terra:disable();
 atl_nih_tubes_near_arctos:disable();
 atl_nih_panel_oculus:disable();
 atl_nih_boxes_terra:disable();
 atl_nih_tubes_luna:disable();
 atl_nih_tubes_arctos:disable();
 atl_nih_tubes_aqua:disable();
 atl_nih_tubes_aqua_a:disable();
 atl_nih_tubes_aqua_b:disable();
 atl_nih_init = function()
 	atl_nih_state = 1;
 	local nih_array = {
 		atl_nih_tubes_near_aqua,
 		atl_nih_tubes_near_a,
 		atl_nih_tubes_near_admin,
 		atl_nih_tubes_near_luna,
 		atl_nih_tubes_near_oculus,
 		atl_nih_tubes_near_terra,
 		atl_nih_tubes_near_arctos,
 		atl_nih_tubes_oculus,
 		atl_nih_tubes_terra,
 		atl_nih_tubes_luna,
 		atl_nih_tubes_arctos,
 		atl_nih_tubes_aqua,
 		atl_nih_tubes_aqua_a,
 		atl_nih_tubes_aqua_b
 	};
 	local nih_array2 = {
 		atl_nih_tubes_near_aqua,
 		atl_nih_panel_near_a,
 		atl_nih_panel_near_admin,
 		atl_nih_panel_near_luna,
 		atl_nih_boxes_near_oculus,
 		atl_nih_boxes_near_terra,
 		atl_nih_tubes_near_arctos,
 		atl_nih_panel_oculus,
 		atl_nih_boxes_terra,
 		atl_nih_tubes_luna,
 		atl_nih_tubes_arctos,
 		atl_nih_tubes_aqua,
 		atl_nih_tubes_aqua_a,
 		atl_nih_tubes_aqua_b
 	};
 	nih_array[rnd(#nih_array)].broken = true;
 	for i = 1, #nih_array2 do
 		nih_array2[i]:enable();
 	end;
 end;
@@ \ No newline at end of file @@

atlantis_dlg.lua

➞

Show inline comments

@@ @@ -1117,369 +1117,369 @@ char_radcliffe_atlantis_dlg = dlg { @@
 			psub("generic");
 			return [[
 				Уолтер Рэдклифф кивает вам: "Добрый день".
 			]];
 		end;
 	end;
 	phr = {
 		{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="sabotage", false, "Вы знаете, что пожар в Игнисе - результат саботажа?", [[
 			"Безусловно. Системы энергоснабжения проектировал я и абсолютно уверен в их безопасности и надежности. Судя по тому, что произошло - кто-то весьма грамотный ,,доработал'' систему энергоснабжения Игниса. Я не думаю, что это мог быть один человек... Хотя если он делал это несколько дней - вполне вероятно. Как это сделать, кроме нас с Райтом знают только трое: Мишель Леруа, Чарльз Джонс и Мари Легран. И еще кое-что. Даркстар просил меня ни с кем про это не разговаривать, поэтому надеюсь на ваше понимание. Отдельно попрошу - не говорить на эту тему с моей сестрой".
 		]], code [[
 			rel_walter = rel_walter + 1;
 		]]};
 		{tag="ignis_what", false, "Вы, как инженер, можете рассказать, что произошло в Игнисе?", [[
 			"Пожар. Вам что-то еще известно?"
 		]]};
 		{"Я пойду", [[
 			"До встречи", - Уолтер отворачивается от вас и возвращается к своим делам.
 		]], code [[ back();]]};
 	};
 };
 char_xiao_dlg = dlg {
 	var {
 		state = 0;
 	};
 	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");
 			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"};
 		{tag="sabotage", false, "Вы знаете, что пожар в Игнисе - следствие саботажа?", function(s)
 			atl_lfc_panic = atl_lfc_panic + 1;
 			atl_rep_darkstar = atl_rep_darkstar - 1;
 			return [[
 				"Оставьте это Даркстару. Если саботаж имел место быть - Винсент найдет виновного. Я передам ему ваши слова".
 			]]
 		end;};
 		{tag="ignis_what", false, "Что произошло в Игнисе?", [[
 			"Меня там не было. Не берусь говорить".
 		]]};
 		{always=true, "Я пойду", [[
 			Вейюан Сяо прощается с вами: "Увидимся позже".
 		]], code [[ back(); ]]};
 	};
 };
 char_leroy_dlg = dlg {
 	var {
 		state = 0;
 	};
 	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");
 			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"};
 		{tag="sabotage", false, "Вы знаете, что пожар в Игнисе начался из-за саботажа?", [[
 			"Кто вам это сказал? Никто на станции не будет в здравом уме подвергать опасности свою жизнь еще больше".
 		]], code [[ atl_lfc_leroy_spoken = 1; ]]};
 		{tag="ignis_what", false,"Что вы можете сказать о произошедшем в Игнисе?", [[
 			"Короткое замыкание, огонь быстро распространился по секции".
 		]]};
 		{always=true, "Я пойду", [[
 			"Увидимся".
 		]], code [[ back(); ]]};
 	};
 };
 char_goldman_dlg = dlg {
 	var {
 		state = 0;
 	};
 	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 (have(item_goldmans_clock)) then
 			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 [[ psub("generic"); ]]};
 		{tag="generic"};
 		{tag="show_clock", false, "[Показать часы]Это ваше?", [[
 			Голдман протягивает руку, чтобы взять часы и удивленно спрашивает: "Мои. Где вы их взяли?"
 		]], code [[ atl_lfc_goldman_known = true; psub("give_clock"); ]]};
 		{tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", [[
 			Вы видите удивление и страх на лице Голдмана. Он неуверенно спрашивает: "С чего вы взяли?"
 		]], code [[ psub("sabotage2"); atl_lfc_leroy_spoken = 1; ]]};
 		{tag="ignis_what", false, "Вы знаете, что произошло в Игнисе?", [[
 			"Не больше чем вы".
 		]]};
 		{"Я пойду", [[
 			"Поговорим позже".
 		]], code [[ back(); ]]};
 		{tag="sabotage2"};
 		{"Даркстар сказал", [[
 			"Даркстар мог и ошибиться. Я в это не поверю".
 		]]};
 		{"Это очевидно", [[
 			"С чего вы взяли? будете дальше распускать подобные слухи - я доложу Даркстару".
 		]]};
 		{"Эээ... Я пошутил", [[
 			"Вы вообще нормальный?!"
 		]], code [[ back(); ]]};
 		{tag="give_clock"};
 		{"[Отдать часы]Нашел", [[
 			"Благодарю. Это часы моего деда, они очень важны для меня".
 		]], code [[ remove("item_goldmans_clock"); pret(); ]]};
 		{"[Убрать часы]Не так быстро. Что ты делал в Солисе?", [[
 			Ваш запрос похоже застал Леонарда врасплох. Заикаясь, он спрашивает: "С ч-чего вы вз-взяли?"
 		]], code [[ psub("give_clock_2");]]};
 		{tag="give_clock_2"};
 		{"Эти часы я подобрал на месте саботажа. Теперь ты не отвертишься", [[
 			Леонард садится на кровать. Тяжело вздохнув он сознается: "Хорошо, я все скажу. Только если обещаете, что меня больше не будут держать на этой станции"
 		]], 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");
 			return [[
 				Перед вами сидит немолодой человек, одетый в недорогой костюм. Взгляд его серых глаз усталый и безжизненный. Лицо изрыто глубокими морщинами. Седые волосы коротко острижены. Подбородок гладко выбрит.
 				При виде вас он встает и приветствует вас: "Здравствуйте, меня зовут Чарли. Чарли Джонс".
 			]];
 		else
 			psub("generic");
 			return [[
 				Чарльз Джонс приветствует вас: "Здравствуйте".
 			]];
 		end;
 	end;
 	phr = {
 		{"Я Дэвид Дрейк. Рад знакомству", [[
 			Чарльз тяжело вздыхает: "Взаимно".
 		]], code [[ psub("generic"); ]]};
 		{tag = "sabotage", false, "Вы знаете, что причиной пожара был саботаж?", function(s)
 			atl_lfc_panic = atl_lfc_panic + 1;
 			atl_rep_darkstar = atl_rep_darkstar - 1;
 			if (atl_lfc_panic == 1) then
 				return [[
 					Чарльз отрицательно качает головой: "Я и сам не прочь покинуть станцию, но есть же цивилизованные методы. Не верю".
 				]];
 			elseif (atl_lfc_panic == 2) then
 				return [[
 					Чарльз отрицательно качает головой: "Это не более чем слухи. Не поверю, чтобы кто-то мог намеренно это сделать"
 				]];
 			elseif (atl_lfc_panic == 3) then
 				return [[
 					Чарльз внимательно смотрит на вас. В его глазах вы видите страх и удивление: "Вы серьезно? Теперь у нас помимо старой, разваливающейся станции еще и саботажник завелся?!"
 				]];
 			end;
 		end};
 		{tag = "ignis_what", false, "Вы знаете, что произошло в Игнисе?", [[
 			"Да. Станция уже старая. Дальше будет еще хуже".
 		]]};
 		{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);
 		]]};
 	};
 };
@@ \ No newline at end of file @@

atlantis_ignis_on_fire.lua

➞

Show inline comments

@@ @@ -1010,200 +1010,200 @@ atl_iof_air_cw = obj { @@
 		elseif (atl_iof_air_valves.selected == 3) then
 			if (t == 3 or
 				(t == 2 and atl_iof_air_valves.valves[2] == 0) or
 				(t == 1 and atl_iof_air_valves.valves[6] == 3)) then
 				t = atl_iof_air_valves.valves[atl_iof_air_valves.selected];
 				r = "Клапан не поворачивается";
 			end;
 		elseif (atl_iof_air_valves.selected == 4) then
 			if (t == 1 or t == 2 or
 				(t == 3 and atl_iof_air_valves.valves[1] == 1) or
 				(t == 0 and atl_iof_air_valves.valves[5] == 2)) then
 				t = atl_iof_air_valves.valves[atl_iof_air_valves.selected];
 				r = "Клапан не поворачивается";
 			end;
 		elseif (atl_iof_air_valves.selected == 5) then
 			if (t == 1 or
 				(t == 3 and atl_iof_air_valves.valves[2] == 1) or
 				(t == 2 and atl_iof_air_valves.valves[4] == 0) or
 				(t == 0 and atl_iof_air_valves.valves[6] == 2)) then
 				t = atl_iof_air_valves.valves[atl_iof_air_valves.selected];
 				r = "Клапан не поворачивается";
 			end;
 		elseif (atl_iof_air_valves.selected == 6) then
 			if (t == 1 or
 				(t == 3 and atl_iof_air_valves.valves[3] == 1) or
 				(t == 2 and atl_iof_air_valves.valves[5] == 0)) then
 				t = atl_iof_air_valves.valves[atl_iof_air_valves.selected];
 				r = "Клапан не поворачивается";
 			end;
 		end;
 		atl_iof_air_valves.valves[atl_iof_air_valves.selected] = t;
 		atl_iof_air_valves.selected = 0;
 		if (atl_iof_air_valves:is_solved()) then
 			walk("atl_iof_electr_dlg");
 		end;
 		return r;
 	end;
 };
 atl_iof_air_cancel = obj {
 	nam = "Выбрать другой клапан";
 	dsc = "{Выбрать другой клапан}";
 	act = function(s)
 		atl_iof_select1:enable();
 		atl_iof_select2:enable();
 		atl_iof_select3:enable();
 		atl_iof_select4:enable();
 		atl_iof_select5:enable();
 		atl_iof_select6:enable();
 		atl_iof_air_ccw:disable();
 		atl_iof_air_cw:disable();
 		atl_iof_air_cancel:disable();
 		atl_iof_air_valves.selected = 0;
 		return "";
 	end;
 };
 atl_iof_electr_dlg = dlg {
 	nam = "Атлантида, Игнис";
 	entered = [[
 		Вы останавливаете подачу кислорода и собиратесь сообщить об этом по радио, когда из динамика радается голос Райта: "Как у вас успехи? Нужно отключить еще подачу электричества".
 	]];
 	phr = {
 		{"Подача воздуха отключена. Как я смогу отключить электричество?", [[
 			Райт продолжает: "Отлично. Там рядом должна быть панель, она подписана. Там замок хитрый, но, думаю, вы разберетесь. Затем просто дергаете рубильник и дело сделано".
 		]], code [[ psub("next"); ]]};
 		{tag="next"};
 		{"Вас понял. Конец связи", [[
 			Вы быстро находите необходимую панель и приступаете к работе.
 		]], code [[ walk("atl_iof_electr_panel_closed"); ]]};
 	};
 };
 atl_iof_electr_panel_closed = room {
 	var {
 		locks = { true, true, true, true, true, true, true, true };
 	};
 	nam = "Электрощит";
 	pic = function(s)
 		local image = 'images/electr_bg.png';
 		for i = 1, 4 do
 			if (s.locks[i]) then
 				image = image .. ";images/air_3.png@" .. tostring(((i - 1) % 4) * 32) .. "," .. tostring(math.floor((i - 1) / 4) * 32);
 			else
 				image = image .. ";images/air_1.png@" .. tostring(((i - 1) % 4) * 32) .. "," .. tostring(math.floor((i - 1) / 4) * 32);
 			end;
 		end;
 		for i = 5, 8 do
 			if (s.locks[i]) then
 				image = image .. ";images/air_1.png@" .. tostring(((i - 1) % 4) * 32) .. "," .. tostring(math.floor((i - 1) / 4) * 32);
 			else
 				image = image .. ";images/air_3.png@" .. tostring(((i - 1) % 4) * 32) .. "," .. tostring(math.floor((i - 1) / 4) * 32);
 			end;
 		end;
 		return image;
 	end;
 	dsc = [[
 		Перед вами расположен щиток с восемью защелками. Сейчас щиток закрыт и вы не можете его снять.
 	]];
 	obj = {
 		"atl_iof_electr_select1",
 		"atl_iof_electr_select2",
 		"atl_iof_electr_select3",
 		"atl_iof_electr_select4",
 		"atl_iof_electr_select5",
 		"atl_iof_electr_select6",
 		"atl_iof_electr_select7",
 		"atl_iof_electr_select8"
 	};
 	is_solved = function(s)
 		local unsolved = false;
 		for i = 1, #locks do
 			unsolved = unsolved or s.locks[i];
 		end;
 		return not unsolved;
 	end;
 };
 atl_iof_electr_select = function(index)
 	return obj {
 		nam = "Защелка " .. tostring(index);
 		dsc = "{Сдвинуть защелку " .. tostring(index) .. "}^";
 		act = function(s)
 			atl_iof_electr_panel_closed.locks[index] = not atl_iof_electr_panel_closed.locks[index];
 			if (index ~= 4 and index ~= 8) then
 				atl_iof_electr_panel_closed.locks[index + 1] = not atl_iof_electr_panel_closed.locks[index + 1];
 			end;
 			if (index ~= 1 and index ~= 5) then
 				atl_iof_electr_panel_closed.locks[index - 1] = not atl_iof_electr_panel_closed.locks[index - 1];
 			end;
 			if (index > 4) then
 				atl_iof_electr_panel_closed.locks[index - 4] = not atl_iof_electr_panel_closed.locks[index - 4];
 			end;
 			if (index < 5) then
 				atl_iof_electr_panel_closed.locks[index + 4] = not atl_iof_electr_panel_closed.locks[index + 4];
 			end;
 			if (atl_iof_electr_panel_closed.is_solved()) then
 				walk("atl_iof_electr_panel_open");
 				return "";
 			end;
 			return "Вы сдвигаете защелку " .. tostring(index);
 		end;
 	};
 end;
 atl_iof_electr_select1 = atl_iof_electr_select(1);
 atl_iof_electr_select2 = atl_iof_electr_select(2);
 atl_iof_electr_select3 = atl_iof_electr_select(3);
 atl_iof_electr_select4 = atl_iof_electr_select(4);
 atl_iof_electr_select5 = atl_iof_electr_select(5);
 atl_iof_electr_select6 = atl_iof_electr_select(6);
 atl_iof_electr_select7 = atl_iof_electr_select(7);
 atl_iof_electr_select8 = atl_iof_electr_select(8);
 atl_iof_electr_panel_open = dlg {
 	nam = "Атлантида, Игнис";
 	dsc = [[
 		Вы снимаете щиток и дергаете рубильник. Судя по всему, Игнис сейчас должен быть обесточен. По радио вы сообщаете Райту о завершении работ.
 	]];
 	phr = {
 		{"Подача электричества в Игнис отключена, возвращаюсь на станцию", [[
 			В динамике вы слышите голос Райта: "Отлично, возвращайтесь".^
 		]], code [[ walk("atl_iof_end"); ]]};
 	};
 };
 atl_iof_end = room {
 	nam = "Атлантида";
 	dsc = [[
 		Вы возвращаетесь на станцию и сразу же отправляетесь в свою комнату, чтобы отдохнуть. Вы просыпаетесь утром, полностью готовый заняться новыми делами. ^
 		Почти сразу к вам в комнату входят двое охранников. Они просят вас проследовать за ними к начальнику службы безопасности - Винсенту Даркстару. У вас нет никакого выхода, кроме как пойти с ними...
 	]];
 	entered = function(s)
 		atl_lfc_state = 1;
 		if (atl_iof_time_state.learr_safe) then
 			atl_iof_learr_suit = true;
 		end;
 		if (atl_iof_time_state.carry_learr or atl_iof_time_state.learr_safe or not char_learr_iof.faint) then
 			-- learr saved
 			put(char_learr_atlantis, atl_oculus_lab_c);
 		else
 			atl_iof_learr_dead = true;
-			put(char_aikerjarr, atl_oculus_lab_c);
+			put(char_aikerjarr, atl_oculus_lab_b);
 		end;
 		atl_iof_completed = true;
 	end;
 	obj = {
 		vway("Продолжить", "{Продолжить}", "atl_lfc_darkstar_dlg");
 	};
 };
@@ \ No newline at end of file @@

main.lua

➞

Show inline comments

 -- $Name: Пробуждение$
 -- $Version: 1.0$
 -- $Author: Khaelenmore Thaal$
 instead_version "1.9.1"
 require "para"
 require "dash"
 require "quotes"
 require "hideinv"
 require "kbd"
 require "timer"
 -- Код и ядро
 dofile "utils.lua"
 dofile "battlefield.lua";
 -- Общее
 dofile "items.lua"
 dofile "party.lua"
 dofile "game_over.lua";
 -- Часть 1
 dofile "london.lua"
 dofile "wright.lua"
 dofile "travel.lua"
 dofile "dock2.lua"
 dofile "warehouse18.lua"
 dofile "warehouse32.lua"
 -- Часть 2
 dofile "leviathan.lua"
 dofile "atlantis.lua"
 dofile "atlantis_ignis.lua"
 dofile "atlantis_dlg.lua"
 dofile "atlantis_intro.lua"
 dofile "atlantis_ignis_on_fire.lua"
 dofile "atlantis_looking_for_clues.lua"
 dofile "atlantis_from_the_ashes.lua"
 dofile "atlantis_iyhehevjiarr.lua"
 dofile "atlantis_catching_the_tail.lua"
 -- Часть 3
 dofile "journey_venaedanotrr.lua"
 dofile "journey_zayslanotrr.lua"
 dofile "journey_zayslanotrr_temple.lua"
 dofile "journey_temple.lua"
 -- Часть 4
 dofile "lseryanotrr_intro.lua"
 dofile "lseryanotrr_locations.lua"
 dofile "lse_service_tunnels.lua"
 dofile "lse_powerplant.lua";
 dofile "lse_final_battle.lua";
 --dofile "final_scene.lua";
 --dofile "final_battle.lua";
 --dofile "first_city_inner_rim.lua"
 --dofile "first_city_middle_rim.lua"
 --dofile "first_city_outer_rim.lua"
 global {
 	warehouse18_found = false;
 	warehouse32_found = false;
     warehouse32_visited = false;
 	dock_found = false;
 	leviathan_discovered = false;
 	atlantis_found = false;
 	temple_found = false;
 	nearest_cities_found = false;
 	iraaphaanotrr_temple_found = false;
 	dypatreanotrr_temple_found = false;
     venaedanotrr_temple_found = false;
     zayslanotrr_temple_found = false;
     deep_temple_found = false;
     lseryanotrr_found = false;
 	rel_phaetlarr = 0;
 	rel_walter = 0;
 	rel_learr = 0;
 	rel_anna = 0;
 	rel_jack = 0;
     dt_code = {};
     dt_buttons = {};
 };
 player_drake = player {
     var {
         hp = 10;
         has_light = false;
         party = {--[["learr", "radcliffe", "phaetlarr", "wright"]]};
         companion = nil;
         money = 200;
     };
 	nam = "player";
 	disp = "Дэвид Дрейк";
     disp2 = "Дрейка";
     disp3 = "Дрейку";
 	where = 'port';
 	obj = {'item_umbrella', 'item_charts', 'item_note_1', 'item_money',
 	};
 	pay = function(s, c)
 		if (s.money >= c) then
 			s.money = s.money - c;
 			return true;
 		else
 			return false;
 		end;
 	end;
 };
 intro = room {
 	nam = "intro";
 	hideinv = true;
 	disp = "Вступление";
 	dsc = [[
 		ВНИМАНИЕ: Это специальная предварительная версия игры. Ни один фрагмент игры не является финальным. ^^
 		ВНИМАНИЕ: Данная версия игры не предназначена для какого-либо распространения, исключая прямую передачу файлов автором. ^^
 		Действие игры происходит в конце 19-го века. Вы играете за Дэвида Дрейка - единственного сына богатого и уважаемого владельца транспортной компании "Вестхейвен Трансоушен". ^
 		Несколько лет назад, когда Дэвиду было 10 лет, Уильям таинственным образом бесследно пропал. Полицейское расследование вскоре зашло в тупик и было прекращено. Через несколько месяцев компания, оставшаяся без своего владельца, обанкротилась, ее имущество распродается. ^
 		После исчезновения отца Дэвид жил в Вашингтоне с бабушкой. Он пошел по стопам отца и выучился на инженера-кораблестроителя. Несколько дней назад в доме, где он жил, был обнаружен тайник, хранящий секретные документы отца - карты, указывающие по-видимому на какие-то тайники Уильяма и записка с адресом и именем.^
 		Одержимый идеей узнать больше, Дэвид отправляется в Лондон...
 	]];
 	obj = {
 		vway("Начать игру", "{Начать игру}", 'aurora_borealis');
+	}
 };
 pl = player_drake;
 game.nam = "Пробуждение";
 game.dsc = [[
 	Действие игры происходит в конце 19-го века. Вы играете за Дэвида Дрейка, сына владельца крупной транспортной компании "Вестхейвен Трансоушен". Несколько лет назад Уильям Дрейк, отец главного героя бесследно пропадает. Компания вскоре разваливается. Поиски ни к чему не приводят. Когда казалось бы уже все потеряно, в доме Дрейков находят тайник с документами Уильяма. Несколько схем строений, принадлежащих компании и клочок бумаги с адресом некоего Майкла Райта в Лондоне. Естественно, Дэвид как можно скорее отправляется в Великобританию...
 	Вам предстоит отыскать подводную лодку, посетить подводную станцию, построенную Уильямом, встретить древнюю расу подводных жителей, поучаствовать в событиях, описанных древними легендами этой расы и узнать, что стало с Уильямом Дрейком.
 ]];
 game_act_phrases = {
 	"Вы не знаете, что с этим делать. ";
 	"Вам нет смысла это трогать. ";
 	"Вам это ничем не поможет. ";
 	"Это бессмысленно. ";
 	"Незачем это трогать. ";
 };
 game_use_phrases = {
 	"Вам это ничем не поможет. ";
 	"Это бессмысленно. ";
 	"Вы не знаете, как это сделать. "
 };
 game.act = function(s)
 	return game_act_phrases[rnd(#game_act_phrases)];
 end;
 game.use = function(s)
 	return game_use_phrases[rnd(#game_use_phrases)];
 end;
 game.inv = "INV: Если вы видите это сообщение - это баг. ";
 require "dbg"
 function init()
 	---modules init
 	leviathan_init();
 	warehouse18_init();
 	warehouse32_init();
     local nums = {1,2,3,4,5,6};
     for i = 1, 4 do
         local index = rnd(#nums);
         table.insert(dt_code, nums[index]);
         table.remove(nums, index);
     end;
     nums = {1,2,3,4,5,6};
     for i = 1, 3 do
         local index = rnd(#nums);
         table.insert(dt_buttons, nums[index]);
         table.remove(nums, index);
     end;
 	---game init
 	pl.where = intro;
 	---debug
     pl.where = "atlantis_intro_dock";
     ---leviathan
     --pl.where = "leviathan_airlock";
     --submarine_leviathan.airpump = false;
     --leviathan_airlock.has_light = true;
     --leviathan_wardroom.has_light = true;
     --leviathan_wheelhouse.has_light = true;
     --leviathan_corridor.has_light = true;
     --leviathan_cabin_1.has_light = true;
     --leviathan_cabin_2.has_light = true;
     --leviathan_cabin_3.has_light = true;
     --leviathan_cabin_4.has_light = true;
     --leviathan_cabin_5.has_light = true;
     --leviathan_captains_cabin.has_light = true;
     --leviathan_cargo_hold.has_light = true;
     --leviathan_engines.has_light = true;
     --leviathan_lower_deck.has_light = true;
     --leviathan_life_support.has_light = true;
 	--[[
 	---IYH
 	lifeon(char_learr);
 	lifeon(char_wright);
 	lifeon(char_radcliffe);
 	lifeon(char_anna);
 	lifeon(char_aikerjarr_lev);
 	pl.party = {'learr', 'wright', 'radcliffe', 'anna'};
 	atlantis_found = true;
 	move(submarine_leviathan, "ctt_dyp_temple_entrance");
 	--move(submarine_leviathan, "iyh_far_from_entrance_foot");
 	pl.where = leviathan_wheelhouse;
 	submarine_leviathan.battery = true; -- Состояние батареи
 	submarine_leviathan.battery_charge = 100; -- Уровень заряда батареи
 	submarine_leviathan.circuit_breaks = 0; -- Разрывы цепи
 	submarine_leviathan.valves_to_replace = 0; -- Количество клапанов, которые нужно заменить для полноценной работы
 	submarine_leviathan.power_on = true; -- включена ли энергия
 	submarine_leviathan.air_level = 432000; -- запас воздуха. Максимум - 5 дней(5 * 24 * 60 * 60 = 432000)
 	submarine_leviathan.airpump = false;
 	leviathan_airlock.has_light = true;
 	leviathan_wardroom.has_light = true;
 	leviathan_wheelhouse.has_light = true;
 	leviathan_corridor.has_light = true;
 	leviathan_cabin_1.has_light = true;
 	leviathan_cabin_2.has_light = true;
 	leviathan_cabin_3.has_light = true;
 	leviathan_cabin_4.has_light = true;
 	leviathan_cabin_5.has_light = true;
 	leviathan_captains_cabin.has_light = true;
 	leviathan_cargo_hold.has_light = true;
 	leviathan_engines.has_light = true;
 	leviathan_lower_deck.has_light = true;
 	leviathan_life_support.has_light = true;
 	atl_iyh_state = 7;
 	--]]
 	--- Chapter 1: Atlantis
 	--[[submarine_leviathan.battery = true; -- Состояние батареи
 	submarine_leviathan.battery_charge = 100; -- Уровень заряда батареи
 	submarine_leviathan.circuit_breaks = 0; -- Разрывы цепи
 	submarine_leviathan.valves_to_replace = 0; -- Количество клапанов, которые нужно заменить для полноценной работы
 	submarine_leviathan.power_on = true; -- включена ли энергия
 	submarine_leviathan.air_level = 432000; -- запас воздуха. Максимум - 5 дней(5 * 24 * 60 * 60 = 432000)
 	submarine_leviathan.airpump = false;
 	leviathan_airlock.has_light = true;
 	leviathan_wardroom.has_light = true;
 	leviathan_wheelhouse.has_light = true;
 	leviathan_corridor.has_light = true;
 	leviathan_cabin_1.has_light = true;
 	leviathan_cabin_2.has_light = true;
 	leviathan_cabin_3.has_light = true;
 	leviathan_cabin_4.has_light = true;
 	leviathan_cabin_5.has_light = true;
 	leviathan_captains_cabin.has_light = true;
 	leviathan_cargo_hold.has_light = true;
 	leviathan_engines.has_light = true;
 	leviathan_lower_deck.has_light = true;
 	leviathan_life_support.has_light = true;
 	pl.party = {'wright'};
 	put(item_toolbox, pl);
 	put(item_ducttape, pl);
 	pl.where = "leviathan_airlock";
 	atlantis_found = true;
 	move(submarine_leviathan, "atl_aqua_leviathan_dock");
     submarine_leviathan:enable();   ]]
     --ven_temple_l1.position = "66";
     --put(item_ven_tablet, pl);
     --put(item_harpoon, pl);
     --put(item_colt, pl);
     --ven_shark.position = "55";
 	--pl.where = "za_plaetlarr_fight";
     --pl.where = "lse_final_battle";
     --move(submarine_leviathan, "za_temple_back_entrance_foot");
     --char_anna.follow = true;
     --pl.where = "ven_chest_look";
     --move(ven_shark, "ven_temple_l1");
 	--put(item_suit, pl);
 	-- pl.where = warehouse_32;
 	-- pl.where = w32_mgr;
 	-- put(item_cogs, pl);
 	-- put(item_pump_details, pl);
 	-- put(item_electrodes, pl);
 	--put(item_lamp, pl);
 	-- pl.where = aurora_borealis;
 	-- move(submarine_leviathan, first_city_entrance);
 	-- move(submarine_leviathan, first_city_outer_east);
 	-- walk(final_scene);
 	-- walk(leviathan_wardroom);
 	-- walk(leviathan_wardroom);
 	-- put("char_learr", "leviathan_wardroom");
 	-- put("char_phaetlarr", "leviathan_engines");
 	-- put("char_radcliffe", "leviathan_engines");
 	-- put("char_wright", "leviathan_wardroom");
 	-- pl.where = leviathan_airlock;
 	-- pl.where = hotel_street;
 	-- pl.where = warehouse_32_entry;
 	-- dock_found = true;
 end;
@@ \ No newline at end of file @@

0 comments (0 inline, 0 general)