games/Awakening Changeset - f17a3eac8053

Changeset - f17a3eac8053

Parent rev.

Child rev.

[Not reviewed]

default

0 2 0

Silverwing - 7 years ago 2017-03-05 10:17:12

Progress on dlg rewrite; Darkstar dlg on navjiarr added

2 files changed with 106 insertions and 12 deletions:

atlantis.lua

atlantis_dlg.lua

0 comments (0 inline, 0 general)

atlantis.lua

➞

Show inline comments

 global {
 	atl_jack_in_party = false;
 	atl_lev_state = 0;
 	atl_iof_completed = false;
 	atl_iof_learr_dead = false;
 	atl_iof_learr_suit = false;
 	atl_nih_state = 0;
 	atl_iyh_state = 0;
 	atl_iyh_ryveerr_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_lfc_state = 0;
 	atl_lfc_panic = 0;
 	atl_lfc_hallrooms = 0;
 	atl_lfc_electric = 0;
 	atl_lfc_board = 0;
 	atl_lfc_suspect = nil;
 	atl_lfc_leroy_spoken = 0;
 	atl_lfc_goldman_spoken = 0;
 	atl_lfc_goldman_known = false;
 	atl_lfc_goldman_exposed = false;
 	atl_lfc_saboteur_known = false;
 	atl_lfc_sab_active = false;
 	atl_lfc_sab_alive = false;
 	atl_fta_state = 0;
 	atl_rep_moreau = 0;
 	atl_rep_darkstar = 0;
 	atl_rep_svetlova = 0;
 	atl_rep_wright = 0;
 };
 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 = [[Сейчас нет смысла это делать. ]];
