dsc = [[{Вождь Дипатреанотра} сидит на троне с закрытыми глазами. Руки его сложены на груди. В правой он держит небольшой золотистый жезл, в навершии которого укреплен круглый камень, излучающий яркий зеленый свет. Светло-синяя чешуя покрыта узором из татуировок. Как и другие навьяры он одет в костюм из водорослей. На левой руке дремлюего вождя вы видите искусный браслет из блестящего металла. ]];

    dlg = "dyp_chief_dlg";

};

dyp_chief_dlg = dlg {

    var {

        lse = false;

        aed = false;

    };

    nam = "dyp_chief_dlg";

    disp = "Вождь Дипатреанотра";

    entered = function(s)

        if not language_known then

            psub("no_speak");

            return [[Как только вы приближаетесь к столу, глаза вождя открываются. Он поднимается с трона. Руки его остаются сложенными на груди, а взгляд его желтых глаз устремляется на вас. По его головным плавникам бегут цветные полосы. К сожалению, вы не понимаете, что он пытается вам сказать. ]];

        else

            psub("speak");

            if atl_iyh_state == 10 and not s.lse then

                s.lse = true;

                pon("lseryanotrr");

            end;

            if dyp_quest_state == 1 and have(item_electric_lamp, pl) and item_electric_lamp.state == 2 then

                pon("quest1");

            end;

            if dyp_quest_state == 2 and have(item_shark_tooth, pl) then

                pon("quest2");

            end;

            if dyp_stones_known and dup_quest_state == 0 then

                pon("quest");

                pon("star_map");

            end;

            if dyp_quest_state == 4 and not s.aed then

                s.aed = true;

                pon("aedienrr");

            end;

            return [[Как только вы приближаетесь к столу, глаза вождя открываются. Он поднимается с трона. Руки его остаются сложенными на груди, а взгляд его желтых глаз устремляется на вас. По его головным плавникам бегут цветные полосы: "Чем скромные навьяры из Дипатреанотра обязаны визиту почтенного хевьяра? Ты говори". ]];

        end;

    end;

    phr = {

        {tag="no_speak"};

        {always=true, "[Уйти]", code [[ back(); ]]};

        {tag="speak"};

        {tag="lseryanotrr", false, "[Кодировщик] Я ищу карту пути в Лсэрианотр.", [[Вождь отвечает: "Ты спроси в храме или в библиотеке. Я ничего такого не знаю". ]]};

        --[[{tag="star_map", false, "[Кодировщик] Мне нужен камень из твоего жезла. Что я могу предложить в обмен на него?", [ [Глаза вождя загораются, он ухмыляется. По плавникам быстро, словно в нетерпении, бегут цветные полосы: "Я хочу карту небесных огней из Ираафаанотра. Принеси ее и забирай этот жезл вместе с камнем". ] ], code [ [ dyp_quest_state = 1; ] ]};]]

        {tag="quest", false, "[Кодировщик] Мне нужен камень из твоего жезла. Что я могу предложить в обмен на него?", [[Глаза вождя загораются, он ухмыляется. По плавникам быстро, словно в нетерпении бегут цветные полосы: "Принеси мне три вещи, что я попрошу и получишь жезл вместе с камнем". ]], code [[psub("agree_quest");]]};

        {tag="quest1", false, "[Отдать светильник] [Кодировщик] Вот то, что ты просил. Что тебе еще нужно?", [[Вождь с интересом рассматривает принесенный вами прибор, после чего ставит его на стол перед собой и говорит: "Еще мне нужен акулий зуб". ]], code [[ remove("item_electric_lamp", pl); dyp_quest_state = 2; ]]};

        {tag="quest2", false, "[Отдать зуб акулы] [Кодировщик] Вот то, что ты просил. Что тебе еще нужно?", [[Вождь кладет зуб на стол рядом со светильником и говорит: "Я хочу карту небесных огней из Ираафаанотра. Принеси ее и забирай этот жезл вместе с камнем". ]], code [[ remove("item_shark_tooth", pl); dyp_quest_state = 3; psub("agree_quest2"); ]]};

        {tag="quest3", false, "[Отдать карту небесных огней] Вот то, что ты просил. Я могу забрать камень?", function(s)

                -- отдаем копию

                return "";

                --[[Вождь отдает вам жезл, как и обещал. ]]

                -- отдаем оригинал, но жезл из тайника отдали в Ираафаанотр

                -- отдаем оригинал, жезл из тайника не отдали в Ираафаанотр

                return "";

            end;

        end};

        {tag="aedienrr", "[Кодировщик] Ваш город посещал Аэдиенрр из Ираафаанотра недавно?", [[Вождь отвечает: "Не мое дело следить за этим. Спроси у стражников". ]]};

        {always=true, "[Кодировщик] Я пойду.", [[Вождь прощается с вами: "Ты возвращайся". Он садится обратно на трон и закрывает глаза. ]], code [[ back(); ]]};

        {tag="agree_quest"};

        {always=true,"[Кодировщик] Что ты хочешь, чтобы я принес?", [[Вождь отвечает: "Первая вещь, что мне нужна -- это светящаяся капсула из вашего города". ]], code [[ dyp_quest_state = 1; pret(); ]]};

        {always=true,"[Кодировщик] Я передумал. ", [[Вождь пожимает плечами. ]], code [[ pon("quest"); pret(); ]]};

        {tag="agree_quest2"};

        {always=true,"[Кодировщик] Как к этому отнесутся в Ираафаанотре?", [[Вождь отвечает: "Они могут быть против. Уговори их". ]], code [[ pret(); ]]};

        {always=true,"[Кодировщик] Я не буду этого делать.", [[Вождь отвечает: "Я отдам посох только за карту небесных огней". ]], code [[ pret(); ]]};

    };

};

