global {
	atl_jack_in_party = false;
	
	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_lfc_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_aqua_corridor_b = room {
	nam = "Атлантида, Аква, коридор B";
	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("В главный коридор", "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;
	end;
	dsc = [[
		Просторное помещение, предназнавенное для размещения субмарин, прибывающих на станцию. В настоящий момент в этом доке расположен _"Левиафан"_. Под потолком, на высоте примерно в 5 метров укреплены специальные балки, по которым могут свободно перемещаться крюки подъемных кранов. Снизу, под водой, расположен огромный люк, закрывающий доступ внутрь дока. Несколько легких мостиков сконструированы таким образом, чтобы их расположение легко можно было изменить для удобства работы и обслуживания субмарин. 
	]];
	way = {
		kh_vroom("В коридор B", "atl_aqua_corridor_b");
	};
};

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()
			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
			return false;
		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_illuminators"
	};
};

atl_dom_main_near_aqua = room {
	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Аква\"";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Рядом с вами расположен шлюз, ведущий в соседнюю секцию.
	]];
	way = {
		kh_vroom("В секцию \"Аква\"", "atl_intersection_aqua_dom");
		kh_vroom("К северо-западной части", "atl_dom_main_nw");
		kh_vroom("К северной части", "atl_dom_main_n");
		kh_vroom("К северо-восточной части", "atl_dom_main_ne");
	};
	obj = {
		-- TODO добавить скамейки, табличку секции Аква
		"atl_nih_tubes_near_aqua"
	};
};

atl_dom_main_nw = room {
	nam = "Атлантида, Доминус, центральный зал, северо-запад";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в северо-западной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К секции \"Аква\"", "atl_dom_main_near_aqua");
		kh_vroom("К западной части", "atl_dom_main_w");
		kh_vroom("К северной части", "atl_dom_main_n");
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К коридору А", "atl_dom_main_near_a");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_n = room {
	nam = "Атлантида, Доминус, центральный зал, север";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в северной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К секции \"Аква\"", "atl_dom_main_near_aqua");
		kh_vroom("К западной части", "atl_dom_main_w");
		kh_vroom("К северо-западной части", "atl_dom_main_nw");
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К северо-восточной части", "atl_dom_main_ne");
		kh_vroom("К восточной части", "atl_dom_main_e");
	};
};

atl_dom_main_ne = room {
	nam = "Атлантида, Доминус, центральный зал, северо-восток";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в северо-восточной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К секции \"Аква\"", "atl_dom_main_near_aqua");
		kh_vroom("К кабинету администратора", "atl_dom_main_near_adm");
		kh_vroom("К восточной части", "atl_dom_main_e");
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К северной части", "atl_dom_main_n");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_near_a = room {
	nam = "Атлантида, Доминус, центральный зал, у входа в коридор А";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Рядом с вами расположен шлюз, ведущий в коридор А. 
	]];
	way = {
		kh_vroom("К западной части", "atl_dom_main_w");
		kh_vroom("К северной части", "atl_dom_main_n");
		kh_vroom("К северо-западной части", "atl_dom_main_nw");
		kh_vroom("В коридор A", "atl_dom_corridor_a");
	};
	obj = {
		-- TODO добавить табличку
		"atl_nih_panel_near_a"
	};
};

