oracles.rkt 2.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102
  1. #lang racket
  2. (require "core.rkt")
  3. (define-oracle oracle/action
  4. scheme clash weaken initiate create swear avenge guard defeat control
  5. break risk surrender inspect raid evade assault deflect threaten attack
  6. leave preserve manipulate remove eliminate withdraw abandon investigate hold focus
  7. uncover breach aid uphold falter suppress hunt share destroy avoid
  8. reject demand explore bolster seize mourn reveal gather defy transform
  9. persevere serve begin move coordinate resist await impress take oppose
  10. capture overwhelm challenge acquire protect finish strengthen restore advance command
  11. refuse find deliver hide fortify betray secure arrive affect change
  12. defend debate support follow construct locate endure release lose reduce
  13. escalate distract journey escore learn communicate depart search charge summon)
  14. (define-oracle oracle/theme
  15. risk ability price ally battle safety survival weapon wound shelter
  16. leader fear time duty secret innocence renown direction death honor
  17. labor solution tool balance love barrier creation decay trade bond
  18. hope superstition peace deception history world vow protection nature opinion
  19. burden vengeance opportunity faction danger corruption freedom debt hate possession
  20. stranger passage land creature disease advantage blood language rumor weakness
  21. greed family resource structure dream community war portent prize destiny
  22. momentum power memory ruin mysticism rival problem idea revenge health
  23. fellowship enemy religion spirit fame desolation strength knowledge truth quest
  24. pride loss law path warning relationship wealth home strategy supply)
  25. ;; TODO: figure out city regions
  26. (define-oracle oracle/region
  27. (1 12 "Barrier Islands")
  28. (13 24 "Ragged Coast")
  29. (25 34 "Deep Wilds")
  30. (35 46 "Flooded Lands")
  31. (47 60 "Havens")
  32. (61 72 "Hinterlands")
  33. (73 84 "Tempest Hills")
  34. (85 94 "Veiled Mountains")
  35. (95 99 "Shattered Wastes")
  36. (100 "Elsewhere"))
  37. ;; TODO: figure out city locations
  38. (define-oracle oracle/location
  39. (1 Hideout)
  40. (2 Ruin)
  41. (3 Mine)
  42. (4 Waste)
  43. (5 "Mystical Site")
  44. (6 Path)
  45. (7 Outpost)
  46. (8 Wall)
  47. (9 Battlefield)
  48. (10 Hovel)
  49. (11 Spring)
  50. (12 Lair)
  51. (13 Fort)
  52. (14 Bridge)
  53. (15 Camp)
  54. (16 Cairn/Grave)
  55. (17 18 Caravan)
  56. (19 20 Waterfall)
  57. (21 22 Cave)
  58. (23 24 Swamp)
  59. (25 26 Fen)
  60. (27 28 Ravine)
  61. (29 30 Road)
  62. (31 32 Tree)
  63. (33 34 Pond)
  64. (35 36 Fields)
  65. (37 38 Marsh)
  66. (39 40 Steading)
  67. (41 42 Rapids)
  68. (43 44 Pass)
  69. (45 46 Trail)
  70. (47 48 Glade)
  71. (49 50 Plain)
  72. (51 52 Ridge)
  73. (53 54 Cliff)
  74. (55 56 Grove)
  75. (57 58 Village)
  76. (59 60 Moor)
  77. (61 62 Thicket)
  78. (63 64 "River Ford")
  79. (65 66 Valley)
  80. (67 68 Bay/Fjord)
  81. (69 70 Foothills)
  82. (71 72 Lake)
  83. (73 75 River)
  84. (76 79 Forest)
  85. (80 83 Coast)
  86. (84 88 Hill)
  87. (89 93 Mountain)
  88. (94 99 Woods)
  89. (100 Anomaly))
  90. (define-oracle oracle/challenge-rank
  91. ( 1 20 troublesome)
  92. (21 55 dangerous)
  93. (56 80 formidable)
  94. (81 93 extreme)
  95. (94 100 epic))