biome generator

# -*- coding: cp1252 -*-
import random


ADJECTIVES = ['SACRED', 'BRAIN', 'MERCURY', 'BOG', 'SHRIEKING', 'VIOLET',
              'LOGIC', 'CANNIBAL', 'WITCH', 'SKIN', 'ANGLER', 'BRASS',
              'ABYSSAL', 'FLAYED', 'SKY', 'PRISMATIC', 'HOOK', 'BONE', 'LOBE',
              'UMBER', 'PHASE', 'PROBLEM', 'GREY', 'SPECTRAL', 'RAZOR',
              'HALF-', 'ELDER', 'CELESTIAL', 'THUNDER', 'PYRAMID', 'FLESH',
              'MARROW', 'PALE', 'FIRE', 'TRUE', 'JUPITER', 'FALSE', 'PSEUDO-',
              'TUFTED', 'SINGING', 'CARRION', 'ROYAL', 'THORN', 'MIRROR',
              'HISSING', 'WERE-', 'QUASI-', 'MACHINE', 'CLOAKED', 'WHITE',
              'VAMPIRE', 'CYCLOPEAN', 'IMAGINARY', 'TWO-HEADED', 'DIRE',
              'MANTICORE', 'RIGHTEOUS', 'MOON', 'GELATINOUS', 'DWARF',
              'MAN-', 'BLIND', 'CAVE', 'FOREST', 'DESERT', 'BRIMSTONE',
              'BROKEN', 'GHOST', 'ROT', 'HOWLING', 'CURSE', 'TOTEM', 'GILDED',
              'QUESTING', 'FLAIL', 'BLUE', 'PIRATE', 'ASH', 'PIT', 'HOLLOW',
              'SKULL', 'ASTRAL', 'SALT', 'WEEPING', 'OCHRE', 'SUN', 'NIGHT',
              'VILE', 'SILVER', 'SEA', 'WAR', 'SHIELD', 'GRINNING', 'FUNGAL',
              'TOMB', 'CIRCULAR', 'ANTI-', 'PARASITE', 'RUST', 'BLACK',
              'SIEGE', 'RIVER', 'CRIMSON', 'WOODEN', 'STONE', 'SAND', 'IRON',
              'FAERIE', 'CLOUD', 'DUSK', 'UMBRAL', 'HEADLESS', 'DOUBLE',
              'PRIMAL', 'CLAY', 'ICE', 'CANOPTIC', 'BLESSED', 'STAR', 'SORROW']

PLANTS = ['CACTUS', 'NETTLE', 'APPLE', 'ROSE', 'PLUM', 'VINE', 'BRAMBLE',
          'FRUIT', 'GRASS', 'LOTUS', 'LILY', 'NECTAR', 'POLLEN', 'PINE',
          'BERRIES', 'MOSS', 'MEMBRANE', 'ORCHID', 'WEED', 'BLOSSOM']

HERBIVORES = ['DRYAD', 'APE', 'OX', 'WASP', 'SHAMBLER', 'BOAR', 'GOAT',
              'TURTLE', 'MARE', 'ELF', 'ORYX', 'STAG', 'RHINO', 'STOMPER',
              'LIZARD', 'FOLK', 'SATYR', 'MONKEY', 'SLOTH', 'BAT']

CARNIVORES = ['FOX', 'GOBLIN', 'ORC', 'KOBOLD', 'SCORPION', 'STALKER', 'EEL',
              'RAY', 'SPIDER', 'RAPTOR', 'PIERCER', 'BOA', 'OWL', 'LYNX',
              'WOLF', 'COBRA', 'TOAD', 'FALCON', 'HOUND', 'WYVERN']

APEXPREDATORS = ['WYRM', 'EAGLE', 'YETI', 'DRAGON', 'CROCODILE', 'SHARK',
                 'PHOENIX', 'GIANT', 'TIGER', 'BEAR', 'SERPENT', 'SPHINX',
                 'OGRE', 'GRYPHON', 'GORGON', 'FLAYER', 'BEAST', 'COLOSSUS',
                 'HAG', 'TROLL']