atl_dom_main_w = room {
	nam = "Атлантида, Доминус, центральный зал, запад";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в западной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К северо-западной части", "atl_dom_main_nw");
		kh_vroom("К северной части", "atl_dom_main_n");
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К юго-западной части", "atl_dom_main_sw");
		kh_vroom("К южной части", "atl_dom_main_s");
		kh_vroom("К коридору А", "atl_dom_main_near_a");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_c = room {
	nam = "Атлантида, Доминус, центральный зал, центр";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в центральной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К северной части", "atl_dom_main_n");
		kh_vroom("К северо-восточной части", "atl_dom_main_ne");
		kh_vroom("К восточной части", "atl_dom_main_e");
		kh_vroom("К юго-восточной части", "atl_dom_main_se");
		kh_vroom("К южной части", "atl_dom_main_s");
		kh_vroom("К юго-западной части", "atl_dom_main_sw");
		kh_vroom("К западной части", "atl_dom_main_w");
		kh_vroom("К северо-западной части", "atl_dom_main_nw");
		kh_vroom("В лифт", "atl_dom_lift");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_e = room {
	nam = "Атлантида, Доминус, центральный зал, восток";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в восточной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К северо-восточной части", "atl_dom_main_ne");
		kh_vroom("К кабинету администратора", "atl_dom_main_near_adm");
		kh_vroom("К юго-восточной части", "atl_dom_main_se");
		kh_vroom("К южной части", "atl_dom_main_s");
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К северной части", "atl_dom_main_n");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_near_adm = room {
	nam = "Атлантида, Доминус, центральный зал, у входа в кабинет администратора";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Рядом с вами находится шлюз, ведущий в кабинет администратора. 
	]];
	way = {
		kh_vroom("В кабинет администратора", "atl_dom_administator_room");
		kh_vroom("К юго-восточной части", "atl_dom_main_se");
		kh_vroom("К восточной части", "atl_dom_main_e");
		kh_vroom("К северо-восточной части", "atl_dom_main_ne");
	};
	obj = {
		-- TODO добавить скамейки, воздуховоды
		"atl_nih_panel_near_admin"
	};
};

atl_dom_main_sw = room {
	nam = "Атлантида, Доминус, центральный зал, юго-запад";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в юго-западной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К западной части", "atl_dom_main_w");
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К южной части", "atl_dom_main_s");
		kh_vroom("К шлюзу в секцию \"Окулус\"", "atl_dom_main_near_oculus");
		kh_vroom("К шлюзу в секцию \"Луна\"", "atl_dom_main_near_luna");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_s = room {
	nam = "Атлантида, Доминус, центральный зал, юг";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в южной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К восточной части", "atl_dom_main_e");
		kh_vroom("К юго-восточной части", "atl_dom_main_se");
		kh_vroom("К юго-западной части", "atl_dom_main_sw");
		kh_vroom("К западной части", "atl_dom_main_w");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_se = room {
	nam = "Атлантида, Доминус, центральный зал, юго-восток";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Вы находитесь в юго-восточной части секции. В этой части главного зала установлено несколько массивных колонн, поддерживающих куполообразный потолок зала. 
	]];
	way = {
		kh_vroom("К восточной части", "atl_dom_main_e");
		kh_vroom("К кабинету администратора", "atl_dom_main_near_adm");
		kh_vroom("К южной части", "atl_dom_main_s");
		kh_vroom("К центральной части", "atl_dom_main_c");
		kh_vroom("К шлюзу в секцию \"Арктос\"", "atl_dom_main_near_arctos");
		kh_vroom("К шлюзу в секцию \"Терра\"", "atl_dom_main_near_terra");
	};
	obj = {
		-- TODO добавить скамейки
	};
};

atl_dom_main_near_luna = room {
	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Луна\"";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Рядом с вами находится шлюз, ведущий в секцию "Луна". 
	]];
	way = {
		kh_vroom("К юго-западной части", "atl_dom_main_sw");
		kh_vroom("К шлюзу в секцию \"Окулус\"", "atl_dom_main_near_oculus");
		kh_vroom("В секцию \"Луна\"", "atl_intersection_luna_dom");
	};
	obj = {
		"atl_nih_panel_near_luna"
	};
};

atl_dom_main_near_oculus = room {
	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Окулус\"";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Рядом с вами находится шлюз, ведущий в секцию "Окулус". 
	]];
	way = {
		kh_vroom("К юго-западной части", "atl_dom_main_sw");
		kh_vroom("В секцию \"Окулус\"", "atl_intersection_oculus_dom");
		kh_vroom("К шлюзу в секцию \"Луна\"", "atl_dom_main_near_luna");
	};
	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_near_arctos");
		kh_vroom("К юго-восточной части", "atl_dom_main_se");
	};
	obj = {
		"atl_nih_boxes_near_terra"
	};
};

