item_ven_key_chieftain = obj {
    nam = 'item_ven_key_chieftain';
    disp = "Первый ключ от храма";
    inv = [[
        Небольшой коралловый ключик, Кольцо его окрашено в красный цвет.
    ]];
};

item_ven_key_library = obj {
    nam = 'item_ven_key_library';
    disp = "Второй ключ от храма";
    inv = [[
        Небольшой коралловый ключик, Кольцо его окрашено в зеленый цвет.
    ]];
};

item_ven_key_tower = obj {
    nam = 'item_ven_key_tower';
    disp = "Третий ключ от храма";
    inv = [[
        Небольшой коралловый ключик, Кольцо его окрашено в синий цвет.
    ]];
};

item_ven_gem = obj {
    nam = "item_ven_gem";
    disp = "Жемчужина";
    dsc = "{Взять жемчужину}";
    inv = [[
        Крупная жемчужина, диаметром около сантиметра. 
    ]];
    tak = [[
        Вы забираете жемчужину. 
    ]];
};

item_ven_coin = obj {
    nam = "item_ven_coin";
    disp = "Монета";
    dsc = "{Взять монету}";
    inv = [[
        Небольшая старинная монета из неизвестного металла. Она хорошо сохранилась несмотря на столетия, проведенные в соленой воде. Вы не понимаете ни одного из символов нанесенных на ее поверхности.
    ]];
    tak = [[
        Вы забираете монету. 
    ]];
};

item_ven_tablet = obj {
    nam = "item_ven_tablet";
    disp = "Табличка";
    dsc = "{Взять табличку}";
    inv = [[
        Металлическая табличка с рисунком, изображающим навьяра и человека, пожимающих друг другу руки.
    ]];
    tak = [[
        Вы забираете табличку.
    ]];
};

ven_obelisk = obj {
	nam = "ven_obelisk";
	dsc = [[
		В центре площади возвышается {обелиск}, на который нанесено название города. 
	]];
	act = function(s)
        venaedanotrr_temple_found = true;
		if (where(char_anna) == here()) then
            return [[
				В нижней части обелиска вы видите карту, указывающую путь к храму. В динамиках раздается голос Анну Рэдклифф: "Это совсем рядом -- к северу отсюда".
			]];
		else
			return [[
				В нижней части обелиска вы видите карту, указывающую путь к храму.
			]];
		end;
	end;
}

ven_chieftain_dlg = dlg {
	var {
		state = 0;
        answer = 0;
	};
	nam = "Вождь Венаэданотра";
	entered = function(s)
		if (s.state == 0) then
			ven_chieftain.state = 1;
			psub('first_meeting');
			return [[
				Перед вами стоит немолодой навьяр. Несмотря на возраст, он держится гордо и прямо. Его глаза внимательно изучают вас. По его плавникам бегут цветные полосы: "I'yhe'ven'aed'anot'rr lea'lyt'nn ty'yhe'he'vji'a'rr. [другие хевьяры были здесь до вас. Они искали первый город и то, что скрывается в нем]".
			]];
		else
			psub('generic');
			return [[
				Перед вами стоит вождь Венаэданотра. Несмотря на возраст, он держится гордо и прямо. Его глаза внимательно изучают вас. По его плавникам бегут цветные полосы: "I'rr lyt'nn he'vji'a'rr".
			]];
		end;
	end;
	phr = {
		{tag="first_meeting"};
		{"[Цветокод]Кто?", [[
			"Их много было. Среди них двое главных. Прежде чем я скажу больше, ответьте - зачем вы здесь?"
		]], code [[ psub('why_here'); ]]};
		{"[Цветокод]Куда они направились?", [[
			"Дальше к своей цели. Но зачем вы здесь?"
		]], code [[ psub('why_here'); ]]};
		{tag="why_here"};
		{"[Цветокод]Я ищу своего отца. Он был с ними", [[
			"Они направились в первый город. Один из них хочет пробудить спящего. Вам нужно остановить их".
		]], code [[ ven_chieftain_dlg.answer = 1; psub('naethvjirr_awaken'); ]] };
		{"[Цветокод]Мы ищем первый город и знания скрытые в нем", [[
			"Вы встретите тех хевьяров там, если поспешите. Один из них хочет пробудить спящего. Вам нужно остановить их".
		]], code [[ ven_chieftain_dlg.answer = 2; psub('naethvjirr_awaken'); ]]};
		{"[Цветокод]Мы ищем спящего в глубинах", [[
			"Остановитесь и поверните назад. Спящий не должен пробудиться".
		]], code [[ ven_chieftain_dlg.answer = 3; psub('naethvjirr_awaken'); ]]};
		{tag="naethvjirr_awaken"};
		{"[Цветокод]Что будет, если спящий пробудится?", [[
            "Наэтвьирр уничтожит нас всех. Первый корабль приведет нас всех к погибели, если их не остановить".
		]], code [[ psub("who_hope") ]]};
        {tag="who_hope"};
        {"[Цветокод]Кого из них?", [[
            "Всех. Каждый из них искал Наэтвьирра лишь для того, чтобы удовлетворить свои личные амбиции. Но они этого не понимают и потому -- опасны".
        ]], code [[ psub("dont_understand"); ]]};
        {tag="dont_understand"};
        {"[Цветокод]Я не понимаю", [[
            "Поймешь, когда проживешь больше лет"
        ]]};
        {"[Цветокод]И Уильям тоже?", [[
            "Все они. И я не знаю никого, кто мог бы пройти этот путь не ради личного интереса".
        ]], code [[ psub("dont_understand2");]]};
        {tag="dont_understand2"};
        {"[Цветокод]А я?", function(s)
            if (ven_chieftain_dlg.answer == 1) then
                return [[
                    "Ты уже сказал, что Наэтвьирр тебе не нужен. Ты ищешь своего отца".
                ]];
            elseif (ven_chieftain_dlg.answer == 2) then
                return [[
                    "Ты уже сказал, что ищешь наши древние знания. Разве не для себя ты их ищешь?"
                ]];
            else
                return [[
                    "Ты уже сказал, что ищешь Наэтвьирра. Разве не для себя ты его ищешь?"
                ]];
            end;
        end, code [[
            if (ven_chieftain_dlg.answer == 2) then
                psub("what_for_city");
            elseif (ven_chieftain_dlg.answer == 3) then
                psub("what_for_machine");
            end;
        ]]};
        {"[Цветокод]Все равно не понимаю. Но спорить не буду.", [[
            "Мудрое решение. Перейдем к другим делам".
        ]], code [[ psub("generic");]]};
        {"[Цветокод]Кажется, я понял.", [[
            "Тебе лишь кажется".
        ]], code [[ psub("generic");]]};
        {tag="what_for_city"};
        {"[Цветокод]Ты прав. Я ищу их для себя. ", [[
            "Именно".
        ]], code [[ pret(); ]]};
        {"[Цветокод]Я хочу блага этому миру. Эти знания должны быть доступны всем, а не покоиться на морском дне.", [[
            "\"Я хочу\" - ты говоришь. И в этом ключ".
        ]], code [[ pret(); ]]};
        {tag="what_for_machine"};
        {"[Цветокод]Ты прав. Я ищу его для себя. ", [[
            "Именно".
        ]], code [[ pret(); ]]};
        {"[Цветокод]Мне нужны его знания. ", [[
            "\"Мне нужны\" - ты говоришь. И в этом ключ".
        ]], code [[ pret(); ]]};
		{tag="generic"};
        {"[Цветокод]Что еще ты можешь сказать про Наэтвьирра?", [[
            "Ты уже знаешь саму легенду?"
        ]],code [[ psub("legend");]]};
		{"[Цветокод]I'rr Kee'nn", [[
            "Ты возвращайся".
        ]], code = [[ back(); ]]};
        {tag="legend"};
        {"[Цветокод]Да", [[
            "Тогда, ты должен знать, что Наэтвьирр опасен для всех вьяров. Если я не ссмог убедить тебя, поговори с другими мудрецами - Ien'tea'rr в старой башне и Hya'arhe'ysl'rr в библиотеке".
        ]], code [[pret();]]};
        {"[Цветокод]Нет", [[
            "Дело было многие тысячелетия назад. Тогда навьяры жили в огромных городах и строили могучие машины, способные выполнять за нас самые тяжелые и неприятные дела. Большинство из них тогда искали решение последней задачи - создать машину, которая смогла бы думать и собирать знания за них. Долгие годы искали они решение этой проблемы, пока наконец навьяры из первого города не нашли его. Однако нашлись среди навьяров те, кто понимал, что Наэтвьирр первым же делом уничтожит навьяров, которые окажутся совершенно не нужны ему. Вскоре они сумели убедить всех жителей города навсегда закрыть его от всех глаз и забыть напрочь его местоположение. Но были среди навьяров и те, кто хотел наступления новой эры. Эти навьяры спрятали в различных городах подсказки для будущих поколений, когда те пожелают найти древнюю машину и пробудить ее. Если я не ссмог убедить тебя, поговори с другими мудрецами - Ien'tea'rr в старой башне и Hya'arhe'ysl'rr в библиотеке".
        ]], code [[ 
            path("К башне(на восток)", ven_center):enable();
            path("К библиотеке(на запад)", ven_center):enable();
            pret();
        ]]};
	};
};