SCAVENGERS = ['WORM', 'FUNGUS', 'LARVAE', 'GRUB', 'URCHIN', 'JELLY', 'RAT',
              'ROACH', 'SLIME', 'GHOUL', 'VULTURE', 'JACKAL', 'CRAB', 'SNAIL',
              'SCARAB', 'PUDDING', 'GULL', 'MAGGOT', 'SPORE', 'SWARM']

WEIRDTHINGS = ['SERVANT', 'CHILD', 'ORB', 'CUBE', 'SERAPH', 'JUDGE', 'GOLEM',
               'QUEEN', 'IDOL', 'DEVIL', 'ENGINE', 'FIEND', 'PHANTOM',
               'KNIGHT', 'PREACHER', 'IMP', 'EMPEROR', 'MIMIC', 'WIDOW',
               'HORROR']

ENCOUNTERS = ['A partially-eaten grove of PLANT2.',
              'HERBIVORE1 is peacefully munching on a grove of PLANT2.',
              'HERBIVORE2 is peacefully munching on a grove of PLANT1. Several CARNIVORE1 lurk just out of sight, waiting to attack.',
              'A migrating band of HERBIVORE1, the adults keeping watch. Several CARNIVORE1 lurk just out of sight, waiting to attack.',
              'A CARNIVORE2 is worrying at a slowly dying HERBIVORE2.',
              'Several CARNIVORE2 are chasing a couple of CARNIVORE1 away from a fresh-killed HERBIVORE1.',
              'A slowly dying CARNIVORE2. Its flank bears the unmistakable marks of an APEXPREDATOR. A couple of SCAVENGER1 are already beginning to pick at it.',
              'A band of CARNIVORE1 that hasn\'t eaten in a couple of days.',
              'An unrecognizable mass that used to be a HERBIVORE2. It\'s being torn to shreds by a dozen SCAVENGER2.',
              'A small cave which a couple of small CARNIVORE1 are making a den in.',
              'An enormous SCAVENGER1 that follows the PCs from afar.',
              'A SCAVENGER2 nesting site. Contains a couple of adults, a number of babies and bones.',
              'A band of CARNIVORE2 fleeing an APEXPREDATOR, which will arrive in a couple of rounds.',
              'An APEXPREDATOR that hasn\'t eaten in a couple of days.',
              'A panicked HERBIVORE1 trapped in a grove of PLANT1. An APEXPREDATOR is somewhere in the area and the HERBIVORE1 can sense it.',
              'A slowly dying APEXPREDATOR, taken down by a maddened band of HERBIVORE2. A number of SCAVENGER2 are waiting for it to die properly before they approach it.',
              'A WEIRDTHING performing cruel and mysterious experiments on a HERBIVORE1. It will take no notice of the PCs.',
              'A WEIRDTHING standing perfectly still and silent. If the PCs get within 10\', it will attack.',
              'A curious band of CARNIVORE1 sniffing at a WEIRDTHING, which pays them no heed. The CARNIVORE1s will see the PCs as easier prey. The WEIRDTHING will watch with interest. It may intervene on either side.',
              'A WEIRDTHING collecting samples of PLANT2. It will assume the PCs are also plants and try to collect them as well.']

