Changeset - 77153d115420
[Not reviewed]
default
0 2 0
Silverwing - 7 years ago 2017-09-24 11:23:10

Radcliffe dlgs more
2 files changed with 143 insertions and 134 deletions:
0 comments (0 inline, 0 general)
atlantis_dlg.lua
Show inline comments
 
char_darkstar_dlg = dlg {
 
	var {
 
		state = 0;
 
	};
 
	nam = "Винсент Даркстар";
 
	disp = "Винсент Даркстар";
 
	entered = function(s)
 
        if (atl_lfc_panic_warning == 2 and atl_lfc_panic == 2 and atl_lfc_state == 1) then
 
            psub("lfc_warning");
 
            return [[Винсент Даркстар недовольно смотрит на вас: "Господин Дрейк. Вы вообще понимаете, что делаете? Это последнее предупреждение. В следующий раз я приму меры. Все ясно? "]];
 
        end;
 
    
 
		if (atl_lfc_leroy_spoken) then
 
			pon("accuse_leroy");
 
		end;
 
		
 
		if (atl_lfc_goldman_spoken) then
 
			pon("accuse_goldman");
 
		end;
 
 
		poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr");
 
      
 
        poff("ask_more");
 
        if (atl_rep_darkstar < 0) then
 
            if (char_darkstar.drake_asked == 0) then pon("on_drake"); end;
 
            if (char_darkstar.black_asked == 0) then pon("on_black"); end;
 
            if (char_darkstar.darkstar_asked == 0) then pon("on_darkstar"); end;
 
            if (char_darkstar.svetlova_asked == 0) then pon("on_svetlova"); end;
 
            if (char_darkstar.moreau_asked == 0) then pon("on_moreau"); end;
 
            if (char_darkstar.wright_asked == 0) then pon("on_wright"); end;
 
            if (char_darkstar.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_darkstar.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
 
            if (char_darkstar.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_darkstar.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_darkstar.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_darkstar.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
 
            
 
            if (atl_iof_completed) then
 
                if (char_darkstar.leroy_asked == 0) then pon("on_leroy"); end;
 
                if (char_darkstar.jones_asked == 0) then pon("on_jones"); end;
 
                if (char_darkstar.goldman_asked == 0) then pon("on_goldman"); end;
 
                if (char_darkstar.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_darkstar.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_darkstar.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            
 
            if (char_darkstar.atlantis_asked == 0) then pon("on_atlantis"); end;
 
            if (char_darkstar.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
 
            
 
            if (char_darkstar.navjiarr_asked == 0) then pon("on_navjiarr"); end;
 
            if (char_darkstar.learr_asked == 0) then pon("on_learr"); end;
 
            if (char_darkstar.ryveerr_asked == 0) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;
 
            if (char_darkstar.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_darkstar.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_darkstar.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        else
 
            if (char_darkstar.drake_asked < 2) then pon("on_drake"); end;
 
            if (char_darkstar.black_asked < 2) then pon("on_black"); end;
 
            if (char_darkstar.darkstar_asked < 2) then pon("on_darkstar"); end;
 
            if (char_darkstar.svetlova_asked < 2) then pon("on_svetlova"); end;
 
            if (char_darkstar.moreau_asked < 2) then pon("on_moreau"); end;
 
            if (char_darkstar.wright_asked < 2) then pon("on_wright"); end;
 
            if (char_darkstar.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_darkstar.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
 
            if (char_darkstar.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_darkstar.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_darkstar.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_darkstar.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
 
            if (atl_iof_completed) then
 
                if (char_darkstar.leroy_asked < 2) then pon("on_leroy"); end;
 
                if (char_darkstar.jones_asked < 2) then pon("on_jones"); end;
 
                if (char_darkstar.goldman_asked < 2) then pon("on_goldman"); end;
 
                if (char_darkstar.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_darkstar.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_darkstar.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            if (char_darkstar.atlantis_asked < 2) then pon("on_atlantis"); end;
 
            if (char_darkstar.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
 
            
 
            if (char_darkstar.navjiarr_asked < 2) then pon("on_navjiarr"); end;
 
            if (char_darkstar.learr_asked < 2) then pon("on_learr"); end;
 
            if (atl_iof_learr_dead and char_darkstar.learr_asked < 3) then pon("on_learr"); end;
 
            if (char_darkstar.ryveerr_asked < 2) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;
 
            if (char_darkstar.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_darkstar.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_darkstar.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_darkstar.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_darkstar.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        end;
 
        
 
		if (s.state == 0) then
 
			psub("first_meeting");
 
            s.state = 1;         
 
			return [[За столом сидит средних лет мужчина с короткими черными волосами. Он одет в строгий деловой костюм черного цвета. Лицо его гладко выбрито. Холодный взгляд его черных глаз устремлен на вас. Сложив руки на столе, он приветствует вас: "Добро пожаловать на Атлантиду, господин Дрейк. Я Винсент Даркстар, мы уже общались по радио. Я занимаю на Атлантиде пост начальника службы безопаности". ]];
 
		elseif (atl_fta_state == 2) then
 
			psub("fta");
 
			return [[Винсент Даркстар приказывает: "Рассказывайте". ]];
 
		else
 
			psub("generic");
 
			return [[Винсент Даркстар сообщает: "Я слушаю". ]];
 
		end;
 
	end;
 
    phr = {
 
        {tag="lfc_warning"};
 
        {always = true, "Так точно.", [[Даркстар кивает: "Отлично. Вам нужно что-то еще?"]], code[[ atl_lfc_panic_warning = 3; psub("generic")]]};
 
		{tag="first_meeting"};
 
		{"Что мне нужно сделать, чтобы мне вернули Левиафан?", [[Винсент Даркстар хлопает ладонями о стол и уверенно сообщает: "Вести себя хорошо и не делать глупостей". ]]};
 
		{"Когда мне вернут Левиафан?", [[Винсент Даркстар отвечает: "Всему свое время. Используйте это время с пользой. Если хотите найти Уильяма, сначала стоит выяснить где и как его искать. И вам не помешает узнать кое-что помимо этого". ]]};
 
		{"Я пришел кое-что спросить. ", [[Винсент Даркстар сообщает :"Я слушаю". ]], code [[psub("generic");]]};
 
        {tag="ask_more"};
 
        {tag="on_drake", false, "Расскажите об Уильяме. ", function()
 
            if (atl_rep_darkstar < 0) then
 
@@ -269,92 +269,92 @@ char_moreau_dlg = dlg {
 
			end;
 
			
 
			if (reputation > 2 and atl_rep_moreau >= 0) then
 
				psub("lfc_debrief_good");
 
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Огромное спасибо. Посовещавшись, мы решили вернуть вам Левиафан. Также, вы можете посещать Атлантиду в любое удобное для вас время -- мы всегда будем рады вас видеть". ]];
 
			elseif (reputation > 2) then
 
				psub("lfc_debrief_good");
 
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Посовещавшись, мы решили вернуть вам Левиафан. Также, мы решили не запрещать вам доступ на Атлантиду, но не думайте, что я рад вас видеть". ]];
 
			elseif (atl_rep_moreau >= 0) then
 
				psub("lfc_debrief_bad");
 
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Огромное спасибо. Посовещавшись, мы решили вернуть вам Левиафан. К сожалению, совет решил ограничить вам доступ к станции, поэтому я прошу вас покинуть Атлантиду как можно скорее". ]];
 
			else
 
				psub("lfc_debrief_bad");
 
				return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Вы очень помогли нам в поимке саботажника. Посовещавшись, мы решили вернуть вам Левиафан. Убирайтесь и больше не возвращайтесь сюда". ]];
 
			end;
 
		end;
 
		
 
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
 
			s.lfc_dialog = true;
 
			pon('sabotage', 'ignis_what');
 
        elseif (atl_lfc_state ~= 1) then
 
            poff('sabotage', 'ignis_what');
 
		end;
 
        
 
        poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr");
 
        poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr", "ask_more");
 
        
 
        if (atl_rep_moreau < 0) then
 
            if (char_moreau.drake_asked == 0) then pon("on_drake"); end;
 
            if (char_moreau.black_asked == 0) then pon("on_black"); end;
 
            if (char_moreau.darkstar_asked == 0) then pon("on_darkstar"); end;
 
            if (char_moreau.svetlova_asked == 0) then pon("on_svetlova"); end;
 
            if (char_moreau.moreau_asked == 0) then pon("on_moreau"); end;
 
            if (char_moreau.wright_asked == 0) then pon("on_wright"); end;
 
            if (char_moreau.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_moreau.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
 
            if (char_moreau.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_moreau.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_moreau.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_moreau.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
 
            
 
            if (atl_iof_completed) then
 
                if (char_moreau.leroy_asked == 0) then pon("on_leroy"); end;
 
                if (char_moreau.jones_asked == 0) then pon("on_jones"); end;
 
                if (char_moreau.goldman_asked == 0) then pon("on_goldman"); end;
 
                if (char_moreau.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_moreau.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_moreau.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            
 
            if (char_moreau.atlantis_asked == 0) then pon("on_atlantis"); end;
 
            if (char_moreau.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
 
            
 
            
 
            if (char_moreau.navjiarr_asked == 0) then pon("on_navjiarr"); end;
 
            if (char_moreau.learr_asked == 0) then pon("on_learr"); end;
 
            if (char_moreau.ryveerr_asked == 0) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_moreau.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;
 
            if (char_moreau.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_moreau.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_moreau.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_moreau.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        else
 
            if (char_moreau.drake_asked < 2) then pon("on_drake"); end;
 
            if (char_moreau.black_asked < 2) then pon("on_black"); end;
 
            if (char_moreau.darkstar_asked < 2) then pon("on_darkstar"); end;
 
            if (char_moreau.svetlova_asked < 2) then pon("on_svetlova"); end;
 
            if (char_moreau.moreau_asked < 2) then pon("on_moreau"); end;
 
            if (char_moreau.wright_asked < 2) then pon("on_wright"); end;
 
            if (char_moreau.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_moreau.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
 
            if (char_moreau.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_moreau.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_moreau.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_moreau.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
 
            
 
            if (atl_iof_completed) then
 
                if (char_moreau.leroy_asked < 2) then pon("on_leroy"); end;
 
                if (char_moreau.jones_asked < 2) then pon("on_jones"); end;
 
                if (char_moreau.goldman_asked < 2) then pon("on_goldman"); end;
 
                if (char_moreau.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_moreau.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_moreau.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            
 
            if (char_moreau.atlantis_asked < 2) then pon("on_atlantis"); end;
 
            if (char_moreau.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
 
            
 
            if (char_moreau.navjiarr_asked < 2) then pon("on_navjiarr"); end;
 
            if (char_moreau.learr_asked < 2) then pon("on_learr"); end;
 
            if (atl_iof_learr_dead and char_moreau.learr_asked < 3) then pon("on_learr"); end;
 
            if (char_moreau.ryveerr_asked < 2) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_moreau.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;
 
            if (char_moreau.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_moreau.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_moreau.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_moreau.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_moreau.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        end;
 
	
 
		if (s.state == 0) then
 
			s.state = 1;
 
			psub("first_meeting");
 
			return [[За столом перед вами сидит немолодой мужчина. Кудрявые седые волосы обрамляют его лицо. Он носит длинные седые усы. Одет человек в строгий деловой костюм бежевого цвета. Его серые глаза, скрытые очками, внимательно рассматривают вас. Вертя в руках перо он приветствует вас: "Добро пожаловать на Атлантиду, месье Дрейк. Мое имя - Фредерик Моро и я исполняю обязанности начальника станции в отсутствие Уильяма и Адриана. Ваше прибытие крайне удивило нас - мы думали, с поверхности найти нашу станцию невозможно. Пока мы думаем, что делать с вами дальше, вы можете воспользоваться ресурсами станции, чтобы узнать побольше о вашем отце и, быть может, понять, куда в точности он направился. Для начала, стоит немного ввести вас в курс дела".^
 
				Моро подходит к книжной полке и берет какую-то книгу. Вернувшись за стол, он раскрывает ее и приступает к рассказу: "Когда мы строили Надежду, нашей целью было создать быстрый и безопасный способ путешествий через Атлантику. Однако, все с самого начала пошло не так, как планировалось. Мы встретили племя подводных существ, именующих себя навьярами - они похожи на рыб и людей одновременно - ходят на двух ногах, используют две руки, но покрыты чешуей и имеют жабры. Тогда мы приняли решение исследовать их тщательнее. Были построены Энтерпрайз, Наутилус и сама Атлантида. Потом мы переселились сюда. Дрейк был захвачен одной из легенд этих рыбней и не так давно, наконец, решился отправиться в экспедицию". ]];
 
		elseif (char_moreau.iof_reaction == 0 and atl_iof_completed) then
 
            char_moreau.iof_reaction = 1;      
 
            if (atl_iof_learr_dead) then
 
                psub("iof_learr_dead");
 
                return [[Фредерик Моро как обычно сидит за столом. Как только вы подходите, он сообщает вам: "Месье Дрейк, рад видеть, что с вами все в порядке. К сожалению, нам не удалось спасти Леарр. Это большая потеря для всех нас. Думаю, вам стоит знать, что на станцию прибыл Аикерьярр, чтобы продолжить ее работу". ]];
 
            elseif (atl_iof_learr_suit) then
 
                psub("iof_learr_suit");
 
                return [[Фредерик Моро как обычно сидит за столом. Как только вы подходите, он сообщает вам: "Месье Дрейк, рад видеть, что с вами все в порядке. Леарр рассказала мне о вашей идее со скафандром. Спасибо, что позаботились о ней". ]];
 
            else
 
                psub("iof_learr");
 
                return [[Фредерик Моро как обычно сидит за столом. Как только вы подходите, он сообщает вам: "Месье Дрейк, рад видеть, что с вами все в порядке. Спасибо, что позаботились о Леарр. С ней все хорошо". ]];
 
            end;
 
        else      
 
			psub("generic");
 
			return [[Фредерик Моро приветствует вас: "Месье Дрейк, добрый день. Чем могу помочь?" ]];
 
		end;		
 
	end;
 
@@ -520,91 +520,91 @@ char_moreau_dlg = dlg {
 
		{always = true, "Я пойду", [[Моро прощается с вами: "До встречи, месье Дрейк". ]], code [[ back(); ]]};
 
		{tag="lfc_debrief_good"};
 
		{always = true, "Спасибо, это все.", [[Моро спрашивает: "Вы что-то хотели?". ]], code [[ psub("generic");]]};
 
		{tag="lfc_debrief_bad"};
 
		{always = true, "Я пойду", [[Моро кивает. ]], code [[ walk("game_over_banished"); ]]};
 
	};
 
};
 
 
char_svetlova_dlg = dlg {
 
	var {
 
		state = 0;
 
		lfc_sabotage = false;
 
		lfc_dialog = false;
 
		flag_help = false;
 
		flag_explain = false;
 
	};
 
	nam = "Екатерина Светлова";
 
	disp = "Екатерина Светлова";
 
	entered = function(s)
 
        if (atl_lfc_panic_warning == 2 and atl_lfc_panic == 2 and atl_lfc_state == 1) then
 
            psub("lfc_warning");
 
            return [[Екатерина Светлова сообщает вам: "Добрый день, господин Дрейк. Винсент Даркстар просил вас срочно поговорить с ним". ]];
 
        end;
 
    
 
        poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr");
 
        poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_leroy", "on_jones", "on_goldman", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "on_aikerjarr", "ask_more");
 
        if (atl_rep_svetlova < 0) then
 
            if (char_svetlova.drake_asked == 0) then pon("on_drake"); end;
 
            if (char_svetlova.black_asked == 0) then pon("on_black"); end;
 
            if (char_svetlova.darkstar_asked == 0) then pon("on_darkstar"); end;
 
            if (char_svetlova.svetlova_asked == 0) then pon("on_svetlova"); end;
 
            if (char_svetlova.moreau_asked == 0) then pon("on_moreau"); end;
 
            if (char_svetlova.wright_asked == 0) then pon("on_wright"); end;
 
            if (char_svetlova.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_svetlova.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
 
            if (char_svetlova.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_svetlova.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_svetlova.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_svetlova.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
 
            
 
            if (atl_iof_completed) then
 
                if (char_svetlova.leroy_asked == 0) then pon("on_leroy"); end;
 
                if (char_svetlova.jones_asked == 0) then pon("on_jones"); end;
 
                if (char_svetlova.goldman_asked == 0) then pon("on_goldman"); end;
 
                if (char_svetlova.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_svetlova.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_svetlova.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            
 
            if (char_svetlova.atlantis_asked == 0) then pon("on_atlantis"); end;
 
            if (char_svetlova.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
 
            
 
            
 
            if (char_svetlova.navjiarr_asked == 0) then pon("on_navjiarr"); end;
 
            if (char_svetlova.learr_asked == 0) then pon("on_learr"); end;
 
            if (char_svetlova.ryveerr_asked == 0) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_svetlova.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;
 
            if (char_svetlova.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_svetlova.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_svetlova.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_svetlova.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        else
 
            if (char_svetlova.drake_asked < 2) then pon("on_drake"); end;
 
            if (char_svetlova.black_asked < 2) then pon("on_black"); end;
 
            if (char_svetlova.darkstar_asked < 2) then pon("on_darkstar"); end;
 
            if (char_svetlova.svetlova_asked < 2) then pon("on_svetlova"); end;
 
            if (char_svetlova.moreau_asked < 2) then pon("on_moreau"); end;
 
            if (char_svetlova.wright_asked < 2) then pon("on_wright"); end;
 
            if (char_svetlova.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_svetlova.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
 
            if (char_svetlova.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_svetlova.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_svetlova.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_svetlova.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
 
            
 
            if (atl_iof_completed) then
 
                if (char_svetlova.leroy_asked < 2) then pon("on_leroy"); end;
 
                if (char_svetlova.jones_asked < 2) then pon("on_jones"); end;
 
                if (char_svetlova.goldman_asked < 2) then pon("on_goldman"); end;
 
                if (char_svetlova.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_svetlova.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_svetlova.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            
 
            if (char_svetlova.atlantis_asked < 2) then pon("on_atlantis"); end;
 
            if (char_svetlova.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
 
            
 
            if (char_svetlova.navjiarr_asked < 2) then pon("on_navjiarr"); end;
 
            if (char_svetlova.learr_asked < 2) then pon("on_learr"); end;
 
            if (atl_iof_learr_dead and char_svetlova.learr_asked < 3) then pon("on_learr"); end;
 
            if (char_svetlova.ryveerr_asked < 2) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_svetlova.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;
 
            if (char_svetlova.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_svetlova.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_svetlova.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_svetlova.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_svetlova.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        end;
 
    
 
		if (s.state == 0) then
 
			psub('first_meeting');
 
            s.state = 1;         
 
			return [[За столом сидит женщина лет сорока-пяти. Золотистые волосы собраны в пучок на затылке. Она одета в простое синее платье. В правой руке она держит карандаш, которым периодически делает пометки в бумагах, лежащих на столе. Она отрывает взгляд от бумаг и приветствует вас: _"Добрый день, господин Дрейк. Мое имя -- Екатерина Светлова, я управляю исследованиями на Атлантиде. Должна признать, вы нас всех узрядно напугали. Даркстар сказал, что вы зайдете. Думаю, вы будете полезны нам. У меня есть предложение для вас. Я знаю, что вы ищете своего отца. Уходя в экспедицию, он не оставил нам почти никаких материалов -- карты, схемы, переводы -- они забрали все с собой. Я прошу вас помочь нам с некоторыми проблемами. Взамен -- мы предоставим вам все имеющиеся у нас материалы. Возможно они помогут вам найти отца"_.]];
 
        elseif (char_svetlova.iof_reaction == 0 and atl_iof_completed) then
 
            char_svetlova.iof_reaction = 1;
 
            if (atl_iof_learr_dead) then
 
                psub("iof_learr_dead");
 
                return [[Екатерина Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Господин Дрейк, вы были в Игнисе, вместе с Леарр. И все же, вы не смогли спасти ее". ]];
 
            elseif (atl_iof_learr_suit) then
 
                psub("iof_learr_suit");
 
                return [[Екатерина Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Господин Дрейк, добрый день. Спасибо, что помогли Леарр выбраться из Игниса. Она рассказала мне о вашей замечательной идее. Благодарю вас от лица всех работников Окулуса". ]];
 
            else
 
                psub("iof_learr");
 
                return [[Екатерина Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас:"Господин Дрейк, добрый день. Спасибо, что вытащили Леарр из Игниса. Благодарю вас от лица всех работников Окулуса". ]];
 
            end;         
 
		elseif (s.state == 2) then
 
			psub('ryveerr_on_steal');
 
			return [[Светлова отрывает взгляд от бумаг, лежащих перед ней и смотрит на вас: "Ну как? Поговорили с Ривеерром?" ]];
 
        else
 
			if (atl_iyh_state == 9) then
 
				atl_iyh_state = 10;
 
@@ -875,87 +875,87 @@ char_michael_wright_dlg = dlg {
 
    var {
 
        state = 0;
 
        lfc_dialog = false;
 
    };
 
    nam = "Майкл Райт";
 
    disp = "Майкл Райт";
 
    entered = function(s)
 
        if (atl_lfc_panic_warning == 2 and atl_lfc_panic == 2 and atl_lfc_state == 1) then
 
            psub("lfc_warning");
 
            return [[Екатерина Светлова сообщает вам: "Добрый день Винсент Даркстар просил вас срочно поговорить с ним". ]];
 
        end;
 
    
 
        if (atl_nih_state == 2) then
 
            pon('nih_fixed');
 
        end;
 
        
 
        if (atl_lfc_state ~= 1) then
 
            poff('sabotage', 'ignis_what');
 
        end;
 
        
 
        if (atl_lfc_state == 1 and not s.lfc_dialog) then
 
            s.lfc_dialog = true;
 
            pon('sabotage', 'ignis_what');
 
        end;
 
        
 
        poff("ask_more");
 
        if (atl_rep_wright < 0) then
 
            if (char_michael_wright.drake_asked == 0) then pon("on_drake"); end;
 
            if (char_michael_wright.black_asked == 0) then pon("on_black"); end;
 
            if (char_michael_wright.darkstar_asked == 0) then pon("on_darkstar"); end;
 
            if (char_michael_wright.svetlova_asked == 0) then pon("on_svetlova"); end;
 
            if (char_michael_wright.moreau_asked == 0) then pon("on_moreau"); end;
 
            if (char_michael_wright.wright_asked == 0) then pon("on_wright"); end;
 
            if (char_michael_wright.drake_asked == 0) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_michael_wright.black_asked == 0) then pon("on_black"); pon("ask_more"); end;
 
            if (char_michael_wright.darkstar_asked == 0) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_michael_wright.svetlova_asked == 0) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_michael_wright.moreau_asked == 0) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_michael_wright.wright_asked == 0) then pon("on_wright"); pon("ask_more"); end;
 
            
 
            if (atl_iof_completed) then
 
                if (char_michael_wright.leroy_asked == 0) then pon("on_leroy"); end;
 
                if (char_michael_wright.jones_asked == 0) then pon("on_jones"); end;
 
                if (char_michael_wright.goldman_asked == 0) then pon("on_goldman"); end;
 
                if (char_michael_wright.leroy_asked == 0) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_michael_wright.jones_asked == 0) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_michael_wright.goldman_asked == 0) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            
 
            if (char_michael_wright.atlantis_asked == 0) then pon("on_atlantis"); end;
 
            if (char_michael_wright.navjiarr_asked == 0) then pon("on_navjiarr"); end;
 
            if (char_michael_wright.learr_asked == 0) then pon("on_learr"); end;
 
            if (char_michael_wright.ryveerr_asked == 0) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;
 
            if (char_michael_wright.atlantis_asked == 0) then pon("on_atlantis"); pon("ask_more"); end;
 
            if (char_michael_wright.navjiarr_asked == 0) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_michael_wright.learr_asked == 0) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_michael_wright.ryveerr_asked == 0) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked == 0) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        else
 
            if (char_michael_wright.drake_asked < 2) then pon("on_drake"); end;
 
            if (char_michael_wright.black_asked < 2) then pon("on_black"); end;
 
            if (char_michael_wright.darkstar_asked < 2) then pon("on_darkstar"); end;
 
            if (char_michael_wright.svetlova_asked < 2) then pon("on_svetlova"); end;
 
            if (char_michael_wright.moreau_asked < 2) then pon("on_moreau"); end;
 
            if (char_michael_wright.wright_asked < 2) then pon("on_wright"); end;
 
            if (char_michael_wright.drake_asked < 2) then pon("on_drake"); pon("ask_more"); end;
 
            if (char_michael_wright.black_asked < 2) then pon("on_black"); pon("ask_more"); end;
 
            if (char_michael_wright.darkstar_asked < 2) then pon("on_darkstar"); pon("ask_more"); end;
 
            if (char_michael_wright.svetlova_asked < 2) then pon("on_svetlova"); pon("ask_more"); end;
 
            if (char_michael_wright.moreau_asked < 2) then pon("on_moreau"); pon("ask_more"); end;
 
            if (char_michael_wright.wright_asked < 2) then pon("on_wright"); pon("ask_more"); end;
 
            if (atl_iof_completed) then
 
                if (char_michael_wright.leroy_asked < 2) then pon("on_leroy"); end;
 
                if (char_michael_wright.jones_asked < 2) then pon("on_jones"); end;
 
                if (char_michael_wright.goldman_asked < 2) then pon("on_goldman"); end;
 
                if (char_michael_wright.leroy_asked < 2) then pon("on_leroy"); pon("ask_more"); end;
 
                if (char_michael_wright.jones_asked < 2) then pon("on_jones"); pon("ask_more"); end;
 
                if (char_michael_wright.goldman_asked < 2) then pon("on_goldman"); pon("ask_more"); end;
 
            end;
 
            
 
            if (char_michael_wright.atlantis_asked < 2) then pon("on_atlantis"); end;
 
            if (char_michael_wright.navjiarr_asked < 2) then pon("on_navjiarr"); end;
 
            if (char_michael_wright.learr_asked < 2) then pon("on_learr"); end;
 
            if (atl_iof_learr_dead and char_michael_wright.learr_asked < 3) then pon("on_learr"); end;
 
            if (char_michael_wright.ryveerr_asked < 2) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;
 
            if (char_michael_wright.atlantis_asked < 2) then pon("on_atlantis"); pon("ask_more"); end;
 
            if (char_michael_wright.navjiarr_asked < 2) then pon("on_navjiarr"); pon("ask_more"); end;
 
            if (char_michael_wright.learr_asked < 2) then pon("on_learr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_michael_wright.learr_asked < 3) then pon("on_learr"); pon("ask_more"); end;
 
            if (char_michael_wright.ryveerr_asked < 2) then pon("on_ryveerr"); pon("ask_more"); end;
 
            if (atl_iof_learr_dead and char_michael_wright.aikerjarr_asked < 2) then pon("on_aikerjarr"); pon("ask_more"); end;
 
        end;
 
        
 
        if (atl_iof_completed and char_michael_wright.iof_reaction == 0) then
 
            char_michael_wright.iof_reaction = 1;
 
            if (atl_iof_learr_dead) then
 
                psub("iof_learr_dead");
 
                return [[Майкл Райт обращается к вам: "Господин Дрейк, рад видеть вас живым и здоровым. Трагедия на Игнисе стала для нас неожиданностью. Быть может, если бы мы были готовы к такому, Леарр была бы здесь, с нами". ]];
 
            elseif (atl_iof_learr_suit) then
 
                psub("iof_learr_suit");
 
                return [[Майкл Райт обращается к вам: "Господин Дрейк, рад видеть вас живым и здоровым. Авария на Игнисе стала для нас неожиданностью, однако благодаря вашим действиям никто не пострадал, а мы получили ценный опыт". ]];
 
            else
 
                psub("iof_learr");
 
                return [[Майкл Райт обращается к вам: "Господин Дрейк, рад видеть вас живым и здоровым. Авария на Игнисе стала для нас неожиданностью, однако благодаря вашим действиям никто не пострадал". ]];
 
            end;
 
        elseif (atl_nih_state == 3 and atl_iof_completed and atl_fta_state == 0) then
 
            atl_fta_state = 1;
 
            return [[Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. У меня есть для вас работа. Сейчас все наши бригады заняты, поэтому я прошу вас помочь с обслуживанием Солиса. Приходите туда и свяжитесь со мной по телефону, я дам вам инструкции". ]];
 
        elseif (atl_fta_state == 2) then
 
            atl_fta_state = 3;
 
            psub("fta_deb");
 
            return [[Майкл Райт протягивает вам руку: "Только благодаря вам, мы все еще здесь. Я с радостью сообщу Моро, что я за возвращение вам Левиафана". ]];
 
        else
 
            psub("generic");
 
            return [[Майкл Райт просматривает какие-то чертежи. Как только вы подходите, он отвлекается и приветствует вас: "Добрый день. Чем могу быть полезен?" ]];
 
@@ -1159,74 +1159,82 @@ char_michael_wright_dlg = dlg {
 
 
 
char_anna_atlantis_dlg = dlg {
 
	var {
 
		state = 0;
 
	};
 
	nam = "Анна Рэдклифф";
 
	disp = "Анна Рэдклифф";
 
	entered = function(s)
 
		if (atl_lfc_state ~= 1) then
 
			poff('sabotage', 'ignis_what');
 
		end;
 
		
 
		if (atl_lfc_state == 1 and not s.lfc_dialog) then
 
			s.lfc_dialog = true;
 
			pon('sabotage', 'ignis_what');
 
		end;
 
        
 
        --[[
 
            anna_asked = 0;
 
            walter_asked = 0;
 
            atlantis_asked = 0;
 
            drake_asked = 0;
 
        ]]
 
        poff("on_anna", "on_walter", "on_atlantis", "on_drake");
 
        poff("on_anna", "on_walter", "on_atlantis", "on_drake", "ask_more");
 
        if (rel_anna  < 0) then
 
            if (char_anna.anna_asked == 0) then
 
                pon("on_anna");
 
                pon("ask_more");
 
            end;
 
            if (char_anna.walter_asked == 0) then
 
                pon("on_walter");
 
                pon("ask_more");
 
            end;
 
            if (char_anna.atlantis_asked == 0) then
 
                pon("on_atlantis");
 
                pon("ask_more");
 
            end;
 
            if (char_anna.drake_asked == 0) then
 
                pon("on_drake");
 
                pon("ask_more");
 
            end;
 
        else
 
            if (char_anna.anna_asked < 2) then
 
                pon("on_anna");
 
                pon("ask_more");
 
            end;
 
            if (char_anna.walter_asked < 2) then
 
                pon("on_walter");
 
                pon("ask_more");
 
            end;
 
            if (char_anna.atlantis_asked < 2) then
 
                pon("on_atlantis");
 
                pon("ask_more");
 
            end;
 
            if (char_anna.drake_asked < 2) then
 
                pon("on_drake");
 
                pon("ask_more");
 
            end;
 
        end;
 
	
 
		if (s.state == 0) then
 
			s.state = 1;
 
			psub("first_meeting");
 
			return [[Перед вами стоит девушка лет двадцати-пяти--тридцати. Каштановые волосы ниспадают на плечи. Зеленые глаза внимательно следят за движениями навьяра, с которым она разговаривает. Заметив вас, она просит навьяра подождать и обращается к вам: "Приветствую. Вы, должно быть господин Дрейк? Мое имя Анна Рэдклифф". ]];
 
		else
 
			psub("generic");
 
			return [[Анна Рэдклифф разговаривает с навьяром, стоящим рядом. Заметив вас, она просит его подождать и обращается к вам: "Приветствую, вы что-то хотели?" ]];
 
		end;
 
	end;
 
	phr = {
 
		{tag="first_meeting"};
 
		{"Да, я Дэвид Дрейк. Рад знакомству", [[Анна Рэдклифф улыбается и спрашивает: "Вы что-то хотели?" ]], code = [[ psub('generic'); ]]};
 
        {tag="ask_more"};
 
        {tag="on_walter", "Расскажите об Уолтере. ", function(s)
 
            if (rel_anna < 0) then
 
                char_anna.walter_asked = 1;
 
                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];
 
            else
 
                char_anna.walter_asked = 2;
 
                return [[Анна Рэдклифф отвечает: "Уолтер -- мой старший брат. Он заботится обо мне с тех пор, как мама с папой покинули нас. Хотя моя жизнь сильно изменилась, когда Уолтер забрал меня с собой на Атлантиду, я не жалею об этом". ]];
 
            end;
 
@@ -1462,59 +1470,60 @@ char_aikerjarr_dlg = dlg {
 
        {tag="first_meeting_3b"};
 
        {always= "true", "Значит, ты все-таки меня понимаешь. У меня есть вопросы.",  [[Навьяр вздыхает: "Ty'rr не-отсстанет. I'rr тебя-сслушшает"]], code [[char_aikerjarr_dlg.state = 1; psub("generic")]]};
 
        {always= "true", "Значит, ты все-таки меня понимаешь. Хватит тратить мое время.", [[Навьяр недовольно рычит: "Ты говорри". ]], code [[char_aikerjarr_dlg.state = 1; psub("generic")]]};
 
        {always= "true", "Значит, ты все-таки меня понимаешь, чертов рыбень. Теперь слушай и отвечай.", [[Навьяр стучит копьем об пол и отворачивается от вас. ]], code [[back();]]};
 
		{tag = "generic"};
 
        {tag = "sabotage", "Ты знаешь, что пожар начался из-за саботажа?", [[Аикерьярр лишь слегка усмехается, но не удостаивает вас ответом. ]]};
 
        {tag = "ignis_what", "Ты знаешь, почему начался пожар в Игнисе?", [[Аикерьярр лишь слегка усмехается, но не удостаивает вас ответом. ]]};
 
		{tag="iyh1", "Расскажи о вашем конфликте с Дипатреанотром.", [[Аикерьярр недовольно смотрит на вас:"He'vji'a'rr не-помочь".^Немного подумав, он рассказывает: "Na'vji'a'yhe'dyp'atre'anot'rr говоррить yhe мы украссть реликвия-изз-ихх-ххррама", -- Аикерьярр злобно стучит зубами и в ярости сжимает кулаки, -- "Мы не-делали-этого-ссказзали им! Но они в-ответ-на-нашш-ххррам-напали и нашши-рреликвии-вззяли!" ]], code [[ atl_iyh_learr_spoken = true; ]]};
 
        {tag="iyh2", "Я собираюсь в храм Дипатреанотра", [[Аикерьярр пожимает плечами: "Ты туда-не-идешь. Ты спроси Ривеерра".]], code [[ atl_iyh2_aikeryarr_spoken = true; psub("on_iyh2"); ]]};      
 
        {tag="iyh4", "Неподалеку отсюда есть старый храм навьяров. Я прошу разрешения посетить его.", [[
 
            Аикерьярр кивает: "Я не-понимаю, hyd это связано с-текущей-ситуацией. Ты узнай e тогда-приходи"
 
        ]], code [[ back(); ]]};      
 
		{"Я вернусь позже", [[Аикерьярр отворачивается от вас, даже не удостоив ответом. ]], code [[back(); ]]};
 
	};
 
};
 
 
char_ryveerr_dlg = dlg {
 
	var {
 
		state = 0;
 
        lfc_dialog = false;
 
	};
 
	nam = "Ривеерр";
 
	disp = "Ривеерр";
 
	entered = function(s)
 
        poff("questions");   
 
        if (atl_rep_dyp < 0) then
 
            if (char_ryveerr.atlantis_asked == 0) then pon("on_atlantis"); end;
 
            if (char_ryveerr.learr_asked == 0) then pon("on_learr"); end;
 
            if (char_ryveerr.ryveerr_asked == 0) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_ryveerr.aikerjarr_asked == 0) then pon("on_aikerjarr"); end;
 
            if (char_ryveerr.atlantis_asked == 0) then pon("on_atlantis", "questions"); end;
 
            if (char_ryveerr.learr_asked == 0) then pon("on_learr", "questions"); end;
 
            if (char_ryveerr.ryveerr_asked == 0) then pon("on_ryveerr", "questions"); end;
 
            if (atl_iof_learr_dead and char_ryveerr.aikerjarr_asked == 0) then pon("on_aikerjarr", "questions"); end;
 
        else
 
            if (char_ryveerr.atlantis_asked < 2) then pon("on_atlantis"); end;
 
            if (char_ryveerr.learr_asked < 2) then pon("on_learr"); end;
 
            if (atl_iof_learr_dead and char_ryveerr.learr_asked < 3) then pon("on_learr"); end;
 
            if (char_ryveerr.ryveerr_asked < 2) then pon("on_ryveerr"); end;
 
            if (atl_iof_learr_dead and char_ryveerr.aikerjarr_asked < 2) then pon("on_aikerjarr"); end;
 
            if (char_ryveerr.atlantis_asked < 2) then pon("on_atlantis", "questions"); end;
 
            if (char_ryveerr.learr_asked < 2) then pon("on_learr", "questions"); end;
 
            if (atl_iof_learr_dead and char_ryveerr.learr_asked < 3) then pon("on_learr", "questions"); end;
 
            if (char_ryveerr.ryveerr_asked < 2) then pon("on_ryveerr", "questions"); end;
 
            if (atl_iof_learr_dead and char_ryveerr.aikerjarr_asked < 2) then pon("on_aikerjarr", "questions"); end;
 
        end;
 
        if (atl_lfc_state == 1 and not s.lfc_dialog) then
 
            s.lfc_dialog = true;
 
            pon('sabotage', 'ignis_what');
 
        elseif (atl_lfc_state ~= 1) then
 
            poff('sabotage', 'ignis_what');
 
        end;
 
           
 
        if (s.state == 0) then
 
            s.state = 1;
 
            psub("first_meeting");
 
            return [[Перед вами стоит навьяр. Серо-зеленая чешуя, несколько более темная, чем у Леарр блестит в свете электрических ламп. Красно-оранжевые глаза внимательно смотрят на вас. Он одет в темно-зеленые облегающие шорты и куртку из водорослей. Навьяр приветствует вас: "Ривеерр-из-Дипатреанотра рад-видеть тебя". ]];
 
        elseif (atl_iof_completed and char_ryveerr.iof_reaction == 0) then
 
            if (atl_iof_learr_dead) then
 
                psub("iof_learr_dead");
 
                return [[Плавники Ривеерра окрашиваются синим. Он произносит: "Хевьяр-ты не-помог Леарр". ]];
 
            elseif (atl_iof_learr_suit) then
 
                psub("iof_learr_suit");
 
                return [[Ривеерр благодарит вас: "Дрейк-ты хорошо-придумал. Я рад, что Леарр-из-Ираафаанотра жива". ]];
 
            else
 
                psub("iof_learr");
 
                return [[Ривеерр сообщает: "Я рад, что никто-в-Игнисе-не-умер". ]];
 
            end;
 
        else
party.lua
Show inline comments
 
@@ -302,56 +302,56 @@ radcliffe_home_dlg = dlg {
 
		if (atl_iyh_state == 7) then
 
			pon("on_iyh");
 
		else
 
			poff("on_iyh");
 
		end;
 
	
 
		if (char_radcliffe.follow) then
 
			pon('stay');
 
			poff('join');
 
		else
 
			pon('join');
 
			poff('stay');
 
		end;
 
        psub("generic");
 
		return [[Уолтер задумчиво смотрит на вас. ]];
 
	end;
 
	phr = {
 
        {tag="questions"};
 
        {tag="on_black", "Что ты можешь сказать о Блэке?", function(s)
 
            char_walter.on_black = 2;
 
            return [[Уолтер пожимает плечами: "Что я могу сказать про него? Его не очень здесь любят, однако он, поверьте, вполне искренне радеет за благополучие нашей миссии". ]];
 
        end};
 
        {tag="on_walter", "Расскажи о себе.". function(s)
 
            char_walter.on_walter = 2;
 
            return [[]];
 
            return [[Уолтер пожимает плечами: "Да мне нечего рассказать. Мы с сестрой жили в Лондоне, я уже работал в Вестхейвен Трансоушен, когда наши родители погибли -- пароход, на котором они отправились в США просто не прибыл в порт назначения. Мы с Анной остались одни. Она еще даже школу не закончила тогда. А потом мы построили Надежду, Атлантиду и далее по списку. Потом мне предложили работать внизу, на станции. Я, конечно, мог тогда отказаться, уйти в другую компанию, но направление, избранное Дрейком слишком меня привлекало. Я согласился". ]];
 
        end};
 
        {tag="on_anna", "Расскажи о своей сестре, Анне.", function(s)
 
            char_walter.on_anna = 2;
 
            if (ArrayUtils.indexOf(pl.party, 'anna') ~= 0) then
 
                return [[Уолтер вздыхает: "Будь у меня выбор тогда, я ни за что не взял бы ее на Атлантиду. И жалел бы сейчас об этом. Не думаю, что на поверхности она стала бы той, кто она сейчас. Все-таки общество поглощенных своей работой людей накладывает определенный отпечаток, я думаю. Я все еще не уверен, что взять ее на Левиафан было хорошей идеей -- Бог знает, с чем мы столкнемся в наших странствиях, но она очень этого хотела". ]];
 
                return [[Уолтер вздыхает: "Не думаю, что на поверхности она стала бы той, кто она сейчас. Все-таки общество поглощенных своей работой людей накладывает определенный отпечаток, я думаю. Я все еще не уверен, что взять ее на Левиафан было хорошей идеей -- Бог знает, с чем мы столкнемся в наших странствиях, но она очень этого хотела". ]];
 
            else
 
                return [[Уолтер вздыхает: "Будь у меня выбор тогда, я ни за что не взял бы ее на Атлантиду. И жалел бы сейчас об этом. Не думаю, что на поверхности она стала бы той, кто она сейчас. Все-таки общество поглощенных своей работой людей накладывает определенный отпечаток, я думаю. То, что она осталась на станции успокаивает меня, хотя она так рвалась в эту экспедицию вместе с нами". ]];
 
                return [[Уолтер вздыхает: "Не думаю, что на поверхности она стала бы той, кто она сейчас. Все-таки общество поглощенных своей работой людей накладывает определенный отпечаток, я думаю. То, что она осталась на станции успокаивает меня, хотя она так рвалась в эту экспедицию вместе с нами". ]];
 
            end;
 
        end};
 
        {tag="on_drake", "Что ты можешь сказать о Дрейке?", function(s)
 
            char_walter.on_drake = 2;
 
            return [[Уолтер отвечает: "Не думаю, что скажу про него больше чем кто-то еще. Послушайте Райта, Моро, быть может Даркстара, хотя черт знает, что у этого типа на уме. Они скажут вам все и даже больше. "]];
 
        end};
 
        {tag="on_atlantis", "Что ты думаешь об Атлантиде?", function(s)
 
            char_walter.on_atlantis = 2;
 
            return [[Уолтер отвечает: "Думаю только Райт и Уинтерлайт в полной мере осознают, насколько большим достижением для нас, для всего человечества, является постройка этой станции. Тем не менее, они, отчего-то, не спешат поделиться своими знаниями с другими. Не думаю, что сегодняшнее общество сможет по достоинству оценить новые возможности, даруемые этими технологиями. Да и что станет с навьярами? Вспомните Новый Свет, посмотрите на другие наши колонии -- хотите ли вы этого для Леарр и других?"]];
 
        end};
 
        {tag="quit", always=true, "Поговорим в другой раз. ", [[Уолтер кивает: "Хорошо".]], code [[pret();]]};
 
        {tag="generic"};
 
        {tag="questions", always=true, "У меня есть несколько вопросов. ", function(s)
 
            if (rel_anna < 0) then
 
                return [[Уолтер отрицательно качает головой: "Не сейчас, я занят". ]];
 
            else
 
                psub("questions");
 
                return [[Уолтер кивает: "Слушаю". ]];
 
            end;
 
        end};
 
		{tag="on_iyh", always=true, "Что ты можешь рассказать мне о храме?", [[Уолтер пожимает клечами: "Возможно, мы сможем разрушить вход в храм. Однако я не знаю, как навьяры на это отреагируют". ]]};
 
		{tag="join", always=true, "Я хочу, чтобы ты пошел со мной в следующий раз", "Хорошо",
 
			function()
 
				if (submarine_leviathan.suits > 1) then
 
@@ -536,49 +536,49 @@ anna_home_dlg = dlg {
 
					pon('stay');
 
					poff('join');
 
					return [[Я готова]];
 
				else
 
					-- TODO сообщать это только если в партии есть навьяры
 
					return [[У нас не хватит оборудования. Лучше возьми кого-нибудь из навьяров]];
 
				end;
 
			end; 
 
		};
 
		{ tag = "stay", always = "true", "Оставайся на Левиафане", "Хорошо", 
 
			function()
 
				char_anna:accompany(false);
 
				pon('join');
 
				poff('stay');
 
			end;
 
		};
 
		{ tag = "exit", always = "true", "Это все", "Хорошо", 
 
			function() 
 
				back();
 
			end;
 
		};
 
        { tag = "talk_more"};
 
        {tag="on_anna", "Расскажи о себе. ", function(s)
 
            char_anna.anna_asked = 2;
 
            return [[Анна Рэдклифф грустно вздыхает: "Мне почти нечего рассказывать. Я с молодости живу здесь, на Атлантиде. Когда Уолтер сказал, что мы будем жить здесь, я сперва расстроилась -- тогда это казалось мне невероятно скучным -- жить вдалеке от цивилизации, среди людей, которые старше меня на двадцать с лишним лет. На самом деле все оказалось не столь плохо -- здесь есть навьяры. Когда они заняты -- я сижу в библиотеке, с Мари, или смотрю фильмы в Игнисе". ]];
 
            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};
 
        {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};
 
	};
0 comments (0 inline, 0 general)