walk('leviathan_dlg');

        ]]};

        {tag="dyp_temple_cliff_4"};

        {always=true, "[На восток, вдоль скалы]", function()

            move(submarine_leviathan, "dyp_temple_cliff_5");

            psub("dyp_temple_cliff_5");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[На юг, к ущелью]", function()

            move(submarine_leviathan, "dyp_temple_crevice_middle");

            psub("dyp_temple_crevice_middle");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[На запад, вдоль скалы]", function()

            move(submarine_leviathan, "dyp_temple_cliff_3");

            psub("dyp_temple_cliff_3");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[Отойти от штурвала]", code = [[

            walk('leviathan_wheelhouse');

        ]]};

        {always=true, "[Отправиться в другое место]", code = [[

            walk('leviathan_dlg');

        ]]};

        {tag="dyp_temple_cliff_5"};

        {always=true, "[На восток, вдоль скалы]", function()

            temple_found = true;

            move(submarine_leviathan, "iyh_far_from_entrance_foot");

            walk("iyh_far_from_entrance");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[На юго-восток, к скелету]", function()

            move(submarine_leviathan, "dyp_temple_whale");

            psub("dyp_temple_whale");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[На юг, к ущелью]", function()

            move(submarine_leviathan, "dyp_temple_crevice_east");

            psub("dyp_temple_crevice_east");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[На запад, вдоль скалы]", function()

            move(submarine_leviathan, "dyp_temple_cliff_4");

            psub("dyp_temple_cliff_4");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[Отойти от штурвала]", code = [[

            walk('leviathan_wheelhouse');

        ]]};

        {always=true, "[Отправиться в другое место]", code = [[

            walk('leviathan_dlg');

        ]]};

        {tag="dyp_temple_whale"};

        {always=true, "[На север, к храму]", function()

            temple_found = true;

            move(submarine_leviathan, "iyh_far_from_entrance_foot");

            walk("iyh_far_from_entrance");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[На юг, к ущелью]", function()

            move(submarine_leviathan, "dyp_temple_crevice_far_east");

            psub("dyp_temple_crevice_far_east");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[Отойти от штурвала]", code = [[

            walk('leviathan_wheelhouse');

        ]]};

        {always=true, "[Отправиться в другое место]", code = [[

            walk('leviathan_dlg');

        ]]};

        {tag="dyp_center"};

        {always=true, "[На восток, к обелиску]", function()

            move(submarine_leviathan, "dyp_temple_north_west");

            psub("dyp_temple_north_west");

            return where(submarine_leviathan).view;

        end};

        {always=true, "[Отойти от штурвала]", code = [[

            walk('leviathan_wheelhouse');

        ]]};

        {always=true, "[Отправиться в другое место]", code = [[

            walk('leviathan_dlg');

        ]]};

    };

};

dyp_temple_cave_entrance = room {

    nam = "dyp_temple_cave_entrance";

    disp = "Храм Дипатреанотра, пещера";

    dsc = [[Вы стоите у выхода из глубокой пещеры, расположенной неподалеку от храма Дипатреанотра. Перед вами длинный коридор, ведущий куда-то вглубь скалы. Вдалеке, в коридоре вы видите слабое свечение. ]];

    underwater = true;

    way = {

        kh_vroom("Выйти из пещеры", "dyp_temple_east");

    };

};

dyp_temple_cave_deep = room {

    nam = "dyp_temple_cave_deep";

    disp = "Храм Дипатреанотра, пещера";

    dsc = [[Здесь коридор разветвляется на три. В конце каждого вы видите слабое свечение красного, зеленого и синего цветов. ]];

    underwater = true;

    way = {

        kh_vroom("К выходу из пещеры", "dyp_temple_cave_entrance");

        kh_vroom("В \"Красный\" коридор", "dyp_temple_cave_red");

        kh_vroom("В \"Зеленый\" коридор", "dyp_temple_cave_green");

        kh_vroom("В \"Синий\" коридор", "dyp_temple_cave_blue");

    };

};

dyp_temple_cave_red = room {

    nam = "dyp_temple_cave_red";

    disp = "Храм Дипатреанотра, пещера";

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

    underwater = true;

    obj = {

        "dyp_temple_statue_red";

    };

    way = {

        kh_vroom("К выходу из пещеры", "dyp_temple_cave_deep");

        kh_vroom("В дверь", "dyp_temple_red_room"):disable();

    };

};

dyp_temple_statue_red = obj {

    nam = "dyp_temple_statue_red";

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

    use = function(s, o)

        if o == dyp_item_stone_red then

            remove(dyp_item_stone_red, me());

            path("В дверь"):enable();

            return [[Вы помещаете камень в отверстие на поясе статуи и массивная металлическая дверь опускается под пол, открывая проход в большое темное помещение.]];

        end;

    end;

};