ven_chieftain = npc {
	nam = "ven_chieftain";
	var {
		state = 0;
	};
	dsc = function(s)
		if (s.state == 0) then
			return [[
				Рядом с обелиском стоит {немолодой навьяр}.
			]];
		else
            return [[
                Рядом с обелиском стоит {вождь}.
            ]]
        end;
	end;
	dlg = 'ven_chieftain_dlg';
}

ven_center = room {
	nam = "Венаэданотр, центр города";
	dsc = [[
		Центральная площадь навьярского города вымощена камнем. Во все стороны вокруг тянутся невысокие каменные строения. Вдали на востоке вы видите башню, возвышающуюся над остальными зданиями города. 
	]];
	obj = {
		'ven_obelisk',
		'ven_chieftain'
	};
    way = {
        kh_vroom("В Левиафан", leviathan_airlock);
        kh_vroom("К башне(на восток)", "ven_east"):disable();
        kh_vroom("К библиотеке(на запад)", "ven_west"):disable();
    };
}

ven_west = room {
    var {
        visited = false;
    };
    nam = "Венаэдантр, у библиотеки";
    dsc = function(s)
        if (s.visited) then
            return [[
                "Небольшая открытая площадка около библиотеки. Фасад большого здания украшен резными узорами, окрашенными различными цветами".
            ]];
        else
            s.visited = true;
            return [[
                "Вы с легкостью находите библиотеку - одно из самых больших зданий в городе. Фасад его украшен резными узорами, окрашенными различными цветами, очевидно несущими некоторый смысл для навьяров".
            ]];
        end;
    end;
    way = {
        kh_vroom("В центр", "ven_center");
        kh_vroom("В библиотеку", "ven_library");
    };
};

ven_library = room {
    nam = "Венаэданотр, библиотека";
    dsc = [[
        Внутри библиотека Венаэданотра представляет собой огромный зал со множеством колонн, удерживающих крышу. Между колоннами установлено множество шкафов, на полках которых покоятся бесчисленные металлические таблички, используемые навьярами для записи текстов.
    ]];
    obj = {
        'ven_library_guards',
        'ven_library_navjiars',
        'ven_librarian'
    };
    way = {
        kh_vroom("Выйти", "ven_west");
    };
};

ven_library_guards = obj {
    nam = "ven_library_guards";
    dsc = [[
        У входа в библиотеку стоят {два стражника}. Они с изумлением рассматривают вас, когда вы оказываетесь рядом. 
    ]];
    act = [[
        Незачем их тревожить.
    ]];
};

ven_library_navjiars = obj {
    nam = "ven_library_navjiars";
    dsc = [[
        В зале находится множество {навьяров}. Кто-то сидит у шкафов и читает, другие ходят и оживленно что-то обсуждают. Третьи что-то ищут среди книг. Когда вы оказываетесь рядом, все взоры устремляются на вас - многие из жителей города никогда не видели людей и с интересом разглядывают. 
    ]];
    act = [[
        Незачем их тревожить.
    ]];
};

ven_librarian = npc {
    nam = "ven_librarian";
    dsc = [[
        Ваше внимание привлекает {навьяр}, заботливо возвращающий таблички на свои места за нерадивыми посетителями. Он, кажется, полностью погружен в свое занятие. 
    ]];
    dlg = "ven_librarian_dlg";
};

