global {

    lse_intro_with_learr = false;

    lse_intro_with_jack = false;

    lse_intro_with_walter = false;

    lse_intro_with_anna = false;

};

lse_entered = cutscene("lse_entered", "Левиафан, рубка", [[

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

    ]], "lse_entered2");

lse_entered2 = cutscene("lse_entered2", "Левиафан, рубка", function(s)

    if (ArrayUtils.indexOf(pl.party, 'learr') ~= 0) then

        if (rel_learr > 0) then

            pr [[

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

            ]];

        elseif (rel_learr < 0) then

            pr [[

                Леарр застыла в изумлении и лишь по ее плавникам бегут цветные полосы, означающие "Мои-предки невероятное-это-построили. Я хочу, чтобы мы сейчас-так-могли". Она обращает свой взор к вам и произносит: "Мы наш-путь-закончили-почти. Наконец-то мы своими-путями-разойдемся". ^

            ]];

        else

            pr [[

                Леарр застыла в изумлении и лишь по ее плавникам бегут цветные полосы, означающие "Мои-предки невероятное-это-построили. Я хочу, чтобы мы сейчас-так-могли". По мере вашего приближения она продолжает поглощать взглядом прекрасно сохранившиеся здания города. ^

            ]];

        end;

    end;

    if (ArrayUtils.indexOf(pl.party, 'phaetlarr') ~= 0) then

        if (rel_phaetlarr > 0) then

            pr [[

                Фаэтларр неподвижно встал рядом с вами. Не отрывая взгляда, он смотрит через иллюминаторы Левиафана на древний город своего народа. По его плавникам бегут цветные полосы: "Адриан-Блэк здесь, Дрейк. Ты-действуй".^

            ]];

        elseif (ArrayUtils.indexOf(pl.party, 'learr') ~= 0) then

            pr [[

                Фаэтларр неподвижно встал рядом с Леарр. Не отрывая взгляда, он смотрит через иллюминаторы Левиафана на древний город своего народа. По его плавникам бегут цветные полосы: "Адриан-Блэк здесь. Я ему-за-все-отомщу". ^

            ]];

        else

            pr [[

                Фаэтларр неподжвижно стоит в углу рубки. Не отрывая взгляда, он смотрит через иллюминаторы Левиафана на древний город своего народа. По его плавникам бегут цветные полосы: "Адриан-Блэк здесь. Я ему-за-все-отомщу". ^

            ]];

        end;

    end;

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

        if (rel_jack > 0) then

            pr [[

                При виде купола и всего что находится под ним, Джек восклицает: "Невероятно, Дрейк! Ты только посмотри! Хотелось бы мне знать, как они сделали это. Это в тысячи раз больше нашей маленькой Атлантиды. И весь этот свет!" ^

            ]];

        elseif (rel_jack < 0) then

            pr [[

                При виде купола и всего что находится под ним, Джек восклицает: "Невероятно! Хотелось бы мне знать, как они сделали это. Это в тысячи раз больше нашей маленькой Атлантиды! Но наша цель здесь другая. Мы должны остановить найти Блэка и разузнать у него все". ^

            ]];

        else

            pr [[

                При виде купола и всего что находится под ним, Джек восклицает: "Невероятно! Хотелось бы мне знать, как они сделали это. Это в тысячи раз больше нашей маленькой Атлантиды!" ^

};

lse_walk_intro = cutscene("lse_walk_intro", "Лсэрианотр", function(s)

    pr [[

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

    ]];

    if (lse_intro_with_learr) then

        if (rel_learr < 0) then

            pr [[

                Леарр старается держаться подальше от вас. Она почти не обращает внимания на происходящее вокруг - ее взгляд сосредоточен на Аэдхиарре. ^

            ]];

        else

            pr [[

                Леарр почти не обращает внимания на происходящее вокруг - ее взгляд сосредоточен на Аэдхиарре. Лишь изредка она посматривает в вашу сторону, видимо ожидая ваших действий. ^

            ]];

        end;

    end;

    if (lse_intro_with_jack) then

        pr [[

            Джек полностью поглощен древним городом. Он с восхищением разглядывает металлическую дорогу, строения, врата, купол. ^

        ]];

    end;

    if (lse_intro_with_anna) then

        pr [[

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

        ]];

    end;

    if (lse_intro_with_walter) then

        if (lse_intro_with_anna) then

            pr [[

                Уолтер молча идет рядом с сестрой. Кажется, его совершенно не интересует происходящее вокруг. ^

            ]];

        else

            if (rel_radcliffe < 0) then

                pr [[

                    Уолтер молча следует за вами. Кажется, его совершенно не интересует происходящее вокруг. ^

                ]];

            else

                pr [[

                    Уолтер молча следует за вами. Кажется, его совершенно не интересует происходящее вокруг. Лишь один раз он позволил себе небольшой комментарий: "Никогда не думал, что Блэк на такое способен. Запудрить мозги несчастным рыбням и прибрать к своим рукам целый город. Их город". ^

                ]];

            end;

        end;

    end;

};

dofile "atlantis_dlg.lua"

dofile "atlantis_intro.lua"

dofile "atlantis_ignis_on_fire.lua"

dofile "atlantis_looking_for_clues.lua"

dofile "atlantis_from_the_ashes.lua"

dofile "atlantis_iyhehevjiarr.lua"

dofile "atlantis_catching_the_tail.lua"

-- Часть 3

dofile "journey_venaedanotrr.lua"

dofile "journey_zayslanotrr.lua"

dofile "journey_zayslanotrr_temple.lua"

dofile "journey_temple.lua"

-- Часть 4

dofile "lseryanotrr_intro.lua"

dofile "lseryanotrr_locations.lua"

--dofile "final_scene.lua";

--dofile "final_battle.lua";

--dofile "first_city_inner_rim.lua"

--dofile "first_city_middle_rim.lua"

--dofile "first_city_outer_rim.lua"

global {

	warehouse18_found = false;

	warehouse32_found = false;

	dock_found = false;

	leviathan_discovered = false;

	atlantis_found = false;

	temple_found = false;

	nearest_cities_found = false;

	iraaphaanotrr_temple_found = false;

	dypatreanotrr_temple_found = false;

    venaedanotrr_temple_found = false;

    zayslanotrr_temple_found = false;

    deep_temple_found = false;

    lseryanotrr_found = false;

	rel_phaetlarr = 0;

	rel_walter = 0;

	rel_learr = 0;

	rel_anna = 0;

	rel_jack = 0;

    dt_code = {};

    dt_buttons = {};

};

	nam = "player";

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

    disp2 = "Дрейка";

    disp3 = "Дрейку";

	where = 'port';

	hp = 10;

	obj = {'item_umbrella', 'item_charts', 'item_note_1', 'item_money', 

	};

	-- party array. Should be empty on start

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

	companion = nil;

	money = 200;

	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: Если вы видите это сообщение - это баг. ";

require "dbg"

function init()

	---modules 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);

	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;

	atl_iyh_state = 7;

	--]]

	--- Chapter 1: Atlantis

	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; -- включена ли энергия

	submarine_leviathan.air_level = 432000; -- запас воздуха. Максимум - 5 дней(5 * 24 * 60 * 60 = 432000)

	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;

	pl.party = {'wright'};

	put(item_toolbox, pl);

	put(item_ducttape, pl);

	pl.where = "leviathan_airlock";

	atlantis_found = true;

	move(submarine_leviathan, "atl_aqua_leviathan_dock");

    submarine_leviathan:enable();   

    --ven_temple_l1.position = "66";   

    put(item_ven_tablet, pl);

    put(item_harpoon, pl);

    put(item_colt, pl);

    --ven_shark.position = "55";

	--pl.where = "za_plaetlarr_fight";

    move(submarine_leviathan, "za_temple_back_entrance_foot");

    char_anna.follow = true;

    --pl.where = "ven_chest_look";

    --move(ven_shark, "ven_temple_l1");

	--put(item_suit, pl);

	-- pl.where = warehouse_32;

	-- pl.where = w32_mgr;

	-- put(item_cogs, pl);

	-- put(item_pump_details, pl);

	-- put(item_electrodes, pl);

	--put(item_lamp, pl);

	-- pl.where = aurora_borealis;

	-- move(submarine_leviathan, first_city_entrance);

	-- move(submarine_leviathan, first_city_outer_east);

	-- walk(final_scene);

	-- walk(leviathan_wardroom);

	-- walk(leviathan_wardroom);

	-- put("char_learr", "leviathan_wardroom");

	-- put("char_phaetlarr", "leviathan_engines");

	-- put("char_radcliffe", "leviathan_engines");

	-- put("char_wright", "leviathan_wardroom");

	-- pl.where = leviathan_airlock;

	-- pl.where = hotel_street;

	-- pl.where = warehouse_32_entry;

	-- dock_found = true;

end;