end};

        {tag="on_wright", false, "Расскажите о Майлке Райте. ", function()

            char_darkstar.wright_asked = 2;

            return [[Винсент Даркстар отвечает: "Майкл Райт -- руководитель инженерного отдела на Атлантиде. В его задачи входит поддержание работоспособности станции и ее техническое развитие. Станция -- дело всей его жизни. Когда поднимался вопрос, он не колеблясь оставил семью на поверхности ради возможности развивать Атлантиду". ]];

        end};

        {tag="on_atlantis", false, "Расскажите об Атлантиде. ", function()

            char_darkstar.atlantis_asked = 2;

            return [[Винсент Даркстар отвечает: "Атлантида построена на средства Вестхейвен Трансоушен -- компании вашего отца. Майкл Райт -- создатель станции, многое продумал, существенно облегчив мне работу. Конечно, периодически, мне приходится иметь дело с нарушениями правил -- я неоднократно просил не загромождать коридоры; всегда закрывать за собой шлюзы, двери, щитки, панели; не перекрывать посторонними предметами доступ к важным узлам станции. Думаю, вы сами заметили, как исполняются эти указания". ]];

        end};

        {tag="on_navjiarr", false, "Что вы думаете о навьярах? ", function()

            char_darkstar.navjiarr_asked = 2;

            return [[Винсент Даркстар отвечает: "Они -- причина существования Атлантиды, так что в какой-то мере мы все обязаны им тем, что оказались здесь. Не все на станции довольны этим -- и это создает определенную угрозу. Но, надо признать, они не пытались навредить нам последнее время, однако, я все еще советую Моро и Светловой быть настороже при общении с ними. Они не так просты, как кажутся". ]];

        end};

        {tag="on_learr", false, "Что вы думаете о Леарр? ", function()

            char_darkstar.learr_asked = 2;

            return [[Винсент Даркстар отвечает: "Леарр -- представительница одного из навьярских племен на станции. Она любопытна, молода и умна. Она искренне заинтересована нами и нашими технологиями и это не может не радовать". ]];

        end};

        {tag="on_ryveerr", false, "Что вы думаете о Ривеерре? ", function()

            char_darkstar.ryveerr_asked = 2;

            return [[Винсент Даркстар отвечает: "Ривеерр -- представитель одного из навьярских племен на станции. Я мало что могу о нем сказать, и, в данном случае, это говорит в его пользу". ]];

        end};

        {always=true, "Вернемся к делу.", [[Даркстар кивает: "Слушаю".]], code [[ char_darkstar_dlg:reset_more(); pret(); ]]};

		{tag="generic"};

        {tag="more_questions", "У меня есть несколько вопросов.", [[Даркстар кивает: "Слушаю".]], code [[ psub('ask_more'); ]]};

		{always=true, "Я пойду.", [[Даркстар прощается: "До встречи". ]], code [[ back(); ]]};

        {tag="mtr_accuse"};

        {tag="mtr_goldman", always=true, "Аварию устроил Голдман.", [[Даркстар спрашивает: "Почему вы так решили?"]], code [[

            char_darkstar_dlg.mtr_accuse = 0;

            psub("mtr_accuse_goldman");

        ]]};

        {tag="mtr_leroy", always=true, "Аварию устроил Леруа.", [[Даркстар спрашивает: "Почему вы так решили?"]], code [[

            char_darkstar_dlg.mtr_accuse = 0;

            psub("mtr_accuse_leroy");

        ]]};

        {tag="mtr_jones", always=true, "Аварию устроил Джонс.", [[Даркстар спрашивает: "Почему вы так решили?"]], code [[

            char_darkstar_dlg.mtr_accuse = 0;

            psub("mtr_accuse_jones");

        ]]};

        {tag="mtr_accuse_goldman"};

        {tag="gclock", false, "Голдман часто оставляет часы по своей рассеянности. Часы были найдены в Солисе.", [[Даркстар спрашивает: "Что еще вы можете добавить?"]]};

        {tag="gclosing", false, "Голдман -- сторонник закрытия станции и часто говорит о ее ненадежности. Авария -- отличное подтверждение его слов.", [[Даркстар спрашивает: "Что еще вы можете добавить?"]]};

        {tag="gall", always=true, "У меня нет других доказательств.", [[Даркстар качает головой: "Боюсь, ваши доказательства неубедительны". ]], code [[psub("generic");]]};

        {tag="mtr_accuse_jones"};

        {tag="jclock", false, "Голдман часто оставляет часы по своей рассеянности. Джонс имел возможность украсть их неделю назад, во время обеда, когда Голдман потерял их в очередной раз.", function()

            char_darkstar_dlg.mtr_accuse = char_darkstar_dlg.mtr_accuse + 1;

            if char_darkstar_dlg.mtr_accuse == 3 then

                remove(char_jones, where(char_jones));

                walk('atl_mtr_outro_jones');

                return [[Даркстар достает из ящика стола лист бумаги и начинает что-то писать. Вам он говорит: "Вы хорошо поработали, господин Дрейк. Благодарю вас за работу". ]];

            else

                return [[Даркстар спрашивает: "Что еще вы можете добавить?"]];

            end;

        end};

        {tag="jsolis", false, "Согласно записям, Джонс обслуживал Солис вчера и имел возможность повредить оборудование.", function()

            char_darkstar_dlg.mtr_accuse = char_darkstar_dlg.mtr_accuse + 1;

            if char_darkstar_dlg.mtr_accuse == 3 then

                remove(char_jones, where(char_jones));

                walk('atl_mtr_outro_jones');

                return [[Даркстар достает из ящика стола лист бумаги и начинает что-то писать. Вам он говорит: "Вы хорошо поработали, господин Дрейк. Благодарю вас за работу". ]];

            else

                return [[Даркстар спрашивает: "Что еще вы можете добавить?"]];

            end;

                return [[Даркстар спрашивает: "Что еще вы можете добавить?"]];

            end;

        end};

        {tag="lsolis", false, "По словам Джонса, Солис вчера обслуживал Леруа. Также, Рэдклифф видел Леруа покидающим Терру -- единственную секцию с выходом к Солису.", function()

            char_darkstar_dlg.mtr_accuse = char_darkstar_dlg.mtr_accuse + 1;

            if char_darkstar_dlg.mtr_accuse == 3 then

                remove(char_leroy, where(char_leroy));

                walk('atl_mtr_outro_leroy');

                return [[Даркстар достает из ящика стола лист бумаги и начинает что-то писать. Вам он говорит: "Вы хорошо поработали, господин Дрейк. Благодарю вас за работу". ]];

            else

                return [[Даркстар спрашивает: "Что еще вы можете добавить?"]];

            end;

        end};

        {tag="lclosing", false, "Леруа -- сторонник закрытия станции и часто говорит о ее ненадежности. Авария -- отличное подтверждение его слов.", function()

            char_darkstar_dlg.mtr_accuse = char_darkstar_dlg.mtr_accuse + 1;

            if char_darkstar_dlg.mtr_accuse == 3 then

                remove(char_leroy, where(char_leroy));

                walk('atl_mtr_outro_leroy');

                return [[Даркстар достает из ящика стола лист бумаги и начинает что-то писать. Вам он говорит: "Вы хорошо поработали, господин Дрейк. Благодарю вас за работу". ]];

            else

                return [[Даркстар спрашивает: "Что еще вы можете добавить?"]];

            end;

        end};

        {tag="lall", always=true, "У меня нет других доказательств.", [[Даркстар качает головой: "Боюсь, ваши доказательства неубедительны". ]], code [[psub("generic");]]};

	};

};

