adrian_helper = obj { nam = "adrian_helper"; life = function(s) if (char_adrian.state > 1 and char_adrian.state < 5) then char_adrian.state = char_adrian.state + 1; elseif (char_adrian.state == 5) then char_naethvjirr.active = true; p([[ Адриан что-то делает с пультом управления и Наэтвьирр оживает ]]); lifeoff(s); walk("pre_battle_scene_normal"); end; end; }; char_adrian = obj { nam = "adrian"; disp = "Adrian"; state = 1; dsc = function(s) if (char_naethvjirr.active) then return [[ Вы видите {Адриана Блэка}, стоящего рядом с автоматоном. ^ ]]; else if (s.state == 1) then return [[ Вы видите {Адриана Блэка}, стоящего рядом с автоматоном. Он что-то делает с ним. ^ ]]; elseif (s.state < 6) then return [[ {Адриан Блэк} собирается включить Наэтвьирра. ^ ]]; end; end; end; life = function(s) if (s.state < 5) then s.state = s.state + 1; elseif (s.state == 5) then char_naethvjirr.active = true; p([[ Адриан что-то делает с пультом управления и Наэтвьирр оживает ]]); lifeoff(s); walk("pre_battle_scene_normal"); end; end; act = function(s) if (s.state == 1) then walkin "adrian_dlg"; elseif (s.state < 5) then return "Надо как-то остановить его, но как?"; else -- TODO: Вы сбиваете Адриана с ног end; end; }; adrian_dlg = dlg { nam = "adrian_dlg"; disp = "Адриан Блэк"; hideinv = true; entered = [[ Блэк поворачивается к вам. Его лицо выражает крайнюю степень удивления: "Кто вы, черт возьми, такие?!". Он отвлекся от работы с Наэтвьирром. Кажется, он не рад вас видеть. ]]; phr = { {"Адриан Блэк?", [[ "Предположим. " ]]}, {"Что здесь происходит?", [[ "Завершаю то, что должно было закончиться тысячелетия назад. Эта машина, Наэтвьирр - спящий разум глубин, как его называют Навьяры, или если точнее - Эйлеслвьихенарр - вечный разум глубин и поверхности. Он таит знания тысяч поколений Навьяр - они не должны скрываться под толщей воды, они должны быть открыты нам! " ]], [[ pstart 'more_naethvjirr' ]]}, { tag="more_naethvjirr" }, {"Что вы знаете о Наэтвьирре?", [[ "Согласно легендам, собранным мной в разных поселениях навьяров, Наэтвьирр был построен в глубокой древности навьярами, которые тогда господствовали как под водой, так и на суше. Единственной целью существования Наэтвьирра было стать "вечным мудрецом" - "эйлеслэйлайхевьирр", как его называют до сих пор в некоторых местах. Имена менялись, как всегда было у навьяров, но всегда отражали суть - частично или полностью - мыслящая, всезнающая машина, способная ответить на многие вопросы и помочь принять многие трудные решения. Только по чудовищному недоразумению он не был активирован раньше. " ]]}, {"Вы понимаете, насколько опасно включать эту машину, как бы она ни называлась?", [[ "Во-первых, не тебе учить меня. Во-вторых, я все предусмотрел - в случае опасности я смогу отключить его." ]], [[ pstart 'halt_naethvjirr' ]]}, { tag="halt_naethvjirr", empty = function() char_adrian.state = 2; p("^^С этими словами, Адриан подходит к рубильнику. У вас есть несколько мгновений, чтобы отреагировать"); walk("final_scene"); char_naethvjirr.canshoot = true; lifeon(adrian_helper); end }, {"Как вы собираетесь управлять им, если ключ утерян? *Вы показываете Адриану табличку со схемой работы Наэтвьирра*", [[ Адриан показывает вам серебристую пластинку небольшого размера(около 20х15см), на которой отсвечивают красноватые круги и линии. - "Я все предусмотрел. Без этой деталюшки Наэтвьирр будет серьезно ограничен в возможностях - это тот самый компонент, который должен блокироваться или разблокироваться ключом. " ]]} }; }; char_naethvjirr = obj { nam = "naethvjirr"; disp = "Наэтвьирр"; disp2 = "Наэтвьирра"; canshoot = false; dsc = function(s) if (s.active) then return [[ В центре зала перед массивной конструкцией, напоминающей трон, стоит {автоматон навьяр}. Конструкт выглядит совершенно как живой, сияющие белым светом глаза оглядывают помещение и вас в ожидании ваших действий. Тысячи проводов тянутся от "трона" к стенам, подобно щупальцам. ^ ]]; else return [[ В центре зала на массивной конструкции, напоминающей трон, сидит {навьяр}. Конструкт выглядит совершенно как живой, однако он абсолютно неподвижен. Покрытые серебристой чешуей, его руки покоятся на коленях. Тысячи проводов тянутся от "трона" и фигуры к стенам, подобно щупальцам. Глаза навьяра закрыты. ^ ]]; end; end; act = [[ Я пока не знаю, что с этим делать ]]; noshootmsg = "Я не знаю, к чему это приведет, пока лучше этого не делать"; nohitmsg = "Я не знаю, к чему это приведет, пока лучше этого не делать"; onshoot = function(s) p("^^Ваш выстрел повреждает Наэтвьирра, но вы не замечаете, сказалось ли это на его работоспособности"); fb_naethvjirr.hitpoints = 2; char_adrian.state = 6; -- TODO Адриан стреляет в одного из членов партии if (#pl.party ~= 0) then local chosen_one; local chosen_one_index = rnd(#pl.party); local chosen_one_name = pl.party[chosen_one_index]; if (chosen_one_name == "learr") then chosen_one = char_learr_fb; elseif (chosen_one_name == "phaetlarr") then chosen_one = char_phaetlarr_fb; elseif (chosen_one_name == "radcliffe") then chosen_one = char_radcliffe_fb; else chosen_one = char_wright_fb; end; table.remove(pl.party, chosen_one_index); p("^^Адриан вскидывает пистолет и стреляет в вашу сторону. " .. chosen_one.disp .. " падает замертво"); walk("pre_battle_scene_fight"); else -- TODO Адриан стреляет в вас walk("game_over_shot"); end; end; }; char_learr_fb = obj { nam = "learr_fb"; disp = "Леарр"; dsc = function() return [[ {Леарр} смотрит попеременно то на вас, то на Адриана ^ ]]; end; }; char_phaetlarr_fb = obj { nam = "phaetlarr_fb"; disp = "Фаэтларр"; dsc = function() return [[ {Фаэтларр} оглядывает зал ^ ]]; end; }; char_radcliffe_fb = obj { nam = "radcliffe_fb"; disp = "Уолтер Рэдклифф"; dsc = function() return [[ {Уолтер Рэдклифф} с интересом разглядывает Наэтвьирра ^ ]]; end; }; char_wright_fb = obj { nam = "wright_fb"; disp = "Джек Райт"; dsc = function() return [[ {Джек Райт} ждет ваших действий ^ ]]; end; }; final_scene= room { nam = "final_scene"; disp = "Лсэрианотр, центральный зал"; dsc = [[ Вы находитесь в центральном зале древнего города Навьяр. Вдоль стен стоят огромные металлические шкафы, из которых тысячи проводом тянутся к громадной конструкции в центре зала. Мягкий свет льется сверху, практически ослепляя вас после полумрака остальной части мертвого города. ]]; obj = { "char_naethvjirr", "char_adrian", "adrian_helper", "char_learr_fb", "char_phaetlarr_fb", "char_radcliffe_fb", "char_wright_fb" }; }; pre_battle_scene_fight = room { nam = "pre_battle_scene_fight"; disp = "Лсэрианотр, центральный зал"; dsc = [[ Вы не успеваете опомниться, как Блэк снова стоит у пульта, а Наэтвьирр открывает глаза и оглядывает помещение. Адриан тут же издает приказ, указывая на вас:"Убей их" ]]; obj = { vway("Продолжить", "{Продолжить}", 'final_battle') }; }; pre_battle_scene_normal = room { nam = "pre_battle_scene_normal"; disp = "Лсэрианотр, центральный зал"; dsc = [[ В глазах автоматона зажигается мягкий синий свет и он поворачивается к Адриану. Какое-то время он молчит, видимо, пытаясь подобрать наиболее подходящий язык для общения. В итоге по головным плавникам Навьяра побежали цветные полосы - ставший уже столь привычным для вас, способ общения среди Навьяров. Он "говорит" быстро, и вы успеваете понять лишь отдельные слова: "время", "пробуждение", "повелитель". Вы понимаете, что у вас есть еще немного времени, чтобы остановить его. Едва вы достаете оружие, как из пола перед троном поднимаются два небольших пилона. Очевидно, что город будет защищать своего хозяина. ]]; obj = { vway("Продолжить", "{Продолжить}", 'final_battle') }; };