dyp_temple_red_room = room {

    var {

        state = 0;

    };

    nam = "dyp_temple_red_room";

    disp = "Храм Дипатреанотра, пещера";

    pic = function(s)

        if s.state == 0 then

        else

        end;

    end;

    dsc = function(s)

        if s.state == 0 then

        else

        end;

    end;

};

dyp_temple_cave_green = room {

    nam = "dyp_temple_cave_green";

    disp = "Храм Дипатреанотра, пещера";

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

    underwater = true;

    obj = {

        "dyp_temple_statue_green";

    };

    way = {

        kh_vroom("В главный коридор", "dyp_temple_cave_deep");

    };

};

dyp_temple_statue_green = obj {

    nam = "dyp_temple_statue_green";

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

};

dyp_wall1_a = kh_vway("На восток", "dyp_temple_green_room_in_1");

dyp_wall1_b = kh_vway("На запад", "dyp_temple_green_room_1");

dyp_wall2_a = kh_vway("На юг", "dyp_temple_green_room_in_3");

dyp_wall2_b = kh_vway("На север", "dyp_temple_green_room_in_1");

dyp_wall3_a = kh_vway("На восток", "dyp_temple_green_room_in_2");

dyp_wall3_b = kh_vway("На запад", "dyp_temple_green_room_in_1");

dyp_wall4_a = kh_vway("На восток", "dyp_temple_green_room_in_4");

dyp_wall4_b = kh_vway("На запад", "dyp_temple_green_room_in_3");

dyp_wall5_a = kh_vway("На юг", "dyp_temple_green_room_in_4");

dyp_wall5_b = kh_vway("На север", "dyp_temple_green_room_in_2");

    artifacts_returned = false; -- Вернили ли артефакты из храма навьярам?

    wright_state = 0; -- был взят Райт на борт или нет

    goldman_state = 0; -- 0 - Голдман не раскрыт, 1 - Голдман казнен, 2 - Голдман задержан, 3 - Голдман изгнан

    leroy_state = 0; -- 0 - Леруа не раскрыт, 1 - Леруа казнен, 2 - Леруа задержан, 3 - Леруа изгнан

    iraa_scepter = false; -- был ли возвращен скипетр в Ираафаанотр

    iraa_map = false; -- был ли возвращен оригинал карты в Ираафаанотр

    dyp_map = false; -- Передана ли карта(оригинал или копия в Дипатреанотр)

    svetlova_help = 0; -- Дополнительная помощь, оказанная Светловой в исследовании навьяров --увеличивается, если показать ей КНО и скипетр

};

game.enable_save = function ()

    if here().nosave then

        return false;

    end;

    return true;

end;

game.enable_autosave = function ()

    if here().noautosave then

        return false;

    end;

    return true;

end;

player_drake = player {

    var {

        hp = 10;

        has_light = false;

        party = {--[["learr", "radcliffe", "phaetlarr", "wright"]]};

        companion = nil;

        money = 200;

    };

    nam = "player";

    disp = "Дэвид Дрейк";

    disp2 = "Дрейка";

    disp3 = "Дрейку";

    where = 'port';

    obj = {'hp_indicator', 'item_umbrella', 'item_charts', 'item_note_1', 'item_money', "item_bankbook"};

    pay = function(s, c)

        if (s.money >= c) then

            s.money = s.money - c;

            return true;

        else

            return false;

        end;

    end;

};

intro = room {

    nam = "intro";

    hideinv = true;

    disp = "Вступление";

    dsc = [[

        ВНИМАНИЕ: Это специальная предварительная версия игры. Ни один фрагмент игры не является финальным.^^

        Действие игры происходит в конце 19-го века. Вы играете за Дэвида Дрейка -- единственного сына богатого и уважаемого владельца транспортной компании "Вестхейвен Трансоушен". ^

        Несколько лет назад, когда Дэвиду было 10 лет, Уильям таинственным образом бесследно пропал. Полицейское расследование вскоре зашло в тупик и было прекращено. Через несколько месяцев компания, оставшаяся без своего владельца, обанкротилась, ее имущество распродается. ^

        После исчезновения отца Дэвид жил в Вашингтоне с бабушкой. Он пошел по стопам отца и выучился на инженера-кораблестроителя. Несколько дней назад в доме, где он жил, был обнаружен тайник, хранящий секретные документы отца -- карты, указывающие, по-видимому, на какие-то тайники Уильяма и записка с адресом и именем.^

        Одержимый идеей узнать больше, Дэвид отправляется в Лондон...

    ]];

    obj = {

        vway("Начать игру", "{Начать игру}", 'aurora_borealis');

    }

};

game.nam = "Пробуждение";