+}
 atl_aqua_corridor_b = room {
 	nam = "Атлантида, Аква, коридор B";
 	dsc = [[Широкий коридор, заполненный ярким светом электрических ламп. В одном конце коридора расположена шлюзовая дверь, ведущая в основной коридор секции _"Аква"_. По бокам коридора находятся еще несколько дверей, ведущих в другие помещения секции: гостевые доки A, B и С. ]];
 	way = {
 		kh_vroom("В гостевой док A", function()
 			if (atl_lev_state == 0) then
 				pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 				return false;
 			elseif (atl_lev_state == 1) then
 				return "atl_lev_radcliffe_dlg";
 			else
 				return "atl_aqua_leviathan_dock";
 			end;
 		end);
 		kh_vroom("В гостевой док B", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("В гостевой док C", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("В главный коридор", "atl_aqua_main_corridor");
 	};
 	obj = {
 		"atl_illuminators",
 		"atl_nih_tubes_aqua_b"
 	};
 };
 atl_aqua_leviathan_dock = room {
 	var {
 		visited = false;
 	};
 	nam = "Атлантида, Аква, гостевой док A";
 	enter = function(s)
 		if (not s.visited) then
 			s.visited = true;
 			walk(atlantis_intro_dock);
 		end;
 		if (atl_iyh_state == 8) then
 			atl_iyh_state = 9;
 			if (atl_iof_learr_dead) then
 				walk('iyh_outro_aikerjarr');
 			else
 				walk('iyh_outro_learr');
 			end;
 		end;
 	end;
 	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Левиафан. Под потолком, на высоте примерно в пять метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Снизу, под водой, огромный люк закрывает доступ внутрь дока. Несколько легких подвижных мостиков находятся на поверхности воды. ]];
 	view = [[Левиафан находится в просторном доке. Под потолком на высоте пяти метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Внизу расположен закрытый люк, закрывающий вам путь наружу. ]];
 	way = {
 		kh_vroom("В коридор B", "atl_aqua_corridor_b");
 	};
 };
 atl_aqua_nautilus_dock = room {
 	nam = "Атлантида, Аква, док Наутилуса";
 	dsc = [[Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен Наутилус. Под потолком, на высоте примерно в пять метров укреплены балки, по которым могут перемещаться крюки подъемных кранов. Снизу, под водой, огромный люк закрывает доступ внутрь дока. Несколько легких подвижных мостиков находятся на поверхности воды. ]];
 	way = {
 		kh_vroom("В коридор A", "atl_aqua_corridor_a");
 	};
 	obj = {
 		"char_xiao"
 	};
 };
 atl_aqua_corridor_a = room {
 	nam = "Атлантида, Аква, коридор A";
 	dsc = [[Широкий коридор, заполненный ярким светом электрических ламп. В одном конце коридора расположена шлюзовая дверь, ведущая в основной коридор секции _"Аква"_. По бокам коридора находятся еще несколько дверей, ведущих к докам. ]];
 	way = {
 		kh_vroom("В док \"Надежды\"", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("В док \"Энтерпрайза\"", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("В док \"Наутилуса\"", function()
 			if (atl_lfc_state == 2) then
 				return "atl_lfc_dock_s";
 			else
 				return "atl_aqua_nautilus_dock";
 			end;
 		end);
 		kh_vroom("В главный коридор", "atl_aqua_main_corridor");
 	};
 	obj = {
 		"atl_illuminators",
 		"atl_nih_tubes_aqua_a"
 	};
 };
 atl_aqua_main_corridor = room {
 	nam = "Атлантида, Аква, центральный коридор";
 	dsc = [[Широкий коридор, заполненный ярким светом электрических ламп. В одном конце коридора расположена шлюзовая дверь, ведущая, в секцию _"Доминус"_. По бокам коридора находятся еще несколько дверей, ведущих в другие помещения секции -- по большей части это склады. Еще две двери ведут в коридоры A и B. ]];
 	way = {
 		kh_vroom("На склад A", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("На склад B", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("На склад C", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("На склад D", function()
 			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("В коридор A", "atl_aqua_corridor_a");
 		kh_vroom("В коридор B", "atl_aqua_corridor_b");
 		kh_vroom("В секцию \"Доминус\"", "atl_intersection_aqua_dom");
 	};
 	obj = {
 		"atl_illuminators",
 		"atl_nih_tubes_aqua"
 	};
 };
 atl_intersection_aqua_dom = room {
 	nam = "Атлантида, межсекционный коридор";
 	dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
 	way = {
 		kh_vroom("В секцию \"Аква\"", "atl_aqua_main_corridor");
 		kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_aqua");
 	};
 	obj = {
 		"atl_illuminator",
         "atl_intersect_phone",
         "atl_intersect_suit"
 	};
 };
 atl_dom_main_near_aqua = room {
 	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Аква\"";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами расположен шлюз, ведущий в соседнюю секцию. ]];
 	way = {
 		kh_vroom("В секцию \"Аква\"", "atl_intersection_aqua_dom");
 		kh_vroom("По часовой стрелке", "atl_dom_main_near_adm");
 		kh_vroom("Против часовой стрелки", "atl_dom_main_near_a");
 		kh_vroom("К центру зала", "atl_dom_main_c");
 	};
 	obj = {
 		-- TODO добавить скамейки, табличку секции Аква
 		"atl_nih_tubes_near_aqua"
 	};
 };
 atl_dom_main_near_a = room {
 	nam = "Атлантида, Доминус, центральный зал, у входа в коридор А";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Вы находитесь в северной части зала. Рядом с вами расположен шлюз, ведущий в коридор А. ]];
 	way = {
 		kh_vroom("В коридор A", "atl_dom_corridor_a");
 		kh_vroom("По часовой стрелке", "atl_dom_main_near_aqua");
 		kh_vroom("Против часовой стрелки", "atl_dom_main_near_luna");
 		kh_vroom("К центру зала", "atl_dom_main_c");
 	};
 	obj = {
 		-- TODO добавить табличку
 		"atl_nih_panel_near_a"
 	};
 };
 atl_dom_main_c = room {
 	nam = "Атлантида, Доминус, центральный зал, центр";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Вы находитесь в центральной части зала, рядом с лифтом, ведущим в Игнис. ]];
 	way = {
 		kh_vroom("В лифт", "atl_dom_lift");
 		kh_vroom("На север", "atl_dom_main_near_aqua");
 		kh_vroom("На северо-восток", "atl_dom_main_near_adm");
 		kh_vroom("На юго-восток", "atl_dom_main_se");
 		kh_vroom("На юго-запад", "atl_dom_main_sw");
 		kh_vroom("На северо-запад", "atl_dom_main_near_a");
 	};
 	obj = {
 		-- TODO добавить скамейки
 	};
 };
 atl_dom_main_sw = room {
 	nam = "Атлантида, Доминус, центральный зал, юго-запад";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Вы находитесь в юго-западной части секции. ]];
 	way = {
 		kh_vroom("К секции Окулус", "atl_dom_main_near_oculus");
 		kh_vroom("К секции Луна", "atl_dom_main_near_luna");
 		kh_vroom("По часовой стрелке", "atl_dom_main_near_a");
 		kh_vroom("Против часовой стрелки", "atl_dom_main_se");
 		kh_vroom("К центру зала", "atl_dom_main_c");
 	};
 };
 atl_dom_main_se = room {
 	nam = "Атлантида, Доминус, центральный зал, юго-восток";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса.Вы находитесь в юго-восточной части секции. ]];
 	way = {
 		kh_vroom("К секции Арктос", "atl_dom_main_near_arctos");
 		kh_vroom("К секции Терра", "atl_dom_main_near_terra");
 		kh_vroom("По часовой стрелке", "atl_dom_main_sw");
 		kh_vroom("Против часовой стрелки", "atl_dom_main_near_adm");
 		kh_vroom("К центру зала", "atl_dom_main_c");
 	};
 };
 atl_dom_main_near_adm = room {
 	nam = "Атлантида, Доминус, центральный зал, у входа в кабинет администратора";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в кабинет администратора. ]];
 	way = {
 		kh_vroom("В кабинет администратора", "atl_dom_administator_room");
 		kh_vroom("По часовой стрелке", "atl_dom_main_near_arctos");
 		kh_vroom("Против часовой стрелки", "atl_dom_main_near_aqua");
 		kh_vroom("К центру зала", "atl_dom_main_c");
 	};
 	obj = {
 		-- TODO добавить скамейки, воздуховоды
 		"atl_nih_panel_near_admin"
 	};
 };
 atl_dom_main_near_luna = room {
 	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Луна\"";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса.Рядом с вами находится шлюз, ведущий в секцию "Луна". ]];
 	way = {
 		kh_vroom("В секцию \"Луна\"", "atl_intersection_luna_dom");
 		kh_vroom("Отойти от шлюза", "atl_dom_main_sw");
 	};
 	obj = {
 		"atl_nih_panel_near_luna"
 	};
 };
 atl_dom_main_near_oculus = room {
 	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Окулус\"";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в секцию "Окулус". ]];
 	way = {
 		kh_vroom("В секцию \"Окулус\"", "atl_intersection_oculus_dom");
 		kh_vroom("Отойти от шлюза", "atl_dom_main_sw");
 	};
 	obj = {
 		"atl_nih_boxes_near_oculus"
 	};
 };
 atl_dom_main_near_terra = room {
 	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Терра\"";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в секцию "Терра". ]];
 	way = {
 		kh_vroom("В секцию \"Терра\"", "atl_intersection_terra_dom");
 		kh_vroom("Отойти от шлюза", "atl_dom_main_se");
 	};
 	obj = {
 		"atl_nih_boxes_near_terra"
 	};
 };
 atl_dom_main_near_arctos = room {
 	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Арктос\"";
 	dsc = [[Огромный круглый зал освещенный электрическими лампами, установленными на многочисленных колоннах. Стеклянный купол над головой ограждает вас от многотонной громады океанских вод. Над куполом расположен огромный металлический диск секции Игнис, расположенной над центральным залом Доминуса. Рядом с вами находится шлюз, ведущий в секцию "Арктос". ]];
 	way = {
 		kh_vroom("В секцию \"Арктос\"", "atl_intersection_arctos_dom");
 		kh_vroom("Отойти от шлюза", "atl_dom_main_se");
 	};
 	obj = {
 		"atl_nih_tubes_near_arctos"
 	};
 };
 atl_dom_corridor_a = room {
 	nam = "Атлантида, Доминус, коридор A";
 	dsc = [[Просторный коридор, расположенный в западном крыле секции Доминус, заполнен ярким светом электрических ламп. В одном конце коридора расположена дверь, ведущая в главный зал. Две другие ведут в оружейную и кабинет начальника службы безопасности. ]];
 	way = {
 		kh_vroom("В кабинет начальника СБ", "atl_dom_security_office");
 		kh_vroom("В оружейную", function()
 			pr("Люк наглухо задраен и опечатан. Вы не сможете его открыть. ");
 			return false;
 		end);
 		kh_vroom("В центральный зал", "atl_dom_main_near_a");
 	};
 };
 atl_dom_security_office = room {
 	nam = "Атлантида, Доминус, кабинет начальника СБ";
 	dsc = [[Спартанская обстановка кабинета начальника службы безопасности сразу бросается вам в глаза. небольшая комната почти пуста. Здесь нет ничего кроме массивного металлического стола в центре и двух кресел по разные стороны его. ]];
 	way = {
 		kh_vroom("В коридор", "atl_dom_corridor_a");
 	};
 	obj = {
 		'char_darkstar'
 	};
 };
 atl_dom_administator_room = room {
 	nam = "Атлантида, Доминус, кабинет администратора";
 	dsc = [[Кабинет администратора представляет собой небольшую комнату. Вдоль стен установлено несколько шкафов с какими-то бумагами. В центре расположен металлический стол.
 	]];
 	way = {
 		kh_vroom("В центральный зал", "atl_dom_main_near_adm");
 	};
 	obj = {
 		'char_moreau'
 	};
 };
 atl_intersection_luna_dom = room {
 	nam = "Атлантида, межсекционный коридор";
 	dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
 	way = {
 		kh_vroom("В секцию \"Луна\"", "atl_luna_main_corridor");
 		kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_luna");
 	};
 	obj = {
 		"atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
 	};
 };
 atl_intersection_arctos_dom = room {
 	nam = "Атлантида, межсекционный коридор";
 	dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
 	way = {
 		kh_vroom("В секцию \"Арктос\"", "atl_arctos_main_corridor");
 		kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_arctos");
 	};
 	obj = {
 		"atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
 	};
 };
 atl_luna_main_corridor = room {
 	nam = "Атлантида, Луна, главный коридор";
 	dsc = [[Узкий длинный коридор c дверьми, ведущими в комнаты персонала, по сторонам. Яркий свет электрических ламп заполняет помещение. ]];
 	way = {
 		kh_vroom("В вашу комнату", "atl_luna_drake_room");
 		kh_vroom("В общую комнату", "atl_luna_common_room");
 		kh_vroom("В секцию \"Доминус\"", "atl_intersection_luna_dom");
 	};
 	obj = {
 		"atl_illuminators",
 		"atl_nih_tubes_luna"
 	};
 };
 atl_luna_drake_room = room {
 	nam = "Атлантида, Луна, ваша комната";
 	dsc = [[Небольшая, но уютная комната, выделенная вам на Атлантиде. Хотя она расчитана на двух человек, пока нет необходимости расселять людей по двое. ]];
 	way = {
 		kh_vroom("В главный коридор", "atl_luna_main_corridor");
 	};
 	obj = {
 		"atl_illuminators"
 	};
 };
 atl_arctos_main_corridor = room {
 	nam = "Атлантида, Арктос, главный коридор";
 	dsc = [[Узкий длинный коридор c дверьми, ведущими в комнаты персонала, по сторонам. Яркий свет электрических ламп заполняет помещение. ]];
 	way = {
 		kh_vroom("В комнату Голдмана", "atl_arctos_goldmans_room");
 		kh_vroom("В комнату Джонса", "atl_arctos_jones_room");
 	 	kh_vroom("В общую комнату", "atl_arctos_common_room");
 		kh_vroom("В секцию \"Доминус\"", "atl_intersection_arctos_dom");
 	};
 	obj = {
 		"atl_illuminators",
 		"atl_nih_tubes_arctos"
 	};
 };
 atl_arctos_goldmans_room = room {
 	nam = "Атлантида, Арктос, комната";
 	dsc = [[Небольшая комната, рассчитанная на двух постояльцев. ]];
 	obj = {
 		"char_goldman"
 	};
 };
 atl_arctos_jones_room = room {
 	nam = "Атлантида, Арктос, комната";
 	dsc = [[Небольшая комната, рассчитанная на двух постояльцев. ]];
 	obj = {
 		"char_jones"
 	};
 };
 atl_luna_common_room = room {
 	nam = "Атлантида, Луна, общая комната";
 	dsc = [[Средних размеров комната с массивным металлическим столом в центре. Вокруг него расположено несколько стульев. ]];
 	way = {
 		kh_vroom("В главный коридор", "atl_luna_main_corridor");
 	};
 	obj = {
 		"atl_illuminators"
 	};
 };
 atl_arctos_common_room = room {
 	nam = "Атлантида, Луна, общая комната";
 	dsc = [[Средних размеров комната с массивным металлическим столом в центре. Вокруг него расположено несколько стульев. ]];
 	way = {
 		kh_vroom("В главный коридор", "atl_arctos_main_corridor");
 	};
 	obj = {
 		"atl_illuminators"
 	};
 };
 atl_intersection_terra_dom = room {
 	nam = "Атлантида, межсекционный коридор";
 	dsc = [[Небольшой коридор, соединяющий секции станции, заполнен ярким светом электрических ламп. ]];
 	way = {
 		kh_vroom("В секцию \"Терра\"", "atl_terra_main_corridor");
 		kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_terra");
 	};
 	obj = {
 		"atl_illuminators",
         "atl_intersect_phone",
         "atl_intersect_suit"
 	};
 };
 atl_terra_main_corridor = room {
 	nam = "Атлантида, Терра, главный коридор";
 	dsc = [[Широкий просторный коридор, по обе стороны которого расположены двери, ведущие в мастерские. Вдоль стен стоят множество ящиков. В конце коридора находится дверь, ведущая в одну из технических секций станции. ]];
 	way = {
 		kh_vroom("В мастерскую A", "atl_terra_workshop_a");
 		kh_vroom("В мастерскую B", "atl_terra_workshop_b");
 		kh_vroom("В мастерскую C", "atl_terra_workshop_c");
 		kh_vroom("В мастерскую D", "atl_terra_workshop_d");
 		kh_vroom("В секцию Солис", function()
 			if (atl_fta_state == 1) then
 				return "atl_fta_is_terra_solis";
 			else
 				pr("Люк наглухо задраен. Вы не сможете его открыть. ");
 				return false;
 			end;
 		end);
 		kh_vroom("В секцию Доминус", "atl_intersection_terra_dom");
 	};
 	obj = {
 		"atl_nih_boxes_terra"
 	};
 };
 atl_terra_workshop_a = room {
 	nam = "Атлантида, мастерская А";
 	dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
 	way = {
 		kh_vroom("В коридор", "atl_terra_main_corridor");
 	};
 	obj = {
 		"char_michael_wright"
 	};
 };
 atl_terra_workshop_b = room {
 	nam = "Атлантида, мастерская B";
 	dsc = [[Просторное помещение, выделенное для производства и сборки различных машин под нужды Атлантиды. Вдоль стен расположены шкафы с инструментами, около входа составлено несколько ящиков с материалами. По всей комнате установлены верстаки, различные станки и другое оборудование. Под потолком видно большое количество вентиляционных решеток. ]];
 	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 {
     var {
         drake_asked = 0;
         black_asked = 0;
         darkstar_asked = 0;
         svetlova_asked = 0;
         moreau_asked = 0;
         wright_asked = 0;
         leroy_asked = 0;
         jones_asked = 0;
         goldman_asked = 0;
         atlantis_asked = 0;
         navjiarr_asked = 0;
         learr_asked = 0;
         ryveerr_asked = 0;
         aikerjarr_asked = 0;
     };
 	nam = "Винсент Даркстар";
 	dsc = function(s)
         if (char_darkstar_dlg == 0) then
             return [[В одном из кресел сидит средних лет {мужчина} с короткими черными волосами. Он одет в строгий деловой костюм черного цвета. Лицо его гладко выбрито. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он ждет ваших дальнейших действий. ]];
         else
             return [[В одном из кресел сидит {Винсент Даркстар}. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он ждет ваших дальнейших действий. ]];
         end;
     end;
 	dlg = "char_darkstar_dlg";
 };
 char_moreau = npc {
     var {
         drake_asked = 0;
         black_asked = 0;
         darkstar_asked = 0;
         svetlova_asked = 0;
         moreau_asked = 0;
         wright_asked = 0;
         leroy_asked = 0;
         jones_asked = 0;
         goldman_asked = 0;
         atlantis_asked = 0;
         navjiarr_asked = 0;
         learr_asked = 0;
         ryveerr_asked = 0;
         aikerjarr_asked = 0;
     };
 	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
             if (char_anna_atlantis_dlg.state == 0) then
                 return [[{Девушка} лет двадцати-пяти внимательно слушает навьяра, иногда что-то спрашивая. ]];
             else
 			    return [[{Анна Рэдклифф} внимательно слушает навьяра, иногда что-то спрашивая. ]];
             end;
 		else
             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 = "Леарр";
 	dsc = function(s)
         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)
         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
             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)
 		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 [[{Джеку Райт}, стоящему рядом. ]];
 		else
 			return [[{Джеком}. ]];
 		end;
 	end;
 	dlg = "char_jack_wright_atlantis_dlg";
 };
 char_michael_wright = npc {
 	nam = "Майкл Райт";
 	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 = function(s)
         if (char_legrand_dlg.state == 0) then
             return [[У верстака стоит {женщина} лет сорока--сорока-пяти и рассматривает какую-то деталь.]];
         else
             return [[У верстака стоит {Мари Легран} и рассматривает какую-то деталь. ]];
         end;
     end;
 	dlg = "char_legrand_dlg";
 };
 char_radcliffe_atlantis = npc {
 	nam = "Уолтер Рэдклифф";
 	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 = function(s)
         if (char_xiao_dlg.state == 0) then
             return [[Немолодой {китаец} осматривает Наутилус. ]];
         else
             return [[{Вейюан Сяо} осматривает Наутилус. ]];
         end;
     end;
 	dlg = "char_xiao_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", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_near_oculus = atl_nih_tubes_gen("atl_nih_tubes_near_oculus", [[Вдоль стены протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_near_terra = 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_oculus = atl_nih_tubes_gen("atl_nih_tubes_oculus", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_terra = atl_nih_tubes_gen("atl_nih_tubes_terra", [[За снятой декоративной панелью находятся несколько {труб}, по которым подается воздух. ]]);
 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_aqua = atl_nih_tubes_gen("atl_nih_tubes_aqua", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_aqua_a = atl_nih_tubes_gen("atl_nih_tubes_aqua_a", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_tubes_aqua_b = atl_nih_tubes_gen("atl_nih_tubes_aqua_b", [[Под потолком протянуто несколько {труб}, по которым подается воздух. ]]);
 atl_nih_panel_near_a = obscured_obj("atl_nih_panel_near_a", [[Рядом со шлюзом установлена {защитная панель}, за которой скрываются трубы для подачи воздуха. ]], [[Вы снимаете панель, открывая доступ к трубам. ]], "atl_nih_tubes_near_a", true);
 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_oculus = obscured_obj("atl_nih_boxes_near_oculus", [[За грудой {ящиков}, вы замечаете несколько труб подачи воздуха. ]], [[Вы сдвигаете несколько ящиков, открывая себе доступ к трубам. ]], "atl_nih_tubes_near_oculus", 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

 char_darkstar_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Винсент Даркстар";
 	disp = "Винсент Даркстар";
 	entered = function(s)
 		if (atl_lfc_leroy_spoken) then
 			pon("accuse_leroy");
 		end;
 		if (atl_lfc_goldman_spoken) then
 			pon("accuse_goldman");
 		end;
         if (atl_rep_darkstar < 0) then
             if (char_darkstar.drake_asked == 0) then pon("on_drake"); end;
             if (char_darkstar.black_asked == 0) then pon("on_black"); end;
             if (char_darkstar.darkstar_asked == 0) then pon("on_darkstar"); end;
             if (char_darkstar.svetlova_asked == 0) then pon("on_svetlova"); end;
             if (char_darkstar.moreau_asked == 0) then pon("on_moreau"); end;
             if (char_darkstar.wright_asked == 0) then pon("on_wright"); end;
             if (atl_iof_completed) then
                 if (char_darkstar.leroy_asked == 0) then pon("on_leroy"); end;
                 if (char_darkstar.jones_asked == 0) then pon("on_jones"); end;
                 if (char_darkstar.goldman_asked == 0) then pon("on_goldman"); end;
             end;
             if (char_darkstar.atlantis_asked == 0) then pon("on_atlantis"); end;
             if (char_darkstar.navjiarr_asked == 0) then pon("on_navjiarr"); end;
             if (char_darkstar.learr_asked == 0) then pon("on_learr"); end;
             if (char_darkstar.ryveerr_asked == 0) then pon("on_ryveerr"); end;
             if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;
         else
             if (char_darkstar.drake_asked < 2) then pon("on_drake"); end;
             if (char_darkstar.black_asked < 2) then pon("on_black"); end;
             if (char_darkstar.darkstar_asked < 2) then pon("on_darkstar"); end;
             if (char_darkstar.svetlova_asked < 2) then pon("on_svetlova"); end;
             if (char_darkstar.moreau_asked < 2) then pon("on_moreau"); end;
             if (char_darkstar.wright_asked < 2) then pon("on_wright"); end;
             if (atl_iof_completed) then
                 if (char_darkstar.leroy_asked < 2) then pon("on_leroy"); end;
                 if (char_darkstar.jones_asked < 2) then pon("on_jones"); end;
                 if (char_darkstar.goldman_asked < 2) then pon("on_goldman"); end;
             end;
             if (char_darkstar.atlantis_asked < 2) then pon("on_atlantis"); end;
         end;
         if (char_darkstar.drake_asked == 0) then
             pon("on_drake");
         elseif  (char_darkstar.drake_asked == 1 and atl_rep_darkstar >= 0) then
             pon("on_drake");
         elseif (char_darkstar.drake_asked < 3 and atl_rep_darkstar > 0) then
             pon("on_drake");
             if (char_darkstar.navjiarr_asked < 2) then pon("on_navjiarr"); end;
             if (char_darkstar.learr_asked < 2) then pon("on_learr"); end;
             if (char_darkstar.ryveerr_asked < 2) then pon("on_ryveerr"); end;
             if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;
         end;
 		if (s.state == 0) then
 			psub("first_meeting");
             s.state = 1;
 			return [[За столом сидит средних лет мужчина с короткими черными волосами. Он одет в строгий деловой костюм черного цвета. Лицо его гладко выбрито. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он приветствует вас: "Добро пожаловать на Атлантиду, господин Дрейк. Я Винсент Даркстар, мы уже общались по радио. Я занимаю на Атлантиде пост начальника службы безопаности". ]];
 		elseif (atl_fta_state == 2) then
 			psub("fta");
 			return [[Винсент Даркстар приказывает: "Рассказывайте". ]];
 		else
 			psub("generic");
 			return [[Винсент Даркстар сообщает: "Я слушаю". ]];
 		end;
 	end;
     phr = {
 		{tag="first_meeting"};
 		{"Что мне нужно сделать, чтобы мне вернули Левиафан?", [[Винсент Даркстар хлопает ладонями о стол и уверенно сообщает: "Вести себя хорошо и не делать глупостей". ]]};
 		{"Когда мне вернут Левиафан?", [[Винсент Даркстар отвечает: "Всему свое время. Используйте это время с пользой. Если хотите найти Уильяма, сначала стоит выяснить где и как его искать. И вам не помешает узнать кое-что помимо этого". ]]};
 		{"Я пришел кое-что спросить. ", [[Винсент Даркстар сообщает :"Я слушаю". ]], code [[psub("generic");]]};
 		{tag="generic"};
 		{tag="on_drake", false, "Расскажите об Уильяме. ", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.drake_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.drake_asked = 2;
                 return [[Винсент Даркстар отвечает: "Что вы ожидаете услышать? Дрейк -- основатель Вестхейвен Трансоушен. Он -- мой непосредственный руководитель, однако у нас, на Атлантиде, принято решать важные вопросы совместно. Не так давно он отправился в научную экспедицию вместе с Адрианом Блэком и еще несколькими сотрудниками. Дрейк неосторожен и склонен к опрометчивым решениям. Это может сыграть с ним злую шутку".]];
             end;
         end};
         {tag="on_black", false, "Расскажите об Адриане Блэке. ", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.black_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.black_asked = 2;
                 return [[Винсент Даркстар отвечает: "Блэк -- главный помощник Дрейка по управлению компанией. Ни одно важное решение в Вестхейвен Трансоушен не принимается без его участия. Не так давно он отправился в научную экспедицию вместе с Уильямом Дрейком и еще несколькими сотрудниками. С одной стороны -- он хороший руководитель и Дрейку повезло иметь такого помощника, с другой -- Блэк, несомненно, принесет в жертву и станцию и всех нас, если это послужит его интересам. Будьте осторожны при общении с ним". ]];
             end;
         end};
         {tag="on_darkstar", false, "Расскажите о себе. ", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.darkstar_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.darkstar_asked = 2;
                 return [[Винсент Даркстар отвечает: "Мне нечего рассказывать, кроме того, что я уже сказал. Мое имя Винсент Даркстар и я занимаю пост начальника службы безопасности Атлантиды". ]];
             end;
         end};
         {tag="on_svetlova", false, "Расскажите о Екатерине Светловой", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.svetlova_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.svetlova_asked = 2;
                 return [[Винсент Даркстар отвечает: "Екатерина Светлова -- руководитель исследовательского отдела на Атлантиде. Секция Окулус находится в ее ведении. Атлантида для нее -- неисчерпаемый источник материала для исследований, поэтому она заинтересована в продолжении работы станции". ]];
             end;
         end};
         {tag="on_moreau", false, "Расскажите о Фредерике Моро", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.moreau_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.moreau_asked = 2;
                 return [[Винсент Даркстар отвечает: "Фредерик Моро руководит станцией в отсутствие Дрейка и Блэка. Должен сказать, справляется он неплохо. Ему можно доверять безоговорочно -- он с полной ответственностью подходит к управлению станцией. Хотя он склонен делегировать многие решения, он отдает их правильным людям". ]];
             end;
-        end]};
         end};
         {tag="on_wright", false, "Расскажите о Майлке Райте", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.wright_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.wright_asked = 2;
                 return [[Винсент Даркстар отвечает: "Майкл Райт -- руководитель инженерного отдела на Атлантиде. В его задачи входит поддержание работоспособности станции и ее техническое развитие. Станция -- дело всей его жизни. Когда поднимался вопрос, он не колеблясь оставил семью на поверхности ради возможности развивать Атлантиду". ]];
             end;
         end};
-        {tag="on_leroy", false, "Расскажите о Мишеле Леруа", function()
+        {tag="on_leroy", false, "Что вы думаете о Мишеле Леруа?", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.leroy_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.leroy_asked = 2;
                 return [[Винсент Даркстар отвечает: "Леруа много знает об устройстве Атлантиды и он открыто выступает в пользу закрытия станции и возвращения на поверхность. Он не выглядит настолько глупым, чтобы саботировать работу станции, однако он один из немногих подпадающих под подозрение. Вообще-то, интересоваться сотрудниками Атлантиды - моя работа, а не ваша". ]];
             end;
         end};
-        {tag="on_jones", false, "Расскажите о Чарли Джонсе", function()
+        {tag="on_jones", false, "Что вы думаете о Чарли Джонсе?", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.jones_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.jones_asked = 2;
                 return [[Винсент Даркстар отвечает: "Джонс много знает об устройстве Атлантиды и он открыто выступает в пользу закрытия станции и возвращения на поверхность. Он недостаточно смел, чтобы попытаться саботировать работу станции, однако он один из немногих попадающих под подозрение. Вообще-то, интересоваться сотрудниками Атлантиды - моя работа, а не ваша". ]];
             end;
         end};
-        {tag="on_goldman", false, "Расскажите о Леонарде Голдмане", function()
+        {tag="on_goldman", false, "Что вы думаете о Леонарде Голдмане?", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.goldman_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.goldman_asked = 2;
                 return [[Винсент Даркстар отвечает: "Голдман много знает об устройстве Атлантиды и он открыто выступает в пользу закрытия станции и возвращения на поверхность. Он эмоционально неуравновешен. Если бы он устроил аварию, он бы уже выдал себя. Однако, он один из немногих, кому хватает знаний, чтобы спланировать саботаж. Вообще-то, интересоваться сотрудниками Атлантиды - моя работа, а не ваша". ]];
             end;
         end};
         {tag="on_atlantis", false, "Расскажите об Атлантиде", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.atlantis_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.atlantis_asked = 2;
                 return [[Винсент Даркстар отвечает: "Атлантида построена на средства Вестхейвен Трансоушен -- компании вашего отца. Майкл Райт -- создатель станции, многое продумал, существенно облегчив мне работу. Конечно, периодически, мне приходится иметь дело с нарушениями правил -- я неоднократно просил не загромоздать коридоры; всегда закрывать за собой шлюзы, двери, щитки, панели; не перекрывать посторонними предметами доступ к важным узлам станции. Думаю, вы сами заметили, как исполняются эти указания". ]];
             end;
         end};
         {tag="on_navjiarr", false, "Что вы думаете о навьярах?", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.navjiarr_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.navjiarr_asked = 2;
                 return [[Винсент Даркстар отвечает: "Они -- причина существования Атлантиды, так что в какой-то мере мы все обязаны им тем, что оказались здесь. Не все на станции довольны этим -- и это создает определенную угрозу. Но, надо признать, они не пытались навредить нам последнее время, однако, я все еще советую Моро и Светловой быть настороже при общении с ними. Они не так просты, как кажутся". ]];
             end;
         end};
         {tag="on_learr", false, "Что вы думаете о Леарр?", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.learr_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 if (atl_iof_learr_dead) then
                     char_darkstar.learr_asked = 3;
                     return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
                 else
                     char_darkstar.learr_asked = 2;
                     return [[Винсент Даркстар отвечает: "Леарр -- представительница одного из навьярских племен на станции. Она любопытна, молода и умна. Она искренне заинтересована нами и нашими технологиями и это не может не радовать". ]];
                 end;
             end;
         end};
         {tag="on_ryveerr", false, "Что вы думаете о Ривеерре?", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.ryveerr_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.ryveerr_asked = 2;
                 return [[Винсент Даркстар отвечает: "Ривеерр -- представитель одного из навьярских племен на станции. Я мало что могу о нем сказать, и ,в данном случае, это говорит в его пользу". ]];
             end;
         end};
         {tag="on_aikerjarr", false, "Что вы думаете об Аикерьярре?", function()
             if (atl_rep_darkstar < 0) then
                 char_darkstar.aikerjarr_asked = 1;
                 return [[Винсент Даркстар отвечает: "Мне нечего вам сказать". ]];
             else
                 char_darkstar.aikerjarr_asked = 2;
                 return [[Винсент Даркстар отвечает: "Он будет создавать проблемы. Это не предположение, это -- факт". ]];
             end;
         end};
 		{tag="accuse_goldman", false, "Саботаж - дело рук Голдмана", [[Даркстар недовольно отчитывает вас: "Во-первых, я вас просил не лезть в это дело. Во-вторых, я бы не был так уверен. В третьих, я еще раз прошу вас больше расследованию не мешать". ]], code [[ atl_lfc_suspect="goldman"; ]]};
 		{tag="accuse_leroy", "Саботаж - дело рук Леруа", [[Даркстар недовольно отчитывает вас: "Во-первых, я вас просил не лезть в это дело. Во-вторых, я бы не был так уверен. В третьих, я еще раз прошу вас больше расследованию не мешать". ]], code [[ atl_lfc_suspect="leroy"; ]]};
 		{always=true, "Я пойду", [[Даркстар прощается: "До встречи". ]], code [[ back(); ]]};
 		{tag="fta"};
 		{"Что вы хотите услышать?", [[Даркстар поясняет: "Все, что произошло в Солисе и показалось вам подозрительным". ]]};
 		{"Первый взрыв раздался, когда я был у входа в секцию[Кратко пересказать основные события]", [[Даркстар молча кивает. ]]};
 		{"Один из клапанов работал неправильно - давление в нем было выше нормы", [[Даркстар с сомнением произносит: "Интересно. За десять лет работы станции такого никогда не было". ]]};
 		{tag="clock", "[Показать часы]А еще я нашел там вот это", [[Даркстар забирает часы и вертит их в руках: "Так-так-так. Франсуа Голдман. Леонард однозначно в этом замешан, но действовал он не один. Я все еще думаю, что они попытаются вывести из строя одну из субмарин. Скорее всего их целью будет Наутилус". ]], code [[ atl_lfc_goldman_exposed = true; psub("why_nau"); ]]};
 		{tag="why_nau"};
 		{"Почему именно Наутилус?", [[Даркстар объясняет:"Саботажник хочет не убить всех, а поломать станцию. Он хочет наверх, а не умереть здесь. Наутилус - субмарина малого радиуса, а Энтерпрайз и Левиафан способны доставить нас на континенты". ]]};
 		{"Соглашусь с вашим предположением", [[Даркстар кивает: "Хорошо. Я попрошу вас помочь мне с этим заданием". ]], code [[ psub("lfc_help"); ]]};
 		{"Мне кажется, целью будет другая субмарина", [[Даркстар кивает: "Я это учел. Мы будем следить за всеми доками. Также, я попрошу вас помочь мне с этим заданием". ]], code [[ psub("lfc_help"); ]]};
 		{tag="lfc_help"};
 		{"Почему я?", [[Даркстар объясняет:"Я хочу свести количество людей, знающих о саботажах к минимуму, а вы уже в курсе ситуации". ]]};
 		{"Что я должен сделать?", [[Даркстар рассказывает:"В семь часов вечера вы отправляетесь в док Наутилуса и наблюдаете за происходящим в течение ночи. Если вы замечаете что-то подозрительное - принимаете меры на ваше усмотрение", -- Даркстар достает из ящика стола револьвер и кладет перед вами: "Это вам не помешает".
 		]], code [[
 			take(item_colt);
 			atl_lfc_state = 2;
 			back();
 		]]};
 	};
 };
 char_moreau_dlg = dlg {
 	var {
 		state = 0;
 		lfc_dialog = false;
 	};
 	nam = "Фредерик Моро";
 	disp = "Фредерик Моро";
 	entered = function(s)
 		if (atl_lfc_state == 3) then
 			atl_lfc_state = 4;
 			atl_lev_state = 1;
 			local reputation = 0;
 			if (atl_rep_darkstar > 0) then
 				reputation = reputation + 1;
 			end;
 			if (atl_rep_moreau > 0) then
 				reputation = reputation + 1;
 			end;
 			if (atl_rep_svetlova > 0) then
 				reputation = reputation + 1;
 			end;
 			if (atl_rep_wright > 0) then
 				reputation = reputation + 1;
 			end;
 			if (reputation > 2 and atl_rep_moreau >= 0) then
 				psub("lfc_debrief_good");
 				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Огромное спасибо. Посовещавшись, мы решили вернуть вам Левиафан. Также, вы можете посещать Атлантиду в любое удобное для вас время -- мы всегда будем рады вас видеть". ]];
 			elseif (reputation > 2) then
 				psub("lfc_debrief_good");
 				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Посовещавшись, мы решили вернуть вам Левиафан. Также, мы решили не запрещать вам доступ на Атлантиду, но не думайте, что я рад вас видеть". ]];
 			elseif (atl_rep_moreau >= 0) then
 				psub("lfc_debrief_bad");
 				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Огромное спасибо. Посовещавшись, мы решили вернуть вам Левиафан. К сожалению, совет решил ограничить вам доступ к станции, поэтому я прошу вас покинуть Атлантиду как можно скорее". ]];
 			else
 				psub("lfc_debrief_bad");
 				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Посовещавшись, мы решили вернуть вам Левиафан. Убирайтесь и больше не возвращайтесь сюда". ]];
 			end;
 		end;
 		if (atl_lfc_state == 1 and not s.lfc_dialog) then
 			s.lfc_dialog = true;
 			pon('sabotage', 'ignis_what');
         elseif (atl_lfc_state ~= 1) then
             poff('sabotage', 'ignis_what');
 		end;
         if (atl_rep_moreau < 0) then
             if (char_moreau.drake_asked == 0) then pon("on_drake"); end;
             if (char_moreau.black_asked == 0) then pon("on_black"); end;
             if (char_moreau.darkstar_asked == 0) then pon("on_darkstar"); end;
             if (char_moreau.svetlova_asked == 0) then pon("on_svetlova"); end;
             if (char_moreau.moreau_asked == 0) then pon("on_moreau"); end;
             if (char_moreau.wright_asked == 0) then pon("on_wright"); end;
             if (atl_iof_completed) then
                 if (char_moreau.leroy_asked == 0) then pon("on_leroy"); end;
                 if (char_moreau.jones_asked == 0) then pon("on_jones"); end;
                 if (char_moreau.goldman_asked == 0) then pon("on_goldman"); end;
             end;
             if (char_moreau.atlantis_asked == 0) then pon("on_atlantis"); end;
             if (char_moreau.navjiarr_asked == 0) then pon("on_navjiarr"); end;
             if (char_moreau.learr_asked == 0) then pon("on_learr"); end;
             if (char_moreau.ryveerr_asked == 0) then pon("on_ryveerr"); end;
             if (char_moreau.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;
         else
             if (char_moreau.drake_asked < 2) then pon("on_drake"); end;
             if (char_moreau.black_asked < 2) then pon("on_black"); end;
             if (char_moreau.darkstar_asked < 2) then pon("on_darkstar"); end;
             if (char_moreau.svetlova_asked < 2) then pon("on_svetlova"); end;
             if (char_moreau.moreau_asked < 2) then pon("on_moreau"); end;
             if (char_moreau.wright_asked < 2) then pon("on_wright"); end;
             if (atl_iof_completed) then
                 if (char_moreau.leroy_asked < 2) then pon("on_leroy"); end;
                 if (char_moreau.jones_asked < 2) then pon("on_jones"); end;
                 if (char_moreau.goldman_asked < 2) then pon("on_goldman"); end;
             end;
             if (char_moreau.atlantis_asked < 2) then pon("on_atlantis"); end;
             if (char_moreau.navjiarr_asked < 2) then pon("on_navjiarr"); end;
             if (char_moreau.learr_asked < 2) then pon("on_learr"); end;
             if (char_moreau.ryveerr_asked < 2) then pon("on_ryveerr"); end;
             if (char_moreau.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;
         end;
 		if (s.state == 0) then
 			s.state = 1;
 			psub("first_meeting");
 			return [[За столом перед вами сидит немолодой мужчина. Кудрявые седые волосы обрамляют его лицо. Он носит длинные седые усы. Одет человек в строгий деловой костюм бежевого цвета. Его серые глаза, скрытые очками, внимательно рассматривают вас. Вертя в руках перо он приветствует вас: "Добро пожаловать на Атлантиду, месье Дрейк. Мое имя - Фредерик Моро и я исполняю обязанности начальника станции в отсутствие Уильяма и Адриана. Ваше прибытие крайне удивило нас - мы думали, с поверхности найти нашу станцию невозможно. Пока мы думаем, что делать с вами дальше, вы можете воспользоваться ресурсами станции, чтобы узнать побольше о вашем отце и, быть может, понять, куда в точности он направился. Для начала, стоит немного ввести вас в курс дела".^
 				Моро подходит к книжной полке и берет какую-то книгу. Вернувшись за стол, он раскрывает ее и приступает к рассказу: "Когда мы строили Надежду, нашей целью было создать быстрый и безопасный способ путешествий через Атлантику. Однако, все с самого начала пошло не так, как планировалось. Мы встретили племя подводных существ, именующих себя навьярами - они похожи на рыб и людей одновременно - ходят на двух ногах, используют две руки, но покрыты чешуей и имеют жабры. Тогда мы приняли решение исследовать их тщательнее. Были построены Энтерпрайз, Наутилус и сама Атлантида. Потом мы переселились сюда. Дрейк был захвачен одной из легенд этих рыбней и не так давно, наконец, решился отправиться в экспедицию". ]];
 		else
 			psub("generic");
 			return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Чем могу помочь?" ]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting", empty = code[[ psub("generic"); ]]};
 		{"Я не имею намерения раскрывать существование Атлантиды.", [[Фредерик Моро кивает: "Рад это слышать, но нам нужно больше чем ваши слова". ]]};
 		{"Что за навьяры?", [[Фредерик Моро отвечает: _"Na'vji'a'rr -- с их языка это переводится, как ,,Живущие в глубинах''. Как я сказал, они чем-то похожи на людей, но по сути своей они -- рыбы. Подробнее о них вам стоит поговорить с нашими учеными в секции Окулус. Там же вы можете встретить Ривеерра и Леарр -- наших гостей из двух ближайших поселений навьяров"_. ]]};
 		{"Как получилось, что Левиафан остался на поверхности?", [[Фредерик Моро задумчиво чешет подбородок. Через некоторое время он отвечает: _"Сложно сказать. Это было в ведении Майкла Райта. Скорее всего -- они с Дрейком сознательно спрятали его"_.
 		]]};
         {"Куда конкретно направился Уильям?", [[Фредерик Моро вздыхает: "У нас нет точных данных. И похоже их не было и у Блэка с Дрейком. Мы знаем, что их цель - древний навьярский город". ]]};
 		{tag="generic"};
 		{tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", [[Фредерик Моро несколько раз стучит пальцем по столу. Недовольным тоном он делает вам замечание: "Месье Дрейк, -- он выдерживает небольшую паузу, -- Если вы хотите вернуть себе Левиафан, вам стоит следовать нашим правилам и, в частности, не нарушать прямых наших распоряжений". ]], code [[
 			atl_rep_moreau = atl_rep_moreau - 1;
 			atl_rep_darkstar = atl_rep_darkstar - 1;
 		]]};
 		{tag="ignis_what", false, "Почему начался пожар в Игнисе?", [[Фредерик Моро пожимает плечами и как-то неуверенно проговаривает: "Не знаю. Этим вопросом занимаются инженеры и служба безопасности. Будьте спокойны, наши специалисты не допустят повторения аварии". ]]};
 		{"Я пойду", [[Моро прощается с вами: "До встречи, месье Дрейк". ]], code [[ back(); ]]};
 		{tag="lfc_debrief_good"};
 		{"Спасибо, это все", [[Моро спрашивает: "Вы что-то хотели?". ]], code [[ psub("generic");]]};
 		{tag="lfc_debrief_bad"};
 		{"Я пойду", [[Моро кивает. ]], code [[ walk("game_over_banished"); ]]};
 	};
 };
 char_svetlova_dlg = dlg {
 	var {
 		state = 0;
 		lfc_sabotage = false;
 		lfc_dialog = false;
 		flag_help = false;
 		flag_explain = false;
 	};
 	nam = "Екатерина Светлова";
 	disp = "Екатерина Светлова";
 	entered = function(s)
 		if (s.state == 0) then
 			psub('first_meeting');
             s.state = 1;
 			return [[
 				Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: _"Добрый день. Должна признать, вы всех нас знатно напугали, господин Дрейк. Винсент сказал, что вы зайдете. Что ж, я думаю вы будете очень полезны станции. Правда Винсент и Моро решили вас пока к субмаринам не пускать, что несколько помешает моим планам на вас. Впрочем я попробую их уговорить - это будет полезно и нам и вам, как и мое предложение в целом -- я знаю, что вы ищете своего отца -- Даркстар мне и это сказал, -- а он последнее время занимался одной легендой -- он хотел найти первый город навьяров, или как-то так. К сожалению, когда он отправился в эту экспедицию, он почти не оставил нам материалов - все навьярские карты, переводы - они только у него и поэтому мы не можем проследовать за ним. ^
 				Адриан его очень торопил, поэтому Уильям не успел толком даже план экспедиции для нас обрисовать"_.
 			]];
 		elseif (s.state == 2) then
 			psub('ryveerr_on_steal');
 			return [[
 				Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Ну как? Поговорили с Ривеерром?"
 			]];
 		else
 			if (atl_iyh_state == 9) then
 				atl_iyh_state = 10;
 				psub('iyh_more');
 				take("item_map_2");
 				take("item_talk_device");
 				take("item_navjiarr_chart_1");
 				take("item_navjiarr_chart_2");
 				take("item_navjiarr_chart_3");
 				if (atl_iyh_artifacts_on_atlantis) then
 					return [[
 						Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Добрый день, Дрейк. Мы изучили артефакты, найденные вами в храме. Среди всего прочего, мы нашли несколько фрагментов карты, которые я возвращаю вам - они понадобятся вам в ваших поисках. К сожалению, это именно что фрагменты и мы не можем по ним определить местоположение чего бы то ни было. Однако, недостающие фрагменты могут быть в расположенных неподалеку навьярских города - Дипатреанотре и Ираафаанотре". Она достает из-под стола небольшой чемоданчик с лампочками и кнопочками и вручает его вам: "Этот прибор позволит вам общаться с навьярами под водой. Просто набирайте слова как на клавиатуре печатной машинки, при этом будут последовательно зажигаться лампочки соответствующих цветов". Затем она достает карту, на которой отмечены Атлантида, Ираафаанотр и Дипатреанотр и так же отдает ее вам: "Вы можете взять эту карту".
 					]];
 				else
 					return [[
 						Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Добрый день, Дрейк. К сожалению, мы не смогли получить доступ к артефактам, добытым вами в храме. Поэтому, единственное, что вы можете сделать чтобы найти отца - это посетить навьярские города, расположенные неподалеку - Дипатреанотр и Ираафаанотр". Она достает из-под стола небольшой чемоданчик с лампочками и кнопочками и вручает его вам: "Этот прибор позволит вам общаться с навьярами под водой. Просто набирайте слова как на клавиатуре печатной машинки, при этом будут последовательно зажигаться лампочки соответствующих цветов". Затем она достает карту, на которой отмечены Атлантида, Ираафаанотр и Дипатреанотр и так же отдает ее вам: "Вы можете взять эту карту".
 					]];
 				end;
 			else
 				print("svetlova, generic");
 				psub('generic');
 				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 (atl_iyh_state == 2) then
 					pon("hard_to_understand");
 				end;
 				if (atl_iyh_state == 3) then
 					pon("explanation");
 				end;
 				if (atl_iyh_state < 4 and atl_iyh_ryveerr_spoken) then
 					pon("ryveerr_spoken");
 				end;
 				return [[
 					Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Добрый день".
 				]];
 			end;
 		end;
 	end;
 	phr = {
 		{tag = "first_meeting"};
 		{"Адриан?", [[
 			"Адриан Блэк - сооснователь Вестхейвен Трансоушен и хороший друг вашего отца. В последнее время они вместе с Уильямом занимались поисками Лсэрианотра - древнейшего города навьяров";
 		]], code [[pon('lseryanotr')]]};
 		{"То есть, вы вообще не знаете, где сейчас может быть ,,Надежда''?", [[
 			"Нет. Мы знаем только примерное изначальное направление - Венаэданотр город расположен далеко к западу отсюда, но у нас нет точной информации о его местоположении".
 		]]};
 		{tag = "lseryanotr", "Лсэрианотр?", [[
 			"Да, самый древний город навьяров. С ним у них связано множество легенд, но самая главная, та что так заинтересовала вашего отца, связана с неким существом - Спящим или Наэтвьирром, как его называют навьяры. Древние легенды рассказывают о том, что Наэтвьирр должен был дать навьярам великие знания, которые позволили бы им войти в век процветания. Однако, не все так просто. По какой-то причине, более новые легенды предостерегают об опасности Наэтвьирра. Думаю навьяры смогут рассказать вам больше".
 		]]};
 		{"В чем заключается ваше предложение?", [[
 			Екатерина откладывает бумаги в ящик стола, достает оттуда карту и раскладывает ее на столе. После чего продолжает:
 			_"На самом деле, вы прибыли как нельзя вовремя. Наши отношения с навьярами несколько натянулись в последнее время, и, боюсь, разрешить разногласия поможете только вы. Я попробую кратко изложить ситуацию, задавайте вопросы по ходу рассказа, если вам нужна дополнительная информация. ^
 			В окрестностях Атлантиды находятся два навьярских поселения - Ираафаанотр и Дипатреанотр. Первая встреча с жителями Дипатреанотра прошла не совсем гладко и в результате ее погибли все, кто принимал в ней участие. В дальнейшем отношения удалось более-менее наладить, однако жители Дипатреанотра не до конца готовы доверять Атлантиде. К сожалению, недавно между Ираафаанотром и Дипатреанотром произошел конфликт, который может очень негативно повлиять на ситуацию в регионе. Мы пытались вмешаться, но это лишь обострило разногласия и в дальнейшем может поставить под угрозу само существование станции"_.
 		]], code [[ psub('help')]]};
 		{tag = 'help'};
 		{"И как я смогу помочь?", [[
 			Светлова внимательно смотрит на вас и говорит: _"Вы не с Атлантиды. И навьяры это знают. Вы предстанете перед ними как нейтральная сторона. Сейчас вам стоит поговорить с Леарр и Ривеерром - узнать их взгляд на ситуацию. Потом приходите ко мне и решим, что делать"_.
 		]], code [[
 			char_svetlova_dlg.flag_help = true;
 			if (char_svetlova_dlg.flag_explain) then
 				pon("first_meeting_end");
 			end;
 		]]};
 		{"И в чем суть этого конфликта?", [[
 			Светлова отвечает: "Навьяры - очень религиозные существа - у них много разных священных предметов, религиозных запретов, табу, пророчеств - на первый взгляд - типичное первобытное общество, но стоит копнуть чуть глубже - и ситуация оказывается намного интереснее. Многие из реликвий, что попадали к нам в руки были изготовлены с поразительной точностью. Достаточно сказать, что у нас нет средств для изготовления настолько точных деталей. К сожалению, мы не смогли понять назначение этих предметов - только догадки. Часть из них, очевидно, являлись деталями механизмов. Другие, судя по всему, были чем-то вроде записей, однако ни мы, ни сами навьяры не смогли их прочитать. Но сейчас речь не о том. Не так давно наши два города потеряли свои ценнейшие реликвии и теперь обвиняют в этом друг друга. Дело грозит обернуться войной, поэтому надо что-то предпринять. "
 		]], code [[
 			char_svetlova_dlg.flag_explain = true;
 			if (char_svetlova_dlg.flag_help) then
 				psub("first_meeting_end");
 			end;
 		]]};
 		{tag = "first_meeting_end"};
 		{"Хорошо, я посмотрю, чем смогу помочь. ", [[
 			_"Вам стоит поговорить с Леарр и Ривеерром - они вам гораздо лучше все расскажут. Насколько я знаю, Леарр недавно ушла в Игнис - это надо в Доминусе на лифте подняться, думаю разберетесь, а Ривеерр здесь, в одной из соcедних лабораторий"_.
 		]], code [[
 			char_svetlova_dlg.state = 1;
 			atl_iyh_state = 1;
 			psub("generic");
 		]]};
 		{"Я прибыл сюда искать своего отца, а не решать проблемы полуразумных рыбней", [[
 			Екатерина встает из-за стола, после чего садится обратно. Кажется, ваш комментарий ее серьезно разозлил. Затем она достает из ящика небольшой блестящий диск - примерно 10 сантиметров диаметром: "Эти полуразумные рыбни, как вы выразились, могут сделать вот такое". ^
 			Вы берете из рук Екатерины диск и внимательно рассматриваете его. На первый взгляд ничего необычного - блестящий диск, бесполезное украшение. Вдоль внешней кромки его вы видите какие-то цветные полосы - очень ровно нанесенные, но в них вы тоже ничего необычного не видите. Светлова продолжает: "Посмотрите на него под микроскопом и вы поймете о чем я. Да, вы можете забрать его. Возможно это, как и то, о чем я вас прошу, поможет вам узнать где сейчас находится Уильям".
 		]], code [[ put(item_navjiarr_disk, pl); ]]};
 		{tag = "generic"};
 		{tag = "sabotage", false, "Даркстар считает, что причиной пожара в Игнисе был саботаж. Что вы об этом думаете?", function(s)
 			if (atl_iof_learr_dead) then
 				atl_rep_darkstar = atl_rep_darkstar - 1;
 				return [[
 					"Даркстар просил вас ничего об этом не говорить. Разговор окончен".
 				]];
 			else
 				s.lfc_sabotage = true;
 				atl_rep_svetlova = atl_rep_svetlova + 1;
 				return [[
 					"Даркстар просил вас ничего об этом не говорить, но вам ведь все равно интересно, правда? Тогда слушайте. Однозначно, саботажник - кто-то из сторонников закрытия станции. Если хотите про них больше узнать - поговорите с Мишелем Леруа. Еще, если вы собираетесь этим серьезно заняться, вам стоит поговорить с Уолтером Рэдклиффом".
 				]];
 			end;
 		end};
 		{tag = "ignis_what", false, "Вы знаете, что произошло в Игнисе?", function(s)
 			if (s.lfc_sabotage) then
 				return [[
 					"Вы же только что сами сказали - саботаж".
 				]];
 			elseif (atl_iof_learr_dead) then
 				return [[
 					"Мне кажется, это не ваше дело. И не мое. Этим занимается служба безопасности".
 				]];
 			else
 				poff("sabotage");
 				psub("ignis_sabotage");
 				return [[
 					"Я думаю вы и сами прекрасно знаете. Может расскажете?"
 				]];
 			end;
 		end};
 		{tag = "hard_to_understand", false, "Я поговорил с Аикерьярром, только я вообще ничего не понял из его слов[Кратко пересказать диалог с Аикерьярром]", [[
 			Екатерина откладывает бумаги в сторону и откидывается на спинку стула. Через некоторое время она говорит: "Интересно. Аикерьярр упорно отрицает причастность Ираафаанотра к краже реликвии. Что говорит Ривеерр по этому поводу?"
 		]], code [[ char_svetlova_dlg.state = 2; psub('ryveerr_on_steal');]]};
 		{tag = "explanation", false, "Я поговорил с Леарр. Она говорит, что они не трогали реликвию Ираафаанотра[Кратко пересказать диалог с Ираафаанотром]", [[
 			Екатерина откладывает бумаги в сторону и откидывается на спинку стула. Через некоторое время она говорит: "Интересно. Что говорит Ривеерр по этому поводу?"
 		]], code [[ char_svetlova_dlg.state = 2; psub('ryveerr_on_steal');]]};
 		{always = true, "Я пойду", [[
 			Светлова возвращается ко своим бумагам: "До встречи"
 		]], code [[ back(); ]]};
 		{tag = "ignis_sabotage"};
 		-- сказать про саботаж или нет
 		{"Саботаж", function(s)
 			psub("generic");
 			atl_rep_svetlova = atl_rep_svetlova + 1;
 			return [[
 				"Даркстар просил вас ничего об этом не говорить, но вам ведь все равно интересно, правда? Тогда слушайте. Однозначно, саботажник - кто-то из сторонников закрытия станции. Если хотите про них больше узнать - поговорите с Мишелем Леруа. Еще, если вы собираетесь этим серьезно заняться, вам стоит поговорить с Уолтером Рэдклиффом".
 			]];
 		end};
 		{"Понятия не имею", [[
 			"Очень жаль. Мне действительно интересно".
 		]], code [[
 			psub("generic");
 		]]};
 		{tag = "ryveerr_on_steal"};
 		{tag = "ryveerr_spoken", false, "Ривеерр рассказал о нападении на храм. Он уверен, что именно жители Ираафаанотра украли ее. И он с уверенностью говорит, что они готовы обменяться реликвиями обратно. То есть реликвия Ираафаанотра, судя по всему, находится в Дипатреанотре. ", [[
 			Светлова задумчиво потирает лоб: "Хм. Тогда мы в тупике".
 		]], code [[ pon("ryveerr_more"); ]]};
 		{tag = "ryveerr_more", false, "Вы были в храме?", [[
 			Светлова разводит руками: "Они никого не пускают, так что мы врядли что-то сможем что-то еще здесь сделать... ". Внезапно она лезет куда-то в ящик стола и что-то там ищет. Судя по всему, она не находит искомого. Махнув рукой, она продолжает: "Есть еще один храм - очень старый, его даже навьяры не посещают. Но смысл не в этом. В этом храме живет гигантский скат. А они очень любят порой утаскивать ценные вещи из навьярских городов. Можете спросить Сильвию об этом - у навьяров полно таких легенд". ^
 			Екатерина закрвает ящик стола и продолжает: "Я хочу, чтобы вы отправились туда. Навьярам не стоит ничего знать - я думаю вы догадываетесь, как они отреагируют, если им сообщить".
 		]], code [[ atl_iyh_state = 4; psub("secret_op"); ]]};
 		{"Я пойду", [[
 			Светлова возвращается ко своим бумагам: "До встречи"
 		]], code [[ back(); ]]};
 		{tag="secret_op"};
 		{"Хорошо, я ничего не скажу навьярам. ", [[
 			"Отлично. Даркстару я сообщу, что одобряю возвращение вам Левиафана".
 		]], code [[ back(); ]]};
 		{"Мне кажется, нам стоит поставить их в известность. Как они отреагируют, если мы просто принесем им реликвию? ", [[
 			"Они будут благодарить нас. А теперь представьте, что вы сообщаете им, что отправляетесь в их священное место охотиться на их священную рыбу. Что будет? "
 		]], code [[ psub("so_answer"); ]]};
 		{tag="so_answer"};
 		{"Да, пожалуй вы правы", [[
 			"Отлично. Даркстару я сообщу, что одобряю возвращение вам Левиафана".
 		]]};
 		{"А что будет, если мы принесем им реликвию, которая должна по их мнению быть в Ираафаанотре? Разве они не посчитают, что мы украли ее оттуда? ", [[
 			"Это маловероятно. Впрочем, поступайте как знаете".
 		]], code [[ back(); ]]};
 		{tag="iyh_more"};
 		{"Я могу чем-то еще помочь?", [[
 			"Пока у нас нет для вас заданий, но возможно позже появится что-то. Сейчас вы можете продолжать ваши поиски".
 		]]};
 		{"Спасибо за помощь, я пойду", [[
 			"Удачи в поисках Уильяма, Дрейк".
 		]], code [[ back(); ]]};
 	};
 };
 char_anna_atlantis_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('generic'); ]]};
 		{tag="generic"};
 		{tag="sabotage", "Вы знаете, что пожар в Игнисе - следствие саботажа?", function(s)
 			atl_lfc_panic = atl_lfc_panic + 1;
 			atl_rep_darkstar = atl_rep_darkstar - 1;
 			rel_walter = rel_walter - 1;
 			rel_anna = rel_anna - 1;
 			return [[
 				Анна в ужасе смотрит на вас: "Вы серьезно? Ну да... Оборудование здесь хорошее, мне Уолтер не раз рассказывал насколько здесь все надежное. Не знаю, что и думать... А если этот псих вздумает поджечь еще что-то?"
 			]];
 		end};
 		{tag="ignis_what", "Вы знаете, что произошло в Игнисе?", [[
 			"Практически ничего. Поговорите с Даркстаром или Райтом. Можете еще Уолтера спросить".
 		]]};
 		{always=true, "Я пойду", [[
 			"До встречи"
 		]], code [[ back(); ]]};
 	};
 };
 char_learr_atlantis_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Леарр";
 	disp = "Леарр";
 	entered = function(s)
 		if (s.state == 0) then
 			if (char_learr_atlantis.offended) then
 				psub("offended");
 				return [[
 					Леарр поворачивается к вам, плавники ее становятся ярко-оранжевыми, а она говорит: "Я приветствую тебя-презренный-монстр-he'vji'a'rr".
 				]];
 			else
 				psub("pre_iof");
 				return [[
 					Леарр поворачивается к вам, плавники ее становятся сине-зелеными, а она говорит: "Я приветствую тебя-he'vji'a'rr".
 				]];
 			end;
 		elseif (s.state == 1) then
 			s.state = 2;
 			psub("after_iof");
 			if (atl_iof_learr_suit) then
 				return [[
 					При виде вас, плавники Леарр меняют цвет на ярко-красный. Она плавно опускает руки вниз и делает что-то вроде поклона. После этого она поднимается и говорит: "Я благодарю вас. Ваша-со-скафандром-идея невероятна".
 				]];
 			else
 				return [[
 					При виде вас, плавники Леарр меняют цвет на ярко-красный. Она плавно опускает руки вниз и делает что-то вроде поклона. После этого она поднимается и говорит: "Я благодарю вас".
 				]];
 			end;
 		else
 			if (atl_iyh_state == 4) then
 				pon("iyh4");
 			elseif (atl_iyh_state == 5) then
 				pon("iyh5");
 			end;
 			psub("generic");
 			if (rel_learr > 0) then
 				return [[
 					Леарр поворачивается к вам, плавники ее становятся сине-зелеными, а она говорит: "Я рада-видеть тебя".
 				]];
 			else
 				return [[
 					Леарр поворачивается к вам, плавники ее становятся сине-зелеными, а она говорит: "Я приветствую тебя-he'vji'a'rr".
 				]];
 			end;
 		end;
 	end;
 	phr = {
 		{tag='offended'};
 		{"He'vji'a'rr?", [[
 			Леарр, кажется, улыбнулась, обнажив два ряда острых треугольных зубок: "Ты неплохо-говоришь. Я легко-понимаю тебя. He'vji'a'rr - вверху-разумный-живой. Монстр-ты понимаешь?"
 		]]};
 		{"Монстр?", [[
 			"Ты чуждо-для-нас-выглядишь, поэтому монстр. Ты так-мыслил. Я права?"
 		]], code [[ psub('offended_yes_no') ]]};
 		{tag='offended_yes_no'};
 		{"Да, наверное так", [[
 			"Мы будем-продолжать-друг-друга-монстрами-называть?"
 		]], code [[ psub('no_offence') ]]};
 		{"Просто мы люди, а ты чудовище", [[
 			Леарр скалится, показывая блестящие острые зубки: "Лучше-уходи. Я не-хочу-этими-зубами-перекусить твое-горло".
 		]], code [[
 			char_learr_atlantis_dlg.state = 1;
 			walk('atl_iof_intro');
 		]]};
 		{tag='no_offence'};
 		{"Нет, вообще-то у меня разговор есть", [[
 			"Ты-говори"
 		]], code [[
 			char_learr_atlantis_dlg.state = 1;
 			walk('atl_iof_intro');
 		]]};
 		{tag='pre_iof'};
 		{"He'vji'a'rr?", [[
 			Леарр, кажется, улыбнулась, обнажив два ряда острых треугольных зубок: "Ты неплохо-говоришь. Я легко-понимаю тебя. Вы-He'vji'a'rr - вверху-разумный-живой, с-поверхности. Мы-na'vji'a'rr - внизу-разумный-живой, из-глубин".
 		]]};
 		{"Я хотел кое-что спросить", [[
 			"Ты-говори"
 		]], code [[
 			char_learr_atlantis_dlg.state = 1;
 			walk('atl_iof_intro');
 		]]};
 		{tag="after_iof"};
 		{"Рад, что смог помочь", [[
 			Леарр кивает, все еще находясь в явном возбуждении: "Ты говорить-пришел? Ты говори".
 		]], code [[ psub("generic"); ]]};
 		{"У меня не было выбора", [[
 			Леарр кажется неприятно удивленной вашими словами, однако она все равно говорит: "Я благодарю вас. Ты говори".
 		]], code [[ rel_learr = rel_learr - 1; psub("generic"); ]]};
 		{tag="generic"};
 		{"Расскажи о конфликте между вашими городами", [[
 			Леарр радостно восклицает: "Вы поможете нам? Вы слушайте!" -- она начинает активно жестикулировать руками: "Из-нашего-храма-реликвия несколько-дней-назад-пропала. Na'vji'a'rr из Dyp’atre’anot’rr потом-в-наш-город-пришли. Они сказали, что они взяли нашу-реликвию. Они сказали, что они вернут ее, когда мы вернем их-реликвию", -- на этих словах она замирает в растерянности. Затем она неуверенно добавляет: "Мы не-брали их-реликвию. Она нам-совсем-не-нужна".
 		]], code [[ atl_iyh_state = 3; ]]};
 		{tag="iyh4", "Мы знаем, где реликвия Дипатреанотра. Есть старый храм навьяров, в котором живет скат.", [[
 			Леарр задумчиво произносит: "Затмевающий свет. Напоминает нашу-легенду".^
 			Немного подумав, Леарр продолжает: "Да! Излучающий-тьму! Мы вместе-пойдем и посмотрим. Я увидеть-хочу другие-реликвии. Излучающий-тьму хранил много-всего. Вы согласны?"
 		]], code [[ psub("iyh_agree"); ]]};
 		{tag="iyh5", "Мы знаем, где реликвия Дипатреанотра. Есть старый храм навьяров, в котором живет затмевающий свет.", [[
 			Леарр задумчиво произносит: "Напоминает нашу-легенду".^
 			Немного подумав, Леарр продолжает: "Да! Излучающий-тьму! Мы вместе-пойдем и посмотрим. Я увидеть-хочу другие-реликвии. Излучающий-тьму хранил много-всего. Вы согласны?"
 		]], code [[ psub("iyh_agree"); ]]};
 		{"Я пойду", [[
 			Плавники Леарр медленно теряют цвет и она прощается с вами: "Мы позже-поговорим".
 		]], code [[back();]]};
 		{tag="iyh_agree"};
 		{"Я согласен. Только так мы докажем Дипатреанотру, что вы ни при чем", [[
 			"Вы сообщите, когда вы готовы-будете. Мы позже-поговорим".
 		]], code [[
 			lifeon("char_learr");
 			table.insert(pl.party, 'learr');
 			atl_iyh_state = 6;
 			back();
 		]]};
 		{"Лучше я отправлюсь один", [[
 			"Нельзя-так. Священное-место-храм. Другие-yhe-na'vji'a'rr не-одобрят".
 		]]};
 	};
 };
 char_aikerjarr_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Аикерьярр";
 	dsc = function(s)
 		if (s.state == 0) then
 			psub("generic");
 		elseif (s.state == 1) then
 			psub("hard_to_understand");
 		elseif (s.state == 2) then
 			if (atl_iyh_state == 4) then
 				pon("iyh4");
 			elseif (atl_iyh_state == 5) then
 				pon("iyh5");
 			end;
 			psub("what_next");
 		end;
 		return [[
 			Аикерьярр медленно поворачивается к вам: "Я слушать ты".
 		]];
 	end;
 	phr = {
 		{tag = "generic"};
 		--Dyp’atre’anot’rr
 		--Iraa’pha’anot’rr
 		{"Расскажи о конфликте между вашими городами", [[
 			Аикерьярр недовольно смотрит на вас:"Вы не помочь".^
 			Немного подумав, он рассказывает: "Na'vji'a'yhe'dyp'atre'anot'rr говорить yhe мы украсть реликвия'yhe'dyp'atre'anot'rr. Мы не-делать!" -- Аикерьярр злобно стучит зубами и в ярости сжимает кулаки. Через некоторое время он успокаивается и продолжает: "Zly'na'a'yhe'dyp'atre'anot'rr после-украсть реликвия'yhe'iraa’pha’anot’rr!"
 		]], code [[
 			char_aikerjarr_dlg.state = 1;
 			atl_iyh_state = 2;
 			psub("hard_to_understand");
 		]]};
 		{"Я вернусь позже", [[
 			Аикерьярр отворачивается от вас, даже не удостоив ответа.
 		]], code [[
 			back();
 		]]};
 		{tag = "hard_to_understand"};
 		{"Na'vji'a'yhe'dyp'atre'anot'rr?", [[
 			Аикерьярр ворчит: "Ты глупый. Я говорить yhe na'vji'a'rr в-dyp'atre'anot'rr-живут".
 		]]};
 		{"Yhe'dyp'atre'anot'rr?", [[
 			Аикерьярр ворчит: "Ты совсем-глупый".
 		]]};
 		{"Zly'na'a'yhe'dyp'atre'anot'rr?", [[
 			Аикерьярр ворчит: "Ты глупый. Na'vji'a'yhe'dyp'atre'anot'rr".
 		]]};
 		{"Yhe'iraa’pha’anot’rr?", [[
 			Аикерьярр ворчит: "Ты совсем-глупый".
 		]]};
 		{"Так и что это все значит?", [[
 			Аикерьярр злобно рычит: "Война будет. Мы уничтожить zly'a'yhe'dyp'atre'anot'rr".
 		]], code [[
 			char_aikerjarr_dlg.state = 2;
 			psub("what_next");
 		]]};
 		{"Я вернусь позже", [[
 			Аикерьярр отворачивается от вас, даже не удостоив ответа.
 		]], code [[
 			back();
 		]]};
 		{tag = "what_next"};
 		{tag="iyh4", "Мы знаем, где реликвия Дипатреанотра. Есть старый храм навьяров, в котором живет скат.", [[
 			Аикерьярр кивает: "Я не-понимаю, hyd это связано с-текущей-ситуацией. Ты узнай e тогда-приходи"
 		]], code [[ back(); ]]};
 		{tag="iyh5", "Мы знаем, где реликвия Дипатреанотра. Есть старый храм навьяров, в котором живет затмевающий-свет.", [[
 			Аикерьярр кивает: "Ты знаешь наши-слова. Ты знаешь наши-легенды?"
 		]], code [[ psub("legend"); ]]};
 		{"Я вернусь позже", [[
 			Аикерьярр отворачивается от вас, даже не удостоив ответа.
 		]], code [[
 			back();
 		]]};
 		{tag="legend"};
 		{"[Рассказать легенду об Излучающем Тьму]", [[
 			Аикерьярр кивает: "Ты не-совсем-глупый. Ты слушай меня. Я не-хочу-в-храм-пускать тебя. Но я понимаю, yhe ты мои-слова-подтвердишь. Ты скажешь Ry'vee'rr yhe мы вместе-отправимся в-храм и реливкию-вернем. Ты уходи".
 		]], code [[ lifeon("char_aikerjarr_lev");table.insert(pl.party, 'aikerjarr'); atl_iyh_state = 6; back(); ]]};
 	};
 };
 char_ryveerr_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Ривеерр";
 	disp = "Ривеерр";
 	entered = function(s)
 		psub("generic");
 		if (s.state == 0) then
 			if (atl_iyh_state > 0 and atl_iyh_state < 4) then
 				pon("about_relic");
 			elseif (atl_iyh_state == 4) then
 				psub("situation");
 			elseif (atl_iyh_state == 5) then
 				pon("legend");
 			end;
 		elseif (s.state == 1) then
 			if (atl_iyh_state == 6) then
 				if (atl_iof_learr_dead) then
 					pon("take_aikerjarr");
 				else
 					pon("take_learr");
 				end;
 			end;
 			pon("legend2");
 		end;
 		return [[
 			Ривеерр оборачивается к вам: "Ты говори".
 		]];
 	end;
 	phr = {
 		{tag="generic"};
 		{tag="about_relic", false, "Расскажи о конфликте между вашими городами", [[
 			Ривеерр рассказывает вам: "Na'vji'a'rr-из-Iraa’pha’anot’rr украли нашу-реликвию. Мы тем-же-ответили им".
 		]], code [[ psub("more_on_relic"); ]]};
 		{always=true, "Я пойду", [[
 			Ривеерр прощается с вами: "Мы позже-поговорим".
 		]], code [[ back(); ]]};
 		{tag="more_on_relic"};
 		{"Тем же?", [[
 			Ривеерр улыбается: "Мы взяли их-реликвию. Мы вернем ее, ysl они вернут нашу-реликвию".
 		]]};
 		{"Вы уверены, что кража - их рук дело?", [[
 			Ривеерр уверенно кивает: "Только-они могли сделать. Я расскажу", -- Ривеерр на небольшое время замолкает, словно собираясь с мыслями, после чего продолжает: "Na'vji'a'yhe'iraa'pha’anot’rr ночью-в-наш-храм-пришли e убили охранникаов. Они украли реликвию".
 		]], code [[ psub("why"); ]]};
 		{tag="why"};
 		{"Вы уверены, что это они?", [[
 			Ривеерр отвечает: "Другой-никто не-мог-сделать".
 		]], code [[ atl_iyh_ryveerr_spoken = true; psub("generic"); ]]};
 		{tag="situation"};
 		{"Мы знаем, где ваша реликвия. Мы знаем об одном древнем храме, где живет гигантский скат.", [[
 			"Я не-понимаю, hyd это поможет нам".
 		]], code [[ psub("cancel");]]};
 		{always=true, "Я пойду", [[
 			Ривеерр прощается с вами: "Мы позже-поговорим".
 		]], code [[ back(); ]]};
 		{tag="legend"};
 		{"Мы знаем где ваша реликвия. Мы знаем об одном древнем храме, где живет затмевающий свет. [Кратко пеесказать легенду]", [[
 			"Я знаю эту-легенду. Вы возможно-правы. В-храм вам-нельзя-идти. Это наше-священное-место. he'vji'a'rr не-место-там. Затмевающий-свет не-враг-нам. Его нельзя-тревожить".
 		]], code [[ psub("legend_more")]]};
 		{always=true, "Я пойду", [[
 			Ривеерр прощается с вами: "Мы позже-поговорим".
 		]], code [[ back(); ]]};
 		{tag="legend_more"};
 		{"Вы могли бы сопровождать нас. ", [[
 			"В-храм нельзя-вам".
 		]], code [[
 			char_ryveerr.state = 1;
 		]]};
 		{always=true, "Я вернусь позже", [[
 			Ривеерр прощается с вами: "Мы позже-поговорим".
 		]], code [[ back(); ]]};
 		{tag="legend2"};
 		{tag="take_learr", false, "Леарр согласилась сопровождать нас в храм. ", [[
 			"Леарр'yhe'iraa’pha’anot’rr. Не-уверен-я что-могу-доверять-ей. Я подумать-должен..." - Некоторое время Ривеерр стоит неподвижно, задумавшись. Наконец, скрестив руки на груди, Ривеерр продолжает: "Я согласен".
 		]], code [[ atl_iyh_state = 6; back(); ]]};
 		{tag="take_aikerjarr", false, "Аикерьярр согласился сопровождать нас в храм", [[
 			"Аикерьярр'yhe'iraa’pha’anot’rr. Не-уверен-я что-могу-доверять-ему. Я подумать-должен..." - Некоторое время Ривеерр стоит неподвижно, задумавшись. Наконец, скрестив руки на груди, Ривеерр продолжает: "Я согласен".
 		]], code [[ atl_iyh_state = 6; back(); ]]};
 		{always=true, "Я вернусь позже", [[
 			Ривеерр прощается с вами: "Мы позже-поговорим".
 		]], code [[ back(); ]]};
 		{tag="cancel"};
 		{always=true, "Я вернусь позже", [[
 			Ривеерр прощается с вами: "Мы позже-поговорим".
 		]], code [[ back(); ]]};
 	};
 };
 char_loong_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 [[
 				Немолодой китаец внимательно смотрит на вас через стекла старых очков. Он приветствует вас: "Добро пожаловать, господин, на нашу станцию. Я Джинхэй Лун, занимаюсь языком na'vji'a'rr-ов".
 			]];
 		else
 			psub("generic");
 			return [[
 				Временная затычка диалога
 			]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting"};
 		{"Na'vji'a'rr-ов?", [[
 			"Na'vji'a'rr - дословно - разумный, живущий снизу, то есть на дне океана. Вы наверняка их уже видели здесь на станции - такие чешуйчатые, высокие".
 		]]};
 		{"Я Дэвид Дрейк, очень приятно", [[
 			Джинхэй кланяется вам в ответ и говорит: "Очень рад вас видеть. Ваш отец построил Атлантиду, только чтобы мы могли изучать na'vji'a'rr-ов и общаться с ними. Но вы наверняка пришли по делу. Что вы хотите?"
 		]], };
 		{tag="generic"};
 		{tag="sabotage", "Вы знаете, что пожар в Игнисе - результат саботажа?", function(s)
 			atl_lfc_panic = atl_lfc_panic + 1;
 			atl_rep_darkstar = atl_rep_darkstar - 1;
 			return [[
 				"Если это и так, то надо не на каждом углу кричать, а предоставить сведения Даркстару или Моро. Они найдут, как решить проблему".
 			]];
 		end};
 		{tag="ignis_what", "Вы знаете, что произошло в Игнисе?", [[
 			"Об этом вам лучше узнать у Райта или Даркстара. Я мало что знаю".
 		]]};
 		{always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
 	};
 };
 char_winterlight_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = "Сильвия Уинтерлайт";
 	disp = "Сильвия Уинтерлайт";
 	entered = function(s)
 		if (atl_iyh_state == 4) then
 			pon("legend");
 		end;
 		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
 			psub("first_meeting");
             s.state = 1;
 			return [[
 				Женщина лет тридцати-пяти-сорока стоит, склонившись над картой и внимательно изучает ее. Увидев вас, она отвлекается от карты и спрашивает: "Вы Дэвид Дрейк? Я Сильвия Уинтерлайт. Рада встрече, у нас нечасто новых людей встретить можно".
 			]];
 		else
 			psub("generic");
 			return [[
 				Сильвия оборачивается к вам: "Приветствую, что вы хотели?"
 			]];
 		end;
 	end;
 	phr = {
 		{tag="first_meeting"};
 		{"Совершенно верно, я Дэвид Дрейк", [[
 			"Рада знакомству. Я мало что могу рассказать вам об устройстве станции, но если у вас есть какие-то вопросы касательноо культуры и истории навьяров - я всегда рада помочь".
 		]], code [[ psub("generic"); ]]};
 		{tag="generic"};
 		{tag="legend", false, "Ты можешь рассказать мне навьярскую легенду о скате?", [[
 			Сильвия кажется заинтересованной: "У навьяров их много, какую конкретно вы хотите услышать?"
 		]], code [[ psub("which_legend"); ]]};
 		{tag="sabotage", false, "Вы знаете, что пожар начался из-за саботажа?", function(s)
 			atl_lfc_panic = atl_lfc_panic + 1;
 			atl_rep_darkstar = atl_rep_darkstar - 1;
 			if (atl_lfc_panic <= 2) then
 				return [[
 					Сильвия Уинтерлайт пожимает плечами: "Не поверю, чтобы кто-то это мог сделать".
 				]];
 			elseif (atl_lfc_panic == 3) then
 				return [[
 					Сильвия Уинтерлайт удивленно смотрит на вас: "Вы не первый кто так говорит. Но кто это мог сделать?"
 				]];
 			end;
 		end;};
 		{tag="ignis_what", false, "Вы знаете, что произошло в Игнисе?", [[
 			"Крайней мало. Вам лучше поговорить с Райтом или Даркстаром".
 		]]};
 		{always=true, "Я пойду", [[
 			Сильвия молча кивает и возвращается к своим делам.
 		]], code [[ back(); ]]};
 		{tag="which_legend"};
 		--TODO добавить несколько легенд
 		{"Что-нибудь связанное с храмами и реликвиями", [[
 			Сильвия задуиывается: _"Храмы, реликвии и скаты... Да, есть кое-что", -- она откидивыет волосы назад и продолжает: "Согласно этой легенде, хранителей одного из святилищ навьяров был могучий затмевающий свет по имени Излучающий Тьму. Это было в те времена, когда навьяры и затмевающие свет были связаны узами дружбы. Излучающий тьму был мудрым хранителем - он не только принимал священные реликвии на сохранение, но и многое знал о них - об их предназначении и истинной ценности. Однажды Излучающий Тьму узнает о необычнайно ценной реликвии, хранящейся в одном из городов и скрывающей в себе древние знания навьяров. Узнает он и о том, что живущие навьяры не в силах прочитать. Тогда он прибыл в город, чтобы просить навьяров отдать ему реликвию на сохранение. Но навьяры отказывают ему. Вернувшись в святилище, Излучающий Тьму придумал план. Ночью он пробрался в город и выкрал реликвию. Когда наутро навьяры обнаружили пропажу, они направились к Излучающему Тьму с требованием вернуть им реликвию. На это могучий затмевающий свет спросил их: ,,Знаете ли вы, что скрывает этот предмет?''^ -- кстати, в некоторых переводах я встречала слово ,,светодиск'', как описание реликвии.
 			,,Знания наших предков'', -- ответили навьяры. Излучающий Тьму продолжил: ,,Можете ли вы прочитать его?''^
 			,,Нет'', --сказали навьяры. Тогда Излучающий Тьму рассказал им легенду о храме в глубинах, которую он прочитал из данной реликвии(Нам, кстати, так и не довелось получить хоть какой-либо целостный текст этой легенды), и сказал им: ,,Можете приходить сюда когда захотите и я расскажу вам то, что вы захотите знать. Но только, если реликвия ваша остается у меня''. Навьяры поняли, что если заберут реликвию, то навсегда утратят древние знания и согласились".
 		]], code [[ psub("more_on_legend"); ]]};
 		{tag="more_on_legend"};
 		{"Светодиск?", [[
 			"Мы плохо понимаем, для чего они служат. У Светловой один такой был. Блестящий диск - сантиметров 10 в диаметре. Правда вот как их ,,читать''... В привычном понимании, по крайней мере, мы не понимаем. Если рассматривать их под микроскопом - там весьма характерный рисунок проступает. Почему светодиск? Мы не знаем - это навьяры их так называют".
 		]]};
 		{"Что за легенда о храме в глубинах?", [[
 			"Мы только приблизительно знаем о ней - она постоянно упоминается в контексте других легенд и у нас есть фрагменты, которые нам рассказывали навьяры. Когда-то давно навьяры построили храм где-то в ущелье, но по какой-то причине были вынуждены покинуть его".
 		]]};
 		{"Спасибо, я пойду", [[
 			"До встречи. Если захотите еще древних сказаний послушать - приходите".
 		]], code [[ atl_iyh_state = 5; psub('back'); ]]};
 	};
 };
 char_jack_wright_atlantis_dlg = dlg {
 	var {
 		state = 0;
 	};
 	nam = 'char_jack_wright_atlantis_dlg';
 	disp = "Джек Райт";
 	entered = function(s)
 		if (s.state == 0) then
 			psub("business_or_no");
 			return [[
 				Джек отворачивается от Леарр, и обращается к вам: "Привет, ты по делу или просто так?"
 			]];
 		end;
 	end;
 	phr = {
 		{tag = "business_or_no"};
 		{"Как тебе станция?", [[
 			"Невероятно! Поверить не могу, что мой отец вместе с твоим это все придумали и создали. Это совершенство, никак не меньше - они уже десять лет почти живут без связей с поверхностью, не испытывая при этом никаких проблем".
 		]]};
 		{always = "true", "Я с Леарр поговорить пришел.", function(s)
 			if (char_learr_atlantis.offended) then
 				return [[
 					Джек ухмыльнулся: "Удачи, я подожду в главном зале". Джек поднялся и вышел.
 				]];
 			else
 				return [[
 					"Надеюсь, я вам не помешаю? В любом случае, я подожду в главном зале". Джек поднялся и вышел.
 				]];
 			end;
 		end, code [[
 			remove('char_jack_wright_atlantis', 'atl_ignis_hall_a');
 			back();
 		]]};
 	};
 };
 char_michael_wright_dlg = dlg {
 	var {
 		state = 0;
 		lfc_dialog = false;
 	};
 	nam = "Майкл Райт";
 	disp = "Майкл Райт";
 	entered = function(s)
 		if (atl_nih_state == 2) then
 			pon('nih_fixed');
 		end;
 		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;

0 comments (0 inline, 0 general)