--[[

Дипатреанотр храм

]]

dyp_temple_entry = lcutscene("dyp_temple_entry", "Левиафан, рубка", [[Храм Дипатреанотра располагается в нескольких часах пути от Атлантиды на Левиафане. К массивным дверям храма, вырезанным в толще скалы, ведет широкая каменная лестница, некогда украшенная резными орнаментами, ныне осыпавшимися и раскрошившимися. Над входом вырезано изображение, состоящее из нескольких концентрических кругов и каких-то символов. ]], "Вы прибыли в Храм Дипатреанотра. ", leviathan_wheelhouse);

dyp_temple_guard = npc {

    nam = "ctt_dyp_temple_guard";

    dsc = [[У ворот стоят два навьяра, вооруженные копьями. При вашем приближении они начинают нервничать -- переглянувшись, они перехватывают копья, готовясь при необходимости прогнать вас. По плавникам одного из них бегут цветные полосы: темно-фиолетовая, зеленая, оранжевая -- шире чем остальные, серая, ярко-розовая, желтая -- снова широкая, салатовая, снова широкая желтая и, наконец, широкая бледно-оранжевая. После небольшой паузы, полосы появляются снова. ]];

    phrases = {

        [[Стражник не реагирует на ваши попытки начать общение. ]];

    };

};

dyp_temple_carving_look = room {

    nam = "Храм Дипатреанотра, вход";

    pic ="images/iyh_navjiarr_map.png"; 

    dsc = [[Над входом в храм вырезана схема, состоящая из нескольких концентрических кругов. Часть схемы полностью стерлась от времени. ]];

    obj = {

        vway("continue", "{Продолжить}", "dyp_temple_entrance");

    };

};

dyp_temple_carving = obj {

    nam = "dyp_temple_carving";

    dsc = [[Над входом в храм вырезано {изображение} состоящее из нескольких кругов и еще каких-то символов. Часть изображения стерлась от времени, однако остальная часть все еще читаема. ]];

    act = function(s)

        walkin("dyp_temple_carving_look");

    end;

};

            e3 = "11";

        };

        ["30"] = {

            e1 = "40";

            e2 = "41";

            e4 = "20";

        };

        ["31"] = {

            e2 = "42";

            e4 = "21";

        };

        ["32"] = {

            e2 = "43";

            e3 = "21";

        };

        ["33"] = {

            e3 = "22";

        };

        ["40"] = {

            e2 = "50";

            e4 = "30";

        };

        ["41"] = {

            e3 = "30";

        };

        ["42"] = {

            e1 = "51";

            e3 = "31";

        };

        ["43"] = {

            e1 = "52";

            e3 = "32";

            enter = function(s)

                if not s.fight then

                    s.fight = true;

                    walk("dyp_crab_fight_intro");

                end;

            end;

        };

        ["50"] = {

            e3 = "40";

        };

        ["51"] = {

            e4 = "42";

        };

        ["52"] = {

            e4 = "43";

            enter = function(s)

                end;

            end;

            exit = function(s)

            end;

        };

    };

};

dyp_crab_fight_intro = cutscene("dyp_crab_fight_intro", "Пещера", [[Впереди, вы замечаете какое-то движение. Луч прожетора выхватывает огромные острые клешни гигантского краба, устремившегося к вам. Следом за ним вы видите множество крабов поменьше, также ползущих к вам на своих тонких острых ногах. ]], "dyp_crab_fight");

dyp_crab_fight_win = cutscene("dyp_crab_fight_win", "Пещера", [[Отбившись от крабов, вы остаетесь одни в темном лабиринте пещер. ]], "dyp_crab_cave");

dyp_cmbt_learr = combatant {

    nam = "dyp_cmbt_learr";

    disp2 = "Леарр";

    disp3 = "Леарр";

    x = 5;

    y = 7;

    pic = "images/learr.png";

    ally = "Я не буду атаковать союзника.";

    nohit = "Я не буду атаковать союзника.";

    noshoot = "Я не буду атаковать союзника.";

    hp = 10;

    hasSpear = true;

    make_turn = function(s)

        local enemies = {  };

        for item=1,#here().obj do

            local obj = here().obj[item];

            if (obj.enemy and obj.hp > 0) then

                local p = here():getWalkDistance(s.x, s.y, obj.x, obj.y);

                if (p) then

                    table.insert(enemies, {

                        o = obj,

                        p = p

                    });

                end;

            end;

        end;

        if (#enemies == 0) then

            pn("Леарр ждет. ");

            return;

        end;

        table.sort(enemies, function(a, b)

            return (a.p.l < b.p.l);

        end);

        local enemy = enemies[1].o;

        local path = enemies[1].p;

        for i = 1,#enemies do

            print(enemies[i].p.l);

        end;

        -- AI Order:

        -- If has spear and enemy is far   - throw spear

        -- If has spear and enemy is close - hit with spear

        -- if spear is nearer than any enemy - walk towards spear

        -- walk towards nearest enemy

        -- If enemy close and enemy has spear - take spear from enemy