<<nobr>>\n<<set $days to either("day", "afternoon", "morning", "evening", "night")>>\n<<set $weather to either("cloudy", "rainy", "cold", "stormy", "clear", "hot", "balmy")>>\n<<set $day to $weather + " " + $days>>\n<<print "One " + $day + either(", news reaches you", ", you read in the Space Gazette", ", a casttube presenter announces", ", your nosy neighbor informs you", ", your viewpy is interrupted for a special bulletin: it seems", ", having put the children to bed, you find your husband in tears. Sobbing, he tells you", ", a messenger droid seeks you out on the central square, bringing news", ", a space telegram is beamed to all individuals in possesion of a priv-caster, informing them", ", over drinks, your contacts in the underworld tell you", ", you intercept a secret message. It appears", ", over dinner, your significant other shares news", ", a journo-tech plasters a scoop all over the InterEye: she claims", ", your wrist-miv suddenly buzzes with messages. It appears", ", you bump into a woman captivated by the Milk-E Times. She apologizes, and tells you she's read", ", you hear") + " that">>\n<<endnobr>>
<<if $homeworld is $moon and $house is $craft>>\n<<print $home + " orbiting " + $homeworld>>\n<<elseif $homeworld is $planet and $house is $craft>>\n<<print $home + " orbiting " + $homeworld>>\n<<elseif $homeworld is $system and $house is $craft>>\n<<print $home + " travelling through " + $homeworld>>\n<<elseif $homeworld is either($moon, $planet, $system) and $house is $building>>\n<<print $home + " in " + $homeworld>>\n\n\n
<b>Writing</b>\n[[@wpboon|http://www.twitter.com/wpboon]]\n\n<b>Inspired by</b>\n[['Magical Girl Generator', Fleshkid |http://philome.la/Nuan_Mizan/magical-girl-generator/play]]\n\n<b>CSS sourced from</b>\n[[Glorious Trainwreck|https://www.glorioustrainwrecks.com/node/5163]], "Simple Box"\n\n<b>Background image</b>\nNasa Astronomy Picture of the Day [[(link)|http://apod.nasa.gov/apod/astropix.html]]\n\n<b>Special thanks</b>\nDaan \nMaarten\n\n
<<nobr>>\n<<set $introduction to either("You're a", "Your only friend calls you a", "When you look in the mirror you see a", "You're pretty good-looking for a", "You've often cursed your fate as a", "After your last adventure, you've decided to disguise yourself as a", "The only hope of the universe is you, a", "After the operation you chose to live as a", "After deserting from the army, you've made a life for yourself as a", "It's been a while since anybody called you a", "In your dreams you're often visited by a", "Your family thinks you're merely a", "Despite your tough youth, you're now a", "There must be more to life than just being a", "You make your living as a", "You made a fortune tracking and capturing your latest trophee, a", "The last person you were contracted to kill was a")>>\n<<print $introduction>>\n<<endnobr>>
<<nobr>>\n<<set $profiles to either("bounty hunter", "cook", "hacker", "editor-at-large", "cybercook", "data surfer", "hunter", "gunman", "soldier", "mercenary", "kid wrangler", "gigolo", "pimp", "drugsdealer", "child laborer", "grandfather", "architect", "marine", "prospector", "doctor", "gardener", "busboy", "deliveryman", "traveler", "lone wolf", "engineer", "nurse", "pickpocket", "artist", "singer", "violinist", "brewer", "pariah", "lone wolf", "prostitute", "cop", "painter", "manhunter", "cyborg", "detective", "cosmonaut", "datanaut", "Web fly", "machine operator", "mutant")>>\n<<set $profiledescription to either(" lonely", "n overworked", " colonial", " well-hung", " picky", " mysterious", "n ugly", " skilled", "n incompetent", " mustachioed", " bearded", " pockmarked", " sought-after", " rowdy", " snobby", " handy", " defiant", " strong-willed", " wily", " weak-minded", " thirsty", " mixed-species", " brooding", " hulking", " six-legged", " feeble-minded", " foul-mouthed")>>\n<<set $chance to random(1,12)>>\n<<if $chance is 7 or $chance is 3>>\n<<set $limbs to " with " + either("an extra boobie", "an extra arm", "an extra head", "a polyurethane arm", "an electronic arm-pit", "a laser gun for a leg", "twelve toes", "gills", "a beak", "feathers for hair", "an extra spleen", "telekinetic powers", "horns on your head", "spikes for hands", "a fox's snout for a nose")>>\n<<else>>\n<<set $limbs to "">>\n<<endif>>\n<<set $profile to $profiledescription + " " + $profiles + $limbs>>\n<<print $profile>>\n<<endnobr>>
html {\n /* Vertical colour gradient */\n background-image: url(http://apod.nasa.gov/apod/image/1508/heic1404b1024.jpg);\n background-attachment: fixed;\nbackground-repeat: repeat-x;\n\n /* Fallback colour */\n background-color: #1c002c;\n}\nbody {\n /* Remove default styles */\n background-color: transparent;\n margin: 10% 0 0 0;\n font-size: 100%;\n /* Used to center the box */\n text-align: center;\n}\n\n#passages {\n /* Box background (gold with 70% opacity) */\n background: -webkit-gradient(linear, left top, left bottom, from(#e0d19e), to(#c4a22b)) fixed;\n\n \n\n /* Border */\n border: 2px solid white;\n\n /* Rounded corners */\n border-radius: 1em;\n\n /* Box width */\n width: 60%;\n\n /* Center the box */\n display: inline-block;\n min-height: 40%;\n margin:auto;\n margin-bottom: 5%;\n padding: 0px;\n}\n\n.passage {\n margin: 0px;\n /* Inner margin within the box */\n padding: 2em;\n\n /* Text formatting */\n color: black;\n font-size: 100%;\n text-align:justify;\n}\n\n/* No sidebar */\n#sidebar {\n display:none;\n}\n\n/* Links */\na.internalLink, a.externalLink {\n color: #7917e7;\n}\na.internalLink:hover, a.externalLink:hover {\n color: #8146c1;\n text-decoration: none;\n}\n\n/* Shrink the page when viewed on devices with a low screen width */\n@media screen and (max-width: 960px) {\n .passage { font-size: 90%;}\n #passages { width: 50%; }\n}\n@media screen and (max-width: 840px) {\n .passage { font-size: 87.5%; }\n #passages { width: 50%; }\n}\n@media screen and (max-width: 720px) {\n .passage { font-size: 75%; }\n #passages { width: 50%; }\n}
<h2>SCI-FI PULP WRITING PROMPT</h2>\n<<display introduction>><<display your profile>>. <<display setting>><<display home location>>. \n\n<<display then>><<display then antagonists>><<display antagonist do>><<display lijdvoorwerp>>. \n\n<<display adventure begins>>\n<h4>Pour a drink and start your typewriter!</h4>\n<i>Not inspired? [[Mix it up!|Start]]</i>\n\n[[Credits]]
<<nobr>>\n<<set $antagonistdo to either(" made it their mission in life to destroy", " destroyed", " payed a visit to", " shot", " murdered", " traded information with", " blown up", " kidnapped", " enslaved", " tried to blackmail", " threatened", " bludgeoned", " insulted", " tried to bribe", " angered", " scammed", " belittled", " mocked", " built an exact replica of", " secretly cloned", " hanged", " nuked", " poisoned", " stabbed", " strangled", " suffocated", " dueled", " forcibly mated with", " married", " sabotaged", " bombed", " set fire to", " buried", " revolted against their overlord,")>>\n<<print " have " + $antagonistdo>>\n<<endnobr>>
<<nobr>>\n<<set $home to either("Home is ", "You just escaped from ", "For your next mission, you need to get to ", "You'll be fine as long as you never again have to visit ","You're on a well-earned vacation near ", "Your thoughts often linger on the love of your life, now imprisoned in ", "You have dear memories of ", "When your grandfather died, you inherited ", "When you look out the porthole you see ", "You still have nightmares about ", "When they found you, you were more dead than alive, just feet away from ", "You were raised in ", "Every day you catch the shuttle to the nearest thing resembling civilization, ", "Your personal hell is ")>>\n<<print $home>>\n<<endnobr>>
<<nobr>>\n<<set $adventure to either("Trouble is bound to ensue.", "Your adventure begins.", "Your nightmares have come true.", "The entire Milky Way grinds to a halt.", "It's going to be one of thóse weeks.", "It won't help you much, but at least you now understand the Space Sphinx's riddle.", "It's too late now, but at least you finally understand the Space Oracle's mumblings.", "You're reminded of an ancient space prophecy - although it's probably just a coincidence.", "You struggle to find a motive.", "The entire Universal Conglomerate goes into mourning.", "Your father's ghost wás telling the truth, after all!", "So much for 'peace in our SpaceTime'.", "This can't be happening!", "'Not again!', you whisper.", "The universe is a perilous place.", "One last time, you think.", "A sad day for everyone.", "To be alive is to suffer.", "Such injustice!", "The universe thirsts for revenge!", "What a travesty!", "The horror...", "We've invented space travel, you think to yourself, and still, with the hitting and the violence!", "Who can you trust.", "The perpetrators must be held accountable!", "Justice must be served!", "O tempora, o mores.")>>\n<<print $adventure>>\n<<set $motivation to " " + "You hate to get involved, but " + either("the IPCC turns to you for help", "your 8 year old nephew was the only eye-witness and now they're after him", "a cheeky dame implores you to intervene", "Universal Order might depend on it", "this might be your only chance to step into the footsteps of your mother, a famous detective-in-exile", "you feel bound by your loyalty to the victim", "in a dream, Josephiah the Wandering Prophet threatens to curse you, your children and your children's children if you don't", "you feel morally obligated", "it would be a great way to refute the nasty rumors about your cowardice", "the authorities offer a very tempting reward: unlimited time in the Better Reality(tm)-vats", "the victim still owes you money", "a mysterious man in black is offering you money to keep your nose out. So, obviously, it's imperative that you get to the bottom of this", "you love a good fight", "you do love the thrill of the hunt so", "the perpetrators and you go back a long time. Maybe you can talk some sense into them", "you feel it's your purpose in life to bring the perpetrators to justice", "you need the reward money", "let's face it: you're the Galaxy's only hope") + ".">>\n<<print $motivation>>\n<<endnobr>>
@wpboon
scifi pulp writing prompt
<<nobr>>\n<<set $derdepartij to either("Gork Zork", "Lord-Commodore Cromwell", "James Stewart MCVII", "Gx'Lmn Ptoh", "Cheops", "TieAnRa", "GengX model 6a", "Australia", "Muad'Dib", "Willem Erdkampf", "Leon Arronta", "Mespoche Varton", "John Blue", "Gerry Gibson", "Arkos", "Galapagos Juanita", "Rgach'Domk", "9 of 12", "Bordom", "Purple Sunset", "Shaddam IV", "Doomsday", "Countess Braxas dell' Esparte", "Gruswig", "Jhona Vogel", "Wru-Wla 1", "Dir. Monstoff", "Man-Grane", "Violes Beard", "Octo-Tentacle", "Admiral Tset Frung Swo", "Tqaz Pvon Gar-Gar", "Oon", "Mistress Dnepr von Culow", "Sevrina Adreide", "Danzig the Leper", "Grayson Spiel", "Viole Falushe", "Jom-Jom Snorgrep", "Ulyssea O'Dix", "Penelopeius Telemax", "Zwarsch R. Grennepple", "P.B. Knob", "Nathan Woerd", "Dearth Vurtplei")>>\n<<set $uniquetripedal to "a unique tripedal and sentient " + either("fungus", "mammal", "plant", "prokaryote", "marsupial", "reptile", "tree", "amfibian", "angiosperm") + ", the only living member of its species">>\n<<set $beschrijvingderdepartij to either($uniquetripedal, "Keeper of Secrets", "Princeps of the First People", "Vessel and Prophet of the Earth God", "Professed Favorite of the god-being Humpf", "Dread Terror Whale of the Crucifix Nebula", "dread pirate", "space cowboy", "Source of the Void", "Inter-Galactic Emperor", "head of the Galaxy Police", "of the House Knarbess", "diplomatic envoy of the Federated Gan systems", "legendary bounty hunter", "legendary poet", "universally loved steel worker", "President of the All-Planetary Foundation", "Speaker of the Allthing", "all-powerful crime lord", "inventor of the transFold drive", "Space-Time Pontifex", "universally loved doofus", "enlighted despot of the Mn'Was Cloud", "Planetary Puppeteer", "the Traveller", "feared and loved Godhead of the Church of Io", "universally reviled CEO of Mantigen UniFoods", "the Love of God and All that is Good and Beautiful in this Life", "champion of everyday working beings", "ordinary space bus driver", "twin sister of Lila Burgsch-W3CXII, President of the Space Federation")>>\n<<print " " + $derdepartij + ", " + $beschrijvingderdepartij>>\n<<endnobr>>
<<nobr>>\n<<set $then to either(", out of spite, ", ", as a show of force, ", ", breaking their sacred vows, ", ", having been resurrected through arcane knowledge, ", ", after being thawed from a aeon-long cryofreeze, ", " your nemesis, ", " the scourge of the known galaxy, ", ", for no apparent reason ", ", in an attempt to tease you out of hiding, ", ", upset over their forced early retirement, ", ", having been denied their Christmas bonus, ", ", angered by the wanton destruction of their home world, ", ", as a rite of passage, ", ", in a fit of anger, ", ", in a fit of jealousy, ", ", out of ignorance, ", ", in an attempt to deal a fatal blow to universal timocracy, ", ", mind-controlled by a viscious psychic parasite, ", ", betraying everything they stand for, ", ", settling an old account, ", ", seeking retribution for the unnecessary loss of their Dyson sphere, ", ", protesting recent amendments to universal tax laws,")>>\n<<set $antagonists to either("beings", "cyborgs", "women", "men", "machines", "plants", "AIs", "elves", "monkeys", "androids", "robots", "neural networks", "gods", "scoundrels", "gamblers", "thieves", "conspirators", "senators", "merchants", "peddlers", "heretics", "blasphemers", "butchers", "Liers", "executioners", "priests", "monks", "drug-addicts", "boys", "girls", "offspring", "sentient larvae")>>\n<<set $colors to either("green ", "brown", "beige", "yellow", "purple ", "ruby", "emerald", "blue", "pink", "black", "bronze", "iridescent", "turquoise", "teal ", "red", "orange", "grey", "gray", "lilac", "metallic", "bio-engineered", "ancient", "5-dimensional", "interstellar", "striped", "spotted", "secretive", "warrior", "mischievous", "unkind", "mole")>>\n<<set $chanceone to random(1,14)>>\n<<if $chanceone is 7>>\n<<set $peoplevariation to either("lizard", "leopard", "fish", "bear", "squirrel", "moon", "Mars", "machine", "sand", "rock", "mer", "forest")>>\n<<else>>\n<<set $peoplevariation to "">>\n<<endif>>\n<<set $race to either("a band of", "a group of", "a pack of", "a murder of", "a platoon of", "a pirate crew of")>>\n<<set $antagonist to $race + " " + $colors + " " + $peoplevariation + " " + $antagonists>>\n<<print $then + " " + $antagonist>>\n<<remember $antagonists>>\n<<endnobr>>
<<nobr>>\n<<set $moons to either("Phobos", "Deimos", "Io", "Europa", "Ganymede", "Callisto", "Amalthea", "Himalia", "Elara", "Pasiphae", "Sinope", "Lysithea", "Carme", "Ananke", "Leda", "Thebe", "Adrastea", "Metis", "Callirrhoe", "Themisto", "Megaclite", "Taygete", "Chaldene", "Harpalyke", "Kalyke", "Iocaste", "Erinome", "Isonoe", "Praxidike", "Autonoe", "Thyone", "Hermippe", "Aitne", "Eurydome", "Euanthe", "Euporie", "Orthosie", "Sponde", "Kale", "Pasithee", "Hegemone", "Mneme", "Aoede", "Thelxinoe", "Arche", "Kallichore", "Helike", "Carpo", "Eukelade", "Cyllene", "Kore")>>\n<<set $planets to either("Mercury", "Venus", "Earth", "Mars", "Jupiter", "Uranus", "Neptune", "Saturn", "Pluto", "Eris", "Titan", "Barham", "Huo Hsing", "New Earth", "Alderaan", "Maastricht", "Dog Star", "Methel", "Dar Sai", "Sarkovy", "Tatooine", "Olliphane", "Ys", "Xi Puppis", "Terres", "Arrakis", "Kepler-438b", "Kepler-442b", "Kepler-62f", "Yonuhama-g65", "Grazwen-776c", "Gil'ghem", "sSnou'x 3", "Haarlem", "Zeist")>>\n<<set $systems to either("Andromeda", "Apus", "Aquarius", "Aquila", "Ara", "Aries", "Boötes", "Cancer", "Canis Major", "Capricornus", "Carina", "Centaurus", "Cetus", "Circinus", "Cygnus", "Dorado", "Eridanus", "Fornax", "Grus", "Hercules", "Hydra", "Hydrus", "Leo", "Lepus", "Libra", "Lupus", "Lyra", "Mensa", "Orion", "Pavo", "Pegasus", "Phoenix", "Pictor", "Pisces", "Piscis Austrinus", "Puppis", "Reticulum", "Sagittarius", "Scorpius", "Sextans", "Taurus", "Triangulum", "Triangulum Australe", "Tucana", "Ursa Major", "Vela", "Virgo")>>\n<<set $organizations to either("cyberspace", "the World Web", "Hegemony space", "the Oikumene", "The Concourse", "Hawking space")>>\n<<set $moon to either("the forest moon of ", "the icy moon of ", "the fiery moon of ", "the rocky moon of ", "the windy moon of ", "the glittery moon of ", "the very pedestrian moon of ", "the hell-hole moon of ") + $moons>>\n<<set $building to either("colony, ", "temple, ", "ruin, ", "society, ", "mine shaft, ", "institute, ", "city, ", "pyramid, ", "town, ", "settlement, ", "harbor, ", "fort, ", "cave, ", "tunnel, ", "rig, ", "factory, ", "fortress, ", "plantation, ", "facility, ", "space octahedron, ", "moisture farm, ")>>\n<<set $crafts to either("ship", "quark warper", "vessel", "spacecraft", "space station", "satellite", "space sphere", "shuttle", "space cube", "Deathdancer warp ship", "cruiser", "lightrunner", "SpaceFolder vessel", "Erickson-tunneler", "Hole-bore ship", "juggernaut", "ill-ship", "Cannae-Llac", "Abraham-sail ship")>>\n<<set $buildingdescription to either("the remnants of a once glorious", "a hive", "a cloaked", "a top-secret", "a submarine", "a hovering", "a prostitution", "a smuggling", "a gen-gineering", "a xenohunting", "a brewing", "some standard issue", "an abandoned", "a battered war", "a gargantuan", "a Martian", "a Klingon", "a human", "a deepfreeze", "a busy trading", "a thousand year old")>>\n<<set $planet to "the planet " + $planets>>\n<<set $system to "the " + $systems + " system">>\n<<set $organization to $organizations>>\n<<set $homeworld to either($moon, $planet, $system, $organization)>>\n<<set $craft to $crafts>>\n<<set $house to either($craft, $building)>>\n<<if $homeworld is either($moon, $planet) and $house is $craft>>\n<<print $buildingdescription + " " + $house + " orbiting " + $homeworld>>\n<<else if $homeworld is either($moon, $planet) and $house is $building>>\n<<print $buildingdescription + " " + $house + " on " + $homeworld>>\n<<else if $homeworld is either($system, $organization) and $house is $building>>\n<<print $buildingdescription + " " + $house + " in " + $homeworld>>\n<<else if $homeworld is either($system, $organization) and $house is $craft>>\n<<print $buildingdescription + " " + $house + " travelling through " + $homeworld>>\n<<else if>>\n<<print $buildingdescription + " " + $house + " near " + $homeworld>>\n<<endif>>\n<<set $locationsecretbase to either($moons,$planets)>>\n<<remember $locationsecretbase>>\n<<endnobr>>