ven_librarian_dlg = dlg {
    var {
        state = 0;
    };
    nam = "Библиотекарь";
    entered = function(s)
        if (s.state == 0) then
            s.state = 1;
            psub("first_meeting");
            return [[
                Навьяр не обращает на вас никакого внимания, даже когда вы подходите совсем близко. 
            ]];
        else
            psub("generic");
            return [[
                Заметив вас, библиотекарь прекращает свои занятия и устремляет взор на вас. 
            ]];
        end;
    end;
    phr = {
        {tag="first_meeting"};
        {"[Коснуться плеча навьяра]", [[
            Навьяр резко оборачивается, уставившись на вас. Вскоре он приходит в себя и приветствует вас: "Приветствую тебя, хевьяр. Я Hya'arhe'ysl'rr. Что хочешь ты?"
        ]], code [[ psub ("generic"); ]]};
        {"[Уйти]", code = [[ back(); ]]};
        {tag="generic"};
        {"[Цветокод]Вождь сказал, ты можешь рассказать про Наэтвьирра", [[
            "Ты уже знаешь легенду?"
        ]], code [[ psub("know_legend"); ]]};
        {"[Цветокод]I'rr kee'nn", [[
            "Ты возвращайся".
        ]], code = [[ back(); ]]};
        {tag="know_legend"};
        {"[Цветокод]Да", [[
            "Тогда ты знаешь, что Наэтвьирр должен был принести навьярам неслыханное величие и процветание и лишь страх и глупость большинства из них помешали осуществлению этого".
        ]], code [[ psub("what_about_hevjiarr");]]};
        {"[Цветокод]Нет", [[
            "Это произошло много тысячелетий назад. Древние навьяры жили в больших городах - гораздо больше чем Ven'aed'anot'rr. Они строили машины, которые помогали им в нелегкой жизни. Однажды, они придумали и построили машину, которая могла все знать и думать за них. И включили бы они эту машину и все было бы прекрасно, однако нашлись среди навьяров те, кто засомневался - а будет ли машина мыслить действительно так же, как мыслил бы навьяр? А не попытается ли машина сама занять место навьяров в этом мире? Не станут ли навьяры совсем не нужны? Вскоре эти сомнения заставили навьяров в страхе покинуть город, навсегда закрыв его от всех глаз и забыв напрочь его местоположение. Так, по собственной глупости навьяры отказались от прекрасного будущего. Если бы сейчас, кто-то смог найти Lse'ry'anot'rr и пробудить Na'eth'vji'rr'а, то он бы вернул навьярам былое величие их народа".
        ]], code [[ psub("what_about_hevjiarr");]]};
        {tag="what_about_hevjiarr"};
        {"[Цветокод]Что станет при этом с людьми?", [[
            "Наэтвьирр использует свою мудрость на благо всем вьярам".
        ]]};
        {"[Цветокод]Я ищу способ пробудить Наэтвьирра", [[
            "Твой путь лежит в храм. Я дам тебе ключ".
        ]], code [[ take('item_ven_key_library'); psub('generic'); ]]};
        {"[Цветокод]Я ищу путь в первый город", [[
            "Твой путь лежит в храм. Я дам тебе ключ".
        ]], code [[ take('item_ven_key_library'); psub('generic'); ]]};
    };
};

ven_east = room {
    var {
        state = 0;
    };
    nam = "Венаэданотр, у входа в башню";
    dsc = function(s)
        if (s.state == 0) then
            s.state = 1;
            return [[
                Вы долго блуждаете по улицам города в поисках пути в башню, стоящую в восточной части города. Оказавшись у входа, вы видите массивные двери, закрывающие вход внутрь. 
            ]];
        else
            return [[
                Вы стоите у входа в высокую трехэтажную башню. Массивные каменные двери закрывают вход. 
            ]];
        end;
    end;
    obj = {
        'ven_tower_guard'
    };
    way = {
        kh_vroom("В башню", "ven_tower_l1");
        kh_vroom("В центр", "ven_center");
    };
};

ven_tower_guard = npc {
    nam = "ven_tower_guard";
    dsc = [[
        У ворот стоит одинокий {стражник}. Он внимательно наблюдает за вашими действиями. 
    ]];
    phrases = {
        "\"Ты проходи\"."
    };
};

ven_tower_l1 = room {
    var {
        state = 0;
    };
    nam = "Венаэданотр, башня, первый этаж";
    dsc = [[
        Вы стоите на первом этаже башни Венаэданотра. В центре большого зала вы видите три статуи.
    ]];
    obj = {
        'ven_statue_navjiarr',
        'ven_statue_monster',
        'ven_statue_human'
    };
    way = {
        kh_vroom("Выйти", "ven_east");
        kh_vroom("На второй этаж", function(s)
            if (ven_tower_l1.state == 1) then
                return "ven_tower_l2";
            else
                pr("Дверь не открывается.");
                return false;
            end;
        end);
    };
};

ven_tower_l2 = room {
    var {
        state = 0;
    };
    nam = "Венаэданотр, башня, второй этаж";
    dsc = [[
        Второй этаж башни представляет из себя зал примерно таких же размеров, что и первый. 
    ]];
    obj = {
        kh_vway("В центре зала вы видите {пьедестал} с двумя выемками.", 'ven_l2_pedestal');
    };
    way = {
        kh_vroom("На первый этаж", "ven_tower_l1");
        kh_vroom("На третий этаж", function(s)
            if (ven_tower_l2.state == 1) then
                return "ven_tower_l3";
            else
                pr("Дверь не открывается.");
                return false;
            end;
        end );
    };
}
        
ven_tower_l3 = room {
    var {
        state = 0;
    };
    nam = "Венаэданотр, башня, третий этаж";
    dsc = [[
        Третий этаж ничем не отличается от первых двух - это большой пустой зал с двумя дверьми в противоположных его концах.
    ]];
    way = {
        kh_vroom("На второй этаж", "ven_tower_l2");
        kh_vroom("На четвертый этаж", function(s)
            if (ven_tower_l3.state == 1) then
                return "ven_tower_l4";
            else
                pr("Дверь не открывается.");
                return false;
            end;
        end );
    };
}
        
ven_tower_l4 = room {
    nam = "Венаэданотр, башня, четвертый этаж";
    dsc = [[
        Зал на четвертом этаже несколько меньше остальных. В стенах зала проделано множество окон, 
    ]];
    obj = {
        'ven_wiseman'
    };
    way = {
        kh_vroom("На третий этаж", "ven_tower_l3");
    };
}
        
ven_statue_navjiarr = obj {
    nam = "ven_statue_navjiarr";
    dsc = [[
        {Первая статуя} изображает молодого навьяра, гордо смотрящего перед собой. 
    ]];
    act = [[
        Вы осматриваете статую, но не находите ничего интересного. 
    ]];
};

ven_statue_monster = obj {
    nam = "ven_statue_monster";
    dsc = [[
        {Вторая статуя} изображает существо с четырьмя руками. Верхняя часть тела существа покрыта гладкой кожей, а нижняя - чешуей. Вместо ног у статуи змеиный хвост. 
    ]];
    act = function(s)
        walk("ven_statue_monster_look");
    end;
};

ven_statue_human = obj {
    nam = "ven_statue_human";
    dsc = [[
        {Последняя статуя} изображает человека, одетого в тогу. 
    ]];
    act = [[
        Вы осматриваете статую, но не находите ничего интересного. 
    ]];
};

ven_statue_monster_look = room {
    nam = "Статуя";
    dsc = [[
        Перед вами статуя четырехрукого существа. Верхняя часть его тела покрыта гладкой кожей, а нижняя - чешуей. Вместо ног у статуи змеиный хвост. В руках статуя держит несколько предметов. 
    ]];
    obj = {
        'item_ven_gem';
        'item_ven_coin';
        'item_ven_tablet';
        'ven_statue_spear_take';
        'ven_statue_spear_rotate';
    };
    way = {
        kh_vroom("Отойти от статуи", "ven_tower_l1");
    };
};

ven_statue_spear_take = obj {
    nam = "ven_statue_spear_take";
    dsc = "{Взять копье}";
    act = function(s)
        ven_statue_spear_rotate:enable();
        return [[
            Копье крепко держится в руке статуи. 
        ]];
    end;
};

ven_statue_spear_rotate = obj {
    nam = "ven_statue_spear_rotate";
    dsc = "{Повернуть копье}";
    act = function(s)
        ven_tower_l1.state = 1;
        s:disable();
        return [[
            Вы поворачиваете копье и дверь в дальнем конце зала открывается.
        ]];
    end;
}:disable();