LANDMARKADJS = ['PHARAOH\'S', 'PIRATE\'S', 'HUNTER\'S', 'WIDOW\'S',
                'QUEEN\'S', 'WIZARD\'S', 'WITCH\'S', 'DEMON\'S',
                'BUTCHER\'S', 'BAKER\'S', 'BISHOP\'S', 'TEACHER\'S',
                'DEAD MAN\'S', 'CAPTAIN\'S', 'SAILOR\'S',
                'SOLDIER\'S', 'SMUGGLER\'S', 'SHIPWRECK', 'SCARECROW',
                'DRAGON', 'FIDDLER\'S', 'SMITH\'S', 'ORPHAN\'S',
                'SKULL', 'CANDLE', 'ELEPHANT', 'RAINBOW', 'SAPPHIRE',
                'METEOR', 'NOMAD', 'TITAN', 'CACTUS', 'SHIELD', 'HAMMER',
                'TREASURE', 'CAULDRON', 'DESPAIR', 'HARVEST', 'ANVIL',
                'FLOWER', 'HISSING', 'HOWLING', 'WHISPERING', 'CRAWLING',
                'BURNING', 'LIVING', 'SINGING', 'BLACK', 'WHITE', 'GREEN',
                'CRIMSON', 'SILVER', 'FORGOTTEN', 'PESTILENT', 'HALLOWED',
                'BLASTED', 'BITTER', 'HIGH', 'SAVAGE', 'HIDDEN', 'FORBIDDEN',
                'LONELY', 'SINKING', 'FLOATING', 'DESOLATE', 'SACRED',
                'HAUNTED', 'HUNGRY', 'MOLTEN', 'CRYSTAL', 'SALT', 'GRANITE',
                'GLASS', 'PETRIFIED', 'FROZEN', 'SCORCHED', 'ANCIENT',
                'ARCANE', 'BOREAL', 'BLEAK', 'BRASS', 'GHOSTS', 'THORNS',
                'SNAKES', 'SHADOWS', 'WOLVES', 'TRAITORS', 'WISDOM', 'HONOUR',
                'PROMISE', 'ROOTS', 'BLOOD', 'COWARDS', 'DUST', 'SILENCE',
                'BONES', 'KINGS', 'RUST', 'MOSS', 'TEARS', 'FLAMES',
                'FORTUNE', 'EELS', 'SCORPIONS', 'ASH', 'SLAVES', 'THIEVES',
                'PROPHECY', 'STATUES', 'HOPE', 'WORMS', 'FOG', 'NIGHT',
                'STEEL', 'THE STARS', 'THE MOON', 'THE SUN', 'THE DEAD',
                'THE LOST', 'THE GODS']

LANDMARKS = ['MOOR', 'MARSH', 'SWAMP', 'MIRE', 'BOG', 'BAYOU', 'WELL',
             'DEPTHS', 'POOL', 'POND', 'LAKE', 'CREEK', 'RIVER', 'BROOK',
             'DELTA', 'LAGOON', 'GEYSER', 'OASIS', 'GLACIER', 'SPRING',
             'BEACH', 'BAY', 'COVE', 'GULF', 'SHORE', 'CAPE', 'ISLAND',
             'ATOLL', 'FOREST', 'JUNGLE', 'WOOD(S)', 'THICKET', 'GROVE',
             'GLADE', 'HEATH', 'CLEARING', 'MEADOW(S)', 'FALL(S)', 'RAPID(S)',
             'STRAND', 'PLAINS', 'STEPPE', 'TUNDRA', 'DESERT', 'SAND(S)',
             'WASTE(S)', 'RIDGE', 'RISE', 'BLUFF', 'GORGE', 'GULCH', 'RAVINE',
             'CANYON', 'CLIFF', 'HILL', 'MOUNTAIN', 'PEAK', 'SUMMIT', 'CAVE',
             'CAVERN', 'HOLE', 'PIT', 'BURROW', 'FLAT(S)', 'PLATEAU', 'MESA',
             'PILLAR', 'NEEDLE', 'CRATER', 'TUNNEL', 'WILDS', 'RIFT', 'ROCK',
             'STONE', 'MONOLITH', 'VALLEY', 'BARREN(S)', 'FIELD(S)', 'CREST',
             'SPIRE(S)', 'VILLAGE', 'TOWN', 'CITY', 'TOMB', 'CRYPT', 'PYRAMID',
             'ZIGGURAT', 'CASTLE', 'PALACE', 'FORTRESS', 'CITADEL', 'TOWER',
             'ROAD', 'PATH', 'CHURCH', 'HARBOUR', 'TEMPLE', 'SHRINE',
             'RUIN(S)', 'ARENA', 'MAZE', 'MINE', 'HALL', 'CAIRN', 'QUARTER',
             'CHURCH', 'ZONE', 'FOUNTAIN', 'CANAL', 'GARDEN', 'ORCHARD',
             'DEN', 'LAIR', 'GATE', 'NEST', 'EYRIE', 'OBELISK', 'BAZAAR',
             'WALL(S)', 'QUARRY']

