diff --git a/party.lua b/party.lua --- a/party.lua +++ b/party.lua @@ -76,6 +76,8 @@ char_phaetlarr = obj { char_radcliffe = obj { var { follow = false; + + rel_on_join = nil; }; nam = "radcliffe"; disp = "Уолтер Рэдклифф"; @@ -126,11 +128,13 @@ char_wright = obj { 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 = "Анна Рэдклифф"; @@ -377,7 +381,34 @@ anna_home_dlg = dlg { 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'); @@ -390,6 +421,14 @@ anna_home_dlg = dlg { ]]; 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, "Что ты можешь рассказать мне о храме?", [[ "Ночью скат скорее всего покинет свое логово в поисках пищи. Мы можем воспользоваться его отсутствием". ]]}; @@ -421,6 +460,34 @@ anna_home_dlg = dlg { 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