ven_l2_pedestal = room {
    nam = "ven_l2_pedestal";
    dsc = "Прямоугольный пьедестал высотой около метра. На верхней его поверхности вы видите две выемки, рядом с которыми выгравированы изображения.";
    obj = {
        'ven_l2_human';
        'ven_l2_navjiarr';
    };
};

ven_l2_human = obj {
    var {
        state = 0;
    };
    nam = "ven_l2_human";
    dsc = [[
        Рядом с первой {выемкой} выгравировано изображение человека-рыбака с удочкой.
    ]];
    act = "Возможно, сюда нужно что-то положить? ";
    use = function(s, o)
        if (o == item_ven_coin) then
            s.state = 1;
            remove(item_ven_gem, pl);
            pr "Монета исчезает в глубине выемки.";
            if (ven_l2_navjiarr.state == 1) then
                ven_tower_l2.state = 1;            
                pr("Дверь а дальнем конце зала открывается. ");
            end;
            return false;
        else
            return "Это сюда не подходит.";
        end;
    end;
};

ven_l2_navjiarr = obj {
    var {
        state = 0;
    };
    nam = "ven_l2_navjiarr";
    dsc = [[
        рядом со второй {выемкой} выгравировано изображение навьяра-охотника. 
    ]];
    act = "Возможно, сюда нужно что-то положить? ";
    use = function(s, o)
        if (o == item_ven_gem) then
            s.state = 1;
            remove(item_ven_gem, pl);
            pr "Жемчужина исчезает в глубине выемки. ";
            if (ven_l2_human.state == 1) then
                ven_tower_l2.state = 1;            
                pr("Дверь а дальнем конце зала открывается. ");
            end;
            return false;
        else
            return "Это сюда не подходит. ";
        end;
    end;
};

ven_towers_machine = obj {
    nam = "ven_towers_machine";
    dsc = "В центре зала вы видите странную {машину} - три вращающихся оси, на которых установлено 4 шестеренки. Внизу вы видите какие-то рычаги";
    act = function(s)
        if (not ven_towers_machine_look.solved) then
            walkin(ven_towers_machine_look);
        end;
    end;
};

ven_towers_machine_look = room {
    var {
        gears = {1,1,1,1};
        from = 0;
        solved = false;
    };
    nam = "Венаэданотр, башня, третий этаж";
    pic = function(s)
        local p = "box:96x48,white,255;box:1x48,black,255@16,0;box:1x48,black,255@48,0;box:1x48,black,255@80,0";
        for g = 1,#s.gears do
            p = p .. ";box:" .. tostring(g * 8) .. "x11,green,255@" .. tostring((s.gears[g] - 1) * 32 + 16 - g * 4) .. "," .. tostring((g - 1) * 12 + 1);
        end;
        
        return p;
    end;
    move = function(s, target)
        local rv = "";
        local nums, numt;
        for g = 1, #s.gears do
            if (s.gears[g] == s.from) then
                nums = g;
                break;
            end;
        end;
        for g = 1, #s.gears do
            if (s.gears[g] == target) then
                numt = g;
                break;
            end;
        end;
        
        print("f");
        print(nums);
        print(numt);
        print("/f");
        
        if (not nums or numt and numt < nums) then
            rv = "Механизм издает легкий щелчок и ничего не происходит. ";
        else
            s.gears[nums] = target;
            rv = "Механизм издает легкий щелчок и одна из шестеренок перемещается на соседнюю ось. ";
        end;
        print(s.gears[1]);
        print(s.gears[2]);
        print(s.gears[3]);
        print(s.gears[4]);
        
        s.solved = true;
        for g = 1, #s.gears do
            if (s.gears[g] ~= 3) then
                s.solved = false;
            end;
        end;
        
        if (s.solved) then
            ven_tower_l3.state = 1;
            ven_towers_lever1:disable();
            ven_towers_lever2:disable();
            ven_towers_lever3:disable();
            rv = rv .. "Дверь наверх открывается. ";
        end;
                
        ven_towers_lever1.state = 0;
        ven_towers_lever2.state = 0;
        ven_towers_lever3.state = 0;
        ven_towers_machine_look.from = 0;
        return rv;
    end;
    dsc = [[
        Странная машина состоит из четырех шестеренок и трех вращающихся осей. Внизу вы видите три рычага.
    ]];
    obj = {
        'ven_towers_lever1',
        'ven_towers_lever2',
        'ven_towers_lever3'
    };
    way = {
        kh_vroom("Отойти", "ven_tower_l3");
    };
};

ven_towers_lever1 = obj {
    var {
        state = 0;
    };
    nam = "ven_towers_lever1";
    dsc = function(s)
        if (s.state == 0) then
            return [[
                {Первый рычаг(выключен).}^
            ]];
        else
            return [[
                {Первый рычаг(включен).}^
            ]];
        end;
    end;
    act = function(s)
        local rv = [[
            Вы переключаете рычаг. 
        ]];
        if (s.state == 0) then
            s.state = 1;
            if (ven_towers_machine_look.from == 0) then
                ven_towers_machine_look.from = 1;
            else
                rv  = rv .. ven_towers_machine_look:move(1);
            end;
        else
            s.state = 0;
            ven_towers_machine_look.from = 0;
        end;
        return rv;
    end;
};

ven_towers_lever2 = obj {
    var {
        state = 0;
    };
    nam = "ven_towers_lever2";
    dsc = function(s)
        if (s.state == 0) then
            return [[
                {Второй рычаг(выключен).}^
            ]];
        else
            return [[
                {Второй рычаг(включен).}^
            ]];
        end;
    end;
    act = function(s)
        local rv = [[
            Вы переключаете рычаг. 
        ]];
        if (s.state == 0) then
            s.state = 1;
            if (ven_towers_machine_look.from == 0) then
                ven_towers_machine_look.from = 2;
            else
                rv  = rv .. ven_towers_machine_look:move(2);
            end;
        else
            s.state = 0;
            ven_towers_machine_look.from = 0;
        end;
        return rv;
    end;
};

ven_towers_lever3 = obj {
    var {
        state = 0;
    };
    nam = "ven_towers_lever3";
    dsc = function(s)
        if (s.state == 0) then
            return [[
                {Третий рычаг(выключен).}^
            ]];
        else
            return [[
                {Третий рычаг(включен).}^
            ]];
        end;
    end;
    act = function(s)
        local rv = [[
            Вы переключаете рычаг. 
        ]];
        if (s.state == 0) then
            s.state = 1;
            if (ven_towers_machine_look.from == 0) then
                ven_towers_machine_look.from = 3;
            else
                rv  = rv .. ven_towers_machine_look:move(3);
            end;
        else
            s.state = 0;
            ven_towers_machine_look.from = 0;
        end;
        return rv;
    end;
};

ven_wiseman = npc {
    nam = "ven_wiseman";
    dsc = [[
        Перед одним из окон сидит старый {навьяр}. Левой рукой он опирается на посох. Его глаза внимательно наблюдают за вами. 
    ]];
    dlg = "ven_wiseman_dlg";
};