LANDMARKENC = ['A small cottage, crumbling and almost entirely overgrown with PLANT1. It would take some doing to get inside. Probably a day\'s labour for a human w/ a sword but no machete.',
               'A grove of PLANT2 with primitive human faces carved into or woven from it. There are coins in the mouths of the faces. The WEIRDTHING can track the coins and will stalk their holders.',
               'Party of botanists from local college gathering samples of PLANT1. Unprepared for dangers of wilderness. Being stalked by WEIRDTHING. Refuse to believe that WEIRDTHING exists.',
               'Several HERBIVORE2 engaging in an elaborate mating ritual which must not be disturbed at any cost. They may be dueling in pairs until one or the other is significantly injured.',
               'A HERBIVORE2 graveyard. The bones of thousands of HERBIVORE2, accumulated over centuries. Several dying HERBIVORE2. SCAVENGER1 is out in force, worrying at bits of carcass and eying the dying creatures - and you - thoughtfully.',
               'Resting place of a gypsy caravan and their tame herd of HERBIVORE1 (unless they themselves are HERBIVORE1). Have codes of hospitality but take them less seriously than they pretend.',
               'The lair of a large band of CARNIVORE1. They know all the best hiding places and will conceal themselves until you are in their midst. Contains treasure from people they\'ve killed.',
               'A lone traveller, trapped in a high or otherwise defensible place by a band of CARNIVORE2. She has been there for days and is very hungry. Will reward you for rescuing her, as for escort back to civilization. Is evil.',
               'Site of a recent epic battle between a band of CARNIVORE1 and a slightly larger band of CARNIVORE2, who were the winners. Several corpses of both species litter the landscape, attracting SCAVENGER2 in great numbers. A bunch of CARNIVORE2 are off licking their wounds but will return shortly to bury, eat their dead.',
               'Home of a solitude-crazed ranger, her only companion a mostly-domesticated CARNIVORE1. Hasn\'t seen another sapient creature in months. Veers between \x93friendly\x94 and \x93homicidal\x94.',
               'The lair of an APEXPREDATOR. The APEXPREDATOR is currently out hunting. It will return in two hours dragging the carcass of a large HERBIVORE1. If the cave is explored the PCs will be ambushed by a group of SCAVENGER2 who live off the scraps.',
               'The nest of an APEXPREDATOR. It is currently feeding its babies, who are small and vulnerable but could still probably kill you. If not alerted to your presence it will leave them briefly to hunt in half an hour. Might have a mate, you\'re not sure.',
               'The corpse of an APEXPREDATOR. Converted into a flesh fortress by a band of SCAVENGER1, who will wait until the PCs get close before exploding out of its side.',
               'Campsite of a rich, eccentric huntsman who refuses to return home until she\'s killed an APEXPREDATOR, plus her sardonic manservant and jaded retainers. Will offer a sizeable bounty to anyone who can help her take it but insists on doing the killing herself.',
               'Hermit\'s hut. Isolated, surrounded by elaborate series of ditches, pit traps with colony of SCAVENGER1 lurking at bottom. Hermit regularly feeds them, is a wizard maybe',
               'Enormous, ant-hill-like burrow complex built by colony of SCAVENGER2, possibly their parastically dominated host slaves if that\'s the kind of thing they would do. Treasure within.',
               'Dungeon lair of WEIRDTHING. Architecture clearly not natural in origin. Treasure within.',
               'Village of cultists that worship WEIRDTHING. Will pretend to be completely normal until moment they try to sacrifice you. WEIRDTHING no more, less likely to kill them than it is to kill anyone else.',
               'Paladin on quest to kill WEIRDTHING. Domesticated HERBIVORE1 her trustworthy sidekick/mount. Completely legitimate in own right, but no matter what they do, will not trust the party any further than she could throw them (possibly literally? has involved paladin code)',
               'Rival adventuring party.']


