File diff 371428971e23 → c97551e53eab
party.lua
Show inline comments
 
@@ -6,6 +6,28 @@ char_learr = obj {
 
			{Леарр} ждет ваших указаний ^
 
		]];
 
	end;
 
	home = "leviathan_wardroom";
 
	accompany = function(s, value)
 
		if (value) then
 
			lifeon(s);
 
		else
 
			move(s, s.home, where(s));
 
			lifeoff(s);
 
		end;
 
	end;
 
	life = function(s)
 
		print("learr");
 
		if (where(pl).leviathan) then
 
			print("learr:leviathan");
 
			if (stead.nameof(where(s)) ~= s.home) then
 
				print("learr:goinghome");
 
				move(s, s.home, where(s));
 
			end;
 
		else
 
			print("learr:following");
 
			move(s, where(pl), where(s));
 
		end;
 
	end;
 
	act = function(s)
 
		walkin(learr_dlg);
 
	end;
 
@@ -19,6 +41,24 @@ char_phaetlarr = obj {
 
			{Фаэтларр} ждет ваших указаний ^
 
		]];
 
	end;
 
	home = "leviathan_engines";
 
	accompany = function(s, value)
 
		if (value) then
 
			lifeon(s);
 
		else
 
			move(s, s.home, where(s));
 
			lifeoff(s);
 
		end;
 
	end;
 
	life = function(s)
 
		if (where(pl).leviathan) then
 
			if (stead.nameof(where(s)) ~= s.home) then
 
				move(s, s.home, where(s));
 
			end;
 
		else
 
			move(s, where(pl), where(s));
 
		end;
 
	end;
 
	act = function(s)
 
		walkin(phaetlarr_dlg);
 
	end;
 
@@ -32,6 +72,24 @@ char_radcliffe = obj {
 
			{Уолтер Рэдклифф} ждет ваших указаний ^
 
		]];
 
	end;
 
	home = "leviathan_engines";
 
	accompany = function(s, value)
 
		if (value) then
 
			lifeon(s);
 
		else
 
			move(s, s.home, where(s));
 
			lifeoff(s);
 
		end;
 
	end;
 
	life = function(s)
 
		if (where(pl).leviathan) then
 
			if (stead.nameof(where(s)) ~= s.home) then
 
				move(s, s.home, where(s));
 
			end;
 
		else
 
			move(s, where(pl), where(s));
 
		end;
 
	end;
 
	act = function(s)
 
		walkin(radcliffe_dlg);
 
	end;
 
@@ -45,6 +103,28 @@ char_wright = obj {
 
			{Джек Райт} ждет ваших указаний ^
 
		]];
 
	end;
 
	home = "leviathan_wardroom";
 
	accompany = function(s, value)
 
		if (value) then
 
			lifeon(s);
 
		else
 
			move(s, s.home, where(s));
 
			lifeoff(s);
 
		end;
 
	end;
 
	life = function(s)
 
		print("wright");
 
		if (where(pl).leviathan) then
 
			print("wright:leviathan");
 
			if (stead.nameof(where(s)) ~= s.home) then
 
				print("wright:goinghome");
 
				move(s, s.home, where(s));
 
			end;
 
		else
 
			print("wright:following");
 
			move(s, where(pl), where(s));
 
		end;
 
	end;
 
	act = function(s)
 
		walkin(wright_dlg);
 
	end;
 
@@ -62,10 +142,10 @@ learr_dlg = dlg {
 
	phr = {
 
		{ tag = "join", always = "true", "Я хочу, чтобы ты пошла со мной в следующий раз", "Хорошо", 
 
			function()
 
				char_learr.accompany = true;
 
				char_phaetlarr.accompany = false;
 
				char_radcliffe.accompany = false;
 
				char_wright.accompany = false;
 
				char_learr.accompany(char_learr, true);
 
				char_phaetlarr.accompany(char_phaetlarr, false);
 
				char_radcliffe.accompany(char_radcliffe, false);
 
				char_wright.accompany(char_wright, false);
 
			end;
 
		};
 
		{ tag = "exit", always = "true", "Это все", "Хорошо", 
 
@@ -88,10 +168,10 @@ phaetlarr_dlg = dlg {
 
	phr = {
 
		{ tag = "join", always = "true", "Я хочу, чтобы ты пошел со мной в следующий раз", "Хорошо",
 
			function()
 
				char_learr.accompany = false;
 
				char_phaetlarr.accompany = true;
 
				char_radcliffe.accompany = false;
 
				char_wright.accompany = false;
 
				char_learr.accompany(char_learr, false);
 
				char_phaetlarr.accompany(char_phaetlarr, true);
 
				char_radcliffe.accompany(char_radcliffe, false);
 
				char_wright.accompany(char_wright, false);
 
			end; 
 
		};
 
		{ tag = "exit", always = "true", "Это все", "Хорошо", 
 
@@ -112,10 +192,10 @@ radcliffe_dlg = dlg {
 
	phr = {
 
		{ tag = "join", always = "true", "Я хочу, чтобы ты пошел со мной в следующий раз", "Хорошо",
 
			function()
 
				char_learr.accompany = false;
 
				char_phaetlarr.accompany = false;
 
				char_radcliffe.accompany = true;
 
				char_wright.accompany = false;
 
				char_learr.accompany(char_learr, false);
 
				char_phaetlarr.accompany(char_phaetlarr, false);
 
				char_radcliffe.accompany(char_radcliffe, true);
 
				char_wright.accompany(char_wright, false);
 
			end; 
 
		};
 
		{ tag = "exit", always = "true", "Это все", "Хорошо", 
 
@@ -136,10 +216,10 @@ wright_dlg = dlg {
 
	phr = {
 
		{ tag = "join", always = "true", "Я хочу, чтобы ты пошел со мной в следующий раз", "Хорошо",
 
			function()
 
				char_learr.accompany = false;
 
				char_phaetlarr.accompany = false;
 
				char_radcliffe.accompany = false;
 
				char_wright.accompany = true;
 
				char_learr.accompany(char_learr, false);
 
				char_phaetlarr.accompany(char_phaetlarr, false);
 
				char_radcliffe.accompany(char_radcliffe, false);
 
				char_wright.accompany(char_wright, true);
 
			end; 
 
		};
 
		{ tag = "exit", always = "true", "Это все", "Хорошо",