atl_dom_main_near_arctos = room {
	nam = "Атлантида, Доминус, центральный зал, у входа в секцию \"Арктос\"";
	dsc = [[
		Огромный круглый зал с куполообразным потолком. Потолок частично сделан из стекла, открывая прекрасный вид на водную толщу. Яркий свет электрических ламп освещает помещение. Рядом с вами находится шлюз, ведущий в секцию "Арктос". 
	]];
	way = {
		kh_vroom("К юго-восточной части", "atl_dom_main_se");
		kh_vroom("К шлюзу в секцию \"Терра\"", "atl_dom_main_near_oculus");
		kh_vroom("В секцию \"Арктос\"", "atl_intersection_arctos_dom");
	};
	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_intersection_arctos_dom = room {
	nam = "Атлантида, межсекционный коридор";
	dsc = [[
		Небольшой коридор, расположенный между секциями станции. Яркий свет электрических ламп освещает помещение. 
	]];
	way = {
		kh_vroom("В секцию \"Арктос\"", "atl_arctos_main_corridor");
		kh_vroom("В секцию \"Доминус\"", "atl_dom_main_near_arctos");
	};
	obj = {
		"atl_illuminators"
	};
};

atl_luna_main_corridor = room {
	nam = "Атлантида, Луна, главный коридор";
	dsc = [[
		Узкий длинный коридор. По обе его стороны расположены двери, ведущие в комнаты персонала. Яркий свет электрических ламп освещает помещение. 
	]];
	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 = [[
		Узкий длинный коридор. По обе его стороны расположены двери, ведущие в комнаты персонала. Яркий свет электрических ламп освещает помещение. 
	]];
	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_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()
			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
			return false;
		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",
		"char_xiao"
	};
};

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_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");
	};
};

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_hall";
			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;
};

atl_ignis_main_hall = room {
	nam = "Атлантида, Игнис, центральный зал";
	dsc = [[
		Огромный круглый зал. Свет в зале выключен и сквозь стеклянный купол, лишь в некоторых местах поддерживаемый металлическими конструкциями вы видите игру света на поверхности океана, проплывающих внизу, рядом и выше рыб. 
		В центре зала расположена шахта лифта, а вдоль стен расположены четыре шлюзовых двери, три из которых ведут в другие залы Игниса, а один - в служебное помещение. От лифтовой шахты к краям зала ведут четыре тропинки, а пространство между ними занято где-то стеллажами с различными предметами, где-то установлены столики с удобными стульями, скамейки. 
	]];
	way = {
		kh_vroom("В лифт", "atl_dom_lift");
		kh_vroom("В зал A", "atl_ignis_hall_a");
		kh_vroom("В зал B", function()
			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
			return false;
		end);
		kh_vroom("В зал C", function()
			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
			return false;
		end);
		kh_vroom("В служебное помещение", function()
			pr("Люк наглухо задраен. Вы не сможете его открыть. ");
			return false;
		end);
	};
};

atl_ignis_hall_a = room {
	nam = "Атлантида, Игнис, зал А";
	enter = function(s)
		if (ArrayUtils.indexOf(pl.party, 'wright') ~= 0) then
			if (where(char_jack_wright_atlantis) ~= atl_ignis_hall_a) then
				put('char_jack_wright_atlantis', 'atl_ignis_hall_a');
			end;
		end;
	end;
	dsc = [[
		Средних размеров прямоугольный зал. 
	]];
	obj = {
		"char_learr_atlantis";
		'atl_ignis_illuminator';
		'atl_ignis_screen';
		'atl_ignis_projector';
		'atl_ignis_lightswitch';
	};
};

atl_ignis_illuminator = obj {
	var {
		state = 1;
	};
	nam = "Иллюминатор";
	dsc = function(s)
		if (s.state == 1) then
			return [[
				Огромное панорамное {окно} открывает великолепный вид на океан вокруг.
			]];
		else
			return [[
				Огромное панорамное {окно} закрыто тяжелыми металлическими листами.
			]];
		end;
	end;
	act = function(s)
		if (s.state == 1) then
			s.state = 0;
			return [[
				Вы нажимаете на кнопку рядом с окном и металлические листы со скрежетом закрывают его, полностью блокируя проникновение света извне.
			]];
		else
			s.state = 1;
			return [[
				Вы нажимаете на кнопку рядом с окном и металлические листы со скрежетом отъезжают в стороны, открывая его.
			]];
		end;
	end;
};