def critter(table):
    adj =  random.choice(ADJECTIVES)
    if adj[-1] == '-':
        return adj + random.choice(table)
    else:
        return adj + ' ' + random.choice(table)


def landmark():
    adj = random.choice(list(enumerate(LANDMARKADJS)))
    if adj[0] < 40:
        return adj[1] + ' ' + random.choice(LANDMARKS)
    elif adj[0] < 80:
        return 'THE '  + adj[1] + ' ' + random.choice(LANDMARKS)
    else:
        return 'THE ' + random.choice(LANDMARKS) + ' OF ' + adj[1]


def encounter_table(encounters):
    encTable = []

    for x in encounters:
        out = ''
        enc = x.split(' ')
        for c in enc:
            if c in biome:
                out += biome[c] + ' '
            elif c[:-1] in biome:
                out += biome[c[:-1]] + c[-1] + ' '
            elif c[:-2] in biome:
                out += biome[c[:-2]] + c[-2:] + ' '
            else:
                out += c + ' '
        encTable.append(out)
    return encTable


def disp_biome(biome):
    print 'P1: ' + biome['PLANT1']
    print 'P1: ' + biome['PLANT2']
    print 'H1: ' + biome['HERBIVORE1']
    print 'H2: ' + biome['HERBIVORE2']
    print 'C1: ' + biome['CARNIVORE1']
    print 'C2: ' + biome['CARNIVORE2']
    print 'AP: ' + biome['APEXPREDATOR']
    print 'S1: ' + biome['SCAVENGER1']
    print 'S2: ' + biome['SCAVENGER2']
    print 'WT: ' + biome['WEIRDTHING']


##########################################################
############################ Actually generate things now.


random.seed()

## CRITTERS
print 'CRITTERS:'
biome = {}

biome['PLANT1'] = critter(PLANTS)
biome['PLANT2'] = critter(PLANTS)

biome['HERBIVORE1'] = critter(HERBIVORES)
biome['HERBIVORE2'] = critter(HERBIVORES)

biome['CARNIVORE1'] = critter(CARNIVORES)
biome['CARNIVORE2'] = critter(CARNIVORES)

biome['APEXPREDATOR'] = critter(APEXPREDATORS)

biome['SCAVENGER1'] = critter(SCAVENGERS)
biome['SCAVENGER2'] = critter(SCAVENGERS)

biome['WEIRDTHING'] = critter(WEIRDTHINGS)

disp_biome(biome)
print '<br>'


## ENCOUNTER TABLE
print 'ENCOUNTERS:'
encTable = encounter_table(ENCOUNTERS)
for i in range(0, len(encTable)):
    print str(i+1) + '. ' + encTable[i]

print '<br>'


## LANDMARKS
print 'LANDMARKS & ENCOUNTERS:'
landmarks = [landmark(), landmark(), landmark(), landmark()]
encTable = encounter_table(LANDMARKENC)

landmarkEncNums = []
while len(landmarkEncNums) < len(landmarks):
    num = random.randrange(0,len(LANDMARKENC))
    if num not in landmarkEncNums:
        landmarkEncNums.append(num)

for i, x in enumerate(landmarks):
    print x
    print "    " + encTable[landmarkEncNums[i]] + '<br>'