Forum.iFiction.Ru

Lady1: Actor
// Девушка, ломящаяся в дверь
sdesc="девушка"
ldesc="Если бы ты встретился с такой девушкой в иной обстановке - на вечеринке, спектакле или хотя бы в электричке - 
       ты бы обязательно попытался познакомиться с ней поближе. Однако сейчас она с такой целеустремленностью 
       и остервенением ломится в запертую дверь почты, не видя никого и ничего вокруг, что ты понимаешь - 
       лучше к ней не соваться."
// Запрещаем разговаривать с дамой
verDoAskAbout(actor, iobj)={"Пытаться начать праздный разговор с женщиной в таком состоянии означает как 
                             минимум нарваться на грубость.";}
// Точно также можно определить verDoTellAbout, а также actorAction (с exit), чтобы пресечь все попытки 
// коммуникации;)
actorDesc={"";} // Чтобы персонаж не отображался в описании комнаты - эту работу возьмет на себя демон
Lady1Daemon={if(parserGetMe().location=self.location) // Сообщения для случая, когда главный герой в 
                                                      // одной комнате с девушкой
               {switch(rand(5))
                  {case 1: "Девушка рвет на себя ручку двери, бормоча, \"и надо же было забыть его на работе...\"";
                           break;
                   case 2: "\"Сейчас прорвемся,\" выдыхает девушка и бросается на дверь всем своим хрупким телом,
                            пытаясь выбить ее. На дверь это не производит ровным счетом никакого впечатления.";
                           break;
                   // Ну, и так далее - случайные сообщения
                  }
               }
              else // Сообщения для случая, когда главный герой - в другой комнате (не видит девушку)
                {switch(rand(5))
                   {case 1: "Со стороны почты доносятся глухие удары и чертыхание - никак не оставит девушка 
                             своих попыток!";
                            break;
                    // И т. д., и т. п.
                   }
                }
             }
; // Конец определения девушки

// Нижеследующий кусок кода, по задумке, вставляется в метод/функцию, отвечающий за открывание двери.
// (Про то, как именно будет реализовано открывание двери, Мастер не спрашивал;).)
//
{"Видя, что ты собираешься открыть дверь, девушка отходит в сторону, нервно пританцовывая на месте со 
  взглядом, полным надежд и сомнений. Как только дверь распахивается, она тенью проносится мимо тебя 
  внутрь. Ты слышишь какой-то шелест, затем сдавленный вскрик: \"А! И здесь его нет!\", и глухой шлепок,
  после чего наконец наступает тишина."; 
  unnotify(Lady1, &LadyDaemon); // Отключаем сообщения о попытках сломать дверь
  Lady1.moveInto(nil); // Заменяем ломящуюся девушку...
  Lady2.moveInto(PostOffice); // ...на девушку в обмороке (PostOffice - это помещение, 
                              // куда ведет запертая дверь)
;
// Объект "девушка в обмороке"
Lady2: Actor 
Examined=nil // Флаг, показывающий, осматривал ли игрок девушку или нет
ldesc={"Давешняя девушка лежит посреди комнаты. Похоже, она в глубоком обмороке.";
       if(not self.Examined)
         {// При первом осмотре находим предмет, который выронила девушка при падении
          //
          "Рядом с телом девушки ты замечаешь мобильный телефон, который она, должно быть, 
           выронила при падении.";
          MobilePhone.moveInto(PostOffice);
          // Устанавливаем флаг, чтобы не находить мобильный телефон при каждом осмотре
          // девушки
          self.Examined:=true;
         }
      }
actorDesc="Посреди комнаты неподвижно лежит девушка."
;

Grusdev: actor
noun='груздев'
sdesc="Груздев"
location=ThisRoom
GunAsked=nil    // Флаг, показывающий, спрашивали ли Груздева про пистолет
// В стандартной библиотеке RTADS ответы персонажей выбираются в зависимости от конкретного слова,
// которое использовал игрок, а не от объекта; такой подход позволяет избежать путаницы, когда 
// в игре имеется много объектов с одинаковыми или пересекащимися лексическими свойствами
// (например, несколько домов, машин и т. д.). Однако в данном случае я предлагаю выбор ответов 
// все-таки в зависимости от объекта - просто потому, что на первых порах он проще и нагляднее.
doAskAbout(actor, iobj)={if(not self.GunAsked)
                           {// Еще не спрашивали про пистолет; персонаж готов общаться
                            switch(iobj)
                              {case Gun: if(actor.isCarrying(Gun))
                                           {// Оружие у нас; можем задать вопрос
                                            "Ты достаешь из кармана пистолет и суешь Груздеву под нос.
                                             \"Из этого оружия была убита Лариса Груздева. Узнаете?\"\n 
                                            Груздев вскакивает, с ужасом (вероятнее всего, притворным) 
                                            глядя на револьвер. \"Откуда это у вас? Этого не может быть!\"
                                            кричит он почти в истерике и бросается в другую комнату.";
                                            // Устанавливаем флаг, показывающий, что про пистолет уже 
                                            // спрашивали
                                            self.GunAsked:=true;
                                            // Перемещаем Груздева в другую комнату
                                            self.moveInto(OtherRoom);
                                           }
                                         else
                                           {// Пистолета у нас нет; блокируем вопрос
                                            "Тебе не терпится спросить у Груздева про орудие убийства, но 
                                             ты сдерживаешься: для пущего эффекта надо бы дождаться 
                                             результатов баллистической экспертизы, которые должны вот-вот 
                                             поступить.";
                                           }
                                        break;
                               default: "\"Товарищ Жеглов, какое это имеет отношение к убийству моей жены?\"";
                                        break;
                              }
                           }
                         else
                           {// Уже спрашивали про пистолет; блокируем общение с Груздевым, пока не 
                            // получим ордер на его арест
                            if(not actor.isCarrying(Order_Na_Arest))
                              {"На твой взгляд, реакция Груздева на то, что Лариса была убита из его
                                пистолета, вполне доказывает его вину. Теперь ты будешь допрашивать его
                                как подозреваемого - вот только сначала надо послать Шарапова в канцелярию 
                                за ордером на арест.";
                              }
                            else
                              {// Ордер у нас; появляются новые темы для разговора (добавить по вкусу)
                               switch(iobj)
                                 {case Gun: ...
                                  // и т. д.
                                 }
                              }
                           }
                        }
;