home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Source Code / C / Games / Xconq 7.1.0 / lib / ring-quest.g < prev    next >
Encoding:
Text File  |  1996-04-04  |  1.4 KB  |  103 lines  |  [TEXT/XCNQ]
  1. (game-module "ring-quest"
  2.   (title "")
  3.   (blurb "")
  4.   (variants 
  5.     (see-all false)
  6.     (world-seen true)
  7.   )
  8. )
  9.  
  10. (include "u-midearth")
  11.  
  12. ;; Disable Nazgul construction
  13.  
  14. (table acp-to-create
  15.   (d M 1)
  16.   ((* @) movers 1)
  17.   (u* (W N) 0)
  18.   )
  19. (table acp-to-build
  20.   (d M 1)
  21.   ((* @) movers 1)
  22.   (u* (W N) 0)
  23.   )
  24. (table cp-per-build
  25.   (d M 1)
  26.   ((* @) movers 1)
  27.   (u* (W N) 0)
  28.   )
  29. (table cp-on-creation
  30.   ((* @) movers 1)
  31.   (d M 1)
  32.   (u* (W N) 0)
  33. )
  34.  
  35. ;; Constrain construction.
  36.  
  37. (table tp-to-build
  38.   (u* hobbit 1)
  39.   (u* dwarf 1)
  40.   (u* elf 1)
  41.   )
  42.  
  43. (side 2 (trusts 4 1))
  44.  
  45. (side 4 (name "Gondor") (adjective "Gondorian") (class "good")
  46.   (emblem-name "tree-and-crown"))
  47.  
  48. (side 4 (trusts (2 1)))
  49.  
  50. (side 5 (name "Isengard") (adjective "Isengardian") (class "evil")
  51.   )
  52.  
  53. (side 5 (trusts (1 1)))
  54.  
  55. (unit-defaults (s 2))
  56.  
  57. (hobbit 24 51 (n "Frodo"))
  58. (hobbit 24 51 (n "Sam"))
  59. (hobbit 24 51 (n "Pippin"))
  60. (hobbit 24 51 (n "Merry"))
  61.  
  62. (wizard 24 50 (n "Gandalf"))
  63.  
  64. (unit "Brandy Hall")
  65.  
  66. (unit "Hobbiton")
  67.  
  68. (the-ring (in "Frodo"))
  69.  
  70. (unit-defaults (s 4))
  71.  
  72. (unit "Calembel")
  73. (unit "Dol Amroth")
  74. (unit "Lamedon")
  75. (unit "Langstrand")
  76. (unit "Linhir")
  77. (unit "Minas Tirith")
  78. (unit "Morthond")
  79. (unit "Pelargir")
  80.  
  81. (unit-defaults (s 5))
  82.  
  83. (unit "Isengard")
  84.  
  85. (wizard (n "Saruman") (in "Isengard"))
  86. (unit-defaults (s 1))
  87.  
  88. ;; 9 nazgul
  89.  
  90. (nazgul)
  91. (nazgul)
  92. (nazgul)
  93. (nazgul)
  94. (nazgul)
  95. (nazgul)
  96. (nazgul)
  97. (nazgul)
  98. (nazgul)
  99.  
  100. (unit "Minas Morgul")
  101. (unit "Durthang")
  102. (unit "Orodruin")
  103.