games/Awakening Changeset - 690158089f15

Changeset - 690158089f15

Parent rev.

Child rev.

[Not reviewed]

default

0 2 0

Silverwing - 8 years ago 2017-03-22 17:42:42

Progress on dlg rewrite; Anna new dlg properly added(party)

2 files changed with 70 insertions and 2 deletions:

atlantis_dlg.lua

party.lua

0 comments (0 inline, 0 general)

atlantis_dlg.lua

➞

Show inline comments

@@ @@ -819,12 +819,13 @@ char_anna_atlantis_dlg = dlg { @@
         --[[
             anna_asked = 0;
             walter_asked = 0;
             atlantis_asked = 0;
             drake_asked = 0;
         ]]
         poff("on_anna", "on_walter", "on_atlantis", "on_drake");
         if (rel_anna  < 0) then
             if (char_anna.anna_asked == 0) then
                 pon("on_anna");
             end;
             if (char_anna.walter_asked == 0) then
                 pon("on_walter");

party.lua

➞

Show inline comments

@@ @@ -73,12 +73,14 @@ char_phaetlarr = obj { @@
 	end;
 };
 char_radcliffe = obj {
 	var {
 		follow = false;
         rel_on_join = nil;
 	};
 	nam = "radcliffe";
 	disp = "Уолтер Рэдклифф";
 	dsc = function(s)
 		if (stead.nameof(where(s)) == s.home) then
 			return [[{Уолтер Рэдклифф} задумчиво крутит в руках какую-то деталь. ^]];
@@ @@ -123,17 +125,19 @@ char_wright = obj { @@
 	end;
 };
 char_anna = obj {
 	var {
         follow = false;
         anna_asked = 0;
         walter_asked = 0;
         atlantis_asked = 0;
         drake_asked = 0;
         join_asked = 0;
         rel_on_join = nil;
 	};
 	nam = "anna";
 	disp = "Анна Рэдклифф";
 	dsc = function(s)
 		if (stead.nameof(where(s)) == s.home) then
 			return [[{Анна Рэдклифф} смотрит в иллюминатор. ^]];
@@ @@ -374,25 +378,60 @@ anna_home_dlg = dlg { @@
 	entered = function(s)
 		if (atl_iyh_state == 7) then
 			pon("on_iyh");
 		else
 			poff("on_iyh");
 		end;
         poff("on_anna", "on_walter", "on_atlantis", "on_drake", "on_join", "talk");
         if (rel_anna < 0) then
             pon("talk");
         else
             if (char_anna.anna_asked < 2) then
                 pon("on_anna");
                 pon("talk");
             end;
             if (char_anna.walter_asked < 2) then
                 pon("on_walter");
                 pon("talk");
             end;
             if (char_anna.atlantis_asked < 2) then
                 pon("on_atlantis");
                 pon("talk");
             end;
             if (char_anna.drake_asked < 2) then
                 pon("on_drake");
                 pon("talk");
             end;
             if (char_anna.join_asked < 2) then
                 pon("on_join");
                 pon("talk");
             end;
         end;
 		if (char_anna.follow) then
 			pon('stay');
 			poff('join');
 		else
 			pon('join');
 			poff('stay');
 		end;
 		return [[
 			Анна ждет ваших указаний
 		]];
 	end;
 	phr = {
         {tag="talk", false, "Мы можем поговорить?", function(s)
             if (rel_anna < 0) then
                 return [[Анна отрицательно качает головой: "Не сейчас". ]];
             else
                 psub("talk_more");
                 return [[Анна кивает: "Да, конечно. Я вас слушаю". ]];
             end;
         end}
 		{tag="on_iyh", always=true, "Что ты можешь рассказать мне о храме?", [[
 			"Ночью скат скорее всего покинет свое логово в поисках пищи. Мы можем воспользоваться его отсутствием".
 		]]};
 		{ tag = "join", always = "true", "Я хочу, чтобы ты пошла со мной в следующий раз",
 			function()
 				if (submarine_leviathan.suits > 1) then
@@ @@ -418,9 +457,37 @@ anna_home_dlg = dlg { @@
 			end;
 		};
 		{ tag = "exit", always = "true", "Это все", "Хорошо",
 			function()
 				back();
 			end;
+		}
 		};
         { tag = "talk_more"};
         {tag="on_anna", "Расскажи о себе. ", function(s)
             char_anna.anna_asked = 2;
             return [[Анна Рэдклифф грустно вздыхает: "Мне почти нечего рассказывать. Я с молодости живу здесь, на Атлантиде. Когда Уолтер сказал, что мы будем жить здесь, я сперва расстроилась -- тогда это казалось мне невероятно скучным -- жить вдалеке от цивилизации, среди людей, которые старше меня на двадцать с лишним лет. На самом деле все оказалось не столь плохо -- здесь есть навьяры. Когда они заняты -- я сижу в библиотеке, с Мари, или смотрю фильмы в Игнисе". ]];
         end};
         {tag="on_walter", "Расскажи об Уолтере. ", function(s)
             char_anna.walter_asked = 2;
             return [[Анна Рэдклифф отвечает: "Уолтер -- мой старший брат. Он заботится обо мне с тех пор, как мама с папой покинули нас. Хотя моя жизнь сильно изменилась, когда Уолтер забрал меня с собой на Атлантиду, я не жалею об этом". ]];
         end};
         {tag="on_atlantis", "Что ты думаешь об Атлантиде?", function(s)
             char_anna.on_atlantis = 2;
             return [[Анна Рэдклифф отвечает: "Последние десять лет я живу здесь, на Атлантиде. Я хорошо помню, как расстроена я была, приехав сюда. Конечно, я не думала, что мы все проведем здесь лет десять. Мне казалось, что уже через полгода-год мы вернемся на поверхность, но намерения вашего отца сильно отличались от этого. Потом Екатерина и Сильвия познакомили меня с Телнеарром и Хетеарром -- двумя навьярами, которые первыми жили на станции. Потом Хетеарр вернулся домой, а вместо него на станцию прибыл Ривеерр. А затем покинул станцию и Телнеарр. Его заменила Леарр". ]];
         end};
         {tag="on_drake", "Расскажи об Уильяме Дрейке. ", function(s)
             char_anna.on_drake = 2;
             return [[Анна Рэдклифф отвечает: "Хотя Дрейк -- руководитель Атлантиды, он проводит больше времени здесь, в Окулусе, чем в своем кабинете в Доминусе. Сейчас он в экспедиции -- они с Блэком отправились на поиски отдаленных навьярских поселений". ]];
             end;
         end};
         {tag="on_join", "Почему ты решила присоединиться к нам?", function(s)
             char_anna.on_join = 2;
             if (char_anna.rel_on_join >= 0) then
                 return [[Анна Рэдклифф отвечает: "". ]];
             elseif (char_walter.rel_on_join >= 0) then
                 return [[Анна Рэдклифф отвечает: "". ]];
             else
                 return [[Анна Рэдклифф отвечает: "". ]];
             end;
         end};
 	};
 };
@@ \ No newline at end of file @@

0 comments (0 inline, 0 general)