ven_wiseman_dlg = dlg {
    var {
        state = 0;
    };
    nam = "Hya'arhe'ysl'rr";
    entered = function(s)
        if (s.state == 0) then
            psub('first_meeting');
            return [[
                Навьяр медленно поднимается и его плавники начинают окрашиваться цветными полосами: "Зачем ты здесь, хевьяр?"
            ]];
        else
            psub('generic');
            return [[
                Навьяр медленно поднимается и его плавники начинают окрашиваться цветными полосами: "Зачем ты вернулся, хевьяр?"
            ]];
        end;
    end;
    phr = {
        {tag="first_meeting"};
        {"[Цветокод]Я ищу Лсэрианотр", [[
            "Так значит, ты слышал легенду?"
        ]], code [[ psub("legend"); ]]};
        {"[Цветокод]Я ищу Наэтвьирра", [[
            "Так значит, ты слышал легенду?"
        ]], code [[ psub("legend"); ]]};
        {"[Цветокод]Я ищу своего отца. Он отправился на поиски Лсэрианотра", [[
            "Так значит, ты идешь за ними. Ты уже слышал легенду?"
        ]], code [[ psub("legend"); ]]};
        {tag="generic"};
        {"[Цветокод]I'rr kee'nn", [[
            "Ты уходи"
        ]], code [[ back(); ]]};
        {tag="legend"};
        {"[Цветокод]Да", [[
            "Значит ты знаешь, что Наэтвьирр опасен и не должен пробудиться".
        ]], code [[ psub("need_to_find"); ]]};
        {"[Цветокод]Нет", [[
            "Тогда послушай. Этой легенде больше тысячи лет. В те времена навьяры жили в огромных городах и строили машины, помогающие им во всех областях. Однажды навьяры создали Наэтвьирра - машину, способную заменить им вождей. Но, к счастью, большинство навьяров поняли, что Наэтвьирр первым же делом уничтожит навьяров, не нужных ему. Опасаясь включения опасной машины, навьяры навсегда покинули город в надежде, что никто и никогда не найдет его".
        ]], code [[ psub("need_to_find"); ]]};
        {tag="need_to_find"};
        {"[Цветокод]Мне нужен ключ от храма", [[
            "Я дам тебе его в надежде, так же как дал его тем хевьярам. Надеюсь, ты примешь верное решение. Теперь уходи. Оставь меня в покое".
        ]], code [[
            take("item_ven_key_tower");
            back();
        ]]};
    };
};

ven_near_temple = room {
    nam = "Ущелье, У входа в храм Венаэданотра";
    dsc = [[
        Вы стоите на дне глубокого ущелья. Вход навьярского храма, вытесанный в камне, украшен резными изображениями сцен из легенд, и покрыты древними письменами, чей смысл утрачен ныне даже для навьяров. 
    ]];
    way = {
        kh_vroom("К храму", "ven_temple");
        kh_vroom("В Левиафан", "leviathan_airlock");
    };
};

ven_temple_entrance = room {
    var {
        state = 0;
    };
    nam = "Храм Венаэданотра, вход";
    dsc = function(s)
        if (s.state == 3) then
            return [[
                Массивные двери храма Ведаэданотра открыты, позволяя вам пройти.
            ]];
        else
            return [[
                Вход в храм Венаэданотра закрывают массивные металлические двери. На дверях вы видите три замочных скважины. 
            ]];
        end;
    end;
    way = {
        kh_vroom("В ущелье", "ven_near_temple");
        kh_vroom("В храм", function(s)
            if (ven_temple_entrance.state == 3) then
                return "ven_temple_l1";
            else
                pr("Двери не открываются");
            end;
        end);
    };
    obj = {
        'ven_temple_lock_red',
        'ven_temple_lock_green',
        'ven_temple_lock_blue'
    };
};

ven_temple_lock_red = obj {
    var {
        state = 0;
    };
    nam = "ven_temple_lock_red";
    dsc = "{Первая скважина} отмечена красным цветом.^";
    act = function(s)
        if (s.state == 1) then
            return "Этот замок уже открыт. ";
        else
            return "Мне нужен ключ. ";
        end;
    end;
    use = function(s, o)
        if (o == item_ven_key_chieftain) then
            ven_temple_entrance.state = ven_temple_entrance.state + 1;
            remove(o, pl);
            pr("Вы вставляете ключ в скважину и поворачиваете его. ");
            if (ven_temple_entrance == 3) then
                pr("Двери с грохотом раздвигаются, открывая вам проход во внутренние помещения храма. ");
            end;
            return false;
        else
            return "Это сюда не подходит. ";
        end;
    end;
};

ven_temple_lock_green = obj {
    var {
        state = 0;
    };
    nam = "ven_temple_lock_green";
    dsc = "{Вторая скважина} отмечена красным цветом.^";
    act = function(s)
        if (s.state == 1) then
            return "Этот замок уже открыт. ";
        else
            return "Мне нужен ключ. ";
        end;
    end;
    use = function(s, o)
        if (o == item_ven_key_library) then
            ven_temple_entrance.state = ven_temple_entrance.state + 1;
            remove(o, pl);
            pr("Вы вставляете ключ в скважину и поворачиваете его. ");
            if (ven_temple_entrance == 3) then
                pr("Двери с грохотом раздвигаются, открывая вам проход во внутренние помещения храма. ");
            end;
            return false;
        else
            return "Это сюда не подходит. ";
        end;
    end;
};

ven_temple_lock_blue = obj {
    var {
        state = 0;
    };
    nam = "ven_temple_lock_blue";
    dsc = "{Третья скважина} отмечена красным цветом.^";
    act = function(s)
        if (s.state == 1) then
            return "Этот замок уже открыт. ";
        else
            return "Мне нужен ключ. ";
        end;
    end;
    use = function(s, o)
        if (o == item_ven_key_tower) then
            s.state = 1;
            ven_temple_entrance.state = ven_temple_entrance.state + 1;
            remove(o, pl);
            pr("Вы вставляете ключ в скважину и поворачиваете его. ");
            if (ven_temple_entrance == 3) then
                pr("Двери с грохотом раздвигаются, открывая вам проход во внутренние помещения храма. ");
            end;
            return false;
        else
            return "Это сюда не подходит. ";
        end;
    end;
};

