else

                char_anna.drake_asked = 2;

                return [[Анна Рэдклифф отвечает: "Хотя Дрейк -- руководитель Атлантиды, он проводит больше времени здесь, в Окулусе, чем в своем кабинете в Доминусе. Сейчас он в экспедиции -- они с Блэком отправились на поиски отдаленных навьярских поселений". ]];

            end;

        end};

        {tag="on_black", "Расскажите об Адриане Блэке. ", function(s)

            if rel_anna < 0 then

                char_anna.black_asked = 1;

                return [[Анна Рэдклифф отвечает: "Я не хочу об этом с вами говорить". ]];

            else

                char_anna.black_asked = 2;

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

            end;

        end};

        {always=true, "Вернемся к делу.", [[Анна Рэдклифф кивает: "Хорошо".]], code [[ char_anna_atlantis_dlg:reset_more(); pret(); ]]};

		{tag="generic"};

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

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

	};

};

--[[

    Learr

]]

atlantis_learr_intro = room {

    nam = "Атлантида, Окулус, Главный коридор";

    dsc = [[Вы выходите из межсекционного коридора в главный коридор секции _"Окулус"_ и сталкиваетесь лицом к лицу с неведомым существом. Стройное, покрытое блестящей серо-зеленой чешуей тело слегка покачивается. Рыбья голова с небольшими отростками-плавниками, тонкие ноги и руки с широкими перепонками между длинными пальцами покрыты такой же чешуей. Ярко-оранжевые глаза существа с интересом разглядывают вас. Во рту существа сверкают острые треугольные зубы. Одето оно в белую рубашку и ярко-синюю юбку до колен. На шее существа вы замечаете жабры. Отростки на голове существа принимают слабо уловимый сине-зеленый оттенок. ]];

    obj = {

        vway('continue', '{Продолжить}', 'atlantis_learr_first_dlg')

    };

};

atlantis_learr_first_dlg = dlg {

    nam = "Леарр";

    entered = [[Существо начинает говорить: "Я здесь-раньше-не-видела вас". Голос звучит непривычно для вашего слуха -- гласные произносятся очень коротко, между некоторыми словами делаются резкие паузы, другие же сливаются практически в одно. ]];

    phr = {

        {"Кто ты?", [[Существо отвечает: "I'yhe'lea'yhe'na'vji'a'rr", -- вы отчетливо различаете короткие паузы между слогами. ]], code [[ pon('who_are_you'); ]]};

        {tag="who_are_you", false, "Я не понимаю, что ты говоришь.", [[Существо ненадолго застывает в замешательстве. Затем отвечает: "Я Lea'rr. Ты так-понимаешь?". ]], code [[psub('learr'); ]]};

        {"Аааа, монстр, помогите!!!", [[Существо скалит зубы. Плавники меняют цвет на ярко-фиолетовый. Оно рычит на вас: "Пропусти. Нет-времени". ^Щелкнув зубами, _"Чудовище"_ уходит. ]], code [[

            put(char_learr_atlantis, atl_luna_common_room);

            char_learr_atlantis.offended = true;

            walk("atl_oculus_main_corridor");

        ]]};

        {tag="learr"};

        {"Рад знакомству. Я Дэвид Дрейк. ", [[Леарр переспрашивает: "Ты знаешь Уильяма-Дрейка?" -- Вам кажется, вы чувствуете удивление, хотя интонации в словах существа вам совершенно чужды. ]], code [[ psub('drake') ]]};

        {"Что ты такое?", [[Леарр ненадолго задумывается и отвечает: "Мы себя-навьярами-называем. Мы недалеко-живем-в-нескольких-кругах-отсюда".]], code [[ pon('under_water'); ]]};

        {tag="under_water", false, "Под водой?", [[Леарр кивает. Через некоторое время отвечает: "Ты с-поверхности? Никогда-нас-не-видел, похоже". ]]};

        {tag="drake"};

        {tag="follow_drake"};

        {"Я здесь из-за него. " , [[Леарр кивает: _"Я вам-как-смогу-помогу. Я в-Луне-буду, если вы говорить-хотите"_. ^Леарр уходит, а вы остаетесь в одиночестве. ]], code [[ put(char_learr_atlantis, atl_luna_common_room); walk("atl_oculus_main_corridor"); ]]};

    };

};

char_learr_atlantis_dlg = dlg {

	var {

		state = 0;

	};

	nam = "Леарр";

	disp = "Леарр";

	enter = function(s)

        poff('iyh1', 'iyh2');

        if (atl_iyh_state == 1 and not atl_iyh_learr_spoken) then

            pon('iyh1');

        elseif (atl_iyh_state == 2 and ArrayUtils.indexOf(pl.party, 'learr') == 0) then

            pon('iyh2');

        end;

		if (s.state == 0) then

            if ArrayUtils.indexOf(pl.party, 'wright') ~= 0 and char_jack_wright_atlantis_dlg.state then

                pr [[Джек Райт прощается с Леарр и покидает комнату. ]];

                char_jack_wright_atlantis_dlg.state = 1;

                remove('char_jack_wright_atlantis', 'atl_luna_common_room');

            end;

			if (char_learr_atlantis.offended) then

				psub("offended");

				pr [[Леарр поворачивается к вам, плавники ее становятся ярко-фиолетовыми. Она рычит: "Приветствую, монстр. Мы говорить-будем?" ]];

			else

				psub("friendly");

				pr [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я приветствую тебя-he'vji'a'rr". ]];

			end;

		else

            if (rel_learr < 0) then

                if (char_learr.on_books == 0) then pon("on_books") end;

            else

                if (char_learr.on_books < 2) then pon("on_books") end;

            end;

			psub("generic");

			if (rel_learr > 0) then

				return [[Леарр поворачивается к вам, плавники ее принимают сине-зеленый оттенок, а она говорит: "Я рада-видеть тебя". ]];

			else

				return [[Леарр поворачивается к вам, плавники ее принимают едва заметный сине-зеленый оттенок, а она говорит: "Я приветствую тебя-he'vji'a'rr". ]];

			end;

		end;

	end;

	phr = {