char_moreau_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Фредерик Моро";

	disp = "Фредерик Моро";

    reset_more = function(s)

        poff("on_drake", "on_black", "on_darkstar", "on_svetlova", "on_moreau", "on_wright", "on_atlantis", "on_navjiarr", "on_learr", "on_ryveerr", "more_questions");

        if char_moreau.drake_asked < 2 then pon("on_drake"); pon("more_questions"); end;

        if char_moreau.black_asked < 2 then pon("on_black"); pon("more_questions"); end;

        if char_moreau.darkstar_asked < 2 then pon("on_darkstar"); pon("more_questions"); end;

        if char_moreau.svetlova_asked < 2 then pon("on_svetlova"); pon("more_questions"); end;

        if char_moreau.moreau_asked < 2 then pon("on_moreau"); pon("more_questions"); end;

        if char_moreau.wright_asked < 2 then pon("on_wright"); pon("more_questions"); end;

        if (char_moreau.atlantis_asked < 2) then pon("on_atlantis"); pon("more_questions"); end;

        if (char_moreau.navjiarr_asked < 2) then pon("on_navjiarr"); pon("more_questions"); end;

        if (char_moreau.learr_asked < 2) then pon("on_learr"); pon("more_questions"); end;

        if (char_moreau.ryveerr_asked < 2) then pon("on_ryveerr"); pon("more_questions"); end;

        if (starlight_darkstar_status == 1 and char_moreau.starlight_asked < 2) then pon("on_starlight"); pon("more_questions"); end;