substrate/verbs.zil

   1 ;"This file is free software: you can redistribute it and/or modify
   2 it under the terms of the GNU Affero General Public License as
   3 published by the Free Software Foundation, either version 3 of the
   4 License, or (at your option) any later version.
   5
   6 This file is distributed in the hope that it will be useful, but
   7 WITHOUT ANY WARRANTY; without even the implied warranty of
   8 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
   9 Affero General Public License for more details.
  10
  11 You should have received a copy of the GNU Affero General Public
  12 License along with this file. If not, see
  13 <https://gnu.org/licenses/>."
  14
  15 <ROUTINE V-MAGIC ()
  16 <PRINTR "Nothing obvious happens.">>
  17
  18 <ROUTINE V-SCREAM ()
  19 <PRINTR "Aaaarrrrgggghhhh!>>
  20
  21 <ROUTINE WIND-UP ()
  22 <PRINTR "You cannot wind up " A ,PRSO ".">>
  23
  24 <ROUTINE V-WIN ()
  25 <PRINTR "Haha - It's not that easy.">>
  26
  27 <ROUTINE V-WISH ()
  28 <PRINTR "With luck, your wish will come true.">>