atl_ignis_screen = obj {
	nam = "Экран";
	dsc = function(s)
		return [[
			Экран
		]];
	end;
};

atl_ignis_projector = obj {
	nam = "Проектор";
	dsc = function(s)
		return [[
			Проектор
		]];
	end;
};

atl_ignis_lightswitch = obj {
	nam = "Выключатель";
	dsc = function(s)
		return [[
			Выключатель
		]];
	end;
};

--[[
Персонажи
]]

char_darkstar = npc {
	nam = "Винсент Даркстар";
	dsc = [[
		{Начальник службы безопасности} сидит в кресле за столом и перебирает какие-то бумаги. Время от времени, он обращается по радио к подчиненным. 
	]];
	dlg = "char_darkstar_dlg";
};

char_darkstar_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Винсент Даркстар";
	disp = "Винсент Даркстар";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{0, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_moreau = npc {
	nam = "Фредерик Моро";
	dsc = [[
		{Начальник станции} сидит в кресле за столом и внимательно смотрит на вас. 
	]];
	dlg = "char_moreau_dlg";
};

char_moreau_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Фредерик Моро";
	disp = "Фредерик Моро";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{0, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_svetlova = npc {
	nam = "Екатерина Светлова";
	dsc = [[
		{Екатерина Светлова} сидит за столом. Перед ней лежат какие-то записи, в которых она периодически делает пометки карандашом. 
	]];
	dlg = "char_svetlova_dlg";
};

char_svetlova_dlg = dlg {
	var {
		state = 0;
		flag_help = false;
		flag_explain = false;
	};
	nam = "Екатерина Светлова";
	disp = "Екатерина Светлова";
	entered = function(s)
		if (s.state == 0) then
			psub('first_meeting');
			return [[
				Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: _"Добрый день. Должна признать, вы всех нас знатно напугали, господин Дрейк. Винсент сказал, что вы зайдете. Что ж, я думаю вы будете очень полезны станции. Правда Винсент и Моро решили вас пока к субмаринам не пускать, что несколько помешает моим планам на вас. Впрочем я попробую их уговорить - это будет полезно и нам и вам, как и мое предложение в целом -- я знаю, что вы ищете своего отца -- Даркстар мне и это сказал, -- а он последнее время занимался одной легендой -- он хотел найти первый город навьяров, или как-то так. К сожалению, когда он отправился в эту экспедицию, он почти не оставил нам материалов - все навьярские карты, переводы - они только у него и поэтому мы не можем проследовать за ним. ^
				Адриан его очень торопил, поэтому Уильям не успел толком даже план экспедиции для нас обрисовать"_. 
			]];
		elseif (s.state == 1) then
			psub('ryveerr_on_steal');
			return [[
				Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Ну как? Поговорили с Ривеерром?"
			]];
		else
			psub('generic');
			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;
	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;
			back(); 
		]]};
		{"Я прибыл сюда искать своего отца, а не решать проблемы полуразумных рыбней", [[
			Екатерина встает из-за стола, после чего садится обратно. Кажется, ваш комментарий ее серьезно разозлил. Затем она достает из ящика небольшой блестящий диск - примерно 10 сантиметров диаметром: "Эти полуразумные рыбни, как вы выразились, могут сделать вот такое". ^
			Вы берете из рук Екатерины диск и внимательно рассматриваете его. На первый взгляд ничего необычного - блестящий диск, бесполезное украшение. Вдоль внешней кромки его вы видите какие-то цветные полосы - очень ровно нанесенные, но в них вы тоже ничего необычного не видите. Светлова продолжает: "Посмотрите на него под микроскопом и вы поймете о чем я. Да, вы можете забрать его. Возможно это, как и то, о чем я вас прошу, поможет вам узнать где сейчас находится Уильям".
		]], code [[ put(item_navjiarr_disk, pl); ]]};
		{tag = "generic"};
		{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');]]};
		{"Я пойду", [[
			Светлова возвращается ко своим бумагам: "До встречи"
		]], code [[ back(); ]]};
		{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(); ]]};
	};
};