game.dsc = [[

    Действие игры происходит в конце 19-го века. Вы играете за Дэвида Дрейка, сына владельца крупной транспортной компании "Вестхейвен Трансоушен". Несколько лет назад Уильям Дрейк, отец главного героя бесследно пропадает. Компания вскоре разваливается. Поиски ни к чему не приводят. Когда казалось бы уже все потеряно, в доме Дрейков находят тайник с документами Уильяма. Несколько схем строений, принадлежащих компании и клочок бумаги с адресом некоего Майкла Райта в Лондоне. Естественно, Дэвид как можно скорее отправляется в Великобританию...

    Вам предстоит отыскать подводную лодку, посетить подводную станцию, построенную Уильямом, встретить древнюю расу подводных жителей, поучаствовать в событиях, описанных древними легендами этой расы и узнать, что стало с Уильямом Дрейком.

]];

game_act_phrases = {

    "Вы не знаете, что с этим делать. ";

    "Вам нет смысла это трогать. ";

    "Вам это ничем не поможет. ";

    "Это бессмысленно. ";

    "Незачем это трогать. ";

};

game_use_phrases = {

    "Вам это ничем не поможет. ";

    "Это бессмысленно. ";

    "Вы не знаете, как это сделать. "

};

game.act = function(s)

    return game_act_phrases[rnd(#game_act_phrases)];

end;

game.use = function(s)

    return game_use_phrases[rnd(#game_use_phrases)];

end;

game.inv = "INV: Если вы видите это сообщение -- это баг. ";

function init()

    ---modules init

    pl = player_drake;

    require "dbg";

    atlantis_init();

    leviathan_init();

    warehouse18_init();

    warehouse32_init();

    local nums = {1,2,3,4,5,6};

    for i = 1, 4 do 

        local index = rnd(#nums);

        table.insert(dt_code, nums[index]);

        table.remove(nums, index);

    end;

    nums = {1,2,3,4,5,6};

    for i = 1, 3 do 

        local index = rnd(#nums);

        table.insert(dt_buttons, nums[index]);

        table.remove(nums, index);

    end;

    ---game init

    pl.where = intro;

    ---debug

    --pl.where = "item_book_dlg";

    --pl.where = "dyp_obelisk_puzzle";

    --language_known = true;

    --put("item_toolbox", pl);

    --put("item_electric_lamp", pl);

    --put("item_dynamo", pl);

    --put("item_toolbox", pl);

    --put("item_cogs", pl);

    --put("item_ducttape", pl);

    --put("item_electrodes", pl);

    --pl.where = dock_2;

    --pl.where = warehouse_32;

    --put(item_lamp, pl);

    --language_known = true;

    --pl.where = "leviathan_airlock";

    --move(submarine_leviathan, "iyh_rear_entrance_foot");

    --put(item_suit, pl);

    --put(item_suit, pl);

    --pl.where = "atlantis_intro_dock";

    ---leviathan

    --submarine_leviathan.airpump = false;

    --[[

    leviathan_airlock.has_light = true;

    leviathan_wardroom.has_light = true;

    leviathan_wheelhouse.has_light = true;

    leviathan_corridor.has_light = true;

    leviathan_cabin_1.has_light = true;

    leviathan_cabin_2.has_light = true;

    leviathan_cabin_3.has_light = true;

    leviathan_cabin_4.has_light = true;

    leviathan_cabin_5.has_light = true;

    leviathan_captains_cabin.has_light = true;

    leviathan_cargo_hold.has_light = true;

    leviathan_engines.has_light = true;

    leviathan_lower_deck.has_light = true;

    leviathan_life_support.has_light = true;

    submarine_leviathan.air_level = 432000;

    submarine_leviathan.battery = true; 

    submarine_leviathan.battery_charge = 100;

    submarine_leviathan.circuit_breaks = 0;

    submarine_leviathan.valves_to_replace = 0;

    submarine_leviathan.power_on = true

    pl.party = {'wright', 'learr'};

    char_learr.follow = true;

    atlantis_found = true;--]]

    --take(item_colt);

    --take(item_harpoon);

   -- checkers_game:reset();

    --pl.where = "checkers_game";

    --- iraaphaanotrr

   --move(submarine_leviathan, "iraa_temple_entrance");

    --[[

    ---IYH

    lifeon(char_learr);

    lifeon(char_wright);

    lifeon(char_radcliffe);

    lifeon(char_anna);

    lifeon(char_aikerjarr_lev);

    pl.party = {'learr', 'wright', 'radcliffe', 'anna'};

    atlantis_found = true;

    move(submarine_leviathan, "ctt_dyp_temple_entrance");

    --move(submarine_leviathan, "iyh_far_from_entrance_foot");

    pl.where = leviathan_wheelhouse;

    submarine_leviathan.battery = true; -- Состояние батареи 

    submarine_leviathan.battery_charge = 100; -- Уровень заряда батареи

    submarine_leviathan.circuit_breaks = 0; -- Разрывы цепи

    submarine_leviathan.valves_to_replace = 0; -- Количество клапанов, которые нужно заменить для полноценной работы

    submarine_leviathan.power_on = true; -- включена ли энергия