ven_temple_l1 = labyrinth {
    var {
        position = "03";
        lock1 = true;
        lock2 = true;
        lock3 = true;
    };
    dir1 = "На север";
    dir2 = "На восток";
    dir3 = "На юг";
    dir4 = "На запад";
    ex = "Выйти";
    nam = "ven_temple_l1";
    disp = "Венаэданотр, храм";
    dsc = function(s)
        --if true then
        --    return tostring(s.position);
        --end;
        if (s.map[s.position].name) then
            return s.map[s.position].name;
        else
            return [[
                Вы стоите посреди запутанного лабиринта. Металлические стены по сторонам здесь ничем не отличаются от стен в других коридорах этого лабиринта. 
            ]];
        end;
    end;
    enter = function(s)
        if (exist(ven_shark, s) and ven_shark.active) then
            local no = s.map[ven_shark.position].e1;
            local ea = s.map[ven_shark.position].e2;
            local so = s.map[ven_shark.position].e3;
            local we = s.map[ven_shark.position].e4;
            if (no and s.oldposition == no or no and s.position == no) then
                walk(game_over_eaten_by_shark);
            end;
            if (no and s.oldposition == s.map[no].e1) then
                ven_shark.position = no;
            end;
            if (ea and s.oldposition == ea) then
                walk(game_over_eaten_by_shark);
            end;
            if (ea and s.oldposition == s.map[ea].e2) then
                ven_shark.position = ea;
            end;
            if (so and s.oldposition == so) then
                walk(game_over_eaten_by_shark);
            end;
            if (so and s.oldposition == s.map[so].e3) then
                ven_shark.position = so;
            end;
            if (we and s.oldposition == we) then
                walk(game_over_eateon_by_shark);
            end;
            if (we and s.oldposition == s.map[we].e4) then
                ven_shark.position = we;
            end;
                    
            if (no and s.oldposition == s.map[no].e2) then
                ven_shark.position = no;
            end;
            if (ea and s.oldposition == s.map[ea].e1) then
                ven_shark.position = ea;
            end;
            if (no and s.oldposition == s.map[no].e4) then
                ven_shark.position = no;
            end;
            if (we and s.oldposition == s.map[we].e1) then
                ven_shark.position = we;
            end;
            if (so and s.oldposition == s.map[so].e2) then
                ven_shark.position = so;
            end;
            if (ea and s.oldposition == s.map[ea].e3) then
                ven_shark.position = ea;
            end;
            if (so and s.oldposition == s.map[so].e4) then
                ven_shark.position = so;
            end;
            if (we and s.oldposition == s.map[we].e3) then
                ven_shark.position = we;
            end;
        end;
    end;
    obj = {
        "ven_octopus";
    };
    map = {
        ["00"] = {
            e1 = "10";
            e2 = "01";
        };
        ["01"] = {
            e4 = "00";
            enter = function(s)
                if (not exist(ven_chest, s)) then
                    move(ven_chest, s);
                end;
            end;
            exit = function(s)
                remove(ven_chest, s);
            end;
        };
        ["02"] = {
            e1 = "12";
            e2 = "03";
        };
        ["03"] = { 
            name = [[
                Вы стоите у входа в храм. 
            ]];
            e1 = "13";
            e2 = "04";
            e4 = "02";
            ex = "ven_temple_entrance";
            e1lock = function(s)
                return lock03;
            end;
        };
        ["04"] = {
            e1 = "14",
            e2 = "05",
            e4 = "03"
        };
        ["05"] = {
            e1 = "15",
            e2 = "06",
            e4 = "04"
        };
        ["06"] = {
            e1 = "16";
            e2 = "07";
            e4 = "05";
        };
        ["07"] = {
            e4 = "06"
        };
        ["10"] = {
            e1 = "20",
            e3 = "00"
        };
        ["11"] = {
            e2 = "12",
            enter = function(s)
                if (not exist(ven_skeleton, s)) then
                    move(ven_skeleton, s);
                end;
                if (not item_ven_spear.taken and not exist(item_ven_spear, s)) then
                    move(item_ven_spear, s);
                end;
            end;
            exit = function(s)
                remove(ven_skeleton, s);
                if (not item_ven_spear.taken) then
                    remove(item_ven_spear, s);
                end;
            end;
        };
        ["12"] = {
            e3 = "02",
            e4 = "11"
        };
        ["13"] = {
            e1 = "23",
            e3 = "03"
        };
        ["14"] = {
            e1 = "24";
            e3 = "04";
        };
        ["15"] = {
            e3 = "05";
        };
        ["16"] = {
            e1 = "26";
            e3 = "06";
        };
        ["17"] = {
            e1 = "27";
            enter = function(s)
                if (not exist(ven_cache, s)) then
                    move(ven_cache, s);
                end;
            end;
            exit = function(s)
                remove(ven_cache, s);
            end;
        };
        ["20"] = {
            e1 = "30";
            e2 = "21";
            e3 = "10";
            enter = function(s)
                if (not exist(ven_shark, s)) then
                    move(ven_shark, s);
                end;
            end;
        };
        ["21"] = {
            e2 = "22";
            e4 = "20";
        };
        ["22"] = {
            e2 = "23";
            e4 = "21";
        };
        ["23"] = {
            e3 = "13";
            e4 = "22";
        };
        ["24"] = {
            e1 = "34";
            e3 = "14";
        };
        ["25"] = {
            e1 = "35";
            e2 = "26";
        };
        ["26"] = {
            e3 = "16";
            e4 = "25";
            enter = function(s)
                walk(game_over_eaten_by_octopus);
            end;
        };
        ["27"] = {
            e1 = "37";
            e3 = "17";
        };
        ["30"] = {
            e2 = "31";
            e3 = "20";
        };
        ["31"] = {
            e1 = "41";
            e4 = "30";
        };
        ["32"] = {
            e1 = "42";
            e2 = "33";
        };
        ["33"] = {
            e2 = "34";
            e4 = "32";
        };
        ["34"] = {
            e3 = "24";
            e4 = "33";
        };
        ["35"] = {
            e1 = "45";
            e2 = "36";
            e3 = "25";
        };
        ["36"] = {
            e2 = "37";
            e4 = "35";
        };
        ["37"] = {
            e1 = "47";
            e3 = "27";
            e4 = "36";
            e3lock = function(s)
                return s.lock2;
            end;
        };
        ["40"] = {
            e1 = "50";
            e2 = "41";
        };
        ["41"] = {
            e3 = "31";
            e4 = "40";
        };
        ["42"] = {
            e2 = "43";
            e3 = "32";
        };
        ["43"] = {
            e1 = "53";
            e2 = "44";
            e4 = "42";
        };
        ["44"] = {
            e2 = "45";
            e4 = "43";
        };
        ["45"] = {
            name = [[
                 Вы стоите посреди запутанного лабиринта. Металлические стены по сторонам здесь ничем не отличаются от стен в других коридорах этого лабиринта, за исключением двери на юге. 
            ]];
            e3 = "35";
            e4 = "44";
            e3lock = function(s)
                return s.lock1;
            end;
            enter = function(s)
                if (not exist(ven_first_lock, s)) then
                    move(ven_first_lock, s);
                end;
            end;
            exit = function(s)
                remove(ven_first_lock, s);
            end;
        };
        ["46"] = {
            e1 = "56";
            enter = function(s)
                if (not exist(ven_lever, s)) then
                    move(ven_lever, s);
                end;
            end;
            exit = function(s)
                remove(ven_lever, s);
            end;
        };
        ["47"] = {
            e1 = "57";
            e3 = "37";
        };
        ["50"] = {
            e1 = "60";
            e3 = "40";
        };
        ["51"] = {
            e1 = "61";
            e2 = "52";
        };
        ["52"] = {
            e2 = "53";
            e4 = "51";
        };
        ["53"] = {
            e1 = "63";
            e3 = "43";
            e4 = "52";
        };
        ["54"] = {
            e1 = "64";
            e2 = "55";
        };
        ["55"] = {
            e2 = "56";
            e4 = "54";
        };
        ["56"] = {
            name = [[
                 Вы стоите посреди запутанного лабиринта. Металлические стены по сторонам здесь ничем не отличаются от стен в других коридорах этого лабиринта, за исключением двери на западе. 
            ]];
            e1 = "66";
            e3 = "46";
            e4 = "55";
            e4lock = function(s)
                return s.lock3;
            end;
            enter = function(s)
                if (not exist(ven_second_lock, s)) then
                    move(ven_second_lock, s);
                end;
            end;
            exit = function(s)
                remove(ven_second_lock, s);
            end;
        };
        ["57"] = {
            e1 = "67";
            e3 = "47";
        };
        ["60"] = {
            e1 = "70";
            e2 = "61";
            e3 = "50";
        };
        ["61"] = {
            e3 = "51";
            e4 = "60";
        };
        ["62"] = {
            e1 = "72";
            e2 = "63";
        };
        ["63"] = {
            e3 = "53";
            e4 = "62";
        };
        ["64"] = {
            e1 = "74";
            e3 = "54";
        };
        ["65"] = {
            e1 = "75";
            e2 = "66";
        };
        ["66"] = {
            e3 = "56";
            e4 = "65";
        };
        ["67"] = {
            e1 = "77";
            e3 = "57";
        };
        ["70"] = {
            e2 = "71";
            e3 = "60";
        };
        ["71"] = {
            e2 = "72";
            e4 = "70";
        };
        ["72"] = {
            e3 = "62";
            e4 = "71";
        };
        ["73"] = {
            e2 = "74";
            ex = "ven_temple_l2";
        };
        ["74"] = {
            e3 = "64";
            e4 = "73";
        };
        ["75"] = {
            e2 = "76";
            e3 = "65";
        };
        ["76"] = {
            e2 = "77";
            e4 = "75";
        };
        ["77"] = {
            e3 = "67";
            e4 = "76";
        };
    };
};