char_anna_atlantis = npc {
	nam = "Анна Рэдклифф";
	disp = "Анна Рэдклифф";
	dsc = [[
		{Анна Рэдклифф} стоит возле одного из столов, рассматривая какую-то схему. 
	]];
	dlg = "char_anna_atlantis_dlg";
};

char_anna_atlantis_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Анна Рэдклифф";
	disp = "Анна Рэдклифф";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{0, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_learr_atlantis = npc {
	var {
		offended = false;
	};
	nam = "Леарр";
	__where__ = 'atl_oculus_lab_c';
	dsc = function(s)
		-- TODO Описание Леарр меняется в зависимости от комнаты, где она находится
		return [[
			{Леарр} стоит, опершись одной рукой на стол. Другой рукой она активно жестикулирует, рассказывая что-то.
		]];
	end;
	dlg = "char_learr_atlantis_dlg";
};

char_learr_atlantis_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Леарр";
	disp = "Леарр";
	entered = function(s)
		if (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 (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 [[ atl_iyh_state = 6; back(); ]]};
		{"Лучше я отправлюсь один", [[
			"Нельзя-так. Священное-место-храм. Другие-yhe-na'vji'a'rr не-одобрят". 
		]]};
	};
};

char_aikerjarr = npc {
	nam = "Аикерьярр";
	dsc = function(s)
		return [[
			{Аикерьярр} неподвижно стоит у одного из столов. 
		]];
	end;
	dlg = "char_aikerjarr_dlg";
};

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 [[ atl_iyh_state = 6; back(); ]]};
	};
};

char_ryveerr = npc {
	nam = "Ривеерр";
	dsc = function(s)
		if (where(char_learr_atlantis) ~= atl_oculus_lab_c) then
			return [[
				{Ривеерр} что-то рассказывает. 
			]];
		else 
			return [[
				{Ривеерр} иногда прерывает рассказ Леарр, добавляя что-то. 
			]];
		end;
	end;
	dlg = "char_ryveerr_dlg";
};

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 = npc {
	nam = "Джинхэй Лун";
	dsc = function(s)
		-- TODO описание должно мелянться, если Леарр не здесь
		if (where(char_learr_atlantis) ~= atl_oculus_lab_c) then
			return [[
				{Джинхэй Лун} стоит рядом с блокнотом и делает записи по ходу рассказа навьяра. 
			]];
		else
			return [[
				{Джинхэй Лун} стоит рядом с блокнотом и делает записи по ходу рассказа навьяров. 
			]];
		end;
	end;
	dlg = "char_loong_dlg";
};

