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