ven_shark = obj {
    var {
        position = "00",
        active = true;
    };
    nam = "ven_shark";
    dsc = function(s)
        --local d = 0;
        local seen = false;
        local no = ven_temple_l1.map[ven_temple_l1.position].e1;
        local ea = ven_temple_l1.map[ven_temple_l1.position].e2;
        local so = ven_temple_l1.map[ven_temple_l1.position].e3;
        local we = ven_temple_l1.map[ven_temple_l1.position].e4;
        if (s.position == ven_temple_l1.position) then
            seen = true;
            p [[
                Рядом с собой
            ]];
        end;
        if (no and s.position == no) then
            seen = true;
            p [[
                На севере
            ]];
        end;
        if (no and s.position == ven_temple_l1.map[no].e1) then
            seen = true;
            p [[
                Вдалеке на севере
            ]];
        end;
        if (ea and s.position == ea) then
            seen = true;
            p [[
                На востоке
            ]];
        end;
        if (ea and s.position == ven_temple_l1.map[ea].e2) then
            seen = true;
            p [[
                Вдалеке на востоке
            ]];
        end;
        if (so and s.position == so) then
            seen = true;
            p [[
                На юге
            ]];
        end;
        if (so and s.position == ven_temple_l1.map[so].e3) then
            seen = true;
            p [[
                Вдалеке на юге
            ]];
        end;
        if (we and s.position == we) then
            seen = true;
            p [[
                На западе
            ]];
        end;
        if (we and s.position == ven_temple_l1.map[we].e4) then
            seen = true;
            p [[
                Вдалеке на западе
            ]];
        end;
                
        if (no and s.position == ven_temple_l1.map[no].e2 or ea and s.position == ven_temple_l1.map[ea].e1) then
            seen = true;
            p [[
                На северо-востоке
            ]];
        end;
        if (no and s.position == ven_temple_l1.map[no].e4 or we and s.position == ven_temple_l1.map[we].e1) then
            seen = true;
            p [[
                На северо-западе
            ]];
        end;
        if (so and s.position == ven_temple_l1.map[so].e2 or ea and s.position == ven_temple_l1.map[ea].e3) then
            seen = true;
            p [[
                На юго-востоке
            ]];
        end;
        if (so and s.position == ven_temple_l1.map[so].e4 or we and s.position == ven_temple_l1.map[we].e3) then
            seen = true;
            p [[
                На юго-западе
            ]];
        end;
        
        if (seen) then
            if (s.active) then
                p "вы видите мчащуюся к вам навстречу {акулу}. ";
            else
                p "вы видите мертвую акулу, пронзенную коралловым копьем. ";
            end;
        else
            if (s.active) then
                p [[
                    Где-то в лабиринте вас поджидает кровожадная акула. 
                ]];
            else
                return false;
            end;
        end;
    end;
    used = function(s, o)
        print("fuck you dinosaur shark");
        if (o == item_ven_spear) then
            local no = ven_temple_l1.map[ven_temple_l1.position].e1;
            local ea = ven_temple_l1.map[ven_temple_l1.position].e2;
            local so = ven_temple_l1.map[ven_temple_l1.position].e3;
            local we = ven_temple_l1.map[ven_temple_l1.position].e4;
            if (s.position == no or s.position == ea or s.position == so or s.position == we) then
                remove(item_ven_spear, pl);
                s.active = false;
                return [[
                    Вы протыкаете акулу копьем. Она несколько раз дергается и затихает. Копье застревает в теле рыбы и вы не можете вытащить его. 
                ]];
            else
                return [[
                    Акула слишком далеко. 
                ]];
            end;
        end;
    end;
};

ven_chest = obj {
    var {
        state = 0;
    };
    nam = "ven_chest";
    dsc = [[
        В конце коридора стоит запертый {сундук}. 
    ]];
    act = function(s)
        walkin("ven_chest_look");
    end;
};

ven_chest_look = room {
    var {
        state = {0,0,0,0};
        taken = false;
    };
    nam = "ven_chest_look";
    disp = "Венаэданотр, храм";
    pic = function(s)
        local p = "images/ven_chest.png";
        for i = 1, #s.state do
            p = p .. ";images/ven_chest_" .. tostring(s.state[i]) .. ".png@" .. tostring((i - 1) * 16) .. ",64";
        end;
        return p;
    end;
    dsc = function(s)
        return [[
            На поверхности сундука вы видите обозначения из цветных полос - очевидно это какое-то сообщение. На крышке вы видите четыре вращающихся кольца, на которые нанесены метки шести цветов: фиолетовый, синий, зеленый, желтый, оранжевый, красный. 
        ]];
    end;
    checkLock = function(s)
        if (s.state[1] == 5 and s.state[2] == 3 and s.state[3] == 3 and s.state[4] == 2) then
            stead.ref("ven_chest_open"):enable();
            return true;
        else
            stead.ref("ven_chest_open"):disable();
            return false;
        end;
    end;
    obj = {
        'ven_chest_ring1';
        'ven_chest_ring2';
        'ven_chest_ring3';
        'ven_chest_ring4';
        'ven_chest_open';
        'ven_chest_away';
    };
};

