games/Awakening Changeset - 037e19ceec23

Changeset - 037e19ceec23

Parent rev.

Child rev.

[Not reviewed]

default

0 3 0

Silverwing - 8 years ago 2017-02-11 15:39:16

More leviathan improvements

3 files changed with 23 insertions and 40 deletions:

leviathan.lua

utils.lua

wright.lua

0 comments (0 inline, 0 general)

leviathan.lua

➞

Show inline comments

@@ @@ -17,364 +17,364 @@ @@
 -- TODO персонажи не должны обсуждать личные темы по телефону, только при встрече
 submarine_leviathan = obj {
 	var {
 		hull_integrity = 100; -- Целостность корпуса
 		electric_integrity = 100; -- Целостность электросистем
 		torpedoes = 2; -- Количество заряженных торпед
 		suits = 2; -- Количество водолазных костюмов.
 		battery = false; -- Состояние батареи
 		circuit_breaks = 2; -- Разрывы цепи
 		valves_to_replace = 2; -- Количество клапанов, которые нужно заменить для полноценной работы
 		power_on = false; -- включена ли энергия
 		air_level = 0; -- запас воздуха. Максимум - 5 дней(5 * 24 * 60 * 60 = 432000)
 		airpump = false;
         refit = false;
 	};
 	nam = "submarine_leviathan";
 	disp = "Левиафан";
 	dsc = function(s)
         --[[
             atl_aqua_leviathan_dock
             iyh_far_from_entrance_foot
             ctt_iraa_city
             ctt_iraa_near_temple
             ctt_dyp_city
             ctt_dyp_temple_entrance
         ]]
         return [[Вы видите "{Левиафан}" - вашу субмарину. ]];
     end;
 	act = [[Несмотря на проведенные в бездействии годы, субмарина сейчас в отличном состоянии. Из иллюминаторов льется яркий свет. На борту виднеется слегка пошарпанная, но читаемая надпись "А04 - Левиафан" ]];
 };
 leviathan_airlock = darkroom {
 	nam = "leviathan_airlock";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, шлюз";
 	leviathan = true;
 	dsc_lit = "Шлюзовой отсек Левиафана представляет собой небольшую круглую камеру, около двух метров в диаметре. Отсек освещен ярким светом электрических ламп, смонтированных на стенах. ";
 	dsc_halflit = "Шлюзовой отсек Левиафана представляет собой небольшую круглую камеру, около двух метров в диаметре. В свете лампы вы различаете предметы окружения. На стенах смонтированы электрические лампы, однако они сейчас не горят. ";
 	dsc_dark = "Шлюзовой отсек Левиафана представляет собой небольшую круглую камеру, около двух метров в диаметре. Сейчас здесь темно и вы почти ничего не видите. ";
 	way = {
 		kh_vroom("В кают-компанию", function(s)
 			if (have(item_suit)) then
 				remove(item_suit, pl);
 			end;
 			return "leviathan_wardroom";
 		end, 1);
 		kh_vroom("В люк", function()
 			local val = EngineUtils.getValue(where(submarine_leviathan).no_exit);
 			if (val) then
 				pr(val);
 				return false;
 			else
 				if (where(submarine_leviathan).underwater) then
 					put(item_suit, pl);
 				elseif (have(item_suit)) then
 					remove(item_suit, pl);
 				end;
 				return where(submarine_leviathan);
 			end;
 		end, 2);
 	};
     obj = {
         "leviathan_suits",
         "leviathan_trapdoor"
     };
 };
 leviathan_suits = obj {
     nam = "leviathan_suits";
     dsc = "У стены стоят два {водолазных костюма}. ";
     act = "Костюмы для глубоководного погружения. ";
 };
 leviathan_trapdoor = obj {
     nam = "leviathan_trapdoor";
     dsc = "На потолке расположен люк, ведущий наружу субмарины. ";
 };
 leviathan_captains_cabin = darkroom {
     var {
         light_on = false;
     };
     has_light = function(s)
         return s.light_on and submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	nam = "leviathan_captains_cabin";
 	disp = "Левиафан, каюта капитана";
 	leviathan = true;
 	dsc_lit = [[Каюта капитана несколько больше остальных. Под потолком расположена элетрическая лампа, излучающая яркий свет. ]];
 	dsc_halflit = [[Вы находитесь в каюте, очевидно, предназначенной для капитана. Под потолком расположена элетрическая лампа, однако сейчас она не горит. Эта каюта немного больше остальных. В слабом свете лампы вы с трудом различаете очертания дверей и предметов. ]];
 	dsc_dark = [[Вы находитесь в одной из кают. В темноте вы не можете ничего различить. ]];
 	way = {
-		kh_vroom("В коридор", "leviathan_corridor", 0);
+		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
 	obj = {
 		"phone_cabin";
         "lev_capn_desk";
         "lev_capn_map";
         "lev_capn_chair";
         "lev_capn_bed";
         "lev_capn_view";
 	};
 };
 lev_capn_desk = obj {
     nam = "lev_capn_desk";
     dsc = [[У стены установлен небольшой стол с несколькими {ящиками}. ]];
     act = "Ящики пусты. ";
 };
 lev_capn_map = obj {
     nam = "lev_capn_map";
     dsc = [[Над столом висит {карта} Атлантического океана. ]];
     act = function(s)
         if atlantis_found then
             return [[Карта Атлантического океана, судя по маркировке, принадлежащая компании "Вестхейвен Трансоушен". На ней изображено несколько объектов, имеющих значение для компании и, в частности, Атлантида. ]];
         else
             atlantis_found = true;
             return [[Карта Атлантического океана, судя по маркировке, принадлежащая компании "Вестхейвен Трансоушен". Вы внимательно осматриваете карту в поисках чего-нибудь необычного. Ваше внимание привлекает отметка "Атлантида", сделанная посреди океана. К сожалению, никаких пояснений у вас нет и единственное, что вы можете сделать - это попытаться добраться до этой точки. ]];
         end;
     end;
 };
 lev_capn_chair = obj {
     nam = "lev_capn_chair";
     dsc = "Рядом со столом стоит {кресло}";
     act = "Капитанское кресло. Удобное. ";
 };
 lev_capn_bed = obj {
     nam = "lev_capn_bed";
     dsc = "У стены напротив стола расположена {койка}. ";
     act = "Мне сейчас некогда спать. ";
 };
 lev_capn_view = obj {
     nam = "lev_capn_view";
     dsc = "Напротив входа расположен {иллюминатор}. ";
     act = function(s)
         return here().view_left;
     end;
 };
 lev_capn_ls = obj {
     nam = "lev_capn_ls";
     dsc = function(s)
         if (here().light_on) then
             return "У входа находится {выключатель}, Сейчас он включен. ";
         else
             return "У входа находится {выключатель}, Сейчас он выключен. ";
         end;
     end;
     act = function(s)
         pr [[Вы переключаете выключатель. ]];
         if (here().light_on) then
             here().light_on = false;
             if (submarine_leviathan.power_on and submarine_leviathan.battery) then
                 pr [[Свет гаснет. ]];
             else
                 pr [[Ничего не происходит. ]];
             end;
         else
             here().light_on = true;
             if (submarine_leviathan.power_on and submarine_leviathan.battery) then
                 pr [[Свет зажигается. ]];
             else
                 pr [[Ничего не происходит. ]];
             end;
         end;
     end;
 };
 leviathan_cabin_1 = darkroom {
 	nam = "leviathan_cabin_1";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, каюта №1";
 	leviathan = true;
 	dsc_lit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, излучающая яркий свет. ]];
     dsc_halflit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, однако сейчас она не горит. В слабом свете лампы вы с трудом различаете очертания дверей и предметов.  ]];
     dsc_dark = [[В помещении темно и вы ничего не видите. ]];
 	way = {
-		kh_vroom("В коридор", "leviathan_corridor", 0);
+		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
     obj = {
         'lev_cab_table';
         'lev_cab_beds';
         'lev_cab_view';
     };
 };
 leviathan_cabin_2 = darkroom {
 	nam = "leviathan_cabin_2";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, каюта №2";
 	leviathan = true;
 	dsc_lit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, излучающая яркий свет. ]];
     dsc_halflit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, однако сейчас она не горит. В слабом свете лампы вы с трудом различаете очертания дверей и предметов.  ]];
     dsc_dark = [[В помещении темно и вы ничего не видите. ]];
 	way = {
-		kh_vroom("В коридор", "leviathan_corridor", 0);
+		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
     obj = {
         'lev_cab_table';
         'lev_cab_beds';
         'lev_cab_view';
     };
 };
 leviathan_cabin_3 = darkroom {
 	nam = "leviathan_cabin_3";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, каюта №3";
 	leviathan = true;
 	dsc_lit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, излучающая яркий свет. ]];
     dsc_halflit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, однако сейчас она не горит. В слабом свете лампы вы с трудом различаете очертания дверей и предметов.  ]];
     dsc_dark = [[В помещении темно и вы ничего не видите. ]];
 	way = {
-		kh_vroom("В коридор", "leviathan_corridor", 0);
+		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
     obj = {
         'lev_cab_table';
         'lev_cab_beds';
         'lev_cab_view';
     };
 };
 leviathan_cabin_4 = darkroom {
 	nam = "leviathan_cabin_4";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, каюта №4";
 	leviathan = true;
 	dsc_lit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, излучающая яркий свет. ]];
     dsc_halflit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, однако сейчас она не горит. В слабом свете лампы вы с трудом различаете очертания дверей и предметов.  ]];
     dsc_dark = [[В помещении темно и вы ничего не видите. ]];
 	way = {
-		kh_vroom("В коридор", "leviathan_corridor", 0);
+		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
     obj = {
         'lev_cab_table';
         'lev_cab_beds';
         'lev_cab_view';
     };
 };
 leviathan_cabin_5 = darkroom {
 	nam = "leviathan_cabin_5";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, каюта №5";
 	leviathan = true;
 	dsc_lit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, излучающая яркий свет. ]];
     dsc_halflit = [[Эта каюта ничем не отличается от других, расположенных по левому борту субмарины. Под потолком расположена электрическая лампа, однако сейчас она не горит. В слабом свете лампы вы с трудом различаете очертания дверей и предметов.  ]];
     dsc_dark = [[В помещении темно и вы ничего не видите. ]];
 	way = {
-		kh_vroom("В коридор", "leviathan_corridor", 0);
+		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
     obj = {
         'lev_cab_table';
         'lev_cab_beds';
         'lev_cab_view';
     };
 };
 lev_cab_table = obj {
     nam = "lev_cab_table";
     dsc = [[У стены рядом с иллюминатором расположен небольшой {столик}. ]];
     act = "Столик пуст. ";
 };
 lev_cab_beds = obj {
     nam = "lev_cab_beds";
     dsc = [[Напротив стола расположены две {койки} одна над другой. ]];
     act = "Мне сейчас некогда спать. ";
 };
 lev_cab_view = obj {
     nam = "lev_cab_view";
     dsc = "Напротив входа расположен {иллюминатор}. ";
     act = function(s)
         return here().view_left;
     end;
 };
 leviathan_corridor = darkroom {
 	nam = "leviathan_corridor";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, коридор";
 	leviathan = true;
 	dsc_lit = [[Длинный коридор со множеством дверей. По всей длине коридора на стенах расположены электрические лампы, излучающие яркий свет. ]];
 	dsc_halflit = [[Длинный темный коридор. В слабом свете лампы вы с трудом различаете очертания предметов и множества дверей. ]];
 	dsc_dark = [[Длинный темный коридор. в темноте вы почти ничего не видите. ]];
 	way = {
 		kh_vroom("В каюту капитана", "leviathan_captains_cabin", 1);
 		kh_vroom("В каюту №1", "leviathan_cabin_1", 1);
 		kh_vroom("В каюту №2", "leviathan_cabin_2", 1);
 		kh_vroom("В каюту №3", "leviathan_cabin_3", 1);
 		kh_vroom("В каюту №4", "leviathan_cabin_4", 1);
 		kh_vroom("В каюту №5", "leviathan_cabin_5", 1);
 		kh_vroom("В кают-компанию", "leviathan_wardroom", 1);
 		kh_vroom("В грузовой отсек", "leviathan_cargo_hold", 1);
 		kh_vroom("В машинный отсек", "leviathan_engines", 1);
 		kh_vroom("На нижнюю палубу", "leviathan_lower_deck", 1);
 	};
 	obj = {
 		'leviathan_corridor_wiring';
 	};
 };
 leviathan_cargo_hold = darkroom {
 	nam = "leviathan_cargo_hold";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, грузовой отсек";
 	leviathan = true;
 	dsc_lit = [[Грузовой отсек Левиафана погружен в кромешный мрак. Отсек практически пуст, не считая обломков, очевидно, оставшихся здесь с момента создания субмарины. Из электрических ламп, установленных на потолке, исходит яркий свет. ]];
 	dsc_halflit = [[Грузовой отсек Левиафана погружен в кромешный мрак. В свете лампы вы видите, что отсек практически пуст, не считая обломков, очевидно, оставшихся здесь с момента создания субмарины. ]];
 	dsc_dark = [[Грузовой отсек Левиафана погружен в кромешный мрак. ]];
 	way = {
 		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
 	obj = {
 		"leviathan_cargo_wiring";
 	};
 };
 leviathan_wardroom = darkroom {
 	nam = "leviathan_wardroom";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, кают-компания";
 	leviathan = true;
 	dsc_lit = [[В центре просторной кают-компании Левиафана укреплен массивный деревянный стол. Электрические лампы, укрепленные на потолке над столом и на стенах излучают яркий свет. ]];
 	dsc_halflit = [[В слабом свете лампы вы с трудом различаете очертания предметов. Судя по всему, вы находитесь в кают-компании. В центре установлен массивный стол, вокруг которого стоят несколько стульев. ]];
 	dsc_dark = [[Кают-компания погружена во мрак и вы совсем ничего не видите. ]];
 	way = {
 		kh_vroom("В рубку", "leviathan_wheelhouse", 1);
 		kh_vroom("В шлюз", "leviathan_airlock", 1);
 		kh_vroom("В коридор", "leviathan_corridor", 1);
 		kh_vroom("В грузовой отсек", "leviathan_cargo_hold", 1):disable();
 		kh_vroom("В машинный отсек", "leviathan_engines", 1):disable();
 	};
 	obj = {
 		"phone_wardroom";
 		"leviathan_wardroom_wiring";
 	};
 };
@@ @@ -387,382 +387,365 @@ leviathan_engines = darkroom { @@
 	leviathan = true;
 	dsc_lit = [[Вы стоите на небольшой металлической платформе посреди достаточно большого помещения. Вверху и внизу тянутся какие-то трубы. Слева и справа от вас расположены механизмы, приводящие субмарину в движение. Единственная лампа, расположенная над входом, дает достаточно света, чтобы можно было осмотреться. ]];
 	dsc_halflit = [[В слабом свете лампы вы с трудом различаете очертания предметов. Вы стоите на небольшой металлической платформе посреди достаточно большого помещения. Вверху и внизу тянутся какие-то трубы. Слева и справа от вас расположены механизмы, приводящие субмарину в движение. ]];
 	dsc_dark = [[Машинный отсек Левиафана погружен во мрак и вы совсем ничего не видите. ]];
 	-- Равномерный гул электрических двигателей сообщает о полной готовности субмарины.
 	way = {
 		kh_vroom("В коридор", "leviathan_corridor", 1);
 	};
 	obj = {
         'leviathan_battery';
 		'leviathan_breaker';
 		'leviathan_engineering_sensors';
 		'leviathan_engineering_wiring';
 	};
 };
 leviathan_engineering_sensors = obj {
 	nam = "leviathan_engineering_sensors";
 	dsc = [[Рядом с батареей расположена {панель} со множеством лампочек. ]];
 	act = function(s)
 		if (submarine_leviathan.battery) then
 			pr("На панели горят следующие лампочки: ");
 			pr("батарея работает");
 			if (submarine_leviathan.power_on) then
 				pr(", питание включено");
                 if (submarine_leviathan.airpump) then
                     pr(", воздушные насосы включены");
                 end;
                 if (submarine_leviathan.circuit_breaks > 0) then
                     pr(", разорвана цепь освещения");
                 end;
             end;
 			pr(". ");
 		else
 			p("На панели не горит ни одна лампочка. ");
 		end;
 	end;
 	seen_level = 1;
 };
 leviathan_battery = obj {
 	nam = "leviathan_battery";
 	dsc = function(s)
 		if (s.opened) then
 			return [[В дальнем конце помещения расположен {блок аккумуляторных батарей}. Крышка блока открыта и вы видите, что электроды подверглись сильной коррозии за долгое время неиспользования. ]];
 		else
 			return [[В дальнем конце помещения занимает {блок аккумуляторных батарей}. Крышка блока закрыта. ]];
 		end;
 	end;
 	act = function(s)
 		if (s.opened) then
 			s.opened = false;
 			return [[Вы возвращаете крышку блока батарей на место. ]];
 		else
 			if (not submarine_leviathan.battery) then
 				s.opened = true;
 				return [[Вы сдвигаете крышку блока батарей в сторону, получая доступ к ней. ]];
 			else
 				return [[Незачем это трогать. ]];
 			end;
 		end;
 	end;
 	used = function(s, o)
 		if (o == item_electrodes) then
 			remove(item_electrodes, pl);
 			submarine_leviathan.battery = true;
 			s.opened = false;
 			return [[Вы заменяете электроды. Теперь аккумулятор готов к работе. Вы возвращаете крышку блока батарей на место. ]];
 		else
 			return false;
 		end;
 	end;
 	seen_level = 1;
 	opened = false;
 };
 leviathan_breaker = obj {
 	nam = "leviathan_breaker";
 	dsc = function(s)
 		if (submarine_leviathan.power_on) then
 			return [[Рядом с батареей укреплен {рубильник}. Сейчас он включен. ]];
 		else
 			return [[Рядом с батареей укреплен {рубильник}. Сейчас он выключен. ]];
 		end;
 	end;
 	act = function(s)
 		if (submarine_leviathan.power_on) then
 			submarine_leviathan.power_on = false;
 			-- TODO включать свет по всему Левиафану, если восстановлены разрывы цепи и установлена батарея
 			-- TODO включать двигатель если установлена батарея
 			pr([[Вы выключаете рубильник. ]]);
 		else
 			submarine_leviathan.power_on = true;
 			-- TODO включать двигатель если установлена батарея
 			pr([[Вы включаете рубильник. ]]);
 			if (submarine_leviathan.battery and submarine_leviathan.circuit_breaks == 0) then
 				leviathan_airlock.has_light = true;
 				leviathan_wardroom.has_light = true;
 				leviathan_wheelhouse.has_light = true;
 				leviathan_corridor.has_light = true;
 				leviathan_cabin_1.has_light = true;
 				leviathan_cabin_2.has_light = true;
 				leviathan_cabin_3.has_light = true;
 				leviathan_cabin_4.has_light = true;
 				leviathan_cabin_5.has_light = true;
 				leviathan_captains_cabin.has_light = true;
 				leviathan_cargo_hold.has_light = true;
 				leviathan_engines.has_light = true;
 				leviathan_lower_deck.has_light = true;
 				leviathan_life_support.has_light = true;
 				pr([[Повсюда зажигается яркий свет, на мгновение ослепляя вас. ]]);
 				pr([[Повсюду зажигается яркий свет, на мгновение ослепляя вас. ]]);
 			end;
 		end;
 	end;
 	seen_level = 1;
 };
 leviathan_lower_deck = darkroom {
 	nam = "leviathan_lower_deck";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, нижняя палуба";
 	leviathan = true;
 	dsc_lit = [[Большой отсек на нижней палубе Левиафана освещен электрическими лампами, укрепленными на стенах. Повсюду раскиданы неизвестно откуда взявшиеся обломки металла. В передней части помещения вы видите несколько отверстий для зарядки торпедных аппаратов. ]];
 	dsc_halflit = [[Большой отсек на нижней палубе Левиафана слабо освещен вашей лампой. Повсюду раскиданы неизвестно откуда взявшиеся обломки металла. В передней части помещения вы видите несколько отверстий для зарядки торпедных аппаратов. ]];
 	dsc_dark = [[На нижней палубе Левиафана темно и вы совсем ничего не видите. ]];
 	way = {
 		kh_vroom("В коридор", "leviathan_corridor", 1);
 		kh_vroom("К системе жизнеобеспечения", "leviathan_life_support", 1);
 	};
 	obj = {
 		"leviathan_lower_wiring";
 	};
 };
 leviathan_life_support = darkroom {
 	nam = "leviathan_life_support";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, система жизнеобеспечения";
 	leviathan = true;
 	dsc_lit = [[Электрическая лампа освещает важнейший отсек корабля. Здесь расположено все необходимое для обеспечения команды воздухом для дыхания в течение нескольких месяцев. ]];
 	dsc_halflit = [[Слабый свет лампы освещает важнейший отсек корабля. Здесь расположено все необходимое для обеспечения команды воздухом для дыхания в течение нескольких месяцев. ]];
 	dsc_dark = [[Отсек погружен во мрак и вы не видите совсем ничего. ]];
 	way = {
 		kh_vroom("Назад", "leviathan_lower_deck", 1);
 	};
 	obj = {
 		'leviathan_airtanks';
 		'leviathan_airregen';
 		"leviathan_life_wiring";
 	};
 };
 leviathan_airtanks = obj {
 	nam = "leviathan_airtanks";
 	dsc = function(s)
 		local percent = submarine_leviathan.air_level / 432000 * 100;
 		if (percent < 1) then
 			return [[Большую часть помещения занимают {кислородные баллоны}. Толстые стенки из прочного сплава способны выдержать огромное давление. Судя по показаниям приборов, баллоны пусты. ]]
 		else
 			return [[Большую часть помещения занимают {кислородные баллоны}. Толстые стенки из прочного сплава способны выдержать огромное давление. Судя по показаниям приборов, баллоны заполнены на ]] .. tostring(math.floor(percent + 0.5)) .. "%. ";
 		end;
 	end;
 	seen_level = 1;
 };
 leviathan_airregen = obj {
 	nam = "leviathan_airregen";
 	dsc = [[{Установка регенерации воздуха} сейчас находится в плачевном состоянии - часть деталей отсутствуют, еще некоторые поломаны. ]];
 	seen_level = 1;
 };
 leviathan_wheelhouse = darkroom {
 	nam = "leviathan_wheelhouse";
     has_light = function(s)
         return submarine_leviathan.power_on and submarine_leviathan.battery;
     end;
 	disp = "Левиафан, рубка";
 	leviathan = true;
 	dsc_lit = function(s)
 		local view = "";
 		if (type(where(submarine_leviathan).view) == "function") then
 			view = where(submarine_leviathan):view();
 		else
 			view = where(submarine_leviathan).view;
 		end;
 		return [[Небольшое помещение в передней части субмарины освещено ярким светом электрических ламп. Через три огромных иллюминатора вы можете увидеть происходящее снаружи субмарины. ]] .. (view);
 	end;
 	dsc_halflit = function(s)
 		local view = "";
 		if (type(where(submarine_leviathan).view) == "function") then
 			view = where(submarine_leviathan):view();
 		else
 			view = where(submarine_leviathan).view;
 		end;
 		return [[Небольшое помещение в передней части субмарины освещено слабым светом вашей лампы. Через три огромных иллюминатора вы можете увидеть происходящее снаружи субмарины. ]] .. (view);
 	end;
 	dsc_dark = function(s)
 		local view = "";
 		if (type(where(submarine_leviathan).view) == "function") then
 			view = where(submarine_leviathan):view();
 		else
 			view = where(submarine_leviathan).view;
 		end;
 		return [[Небольшое помещение в передней части субмарины не освещено. В темноте вы ничего не можете разглядеть. Через три огромных иллюминатора вы можете увидеть происходящее снаружи субмарины. ]] .. (view);
 	end;
 	way = {
 		kh_vroom("В кают-компанию", "leviathan_wardroom", 2);
 	};
 	obj = {
 		'leviathan_handwheel';
 		'leviathan_airpump_control';
 		'leviathan_controls';
 		'leviathan_wheelhouse_sensors';
 		"leviathan_wheelhouse_wiring";
 	};
 };
 leviathan_controls = obj {nam = '1'}
 leviathan_handwheel = obj {
 	nam = "leviathan_handwheel";
 	dsc = [[Перед вами расположен {штурвал}. Рядом с ним расположено несколько рычагов. ]];
 	act = function(s)
 		if (atlantis_found and submarine_leviathan.air_level > 400000 and submarine_leviathan.circuit_breaks == 0 and submarine_leviathan.power_on) then
 			--walkin("demo_end");
 			local dlg = EngineUtils.getValue(where(submarine_leviathan).handwheel_room);
 			if (dlg) then
 				walkin(dlg);
 			else
 				walkin('leviathan_dlg');
 			end;
 		elseif (not submarine_leviathan.power_on) then
 			return [[Без электричества _"Левиафан"_ не сдвинется с места. ]];
 		elseif (not atlantis_found) then
 			return [[Вы не знаете, куда плыть. ]];
 		elseif (submarine_leviathan.air_level <= 400000) then
 			return [[Без воздуха вы далеко не уплывете. ]];
 		elseif (submarine_leviathan.circuit_breaks > 0) then
 			return [[В темноте вы не можете управлять кораблем. ]];
 		end;
 	end;
 };
 leviathan_airpump_control = obj {
 	nam = "leviathan_airpump_control";
 	dsc = function(s)
 		if (submarine_leviathan.airpump) then
 			return [[Один из них отвечает за управление {воздушными насосами} и находится сейчас во включенном состоянии. ]];
 		else
 			return [[Один из них отвечает за управление {воздушными насосами} и находится сейчас в выключенном состоянии.  ]];
 		end;
 	end;
 	act = function(s)
 		if (submarine_leviathan.airpump) then
 			submarine_leviathan.airpump = false;
 			return [[Вы выключаете воздушные насосы. ]];
 		else
 			lifeon(s);
 			submarine_leviathan.airpump = true;
 			return [[Вы включаете воздушные насосы. ]];
 		end;
 	end;
 	life = function(s)
 		if (submarine_leviathan.power_on) then
 			if (submarine_leviathan.airpump and submarine_leviathan.battery) then
 				submarine_leviathan.air_level = submarine_leviathan.air_level + 250;
 				if (submarine_leviathan.air_level > 432000) then submarine_leviathan.air_level = 432000;
 				pr([[Вы слышите гул работающих насосов. ]]);
 				end;
 			end;
 		end;
 		if (submarine_leviathan.power_on and submarine_leviathan.airpump and submarine_leviathan.battery) then
             submarine_leviathan.air_level = submarine_leviathan.air_level + 4000;
             if (submarine_leviathan.air_level > 432000) then
                 submarine_leviathan.air_level = 432000;
                 lifeoff(s);
             end;
             if (here().leviathan) then
                 pr([[Вы слышите гул работающих насосов. ]]);
             end;
         end;
 	end;
 	seen_level = 1;
 };
 leviathan_controls = obj {
 	nam = "leviathan_controls";
 	dsc = [[Остальные {рычаги} используются для управления движением субмарины. ]];
 	seen_level = 1;
 };
 leviathan_wheelhouse_sensors = obj {
 	nam = "leviathan_wheelhouse_sensors";
 	dsc = [[Чуть ниже рычагов находится небольшая {панель} с лампочками и стрелками каких-то приборов. ]];
 	act = function(s)
 		if (submarine_leviathan.battery) then
 			pr("На панели горят следующие лампочки: ");
 			pr("батарея работает");
 			if (submarine_leviathan.power_on) then
 				pr(", питание включено");
 			end;
 			if (submarine_leviathan.airpump) then
 				pr(", воздушные насосы включены");
 			end;
 			if (submarine_leviathan.circuit_breaks > 0) then
 				pr(", разорвана цепь освещения");
 			end;
 			pr(". ");
 		else
 			pr("На панели не горит ни одна лампочка. ");
 		end;
 		local percent = submarine_leviathan.air_level / 432000 * 100;
 		pr ([[
 			Кислородные баллоны заполнены на
 		]] .. tostring(math.floor(percent + 0.5)) .. "%. ");
 	end;
 	seen_level = 1;
 };
 leviathan_wiring_dsc = [[Под потолком висят какие-то {провода}. ]];
 leviathan_wiring_act = function(s)
 	if (submarine_leviathan.power_on and submarine_leviathan.battery) then
 		return [[Возможно, лучше отключить электричество, прежде чем копаться в проводах. ]];
 	end;
 	if (s.state == 0) then
 		return [[Некоторые провода разорваны. ]];
 	elseif (s.state == 1) then
 		return [[Некоторые провода перемотаны изолентой. ]];
 	else
 		return [[Провода в порядке. ]];
 	end;
 end;
 leviathan_wiring_used = function(s, o)
 	if (submarine_leviathan.power_on and submarine_leviathan.battery) then
 		return [[Возможно, лучше отключить электричество, прежде чем копаться в проводах. ]];
 	end;
 	if (o == item_ducttape and s.state == 0) then
 		s.state = 1;
 		submarine_leviathan.circuit_breaks = submarine_leviathan.circuit_breaks - 1;
 		if (submarine_leviathan.circuit_breaks == 0) then
 			for i = 1, #leviathan_wiring do
 				leviathan_wiring[i]:disable();
 				-- TODO если игрок ТУП pr("Скорее всего, это был последний разрыв. Можно проверять. ");
 			end;
 		end;
 		return [[Вы соединяете провода и заматываете их изолентой. ]];
 	end;
 end;
 leviathan_wheelhouse_wiring = obj {
     var {
         state = 2;
     };
 	nam = "leviathan_wheelhouse_wiring";
 	dsc = leviathan_wiring_dsc;
 	act = leviathan_wiring_act;
 	used = leviathan_wiring_used;
 	seen_level = 1;
 };
 leviathan_wardroom_wiring = obj {
     var {
         state = 2;
     };
 	nam = "leviathan_wardroom_wiring";
 	dsc = leviathan_wiring_dsc;
 	act = leviathan_wiring_act;
 	used = leviathan_wiring_used;
 	seen_level = 1;
 };
 leviathan_engineering_wiring = obj {
     var {
         state = 2;
     };
 	nam = "leviathan_engineering_wiring";
 	dsc = leviathan_wiring_dsc;
 	act = leviathan_wiring_act;
  	used = leviathan_wiring_used;
 	seen_level = 1;
 };
 leviathan_cargo_wiring = obj {
     var {
         state = 2;

utils.lua

➞

Show inline comments

@@ @@ -428,224 +428,220 @@ end; @@
 _kh_input2 = obj {
     nam = "_kh_input2";
     dsc = "{2}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "2";
         end;
         return "";
     end;
 };
 _kh_input3 = obj {
     nam = "_kh_input3";
     dsc = "{3}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "3";
         end;
         return "";
     end;
 };
 _kh_input4 = obj {
     nam = "_kh_input4";
     dsc = "{4}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "4";
         end;
         return "";
     end;
 };
 _kh_input5 = obj {
     nam = "_kh_input5";
     dsc = "{5}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "5";
         end;
         return "";
     end;
 };
 _kh_input6 = obj {
     nam = "_kh_input6";
     dsc = "{6}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "6";
         end;
         return "";
     end;
 };
 _kh_input7 = obj {
     nam = "_kh_input7";
     dsc = "{7}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "7";
         end;
         return "";
     end;
 };
 _kh_input8 = obj {
     nam = "_kh_input8";
     dsc = "{8}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "8";
         end;
         return "";
     end;
 };
 _kh_input9 = obj {
     nam = "_kh_input9";
     dsc = "{9}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "9";
         end;
         return "";
     end;
 };
 _kh_input0 = obj {
     nam = "_kh_input0";
     dsc = "{0}";
     act = function(s)
         if (here().input:len() < here().maxlen) then
             here().input = here().input .. "0";
         end;
         return "";
     end;
 };
 _kh_backspace = obj {
     nam = "_kh_back";
     dsc = "{Стереть}";
     act = function(s)
         if (here().input:len() > 0) then
             here().input = here().input:sub(1, here().input:len() - 1);
         end;
         return "";
     end;
 };
 _kh_cancel = obj {
     nam = "_kh_cancel";
     dsc = "{Отмена}";
     act = function(s)
         back();
         return "";
     end;
 };
 _kh_enter = obj {
     nam = "_kh_enter";
     dsc = "{Ввод}";
     act = function(s)
         if (here().input) then
             here():check(here().input);
         end;
         return "";
     end;
 };
 --[[
 	Создает obj, который добавляет другой obj на сцену при активации и становится неинтерактивным
 	nam - имя объекта
 	dsc_a - описание до активации
 	dsc_b - описание после активации
 	act_a - описание взаимодействия до активации
 	act_b - описание взаимодействия после активации
 	o2 - obj, добавляемый на сцену
 	r - удаляет объект после активации
 ]]
 function obscured_obj(nam, dsc_a, act_a, o2, r, dsc_b, act_b)
 	return obj {
 		var {
 			activated = false;
 		};
 		nam = nam;
 		dsc = function(s)
 			if (s.activated) then
 				return dsc_b;
 			else
 				return dsc_a;
 			end;
 		end;
 		act = function(s)
 			if (s.activated) then
 				return act_b;
 			else
 				s.activated = true;
 				put(o2, here());
 				if (r) then
 					remove(r, here());
 				end;
 				return act_a;
 			end;
 		end;
 	};
 end;
 _atlantis_suit_menu = dlg {
 	nam = "Скафандр";
 	_item = nil;
 	dsc = [[
 		Что вы хотите сделать?
 	]];
 	phr = {
 		{1, always = "true", "Использовать рацию", function(s)
 			local val = EngineUtils.getValue(_atlantis.suit_menu._item.dlg, _atlantis.suit_menu._item);
 			if (val) then
 				walkin(val);
 				stead.ref(val).__from__ = _atlantis.suit_menu.__from__;
 			else
 				back();
 				return "Никто не отвечает";
 			end;
 		end};
 		{2, always = "true", "Снять скафандр", function(s)
 			if (EngineUtils.getValue(_atlantis_suit_menu._item.cantakeoff, _atlantis_suit_menu._item)) then
 				drop(_atlantis._uit_menu._item);
 				back();
 				return "Вы снимаете скафандр";
 			else
 				back();
 				return "Вы не можете снять скафандр сейчас";
 			end;
 		end};
 		{3, always = "true", "Отмена", function(s)
 			back();
 			return "";
 		end};
 	};
 };
 _atlantis = {
 	suit_inv = function(s)
 		_atlantis_suit_menu._item = s;
 		walkin(_atlantis_suit_menu);
 	end;
 };
 suit = function(tab)
 	if (not tab.inv) then
 		tab.inv = _atlantis.suit_inv;
 	end;
 	return obj(tab);
 end;
 labyrinth = function(tab)
     local enter = tab.enter;
     local exit = tab.exit;
     local dsc = tab.dsc;
     local lab;

wright.lua

➞

Show inline comments

 --[[
 Здесь игрок получает адреса всех ключевых локаций первой части
 ]]
 door_wright = obj {
     var {
         locked = true;
     };
 	nam = "door_wright";
 	disp = "Дверь";
 	act = function(s)
 		if (s.locked) then
 			walkin "wright_entry_dlg";
 		end;
 		return true;
 	end;
 	dsc = function(s)
 		if (s.locked) then
 			return [[Обшарпанная деревянная {дверь}, ведущая в дом, заперта изнутри. ]];
 		else
 			return [[Обшарпанная деревянная {дверь}, ведущая в дом, незаперта. ]];
 		end;
 	end;
 };
 char_wright_home = obj {
     var {
         known = false;
         documents = false;
         known_leviathan = false;
     };
 	nam = "char_wright_home";
 	disp = "Джек Райт";
 	dsc = function(s)
 		if (s.documents) then
 			return [[За столом сидит {Джек Райт} и с интересом рассматривает схемы, которые вы ему отдали. ]];
 		else
             if (s.known) then
                 return [[За столом сидит {Джек Райт}, неспешно просматривая какие-то бумаги. ]];
             else
 			    return [[За столом сидит {молодой человек}, неспешно просматривающий какие-то бумаги. ]];
             end;
 		end;
 	end;
 	act = function(s)
 		walkin(wright_dlg);
 	end;
 };
 wright_dlg = dlg {
     var {
         state = 1;
     };
 	nam = "wright_dlg";
 	disp = "Джек Райт";
 	entered = function(s)
         if (submarine_leviathan.power_on and submarine_leviathan.airpump and submarine_leviathan.battery and submarine_leviathan.air_level < 432000) then
             submarine_leviathan.air_level = 432000;
             lifeoff(s);
         end;
 		if (atlantis_found and submarine_leviathan.air_level > 400000 and submarine_leviathan.circuit_breaks == 0 and submarine_leviathan.power_on) then
 			psub('leviathan_restored');
 			return [[Джек Райт отвлекается от газеты: "Добрый день". ]];
 		elseif (s.state == 1) then
 			--First meeting
             char_wright_home.known = true;
 			psub('first_visit');
 			return [[Перед вами молодой человек, одетый в недорогой, но опрятный костюм. Его бледное лицо украшает короткая темная борода и пышные усы. Темные волосы коротко острижены. Серые глаза с интересом разглядывают вас. Он протягивает вам руку и представляется: "Добрый день. Мое имя -- Джек Райт. Майкл -- мой отец, но он пропал несколько лет назад". ]];
 		elseif (s.state == 2) then
 			--Documents not given
 			psub('ask_documents');
 			return [[Джек отвлекается от газеты: "Добрый день. Вы обещали принести какие-то документы". ]];
 		elseif (s.state == 3) then
 			--Documents given
 			if (not leviathan_discovered) then
 				psub('checking_documents');
 				return [[Джек отвлекается от документов: "Добрый день. Если вы по поводу документов, то я еще ничего не нашел". ]];
 			else
 				s.state = 5;
 				warehouse32_found = true;
 				psub('warehouse_discovered');
 				return [[Джек отвлекается от документов: "Добрый день. У меня хорошие новости. Я нашел склад 32", - он достает карту города и показывает вам место. ]];
 			end;
 		elseif (s.state == 4) then
 			--Documents taken back
 			psub('ask_documents2');
 			return [[Джек отвлекается от газеты: "Добрый день. Я хотел бы еще раз вглянуть на эти бумаги". ]];
 		elseif (s.state == 5) then
 			psub('warehouse_discovered2');
             poff("phr_warehouse_visited");
             poff("phr_leviathan");
             if (warehouse32_visited) then
                 pon("phr_warehouse_visited");
             end;
             if (not char_wright_home.known_leviathan) then
                 pon("phr_leviathan");
             end;
 			return [[Джек отвлекается от газеты: "Добрый день". ]];
 		elseif (s.state == 7) then
 			psub('warehouse_discovered3');
 			return [[Джек отвлекается от газеты: "Добрый день". ]];
 		end;
 	end;
 	phr = {
 		{tag='first_visit'};
 		{"Мое имя -- Дэвид Дрейк. Мне удалось найти кое-какие документы в одном из тайников отца. Этот адрес был среди них. Вы что-то знаете о судьбе моего отца? ", [[Джек вздыхает: "Это бесполезно. Я изучил практически все, до чего сумел дотянуться - газеты, судебные дела. И ничего - никаких зацепок. Компания обанкротилась, руководители пропали". ]], code [[wright_dlg.state = 2; psub('ask_documents'); ]]};
 		{tag='ask_documents'};
 		{always = true, "[Отдать документы]Посмотрите это. Не думаю, что вы это видели. ", [[Джек нехотя забирает бумаги из ваших рук и бегло их осматривает. Пожимая плечами, он комментирует: "Ничего интересного, просто планы старых зданий. Док 2? Отец там часто бывал, впрочем не думаю, что после 10 лет там что-то осталось. Если хотите - можете оставить документы, я попробую разузнать побольше". ]], code [[
 			dock_found = true;
 			wright_dlg.state = 3;
 			remove(item_charts, pl);
 			psub("checking_documents");
 		]]};
 		{always = true, "У меня есть несколько вопросов. ", [[Джек кивает: "Чем смогу - помогу". ]], code [[psub('questions')]]};
 		{always = true, "Я вернусь позже. ", [[ Джек возвращается к своим делам: "До встречи". ]], code [[ back(); ]]};
 		{tag='checking_documents'};
 		{always = true, "Вы можете вернуть мне бумаги? ", [["Конечно. Если принесете их снова -- я возобновлю поиски", - Джек возвращает вам документы. ]], code [[
 			wright_dlg.state = 4;
 			put(item_charts, pl);
 			back();
 		]]};
 		{always = true, "У меня есть несколько вопросов. ", [[Джек кивает: "Чем смогу - помогу". ]], code [[psub('questions')]]};
 		{always = true, "Я вернусь позже. ", [[Джек возвращается к своим делам: "До встречи". ]], code [[ back(); ]]};
 		{tag='questions'};
 		{"Чем ваш отец занимался в Вестхейвен Трансоушен? ", [["Частично", - Джек показывает на картину на стене: "Он проектировал корабли, был главным инженером. Перед тем, как исчезнуть, он часто запирался в этом кабинете, подолгу что-то чертил. До глубокой ночи книги читал... Никаких материалов он не оставил. Он, вообще, очень ответственно относился к этому - никто никогда не знал, чем конкретно он занимается, кроме его подчиненных и вашего отца". ]]};
 		{always = true, "Вернемся к делу. ", [[Джек кивает: "Хорошо". ]], code [[ pret(); ]]};
 		{tag='ask_documents2'};
 		{always = true, "[Отдать документы]Вот документы. ", [[Джек забирает бумаги и раскладывает их на своем столе: "Спасибо, я посмотрю, что смогу найти". ]], code[[ wright_dlg.state = 3; remove(item_charts, pl); back(); ]]};
 		{always = true, "У меня есть несколько вопросов. ", [[Джек кивает: "Чем смогу - помогу". ]], code [[psub('questions')]]};
 		{always = true, "Я вернусь позже. ", [[Джек возвращается к своим делам: "До встречи". ]], code [[ back(); ]]};
 		{tag='warehouse_discovered'};
 		{"[Рассказать о Левиафане]Я кое-что нашел в доке...", [[Джек мгновенно вскакивает со стула, восклицая: "Ничего себе, я должен это видеть!" ]], code [[
             char_wright_home.known_leviathan = true;
             rel_jack = rel_jack + 1;
             walkin('wright_leviathan_cutscene1');
         ]]};
 		{always = true, "Отлично, я съезжу туда и посмотрю, что удастся найти. ", [[Джек возвращается к своим делам: "До встречи". ]], code [[ back(); ]]};
 		{tag='warehouse_discovered2'};
         {tag="phr_leviathan", "[Рассказать о Левиафане]Я кое-что нашел в доке...", [[Джек мгновенно вскакивает со стула, восклицая: "Ничего себе, я должен это видеть!" ]], code [[
             char_wright_home.known_leviathan = true;
             rel_jack = rel_jack + 1;
             walkin('wright_leviathan_cutscene1');
         ]]};
 		{tag="phr_warehouse_visited", always = true, "На склад мне попасть не удалось. ", function(s)
             if (char_wright_home.known_leviathan) then
                 psub("warehouse_break_in");
                 return [[Джек с досадой стучит по столу: "Черт! "^ Еще пару минут он задумчиво сидит в кресле, после чего предлагает идею: "Мы можем попробовать проникнуть туда тайком. Я довезу вас туда, но внутри все делать придется вам". ]]
             else
                 psub('warehouse_break_in_reluctant');
                 return [[Джек вздыхает: "Ну вот и все. Боюсь, больше мы ничего не узнаем". ]];
             end;
         end};
 		{always = true, "Я вернусь позже. ", [[Джек возвращается к своим делам: "До встречи". ]], code [[ back(); ]]};
 		{tag='warehouse_break_in'};
 		{always = true, "Надо попробовать. ", [["Хорошо", - отвечает Джек. Приготовления занимают все время до вечера. Наконец, после наступления темноты, вы садитесь в повозку и Джек привозит вас к складу 32. ]], code [[ walk('warehouse_32_night'); ]]};
 		{always = true, "Лучше не стоит. ", [[Джек разочарованно отвечает: "Очень жаль". ]], code [[ pret(); ]]};

0 comments (0 inline, 0 general)