Forum.iFiction.Ru

// В этом примере, чтобы пройти на восток, мы должны спросить сержанта про магазин
Sergeant: Actor
ldesc="Дюжий сержант смотрит на тебя, сжимая в руках автомат."
// Стандартный обработчик ответов персонажа
askWord(word, lst)={switch(word)
                                  {case 'магазин':
                                    case 'магазина':
                                    // и т. д., все нужные падежи и синонимы
                                    case 'магазине': "\"Магазин весь разграблен, но в кладовке осталась припрятанная бутылка водки. 
                                                                Если принесешь мне ее,\" сержант корчит брезгливую гримасу - наверное, при 
                                                                воспоминании о запахе, исходящем из кладовки, \"так вот, если принесешь мне 
                                                                ее, то, может быть, я отпущу тебя с миром.\""; 
                                                             startroom.EastBlocked:=nil; // Сбрасываем флаг-блокировку восточного прохода
                                                             return true;
                                    default: return nil; // Ничего не возвращаем
                                  }
                              }
// Ну, и прочие характеристики/реакции
;
startroom: room
EastBlocked=true  // Флаг, показывающий, что восточное направление заблокировано
ldesc={"Ты стоишь в заброшенном, разграбленном магазине. Под ногами хрустят осколки битого стекла, 
             стеллажи, которые раньше, наверно, ломились от товара, теперь пусты,  а местами обрушены.
             Выход из магазина находится к югу. ";
            if(self.EastBlocked)
              {"К востоку ведет небольшая дверь - вероятно, в кладовку, но из нее тянет таким амбре, 
                 что у тебя пропадает какая-либо охота заходить туда. ";
              }
            else
              {"Из двери к востоку, ведущей в кладовку, тащит отнюдь не розами, но тебе, похоже, придется туда зайти. ";
              }
          }
east={if(self.EastBlocked)
            {"Ты банально боишься задохнуться.";
            }
          else
            {"Задержав дыхание, ты быстро шмыгаешь в дверь...\b";
              return StoreRoom;
            }
         }
;