duel/locations/pavels.lua

--[[
  Павел спрашивает у вас через домофон что-то инженерное, вы отвечаете.
  Он открывает дверь и приказывает вам идти в подвал.
  Там - мастерская.
  Павел - это киборг. Его макушка головы сделана из прозрачного пластика.
  Вы видите его мозг.
  -- Мне нужно починить одну вещь.
  -- ???
  -- Себя. Меня "улучшили" в армии, добавили искуственный интеллект к
  обычному мозгу. Я могу попасть в зёрнышко с десяти километров из пушки.
  Но мой ИИ устарел, и он хочет обновления.

  Павел знает, как делать обновление и он уже достал чип, но ему нужен
  знающий и надёжный техник. Для обновления человека придётся усыпить.
  У вас есть несколько вариантов, один из которых - просто убить его,
  воспользоваться мастерской и уехать.
]]
room {
  nam = 'pavels',
  disp = 'Дом на окраине',
  way = {'exit_west'},
  decor = [[
    Вы стоите перед типовым напечатанным одноэтажным домом.

    С одной стороны к стене прислонилась маленькая пристройка для дров.
    С другой стороны — {suit|боевой механизированный костюм.}

    Возле входной двери горит {call|кнопка домофона.}
  ]],
  obj = {
    obj {
      nam = 'call';
      disp = 'домофон';
      act = 'Домофон был включён, хозяин — дома. Достаточно было только поговорить с ним.';
      talk = function() return walk('pavels-call') end;
      take = function()
        pn "Вам не был нужен домофон или какая-то его деталь."
        return false
      end,
      open = function()
        pn "Домофон не разбирается."
        return false
      end
    };
    obj {
      nam = 'suit',
      disp = 'боевой костюм',
      talk = 'Костюм не принимал ваших команд. Если, конечно, он вообще вас слушал.',
      take = function()
        pn "Вам не нужна была боевая машина. Возвращаться в город на своём кабриолете было бы приятнее и быстрее."
        return false
      end,
      act = function() 
        local out = [[
        Боевой механизированный костюм высотой 2,7 метров, марка РГ-22.
        Рассчитан на одного пилота.
        Вооружён автоматической пушкой калибра 5мм и огнемётом.^^]]
        if char.war == "earth" then
          out = out .. [[
            Вы чинили эти двуногие танки день и ночь.
            Лунные мины становились всё изощрённее, и
            приходилось срочно отлаживать программы починки, а иногда и лезть вручную.
            Боты никогда не заботились о том, чтобы вычистить остатки пилота из кабины.^^
          ]]
        end
        if char.war == "moon" then
          out = out .. [[
            Где бы вы ни сражались, эти двуногие твари шли на вас тысячами.
            Вам приходилось еженедельно изобретать новые мины, чтобы получить хоть какой-то
            шанс отбиться.
            Сорок восемь смертельных чертежей против главной уязвимости этой модели —
            человека в кабине.^^
          ]]
        end
        out = out..[[Такие штамповались на Земле сотнями тысяч, но после войны оказалось, что большая часть потеряна на поле боя.
          Конечно, по официальной версии.
        ]]
        return out
      end
    }
  }
}
dlg {
  nam = 'pavels-call',
  decor = [[Камера домофона смотрела на вас бесстрастным блеском.]],
  obj = {
  }
}