ven_chest_ring1 = kh_vobj("ven_chest_ring1", "{Повернуть первое кольцо.}^", function(s)
    here().state[1] = here().state[1] + 1;
    if (here().state[1] > 5) then
        here().state[1] = 0;
    end;
    local t = "Вы поворачиваете кольцо на одно деление. ";
    if (here():checkLock()) then
        t = t .. "Вы слышите легкий щелчок. ";
    end;
    return t;
end);
        
ven_chest_ring2 = kh_vobj("ven_chest_ring2", "{Повернуть второе кольцо.}^", function(s)
    here().state[2] = here().state[2] + 1;
    if (here().state[2] > 5) then
        here().state[2] = 0;
    end;
    local t = "Вы поворачиваете кольцо на одно деление. ";
    if (here():checkLock()) then
        t = t .. "Вы слышите легкий щелчок. ";
    end;
    return t;
end);
        
ven_chest_ring3 = kh_vobj("ven_chest_ring3", "{Повернуть третье кольцо.}^", function(s)
    here().state[3] = here().state[3] + 1;
    if (here().state[3] > 5) then
        here().state[3] = 0;
    end;
    local t = "Вы поворачиваете кольцо на одно деление. ";
    if (here():checkLock()) then
        t = t .. "Вы слышите легкий щелчок. ";
    end;
    return t;
end);
        
ven_chest_ring4 = kh_vobj("ven_chest_ring4", "{Повернуть четвертое кольцо.}^", function(s)
    here().state[4] = here().state[4] + 1;
    if (here().state[4] > 5) then
        here().state[4] = 0;
    end;
    local t = "Вы поворачиваете кольцо на одно деление. ";
    if (here():checkLock()) then
        t = t .. "Вы слышите легкий щелчок. ";
    end;
    return t;
end);
        
ven_chest_open = kh_vobj("ven_chest_open", "{Открыть сундук.}^", function(s)
    if (not here().taken) then
        here().taken = true;
        take(item_ven_temple_key_1);
        return "В сундуке вы находите металлический ключ. ";
    else
        return "Сундук пуст";
    end;
end):disable();

ven_chest_away = kh_vobj("ven_chest_away", "{Отойти от сундука.}^", function(s)
    back();
end);

ven_first_lock = obj {
    nam = "ven_first_lock";
    dsc = "В двери вы видите {замочную скважину}. ";
    used = function(s, o)
        print "fuckersaurus"
        if (o == item_ven_temple_key_1) then
            remove(item_ven_temple_key_1, pl);
            ven_temple_l1.lock1 = false;
            path('e3'):enable();
            return "Вы открываете дверь. ";
        end;
        return "Это сюда не подходит. ";
    end;
};

ven_lever = obj {
    nam = "ven_lever";
    dsc = "В южной стене расположен небольшой {рычаг}. ";
    act = function(s)
        ven_temple_l1.lock2 = not ven_temple_l1.lock2;
        return "Вдалеке вы слышите скрежет металла. ";
    end;
}
        
ven_second_lock = obj {
    nam = "ven_second_lock";
    dsc = "В двери вы видите {замочную скважину}. ";
    used = function(s, o)
        if (o == item_ven_temple_key_2) then
            remove(item_ven_temple_key_2, pl);
            ven_temple_l1.lock3 = false;
            path('e4'):enable();
            return "Вы открываете дверь. ";
        end;
        return "Это сюда не подходит. ";
    end;
};
        
ven_cache = obj {
    var {
        state = 0
    };
    nam = "ven_cache";
    dsc = function(s)
        if (s.state >= 1) then
            return [[
                В южной стене открыта {выемка}.
            ]];
        else
            return [[
                В южной стене имеется небольшую {прорезь}.
            ]];
        end;
    end;
    act = function(s)
        if (s.state == 1) then
            s.state = 2;
            move(item_ven_temple_key_2, pl);
            return [[
                В выемке вы находите ключ. 
            ]];
        end;
    end;
    used = function(s, o)
        if (s.state == 0) then
            if (o == item_ven_tablet) then
                s.state = 1;
                remove(item_ven_tablet, pl);
                return "Пластинка легко уходит вглубь прорези. Вы слышите щелчок и в стене открывается выемка, в которой лежит ключ. ";
            end;
        end;
    end;
};

ven_skeleton = obj {
    nam = "ven_skeleton";
    dsc = [[
        У одной из стен вы видите {скелет навьяра}. 
    ]];
    act = [[
        Этот скелет очень старый. 
    ]];
};

item_ven_temple_key_1 = obj {
    nam = "item_ven_temple_key_1";
    disp = "Ключ из храма";
    dsc = [[
        Металлический ключик, найденный вами в храме Венаэданотра.
    ]];
};
        
item_ven_temple_key_2 = obj {
    nam = "item_ven_temple_key_2";
    disp = "Ключ из тайника";
    dsc = [[
        Металлический ключик, найденный вами в тайнике в храме Венаэданотра.
    ]];
}

item_ven_spear = obj {
    var {
        taken = false;
    };
    nam = "item_ven_spear";
    disp = "Копье";
    dsc = [[
        В правой руке скелета вы видите {коралловое копье}.
    ]];
    inv = [[
        Коралловое копье, найденное вами в лабиринте храма Венаэданотра. 
    ]];
    tak = function(s)
        s.taken = true;
        return [[
            Вы забираете копье себе. 
        ]];
    end;
};

ven_octopus = obj {
    nam = "ven_octopus";
    dsc = function(s)
        if (ven_temple_l1.position == "06") then
            return "Вдалеке к северу вы видите гигантского спрута. Чудовище, кажется, совершенно не заинтересовано вами, однако оно полностью закрывает проход. ";
        elseif (ven_temple_l1.position == "16") then
            return "К северу вы видите гигантского спрута. Чудовище, кажется, совершенно не заинтересовано вами, однако оно полностью закрывает проход. ";
        elseif (ven_temple_l1.position == "25") then
            return "К востоку вы видите гигантского спрута. Чудовище, кажется, совершенно не заинтересовано вами, однако оно полностью закрывает проход. ";
        end;
        return false;
    end;
    act = [[
        "Лучше к нему не приближаться".
    ]];
};



ven_temple_l2 = room {
    nam = "Венаэданотр, храм, второй этаж";
    dsc = [[
        Второй этаж храма представляет собой небольшой зал с металлическими стенами. В западной стене вы видите несколько окон, через которые открывается вид на ущелье. В северной части вы видите едва заметный проход. 
    ]];
    obj = {
        'ven_pedestal'
    };
    way = {
        kh_vroom("На первый этаж", "ven_temple_l1");
        kh_vroom("В проход на севере", "ven_near_temple");
    };
};

ven_pedestal = obj {
    var {
        taken = false;
    };
    nam = "ven_pedestal";
    dsc = function(s)
        if (s.taken) then
            return [[
                Пьедестал в центре зала пуст. 
            ]];
        else 
            return [[
                На пьедестале в центре зала вы видите небольшую металлическую пластину - судя по обозначениям это {фрагмент карты}. 
            ]];
        end;
    end;
    act = function(s)
        if (not s.taken) then
            s.taken = true;
            put(item_navjiarr_chart_ven);
            return [[
                Вы забираете фрагмент карты себе. 
            ]];
        end;
    end;
};