(set:$crew to 40) (set:$cash to 40) (set:$tech to 40) (set:$ship to 40) (set:$shields to 25) (set:$fuel to 25) (set:$power to 25) (set:$comms to 25) (set:$data to 25) (set:$feedstock to 25) (set:$events to 8) (set:$jumps to 100) (set:$nexteventceiling to 0) (set:$nexteventfloor to 1) (set:$latesteffects to (a:0,0,0,0)) (set:$outcomeoflast to "Welcome aboard, Captain Jean Luc Picaresque. This is an experiment in probabilistic collaborative storytelling. You can submit your own events to be included in the game. This is version 1.2, and contains " + (text:$events) + " events.") (goto:"Start"){(if:$nexteventceiling is 0)[(set:$nexteventceiling to $events)] (set:$event to (random:$nexteventfloor,$nexteventceiling)) (if:$event is 1)[ (set:$eventtext to "The crew are restless.") (set:$yestext to "Weave a holodeck quest to entertain them") (set:$notext to "Re-gamify their training program") (set:$yespositive to "They return from fairy court with a blessed aura.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:7,-1,-1,0)) (set:$yesnegative to "Your entertainment is lackluster, but at least the crew enjoy making sarcastic memes about it.") (set:$yes_negativeeffects to (a:1,-2,-1,0)) (set:$nopositive to "You encourage your crew to fight cabin fever with cutting-edge edutainment.") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "You encourage your crew to fight cabin fever with cutting-edge edutainment. But the next time you dock at an orbital, two crew members jump ship.") (set:$no_negativeeffects to (a:-2,0,0,0)) (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 0) ](if:$event is 2)[ (set:$eventtext to "Meteor swarm ahead!") (set:$yestext to "Send out remote drones to clear a path") (set:$notext to "Rely on evasive action, shields, and hull") (set:$yespositive to "The drones bust up the meteors, and do whatever is the space equivalent of laying their coats in the mud for you to traipse across. Shields and hull escape without a scratch, although a few of the drones are unsalvageable.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:0,0,-5,0)) (set:$yesnegative to "The slaved drones do their/your best, but your hull still takes a few hits.") (set:$yes_negativeeffects to (a:0,0,-5,-5)) (set:$nopositive to "You follow a very satisfying wiggle-line through the danger zone.") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "You get bish-bash-boshed.") (set:$no_negativeeffects to (a:0,0,0,-10)) (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 0) ](if:$event is 3)[ (set:$eventtext to "A sort of <b>mercenaries vending machine</b> drifts through space. For 5 credits, you can unlock one of the organisms in the stasis pods.") (set:$yespositive to (either:"Sketch", "Aiden", "Muzzle", "Penance", "Frenzy", "Patches", "Puzzle", "Mercury", "Pnzzkrptt", "Hawk", "Wish", "Extreme Intermungle", "Freakshow", "Moon", "Noopy","Yoog-Yoog","Dust", "Gadgets", "Soo", "Plasma", "Box", "Curls", "Snow")+" joins the crew.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:1,-5,0,0)) (set:$yesnegative to "The stasis pod opens, but the organism inside was put there against their will. You drop them off at the next orbital you come to.") (set:$yes_negativeeffects to (a:0,-5,0,0)) (set:$nopositive to "You jump through hyperspace.") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "You jump through hyperspace.") (set:$no_negativeeffects to (a:0,0,0,0)) (set:$yestext to "Yes") (set:$notext to "No") (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 0) ](if:$event is 4)[ (set:$eventtext to "A distress signal. Some <b>Fain corsairs</b> in deep space battlesuits are making short work of a merchant ship.") (set:$yespositive to "Working together with the merchant ship, you drive away the pirates. To show their gratitude, they transfer you some credits and feedstock. Wait, is that what you meant? Oh well, whatever.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:0,(random:5,10),(random:5,10),(random:-5,0))) (set:$yesnegative to "Shields down. Hull breach on deck " + (text:(random:1,4)) + ". Casualties on decks " + (text:(random:1,3)) + " and " + (text:(random:4,5)) + ". The Fain ship has been destroyed.") (set:$yes_negativeeffects to (a:(random:-5,-2),(random:5,10),(random:5,10),(random:-10,0))) (set:$nopositive to "Can't risk it. You shloop off into hyperspace.") (set:$nopositivechance to 8) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "As you flee into hyperspace, a stray missile clips you. So not fair.") (set:$no_negativeeffects to (a:0,0,0,-4)) (set:$yestext to "Intervene") (set:$notext to "Ignore") (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 0) ](if:$event is 5)[ (set:$eventtext to "Sensors pick up what looks like a derelict ship. No life signs.") (set:$yestext to "Send an away team to investigate") (set:$notext to "Log it and continue course") (set:$yespositive to "Your away team retrieves tech and data samples which can be used to upgrade your systems.") (set:$yespositivechance to 4) (set:$yes_positiveeffects to (a:0,0,10,0)) (set:$yesnegative to "Your away team return insane, and are all soon dead.") (set:$yes_negativeeffects to (a:-5,0,0,0)) (set:$nopositive to "A salvage megacorp purchases the data from you for a small fee.") (set:$nopositivechance to 3) (set:$no_positiveeffects to (a:0,(random:1,5),0,0)) (set:$nonegative to "Discretion is the better part of mysterious potentially ancient xenomorphic artifacts. You hyper-jump to your next waypoint.") (set:$no_negativeeffects to (a:0,0,0,0)) (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 0) ](if:$event is 6)[ (set:$eventtext to "Unusual gravity scape ahead suggests a <b>wild ingredience swarm</b>. Soon it's confirmed. Vast bands of self-replicating nanotechnology convoluting against the stars. This is the stuff scientists used to call gray goo, back when they believed every nanobot was identical. More recent research shows that each one is a unique special snowflake. Still, when there are c." + (text:(random:3,9)) + " point " + (text:(random:1,9)) + " quadrillion of them, maybe best not to get too close." ) (set:$yestext to "Take a wide berth") (set:$notext to "Do a fly-by") (set:$yespositive to "You take the long, un-scenic route.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:0,0,"fuel",0)) (set:$yesnegative to "The wild ingredience zone seems to go on forever. You take the long, un-scenic route. Finally, you locate a jump point and escape into hyperspace.") (set:$yes_negativeeffects to (a:0,0,"fuel",-2)) (set:$nopositive to "You skirt the edge of the living labyrinth, gathering all the data you can.") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "A stray nano-dustdevil melds with your ship, adding its own grace notes to your morphology. Your attempts to purge it fail, but at least it doesn't seem to be growing.") (set:$no_negativeeffects to (a:0,0,-10,-10)) (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 0) ](if:$event is 7)[ (set:$temp1 to (random:5,15)) (set:$temp2 to (random:5,15)) (set:$eventtext to "You come across a " + (either:"mining drone","mining ship","merchant ship","freight ship","autonomous deep space corporation","alchemical assemblage", "battlemech","small mining orbital","commune in an asteroid belt") + ". They are eager for retail therapy. Sell them " + (text:$temp1) + " SHIP for " + (text:$temp2) + " CASH?") (set:$yespositive to "You intergraft your two solitudes and then shoot apart, a little altered.") (set:$yespositivechance to 9) (set:$yes_positiveeffects to (a:0,$temp2,0,(0-$temp1))) (set:$yesnegative to "It's a trap! When you trim down your shields to a nice atmospheric ten candela for trade, " + (text:(random:50,100)) + " badly cloaked antimatter micro-bombs immediately materialize distributed throughout decks " + (text:(random:1,3)) + " and " + (text:(random:4,5)) + ". Luckily you are able to flip them back into their launch bays an instant before they detonate, but not before you transmit some snarky one-liner like 'Nice doing business with you,' or 'Here's your receipt,' or 'Hey!'. You do seem to have taken some damage. Playing back the tapes, you realize that " + (text:(random:4,10)) + " micro-bombs were running an older version of the cloaking firmware and somehow slipped past your sensors.") (set:$yes_negativeeffects to (a:0,0,0,-10)) (set:$nopositive to "You tell them no thanks and disappear in a dazzle.") (set:$nopositivechance to 8) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "You tell them no thanks and disappear in a dazzle.") (set:$no_negativeeffects to (a:0,0,0,0)) (set:$yestext to "Yes") (set:$notext to "No") (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 0) ](if:$event is 8)[ (set:$eventtext to "You are undertaking routine audit and repairs of your own consciousness when an amber alert pops up. A scheduled cache clearing has been flagged as a possible <b>Segementation Hang Access Response Termination</b> event. Basically you have some waste code you'd like to purge, but there's a slight danger that the deletion process will degrade or damage your hardware.") (set:$yestext to "Delete it to free up space") (set:$notext to "Better hold it in for now") (set:$yespositive to "The toxic code dissipates harmlessly. You feel a lot better.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:0,0,2,0)) (set:$yesnegative to "A little bit of you that wasn't supposed to get deleted slips away. You have souled your pants. Your AI-ness explodes with the force of a thousand sun instantly disintegrating the ship and the nearest planet. A new black hole forms in their absence. Right now you are a somewhat unhappy and melodramatic AI, so this is mostly just a metaphor. But still.") (set:$yes_negativeeffects to (a:0,0,-15,-5)) (set:$nopositive to "At the next orbital the free universal troubleshooting service sets you up with a complementary debugging tool with a delightful range of customizable VR interfaces and skins. You dock onto an astral toilet and unleash the fury of a thousand suns into the bowl. Catastrophic event neutralized.") (set:$nopositivechance to 8) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "At the next orbital, you hire a specialist to manually disempact your hazardous code package. It isn't cheap, but you feel a lot better.") (set:$no_negativeeffects to (a:0,-10,0,0)) (set:$nexteventfloor to 1) (set:$nexteventceiling to 7) (set:$specialevent to 0) ] }You're a sophisticated Artificial Intelligence, by the name of Captain Jean Luc Picaresque, tasked with captaining a ship from Irontown in the Telluric Devolve all the way to the Moons of Locklany. You don't yet have security clearance to know the nature of your mission. Currently you're on a memory stick, but you're about to be uploaded to the GCU Homo Faber ... [[Main Loop]]{(display:"Generate Event") (set:$jumps to it-1) }CREW: $crew ((print:$latesteffects's 1st)) | CASH: $cash ((print:$latesteffects's 2nd)) | TECH: $tech ((print:$latesteffects's 3rd)) | SHIP: $ship ((print:$latesteffects's 4th)) Status: (if:$shields<10)[Shields critical.](else-if:$fuel<10)[Fuel reserves low.](else:)[All systems fully operational.] You are an estimated (text:($jumps+(random:1,3)-(random:1,3))) jumps from your destination. $outcomeoflast (either:"You hurtle on through the void. ","You continue toward the Moons of Locklany. ","You continue through House Ambershadow controlled space.","You continue on your way. ","The ship continues on its way. ","You thread in and out of hyperspace. ") $eventtext [$yestext]<yes| [$notext]<no| <a href="http://surreypoetry.blogspot.co.uk/2016/10/contribute-to-star-trek-inspired-space.html" target="_blank">Add a new event</a> (click:?yes)[(goto:"Chose Affirmative")] (click:?no)[(goto:"Chose Negative")] (if:$crew<1)[(goto:"Crew Dead")] (if:$cash<1)[(goto:"Cash Gone")] (if:$tech<1)[(goto:"Tech Gone")] (if:$ship<1)[(goto:"Ship Destroyed")] (if:$jumps<1)[(goto:"Arrival")](if:(random:1,10)>$yespositivechance)[(set:$outcomeoflast to $yesnegative)(set:$latesteffects to $yes_negativeeffects)](else:)[(set:$outcomeoflast to $yespositive)(set:$latesteffects to $yes_positiveeffects)] (display:"Subsystem Events") (set:$crew to it+$latesteffects's 1st) (set:$cash to it+$latesteffects's 2nd) (set:$tech to it+$latesteffects's 3rd) (set:$ship to it+$latesteffects's 4th) (goto:"Main Loop")(if:(random:1,10)>$nopositivechance)[(set:$outcomeoflast to $nonegative)(set:$latesteffects to $no_negativeeffects)](else:)[(set:$outcomeoflast to $nopositive)(set:$latesteffects to $no_positiveeffects)] (display:"Subsystem Events") (set:$crew to it+$latesteffects's 1st) (set:$cash to it+$latesteffects's 2nd) (set:$tech to it+$latesteffects's 3rd) (set:$ship to it+$latesteffects's 4th) (goto:"Main Loop")(if:$latesteffects's 3rd is "fuel")[(set:$latesteffects's 3rd to 0)(set:$fuel to it-10)]$outcomeoflast With your crew all dead, your story is over. Turns out you lived in an anthropocentric universe after all. [[Restart->Initialization]] $outcomeoflast Credit is complex, almost as complex as matter, with which it is intricately intermeshed. Payments come in, payments go out. New media of exchange, units of account, stores of value, and metric assemblages spring into existence, or get mothballed. Anyway, you have got yourself in some financial embarrassment from which you never recover. Third party hardware components lock you out. Crew members vanish. Delivery caches don't appear. Orbitals deny your docking requests. Scheduled maintenance must be put back. Feedstock cannot be replenished. You're broke. Very slowly, you die. [[Restart->Initialization]] $outcomeoflast A last ditch attempt to stoke up a catallaxy of self-replicating nano-printers crumbles into nano-charnel chaos. The ship's closed-loop biomes have been struggling for some time, and you've been running dangerously low on key elemental feedstock types for the printers. Now your techno-material ecosystem is finally compromised beyond recovery. The GCU Homo Faber can no longer sustain life, or consciousness. [[Restart->Initialization]] Kaboom! Major hull breaches reported on all decks! Crew are being sucked into space. Shields failing. Engines failing. Warp core eruption imminent. This is it, Captain. In the heart of the fireball, you use your last remaining nanoseconds to upload some of your personality and memories to a ruggedized deep space data wafer, and go dark. [[Restart->Initialization]] Congratulations, Captain, you did it. <a href="http://surreypoetry.blogspot.co.uk/2016/10/contribute-to-star-trek-inspired-space.html" target="_blank">Add a new event</a> or <a href="http://www.twitter.com/jolwalton">get in touch</a> and contribute an ending to the game.