char_loong_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Джинхэй Лун";
	disp = "Джинхэй Лун";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{0, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_winterlight = npc {
	nam = "Сильвия Уинтерлайт";
	dsc = function(s)
		-- TODO описание должно мелянться, если Леарр не здесь
		if (where(char_learr_atlantis) ~= atl_oculus_lab_c) then
			return [[
				{Сильвия Уинтерлайт} внимательно слушает навьяра, иногда что-то спрашивая. 
			]];
		else
			return [[
				{Сильвия Уинтерлайт} внимательно слушает навьяров, иногда что-то спрашивая. 
			]];
		end;
	end;
	dlg = "char_winterlight_dlg";
};

char_winterlight_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Сильвия Уинтерлайт";
	disp = "Сильвия Уинтерлайт";
	entered = function(s)
		psub("generic");
		if (atl_iyh_state == 4) then
			pon("legend");
		end;
		return [[
			Сильвия оборачивается к вам: "Приветствую, что вы хотели?"
		]];
	end;
	phr = {
		{tag="generic"};
		{tag="legend", false, "Ты можешь рассказать мне навьярскую легенду о скате?", [[
			Сильвия кажется заинтересованной: "У навьяров их много, какую конкретно вы хотите услышать?"
		]], code [[ psub("which_legend"); ]]};
		{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 = 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_jack_wright_atlantis_dlg = dlg {
	var {
		state = 0;
	};
	nam = 'char_jack_wright_atlantis_dlg';
	entered = function(s)
		if (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 = npc {
	nam = "Майкл Райт";
	dsc = [[
		{Майкл Райт} просматривает какие-то чертежи. 
	]];
	dlg = "char_michael_wright_dlg";
};

char_michael_wright_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Майкл Райт";
	disp = "Майкл Райт";
	entered = function(s)
		psub("generic");
		if (atl_nih_state == 2) then
			pon('nih_fixed');
		end;
		return [[
			Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. Чем могу быть полезен?"
		]];
	end;
	phr = {
		{tag="generic"};
		{tag="nih_fixed", "Я нашел утечку", [[
			"Спасибо, я отправлю туда человека, чтобы он все поправил. Пока у меня больше нет для вас заданий". 
		]], code [[ atl_nih_state = 3; atl_rep_wright = atl_rep_wright + 1; ]]};
		{always=true, "Мне пора", function(s)
			if (atl_nih_state == 0 and not atl_jack_in_party) then
				atl_nih_init();
				pr([[ "Кстати, у меня есть для вас небольшое задание. У нас где-то утечка воздуха. Ничего критичного. Просто прогуляйтесь по станции и если обнаружите, где это - сообщите мне. До встречи", -- Майкл Райт возвращается к своим делам. ]]);
			else
				pr([[ "До встречи", -- Майкл Райт возвращается к своим делам. ]]);
			end;
		end, code [[ back(); ]]};
	};
};

char_legrand = npc {
	nam = "Мари Легран";
	dsc = [[
		{Мари Легран} стоит у верстака, рассматривая какую-то деталь. 
	]];
	dlg = "char_legrand_dlg";
};

char_legrand_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Мари Легран";
	disp = "Мари Легран";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{1, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_radcliffe_atlantis = npc {
	nam = "Уолтер Рэдклифф";
	dsc = [[
		{Уолтер Рэдклифф} стоит, навалившись на стену и рассматривает вас. 
	]];
	dlg = "char_radcliffe_atlantis_dlg";
};

char_radcliffe_atlantis_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Уолтер Рэдклифф";
	disp = "Уолтер Рэдклифф";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{1, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_xiao = npc {
	nam = "Вейюан Сяо";
	dsc = [[
		{Вейюан Сяо} работает за станком.  
	]];
	dlg = "char_xiao_dlg";
};

char_xiao_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Вейюан Сяо";
	disp = "Вейюан Сяо";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{1, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_leroy = npc {
	nam = "Мишель Леруа";
	dsc = [[
		{Мишель Леруа} что-то чертит. 
	]];
};

char_leroy_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Мишель Леруа";
	disp = "Мишель Леруа";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{0, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_atlantis_guards = npc {
	nam = "Охранники";
	dsc = [[
		Рядом с дверью в оружейную стоят два вооруженных {охранника}. 
	]];
	phr = {
		[[
			"Входа нет".
		]];
		[[
			"Вам сюда нельзя".
		]];
		[[
			"Начальник в соседнем кабинете".
		]];
	};
};

char_goldman = npc {
	nam = "Леонард Голдман";
	dsc = [[
		{Леонард Голдман} сидит на койке о чем-то раздумывая. 
	]];
	dlg = "char_goldman_dlg";
};

char_goldman_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Леонард Голдман";
	disp = "Леонард Голдман";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{0, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

char_jones = npc {
	nam = "Чарли Джонс";
	dsc = [[
		{Чарли Джонс} осматривает свой револьвер. 
	]];
	dlg = "char_jones_dlg";
};

char_jones_dlg = dlg {
	var {
		state = 0;
	};
	nam = "Леонард Голдман";
	disp = "Леонард Голдман";
	entered = function(s)
		return [[
			Временная затычка диалога
		]];
	end;
	phr = {
		{0, always=true, "Ну все, пока", "Прощай, смертный", code [[ back(); ]]};
	};
};

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;