item_book_on_navjiarr = obj {
	var {
		opened = false;
	};
    nam = "item_book_on_navjiarr";
    disp = "Книга о навьярах";
    dsc = [[На столе лежит кем-то оставленная {книга}.]];
    tak = [[Книга содержит некоторые сведения о навьярах. Возможно, она поможет вам в странствиях. ]];
    inv = function(s)
        if (here().battlefield) then
            return [[Я не смогу здесь читать. ]];
        elseif (here().underwater and not s.opened) then
			return [[Я не смогу здесь читать. ]];
		else
			s.opened = true;
			item_book_dlg.underwater = here().underwater;
            walkin('item_book_dlg');
        end;
    end;
};

item_book_dlg = dlg {
    var = {
        underwater = false;
    };
    nam = "Книга о навьярах";
    entered = function(s)
		language_known = true;
		cart_known = true;
		if s.underwater then
			return [[Вы пытаетесь вспомнить содержимое книги. ]];
		else
			return [[Вы открываете оглавление и ищете нужную вам информацию. ]];
		end;
	end;
    phr = {
		{always=true, "Религия и культура", [[Цивилизация навьяров, несмотря на предположительную древность, очень примитивна. Сколь-либо целостной религии у навьяров нет, как нет и явно выраженных божеств. Храмы используются как место почитания предков(древних навьяров) и хранения их реликвий. ^Широко распространено представление о скатах, как о хранителях мудрости и знаний. Нанести вред скату считается серьезнейшим преступлением.^Искусство навьяров основано на интерпретациях существующих источников и историях из жизни современных навьяров. Широко распространены скульптура и резьба по камню. В виду сложности создания письменных текстов, гораздо чаще встречается устная передача произведений. Письменность используется только для сохранения особенно важной информации(обычно уже в сильно искаженном виде). ]]};
        {always=true, "Арифметика", [[Навьяры используют шестиричную систему счисления. Для цифр используются цветовые обозначения, аналогичные буквам. В скобках приведены названия на навьярском языке(запись по системе Светловой): ^]]..
            img('box:4x16,#8000FF,255') .. [[ - 0 (Nol)^]] ..
            img('box:4x16,#0080FF,255') .. [[ - 1 (Lse)^]] ..
            img('box:4x16,#00FF80,255') .. [[ - 2 (Dyle)^]] ..
            img('box:4x16,yellow,255') .. [[ - 3 (Vlye)^]] ..
            img('box:4x16,#FFCC00,255') .. [[ - 4 (Elt)^]] ..
            img('box:4x16,red,255') .. [[ - 5 (Tei)]]};
        {always=true, "Картография", [[Навьярские карты значительно отличаются от наших. Масштабы и четкие направления отсутствуют. Пути обозначаются от центральной точки к нескольким удаленным от нее в виде цепочек ориентиров, приблизительно соблюдая направление. Список обозначений продолжается на много страниц. Вы отметили для себя некоторые:^]] ..
        img('images/book_temple.png') .. " - храм.^" ..
        img('images/book_city.png') .. " - город.^" ..
        img('images/book_stones.png') .. " - используется для небольших искусственных сооружений.^" ..
        img('images/book_bones.png') .. " - кости. Обозначает скелеты крупных животных, хорошо заметные на расстоянии.^" ..
        img('images/book_weed.png') .. " - растительность.^" ..
		"Для указания протяженных объектов используются следующие символы:^" ..
		img('images/book_current.png') .. " - течение. Стрелка означает направление по течению.^" ..
		img('images/book_ravine.png') .. " - ущелье.^" ..
		img('images/book_cliff.png') .. " - скала. Сторона с отметками означает край, находящийся выше.^" ..
		'Если символ направлен из центра к краю -- следует двигаться вдоль объекта, если параллельно окружности -- он пересекает путь.'};
        {always=true, "Язык", code [[ psub('language'); ]]};
        {always=true, "[Отложить книгу]", code [[ back(); ]]};
        {tag="language"};
        {always=true, "Общение", [[В обычной жизни навьяры могут использовать два взаимозаменяемых способа общения: ^1) Наиболее часто навьяры используют цветовые сигналы, подаваемые с использованием особых отростков на голове, напоминающих плавники. Светящийся пигмент просвечивает через тонкую кожу и равномерно распространяется к краям "плавника", постепенно затухая. Как правило, навьяры "говорят" достаточно быстро - у взрослого навьяра на плавнике может одновременно находиться около десятка таких цветных полос. Последовательности цветов разделяются т.н. паузами и полупаузами(полупауза как правило заметно тоньше обычной цветной полосы). ^2) Альтернативно, навьяры могут общаться посредством устной речи, однако практически не пользуются этим в естественной среде обитания(примечание Сильвии Уинтерлайт: вероятно, некогда навьяры жили преимущественно на поверхности и использовали этот способ общения в качестве основного). Каждому цвету имеется четкое звуковое соответствие. ]]};
        {always=true, "Алфавит и письменность", [[Современные навьярские записи выглядят как каменные таблички с рядами цветных полос. Ширина полос разнится от документа к документу и составляет от 1 до 15 мм. Хотя данный способ записи достаточно компактен, для нас он неудобен и дорог. Мы предлагаем альтернативную систему письменности, основанную на латинском алфавите. Каждому цвету будет сопоставлена определенная буква. Ниже приведено соответствие цветов звукам и буквам. ^]] ..
        img('box:4x16,red,255') .. " - A, " ..
        img('box:4x16,orange,255') .. " - R, " ..
        img('box:4x16,#FFCC00,255') .. " - N, " ..
        img('box:4x16,yellow,255') .. " - E, " ..
        img('box:4x16,#B9FF00,255') .. " - V, " ..
        img('box:4x16,#7BAA00,255') .. " - F, " ..
        img('box:4x16,#00FF00,255') .. " - Y, " ..
        img('box:4x16,#00FF80,255') .. " - L, " ..
        img('box:4x16,#00FFFF,255') .. " - I, " ..
        img('box:4x16,#0080FF,255') .. " - H, " ..
        img('box:4x16,#0000FF,255') .. " - P, " ..
        img('box:4x16,#8000FF,255') .. " - K, " ..
        img('box:4x16,#BF00FF,255') .. " - O, " ..
        img('box:4x16,#FF00FF,255') .. " - D, " ..
        img('box:4x16,#800080,255') .. " - T, " ..
        img('box:4x16,#FF0080,255') .. " - Z, " ..
        img('box:4x16,#AA0055,255') .. " - S. "};
        {always=true, "Структура слова", [[В навьярском языке слова составляются из множества признаков, присущих данному предмету(rr) или действию (nn). Признаки могут отделяться от остальных частицами "e"(если речь идет о разделенных предметах) или "yhe"(если речь идет о подгруппе). Примеры: ^Na'vji'a'rr -- навьяр^Ty'yhe'na'vji'a'rr -- ты -- навьяр^Vee'nn -- двигаться^Rja'zee'vee'nn -- отдаляться^ Основные периоды времени:^Nley'elra'ysl'rr -- сутки^Ynd'elra'ysl'rr -- год^Rja'elra'ysl'rr -- 216 лет]]};
        {always=true, "Словарь", code [[ psub('dictionary'); ]]};
        {always=true, "[В другой раздел]", code [[ 
            pret();
        ]]};
		{tag="dictionary"};
		{always=true;"[A]", [[A:^A, ava -- живой^Aed -- океан, море^Ah -- согласие^Arn -- работа^Atre -- предупреждение, опасность^Anot -- жилище^Arhe -- назад^Ayhe -- знание]]};
		{always=true;"[E]", [[E:^Ere -- множество, группа^Eanea -- улица^Elra -- период^Eyle -- всеобщность^Eylesl -- вечность^Eth -- сон]]};
		{always=true;"[H]", [[H:^Hi -- помощь^He -- верх^Hyd -- причина^Has -- неопределенность^Hya -- память, хранение]]};
		{always=true;"[I]", [[I:^I -- Я, Мы^In -- добавление, дополнение^Ien — верх^Ile -- видимость^Intre -- уверенность^Iraa -- окруженающая среда]]};
		{always=true;"[L]", [[L:^Lea -- Радость^Lek -- место^Lyt -- встреча]]};
		{always=true;"[N]", [[N:^Nea -- путь, дорога^Na -- низ^Nev — изменение^Nley -- мало, маленький^Ny -- присутствие^Ndi -- тьма]]};
		{always=true;"[P]", [[P:^Pha -- светящийся, сияющий^Per -- вперед^Pte -- он, они, она, оно, это^Pai — копье]]};
		{always=true;"[R]", [[R:^Rja -- большой, много^Ry -- Порядок]]};
		{always=true;"[T]", [[T:^Tea — наблюдать, смотреть^Tel -- значимость^Ta -- указание места^Tna -- привязка, принадлежность^Tla -- источник^Tek -- механизм^Tre -- множество^Ty -- Ты, Вы]]};
		{always=true;"[V]", [[V:^Ven -- тепло^Vil — покрывало, завеса^Vee -- Подвижный, движущийся^Vji -- разумный^Vta -- неприязнь^Vtre -- отрицание^Vlae -- разделение^Vna -- низ^Viv -- острый]]};
		{always=true;"[Y]", [[Y:^Yir — трава, водоросль^Ynd -- средний^Yhe -- Разграничитель -- ставится после необязательных признаков^Ysl -- время]]};
		{always=true;"[Z]", [[Z:^Za -- язык^Zy -- вопрос^Zee -- расстояние^Yz -- храм]]};
		{always=true, "[В другой раздел]", code [[
            pret();
        ]]};
    };
};

item_spear = obj {
    nam = "item_spear";
    disp = "Копье";
    dsc = [[{Копье Фаэтларра} аккуратно прислонено к стене]];
    tak = [[Фаэтларр забирает копье. ]];
    inv = [[Копье, добытое Фаэтларром в честном бою. ]];
    use = function(s, o)
        local canhit = false;
        if (type(o.canhit) == "function") then
            canhit = o.canhit(o);
        else
            canhit = o.canhit;
        end;
        
        if (canhit) then
            if (o.onhit) then
                return(o.onhit(o));
            else
                return "";
            end;
        elseif (o.nohitmsg) then
            return o.nohitmsg;
        else
            return "Я не буду этого делать!";
        end;
    end;
};

item_colt = obj {
    var {
        bullets = 6;
    };
	nam = "colt";
	disp = function(s)
		return "Кольт (" .. tostring(s.bullets) .. " зарядов)";
	end;
	dsc = [[На столе лежит {револьвер}. ]];
    tak = "Вы забираете револьвер. ";
	use = function(s, o)
        if (here().underwater) then
            return "Под водой это вам не поможет. ";
        end;
    
		if (s.bullets == 0) then
			return "Нужно перезарядиться, патроны кончились";
		end;
		
		local canshoot = false;
		if (type(o.canshoot) == "function") then
			canshoot = o.canshoot(o);
		else
			canshoot = o.canshoot;
		end;
		
		if (canshoot) then
			s.bullets = s.bullets - 1;
			p("Вы стреляете в "..o.disp2 .. ". ");
			if (o.onshoot) then
				return(o.onshoot(o));
			else
				return "";
			end;
		elseif o.noshootsilent then
			return
		elseif o.noshootmsg then
			return o.noshootmsg;
		else
			return "Я не буду этого делать!";
		end;
	end;
	inv = function(s)
		if (s.bullets == 6) then
			return [[Ваш револьвер. Надежное оружие в хорошем состоянии. Оно еще не раз спасет вашу жизнь. У вас также есть небольшой запас патронов к нему. ]];
		else
			s.bullets = 6;
			p [[Вы перезаряжаете ваш револьвер и оружие снова готово к бою. ]];
            if (type(here().onreload) == 'function') then
                here().onreload();
            end;
		end;
	end;
};

item_harpoon = obj {
    var {
        charge = 1;
    };
    nam = "item_harpoon";
    disp = function(s)
        if (s.charge == 0) then
            return "Ружье (разряжено)";
        else
            return "Ружье (заряжено)";
        end;
    end;
    dsc = [[К стене прислонено {гарпунное ружье}. ]];
    tak = "Вы забираете ружье. ";
    use = function(s, o)
        local canshoot = false;
        if (type(o.canshoot) == "function") then
            canshoot = o:canshoot();
        else
            canshoot = o.canshoot;
        end;
        
        local canthrust = false;
        if (type(o.canthrust) == "function") then
            canthrust = o:canthrust();
        else
            canthrust = o.canthrust;
        end;
        
        if (canthrust) then
            p("Вы атакуете "..o.disp2 .. ". ");
            if (o.onthrust) then
                return(o.onthrust(o));
            else
                return "";
            end;
        elseif (canshoot) then
			if (s.charge == 0) then
				return "Ружье не заряжено. ";
			end;

            s.charge = s.charge - 1;
            p("Вы стреляете в "..o.disp2 .. ". ");
            if (o.onshoot) then
                return(o.onshoot(o));
            else
                return "";
            end;
		elseif o.noshootsilent then
			return
        elseif (o.noshootmsg) then
            return o.noshootmsg;
        else
            return "Я не буду этого делать!";
        end;
    end;
    inv = function(s)
        if (s.charge > 0) then
            return [[Пневматическое ружье с Левиафана. Стреляет гарпунами. Также у вас есть несколько запасных гарпунов с собой. ]];
        else
            s.charge = 1;
            p [[Вы заряжаете ружье. ]];
            if (type(here().onreload) == 'function') then
                here().onreload();
            end;
        end;
    end;
};

--[[
	Chapter 1
]]
item_lamp = obj {
	nam = "lamp";
	disp = "Лампа";
	dsc = "На столе стоит {керосиновая лампа}. ";
	tak = "Вы забираете лампу с собой. ";
	inv = function(s)
		if (here().nolamp) then
			return "Здесь не стоит зажигать лампу. ";
		end;
		stead.need_scene();
		if (me().has_light) then
			me().has_light = false;
			return "Вы гасите свет. ";
		else
			me().has_light = true;
			return "Вы зажигаете лампу. ";
		end;
	end;
};

item_toolbox = obj {
	nam = "toolbox";
	disp = "Ящик с инструментами";
	dsc = function(s)
		if where(s) == leviathan_airlock then
			return [[На полу стоит {ящик с инструментами}. ]];
		else
			return [[На земле, рядом со скамейкой стоит {ящик с инструментами}. ]];
		end;
	end;
	tak = function(s)
		if (not char_worker.bought) then
			return [[Рабочий огрызается на вас: _"Руки прочь!"_ ]], false;
		else
			return [[Вы забираете ящик с собой]], true;
		end;
	end;
	inv = [[Ящик со всевозможными полезными и не очень инструментами: отвертками, ключами, молотками и т.д. ]];
};

item_money = obj {
	nam = "money";
	disp = function(s)
		if pl.money == 0 or not pl.money then
			return "Пустой кошелек";
		else
			return s.money_format();
		end;
	end;
	inv = function(s)
		if pl.money == 0 or not pl.money then
			return "Кошелек пуст";
		else
			return [[Кошелек с монетами различного достоинства на сумму ]] .. s.money_format();
		end;
	end;
	money_format = function()
		if (pl.money % 100 / 10 ~= 1 and pl.money % 10 == 1) then
			return tostring(pl.money) .. " шиллинг";
		elseif (pl.money % 100 / 10 ~= 1 and (pl.money % 10 == 2 or pl.money % 10 == 3 or pl.money % 10 == 4)) then
			return tostring(pl.money) .. " шиллинга";
		else 
			return tostring(pl.money) .. " шиллингов";
		end;
	end;
};

item_note_1 = obj {
	nam = "note1";
	disp = "Записка";
	inv = [[Небольшой клочок бумаги с адресом Майкла Райта в Лондоне. ]];
};

item_charts = obj {
	nam = "charts";
	disp = "Документы отца";
	dsc = [[На столе лежат {схемы складов и верфей} Вестхейвен Трансоушен. ]];
	inv = [[Схемы нескольких строений, принадлежавших компании отца. На некоторых схемах есть места отмечены жирными крестиками. Схемы с крестиками обозначены как склад 18, док 2, склад 32. ]];
	use = function(s, o)
		if (o == char_wright_home) then
			remove(s, pl);
			put(s, item_wright_table);
			char_wright_home.documents = true;
			return [[
				Вы отдаете бумаги Джеку. Он кладет их на стол и принимается изучать.
			]];
		end;
	end;
	tak = function()
		pn("Лучше оставить бумаги Джеку. Возможно он что-нибудь найдет. ");
		return false;
	end;
};

item_bottle = obj {
	nam = "item_bottle";
	disp = "Бутылка с пойлом";
	inv = [[Бутылка дешевого пойла. Вас воротит от одного запаха этой дряни. ]];
};

item_pump_broken = obj {
	nam = "item_pump_broken";
	disp = "Насос";
	inv = [[Старый ручной насос. Рычаг сломан, делая его использование невозможным. ]];
};

item_pump = obj {
	nam = "item_pump";
	disp = "Насос";
	inv = [[Старый ручной насос. ]];
};

item_pump_details = obj {
	nam = "item_pump_details";
	disp = "Детали насоса";
	inv = [[
		Запчасти для насоса. 
	]];
	use = function(s, o)
		if (o == item_pump_broken) then
			remove(s, pl);
			remove(item_pump_broken, pl);
			put(item_pump, pl);
			return [[Вы починили насос. ]];
		end;
	end;
};

item_electrodes = obj {
	nam = "item_electrodes";
	disp = "Электроды";
	inv = [[Несколько металлических пластин, предназначенных для использования в качестве электродов. ]];
};

item_ducttape = obj {
	nam = "item_ducttape";
	disp = "Изолента";
    seen_level = 1;
	dsc = [[На столе лежит {моток изоленты}. ]];
	tak = [[Вы забираете изоленту. ]];
	inv = [[Моток изоленты. ]];
};

item_map = obj {
	nam = "item_map";
	disp = "Карта";
	inv = function(s)
		if atlantis_found then
			return txttab('50%', 'center') .. img("images/map_begin.png") .. [[^Карта Атлантического океана, судя по маркировке, принадлежащая компании "Вестхейвен Трансоушен". На ней изображено несколько объектов, имеющих значение для компании и, в частности, Атлантида. ]];
		else
			atlantis_found = true;
			return txttab('50%', 'center') .. img("images/map_begin.png") .. [[^Карта Атлантического океана, судя по маркировке, принадлежащая компании "Вестхейвен Трансоушен". Вы внимательно осматриваете карту в поисках чего-нибудь необычного. Ваше внимание привлекает отметка "Атлантида", сделанная посреди океана. К сожалению, никаких пояснений у вас нет и единственное, что вы можете сделать -- это попытаться добраться до этой точки. ]];
		end;
	end;
};

item_unknown_schematics = obj {
	nam = "item_unknown_schematics";
	disp = "Чертежи";
	inv = function(s) 
		remove(s, pl);
		put(item_leviathan_schematics, pl);
		return [[Вы рассматриваете чертежи, найденные на складе. Это чертежи какого-то необычного корабля. Многие детали конструкции кажутся вам непонятными, излишними, переусложненными пока вы не натыкаетесь на надпись в углу: _"Проект ,,Левиафан'', Вестхейвен Трансоушен, 1900"_. Чуть ниже написано: _"Подводный корабль предназначенный для длительных автономных путешествий"_. Теперь все встает на свои места -- вот что строил ваш отец. ]];
	end;
};

item_leviathan_schematics = obj {
	nam = "item_leviathan_schematics";
	disp = "Чертежи \"Левиафана\"";
	inv = [[Чертежи "Левиафана" -- субмарины, созданной Вестхейвен Трансоушен. ]];
};

item_cogs = obj {
	nam = "item_cogs";
	disp = "Шестеренки";
	inv = [[Несколько шестерней разного размера. ]];
	use = function(s, o)
		if (o == crane_service_access_panel and crane_service_access_panel.state == 1) then
			remove(s, pl);
			dock_crane.broken = false;
			return [[Вы заменяете поврежденные шестерни новыми. ]];
		end;
	end;
};

item_w32_key = obj {
	nam = "item_w32_key";
	disp = "Ключ";
	dsc = [[За книгами спрятан небольшой {ключик}. ]];
	tak = function(s)
		w32_mgr.key_inplace = false;
		return [[Вы забираете ключ. ]];
	end;
	inv = [[Ключ от стола управляющего из склада 32. ]];
};

item_goldmans_clock = obj {
	nam = "item_goldmans_clock";
	disp = "Часы";
	dsc = [[На полу валяются дорогие {карманные часы}. ]];
	tak = [[Вы забираете часы себе. ]];
	inv = [[Дорогие карманные часы на цепочке. Под крышкой гравировка "Франсуа Голдман, 1864". ]];
};

item_statuette = obj {
	nam = "item_statuette";
	disp = "Статуэтка";
	inv = [[Металлическая статуэтка, сделанная из неизвестного вам сплава, она хорошо сохранилась в океанской воде. Статуэтка в деталях изображает навьяра, держащего в правой руке блокнот, и сосредоточенно смотрящего перед собой. ]];
};

item_temple_disk = obj {
	nam = "item_temple_disk";
	disp = "Светодиск из храма";
	dsc = [[У стены лежит небольшой блестящий {диск}. ]];
	tak = [[Вы поднимаете диск. ]];
	inv = [[Найденный в храме блестящий гладкий диск из неизвестного материала. Диаметр около 10 сантиметров. В центре небольшое треугольное отверстие. Вдоль внешней кромки тянутся цветные полосы. ]];
};

item_legend_of_temple = obj {
	nam = "item_legend_of_temple";
	disp = "Навьярская табличка";
	dsc = [[На полу в углу валяется какой-то {предмет}. ]];
	tak = [[Вы поднимаете предмет. Это небольшая металлическая табличка. ]];
	inv = function(s)
        if (language_known) then   
            return [[Металлическая табличка, на которую нанесены цветные полосы: "В одном городе жил навьяр по имени Тревенвеерр. Однажды он прослышал о монстре, угрожающем соседним городам. Позже, ему довелось увидеть нападение этого чудовища на группу путешественников. Проследив его путь, Тревенвеерр узнал, что живет чудовище в глубоком ущелье. Вернувшись домой, навьяр начал расспрашивать мудрецов своего города -- как же быть, но никто не дал ему ответ. Тогда Тревенвеерр решил разрушить жилище монстра и отправился туда. Но вместо жилища монстра нашел он древний, чудесный храм -- светящиеся картины в нем складывались в причудливые истории и многие предметы лежали внутри. Тревенвеерр забрал все что смог, но не стал разрушать святилище. Когда он принес реликвии в свой город, то никто не смог понять, для чего они были нужны. Тогда Тревенвеерр отправился бродить по свету в поисках ответов. Ответы он не нашел, но нашел ската, рассказавшего ему, как одолеть чудовище. Воодушевленный, Тревенвеерр отправился в логово чудовища и с тех пор никто никогда не видел ни того, ни другого, а реликвии были утеряны навсегда". ]];
        else
            return [[Металлическая табличка, на которую нанесены цветные полосы, соответствующие буквам языка навьяров. ]];
        end;
    end;
};

item_legend_of_dark_source = obj {
	nam = "item_legend_of_dark_source";
	disp = "Навьярская табличка";
	dsc = [[На полу у входа валяется какой-то {предмет}. ]];
	tak = [[Вы поднимаете предмет. Это небольшая металлическая табличка. ]];
	inv = function(s)
        if (language_known) then   
            return [[Металлическая табличка, на которую нанесены цветные полосы: "С древних времен в океаны живут скаты огромных размеров. Размах плавников их столь широк, что они закрывают свет поверхности. Мудрость их не уступает размеру. Один из них, известный под именем Фаэндирр, жил в специально встроенном для него храме, где собирал древние ценности и охранял их от воров. Однажды, прознал Фаэндирр об артефакте, именуемом световым диском. Фаэндирр загорелся идеей заполучить себе его. Он долго упрашивал навьяров передать ему световой диск, но те раз за разом отказывали скату. Тогда Фаэндирр украл его прямо из храма. Темной ночью, когда его никто не видел, он пробрался в храм, проткнул охранников хвостовым шипом и забрал артефакт. Когда навьяры пришли к нему, чтобы отобрать реликвию, он спросил их, могут ли они сказать для чего она нужна. Но никто не ответил Фаэндирру. Тогда он заперся в храме, а когда вооруженные навьяры ворвались внутрь, обрушил потолок, похоронив вместе с ними и себя и световой диск". ]];
        else
            return [[Металлическая табличка, на которую нанесены цветные полосы, соответствующие буквам языка навьяров. ]];
        end;
    end;
};

item_legend_of_first_city = obj {
	nam = "item_legend_of_first_city";
	disp = "Навьярская табличка";
	dsc = [[На полу в углу валяется какой-то {предмет}. ]];
	tak = [[Вы поднимаете предмет. Это небольшая металлическая табличка. ]];
	inv = function(s)
        if (language_known) then
            return [[Металлическая табличка, на которую нанесены цветные полосы: "Многие тысячелетия назад навьяры жили в огромных городах. Великие мудрецы строили немыслимые машины, способные делать за навьяров практически все, что можно было пожелать. Кроме одного -- машины не были способны мыслить. В одном городе мудрецы смогли построить такую машину. Но город этот был закрыт и никто посторонний не мог попасть в него -- накрытый незримым куполом, он был надежно защищен от проникновения извне. Навьяры долго ждали, когда им покажут великое чудо. Но никто не выходил из закрытого города. Тогда навьяры собрали войско и отправились к нему. Но, как и раньше, никто не открыл им ворот и не впустил внутрь, а все их оружие оказалось бессильно перед прозрачным барьером. Испугались они тогда и решили забыть дорогу к страшному месту раз и навсегда. И только жители одного города сохранили карту, надежно спрятав ее, решив что однажды придет тот, кто достаточно умен, силен и безрассуден, чтобы проникнуть в город и раскрыть его тайну". ]];
        else
            return [[Металлическая табличка, на которую нанесены цветные полосы, соответствующие буквам языка навьяров. ]];
        end;
    end;
};

item_legend_of_hunter = obj {
	nam = "item_legend_of_hunter";
	disp = "Навьярская табличка";
	dsc = [[На полу в углу валяется какой-то {предмет}. ]];
	tak = [[Вы поднимаете предмет. Это небольшая металлическая табличка. ]];
	inv = function(s)
        if (language_known) then
            return [[Металлическая табличка, на которую нанесены цветные полосы: "Охотник Вивпаирр часто путешествовал в далекие земли в поисках невиданных рыб и новых мест. Однажды, он узнал про ходящего по поверхности рьяхеарра. Вивпаирр собрался и поднялся на поверхность. В поисках рьяхеарра он наткнулся на хевьяров. Спросив их, где искать зверя он услышал ответ: ,,Докажи, что достоин и мы покажем его тебе. Достань сияющий камень из пещеры''. Вивпаирр сходил и принес камень -- камень лежал глубоко под водой, что не было проблемой для навьяра. Но когда он вернулся, хевьяры сказали ему: ,,Теперь ты должен убить зубастую рыбу, угрожающую нашим рыбакам''. Вивпаирр убил ее -- это было достойное молодого охотника испытание, ведь та рыба была сильной молодой акулой, быстрой и острозубой. Но и тут хевьяры ответили, что это не все. Для последнего испытания они попросили Вивпаирра украсть сияющий диск из подводного города. Понял охотник, что дело нечисто, но жадность и гордыня взыграли в нем -- он во что бы то ни стало хотел найти рьяхеарра. Прокравшись ночью в город, он вынес световой диск из родного храма и отдал хевьярам. А те в ответ лишь посмеялись и сказали, что рьяхеарр живет в далеких землях. Вивпаирр разозлился, убил их всех, забрал обратно световой диск и камень, но не вернулся в родной город. Никто не знает, нашел он рьяхеарра или нет". ]];
        else
            return [[Металлическая табличка, на которую нанесены цветные полосы, соответствующие буквам языка навьяров. ]];
        end;
    end;
};

item_lse_map = obj {
    var {
        state = 1;
    };
    seen_level = 1;
    nam = "item_lse_map";
    disp = function(s)
        if (s.state == 1) then
            return "Фрагмент карты";
        elseif (s.state == 5) then
            return "Навьярская карта";
        else
            return "Фрагменты карты";
        end;
    end;
    tak = function(s)
        atl_iyh_state = 8;
		make_snapshot();
        return [[Вы забираете табличку себе. ]];
    end;
    dsc = [[На пьедестале посреди комнаты лежит металлическая {табличка}. ]];
    inv = function(s)
        if (s.state == 1) then
            return [[Один из фрагментов навьярской карты, ведущей в Лсэрианотр -- легендарный город подводной расы. ]];
        elseif (s.state == 5) then
            return [[Навьярская карта, ведущая в Лсэрианотр -- легендарный город подводной расы. ]];
        elseif (s.state == 4) then
            return [[Четыре фрагмента навьярской карты, ведущей в Лсэрианотр -- легендарный город подводной расы. ]];
        elseif (s.state == 3) then
            return [[Три фрагмента навьярской карты, ведущей в Лсэрианотр -- легендарный город подводной расы. ]];
        elseif (s.state == 2) then
            return [[Два фрагмента навьярской карты, ведущей в Лсэрианотр -- легендарный город подводной расы. ]];
        end;
    end;
};

item_venaedanotrr_map = obj {
    nam = "item_venaedanotrr_map";
    disp = "Навьярская карта";
    inv = function(s)
        local chars = "";
        if ArrayUtils.indexOf(pl.party, 'anna') ~= 0 and ArrayUtils.indexOf(pl.party, 'learr') ~= 0 then
            chars = "Анны и Леарр";
        elseif ArrayUtils.indexOf(pl.party, 'anna') ~= 0 then
            chars = "Анны";
        else
            chars = "Леарр";
        end;
        if (cart_known) then
            venaedanotrr_found = true;
			remove(item_venaedanotrr_map, pl);
            return [[Свиток из водорослей с картой пути к Венаэданотру. Вы путаетесь в сложном переплетении символов, линий и обозначений -- это гораздо сложнее карт, описанных в учебнике и тех, что вы видели ранее, однако, будучи на Левиафане, вы скорее всего сможете проложить маршрут с помощью ]] .. chars .. ". ";
        else
            return [[Свиток из водорослей с картой пути к Венаэданотру. Вы не имеете никакого понимания условных обозначений на этой карте. ]];
        end;
    end;
};

item_suit = suit {
	dlg = "call_leviathan";
	nam = "Скафандр";
    has_coder = true;
};

call_leviathan = dlg {
	nam = "phone_dlg";
	disp = "Телефон";
	hideinv = true;
	dsc = [[Вы настраиваете радио. С кем хотите поговорить? ]];
	entered = function(s)
		poff("phaetlarr", "learr", "radcliffe", "wright", "anna");
		local party = {
			char_phaetlarr,
			char_learr,
			char_radcliffe,
			char_wright,
			char_anna
		};
		for i = 1, #pl.party do
			if not party[i].follow then
				pon(pl.party[i]);
			end;
		end;
	end;
	phr = {
		{ tag = "phaetlarr", always = true, "[Вызвать Фаэтларра]", function(s)
			phaetlarr_dlg.from_call = true;
			phaetlarr_dlg.home = false;
			phaetlarr_dlg.underwater = false;
			walkin("phaetlarr_dlg");
		end},
		{ tag = "learr", always = true, "[Вызвать Леарр]", function(s)
			if char_learr.home == 'leviathan_cabin_3' then
				return [[Леарр не берет трубку. ]];
			else
				learr_dlg.from_call = true;
				learr_dlg.home = false;
				learr_dlg.underwater = false;
				walkin("learr_dlg");
			end;
		end},
		{ tag = "radcliffe", always = true, "[Вызвать Уолтера Рэдклиффа]", function(s)
			radcliffe_dlg.from_call = true;
			radcliffe_dlg.home = false;
			walkin("radcliffe_dlg");
		end},
		{ tag = "wright", always = true, "[Вызвать Джека Райта]", function(s)
			wright_main_dlg.from_call = true;
			wright_main_dlg.home = false;
			walkin("wright_main_dlg");
		end},
		{ tag = "anna", always = true, "[Вызвать Анну Рэдклифф]", function(s)
			anna_dlg.from_call = true;
			anna_dlg.home = false;
			walkin("anna_dlg");
		end},
		{ tag = "exit", always = true, "[Положить трубку]", code = [[back()]]}
	}
};

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

item_dynamo = obj {
    var {
        state = 0;
    };
    nam = "item_dynamo";
    disp = function(s)
        if s.state == 0 then
            return "Ручная динамо-машина";
        else
            return "Детали динамо-машины";
        end;
    end;
    dsc = [[На одном из столов лежит небольшая {коробочка} с вращающейся рукояткой. ]];
    inv = function(s)
        if s.state == 0 then
            return [[Небольшая динамо-машина с рукояткой и клеммами для подключения к электрической цепи. При вращении рукоятки вырабатывается электрический ток. ]];
        else
            return [[Разобранная динамо-машина. ]];
        end;
    end;
    tak = [[Вы забираете динамо-машину. ]];
    used = function(s, o)
        if s.state == 0 then
            if o == item_toolbox then
                if here().underwater then
                    return [[Вы не можете сделать это здесь. ]];
                else
                    s.state = 1;
                    return [[Вы разбираете динамо-машину. ]];
                end;
            end;
        elseif s.state == 1 then
            if o == item_electric_lamp and item_electric_lamp.state == 1 then
                if here().underwater then
                    return [[Вы не можете сделать это здесь. ]];
                else
                    item_electric_lamp.state = 2;
                    remove(s, pl);
                    return [[Вы собираете лампу с динамо-машиной в одном корпусе. Теперь батарею можно заряжать не разбирая лампу. Вождь навьяров будет рад такому подарку. ]]
                end;
            end;
        end;
    end;
};

item_electric_lamp = obj {
    var {
        state = 0;
    };
    nam = "item_electric_lamp";
    disp = function(s)
        if s.state == 0 then
            return "Лампа";
        elseif s.state == 1 then
            return "Разобранная лампа";
        elseif s.state == 2 then
            return "Лампа с динамо-машиной";
        end;
    end;
    dsc = [[В шкафу лежат на полках {лампы}, предназначенные для монтирования на скафандры. ]];
    inv = function(s)
        if s.state == 0 then
            return "Электрическая лампа в герметичном корпусе, содержащем саму лампу и батарею для ее питания. Батареи хватит примерно на полчаса-час работы. ";
        elseif s.state == 1 then
            return "Детали электрической лампы: Корпус, лампа, батарея. ";
        elseif s.state == 2 then
            return "Электрическая лампа в герметичном корпусе, содержащем саму лампу, батарею для ее питания и динамо-машину. Батареи хватит примерно на полчаса-час работы. Покрутите рукоятку чтобы зарядить батарею. ";
        end;
    end;
    tak = "Вы забираете одну из ламп. ";
    used = function(s, o)
        if s.state == 0 then
            if o == item_toolbox then
                if here().underwater then
                    return [[Вы не можете сделать это здесь. ]];
                else
                    s.state = 1;
                    return [[Вы разбираете лампу. ]];
                end;
            end;
        elseif s.state == 1 then
            if o == item_dynamo and item_dynamo.state == 1 then
                if here().underwater then
                    return [[Вы не можете сделать это здесь. ]];
                else
                    s.state = 2;
                    remove(item_dynamo, pl);
                    return [[Вы собираете лампу с динамо-машиной в одном корпусе. Теперь батарею можно заряжать не разбирая лампу. Вождь навьяров будет рад такому подарку. ]]
                end;
            end;
        end;
    end;
};

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

item_raybox = obj {
	nam = 'item_raybox';
	disp = 'Коробочка лучей';
	dsc = function(s)
		if stead.deref(here()) == 'ven_ravine_crypt' then
			return [[Среди множества приборов, расположенных вдоль стен комнаты, ваше внимание привлекает небольшая прозрачная {коробочка} с несколькими прорезями. Внутри нее беспрестанно мечутся тонкие лучики света. ]];
		else
			return [[В центре стола, опутанная паутиной проводов, установлена {коробочка лучей}. Внутри нее, в точности как там, в навьярском хранилище, сверкают тонкие лучики света. ]];
		end;
	end;
	inv = [[Навьярский прибор, известный вам как коробочка лучей. Осталось научиться пользоваться им. ]];
	act = function(s)
		if stead.deref(here()) == 'ven_ravine_crypt' then
			remove(item_raybox, where(item_raybox));
			take(item_raybox, pl);
			return [[Вы аккуратно извлекаете коробочку лучей из механизма, в который она установлена. Светящиеся линии в ее недрах мгновенно гаснут. ]];
		end;
	end;
	used = function(s, o)
		if o == item_map_disc then
			deep_temple_found = true;
			return [[Вы помещаете диск внутрь коробочки и он тут же опутывается лучами, которые начинают отражаться от него. Над поверхностью коробочки возникает полупрозрачное изображение -- это очень детальная навьярская карта, описывающая какое-то место, находящееся очень далеко отсюда. Цветные полосы, возникшие над изображением гласят "храм". ]];
		end;
	end
}

item_map_disc = obj {
	nam = "item_map_disc";
	disp = "Светодиск из катакомб";
	dsc = [[На одном из ящиков лежит небольшой блестящий {диск}. ]];
	tak = [[Вы поднимаете диск. ]];
	inv = function(s)
		local dt ='';

		for i = 1, #dt_code do
			dt = dt .. dt_wire_colors[dt_code[i]];
			if i < #dt_code then
				dt = dt .. ', ';
			end;
		end;

		return([[Найденный в катакомбах Нлейисланотра блестящий гладкий диск из неизвестного материала. Диаметр около 10 сантиметров. В центре небольшое треугольное отверстие. Вдоль внешней кромки тянутся цветные полосы: ]] .. dt .. [[. ]]);
	end;
}