the-mall.inf

   1 ! Copyright (C) 2019 Jason Self <j@jxself.org>
   2 !
   3 ! This file is free software: you may copy, redistribute and/or modify
   4 ! it under the terms of the GNU Affero General Public License as
   5 ! published by the Free Software Foundation, either version 3 of the
   6 ! License, or (at your option) any later version.
   7 !
   8 ! This file is distributed in the hope that it will be useful, but
   9 ! WITHOUT ANY WARRANTY; without even the implied warranty of
  10 ! MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  11 ! Affero General Public License for more details.
  12 !
  13 ! You should have received a copy of the GNU Affero General Public
  14 ! License along with this file. If not, see https://gnu.org/licenses/
  15
  16 Constant Story "The Mall";
  17 Constant Headline "^By Jason Self^
  18 If you get stuck try typing HELP.^
  19 This game gives you freedom; you can change and share it under the
  20 terms of the GNU Affero General Public License as published by the
  21 Free Software Foundation, either version 3 of the License, or (at your
  22 option) any later version. See the GNU Affero General Public License
  23 for details.^
  24 IFID 1AB626D5-E03F-4F03-836C-50F65B643B9B^";
  25 Include "parser";
  26 Include "verblib";
  27 Release 0;
  28 Serial "190321";
  29
  30 Object mall "Mall"
  31 with    description "You're in the main walkway. An ordinary kind
  32         of place, with stores all around.",
  33 w_to    salon,
  34 has     light;
  35
  36 Object workshop "Bear Workshop"
  37 with    description "A workshop for making stuffed bears although by
  38         now everything is put away. The workshop retains a pleasant
  39         atmosphere.",
  40 has     light;
  41
  42 Object salon "Salon"
  43 with    description [; print "You've just sauntered into a salon.";
  44         if (salon hasnt visited) print " Suddenly you bump your head
  45         on the ceiling, but it's not such a bad bump that it's going
  46         to prevent you from looking at objects and even things.";
  47         if (salon has visited) print " Remembering the low ceiling,
  48         you take care not to bump your head.";
  49         new_line; ],
  50 e_to    mall,
  51 has     light;
  52
  53 [ Initialise;
  54
  55         Location = mall;
  56
  57         "^You fell asleep in the mall. Now it's closed, and the
  58         exit's locked. Can you get out?";
  59 ];
  60
  61 [ XyzzySub; "Nothing obvious happens."; ];
  62
  63 [ HelpSub; "If you need help try some of the commands from:
  64 ^http://pr-if.org/doc/play-if-card/"; ];
  65
  66 Include "grammar";
  67
  68 Verb 'About' * -> Version;
  69 Verb 'Info' * -> Version;
  70 Verb 'Help' * -> Help;
  71 Verb 'xyzzy' * -> Xyzzy;