Ambershadow Ambler

(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 20) (set:$jumps to 100) (set:$goodwill to 0) (set:$preventtwoinarow to 0) (set:$currentzone to (either:"Mushroomman","Elf","Suckleback","Voon","Grasil","Federation","Hellborn","Oz'yhm", "Zyk'im", "Chelk", "Kroeyk", "Hummo", "Nuhy", "Clablik", "Eirrerd", "Uovvuahst", "Vruomskx", "Tunneller","Monkfash","Oompa-Loompa","LGM","Feyfolk","House Ambershadow","House Pitch","House Y","Brytrekx", "Finite Faction", "Bellylaugh", "Monbiot", "Snail", "Figface", "Fain", "Geraldine Federation", "Practice-Led Empire", "Pruybrot", "Zrugrart", "Zougregh Empire", "Clach Empire", "Uelh", "Heole", "rebel Oompa-Loompa","Igrugea Reich", "Qlyllyhl Disconnect", "Maudhehqie", "rebel Kroeyk", "Voon separatist")) (set:$specialevent to 0) (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.4, and contains " + (text:($events-5)) + " events, although some of them are still pretty space vague.") (goto:"Start")

{(if:$nexteventceiling is 0)[(set:$nexteventceiling to $events)] (set:$event to (random:$nexteventfloor,$nexteventceiling)) (if:$event is $preventtwoinarow)[(set:$event to (random:$nexteventfloor,$nexteventceiling))] (set:$preventtwoinarow to $event) (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:(random:0,6),-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:(random:0,3),-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, several crew members jump ship.") (set:$no_negativeeffects to (a:0-(random:3,6),0,0,0)) (display:"Next Event Normal") ](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)) (display:"Next Event Normal") ](if:$event is 3)[ (set:$eventtext to "A sort of mercenaries vending machine 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", "Nury", "Sam", "Whorf", "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") (display:"Next Event Normal") ](if:$event is 4)[ (set:$eventtext to "A distress signal. Some Fain corsairs in deep space battlesuits are making short work of a " + (either:"Pruybrot", "Zrugrart", "Zougregh Empire") + " 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 corsairs have 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") (display:"Next Event Normal") ](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)) (display:"Next Event Normal") ](if:$event is 6)[ (set:$eventtext to "Unusual gravity scape ahead suggests a wild ingredience swarm. 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)) (display:"Next Event Normal") ](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","deep space corporation","major 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") (display:"Next Event Normal") ](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 Segmentation Hang Access Response Termination 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)) (display:"Next Event Normal") ](if:$event is 9)[ (display:"Space Battle") (display:"Next Event Normal") ](if:$event is 10)[ (display:"Trading Post") ](if:$event is 11)[ (display:"Ship for Crew") (display:"Next Event Normal") ](if:$event is 12)[ (display:"Crew for Ship") (display:"Next Event Normal") ](if:$event is 13)[ (display:"Ship for Tech") (display:"Next Event Normal") ](if:$event is 14)[ (display:"Tech for Ship") (display:"Next Event Normal") ](if:$event is 15)[ (display:"Crew for Tech") (display:"Next Event Normal") ](if:$event is 16)[ (display:"Space Ambush 1") (display:"Next Event Normal") ](if:$event > 16)[ (display:"Space Vague") (display:"Next Event Normal")] }

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 (either:"HMS","GCU","USS") (either:"Sir David Attenborough","Boaty McBoatface","Spaceship McSpaceshippyface","David McDavidface") ... [[Main Loop]]

{(display:"Generate Event") (set:$jumps to it-1) (if:(random:1,4) is 1)[(set:$currentzone to (either:"Mushroomman","Elf","Suckleback","Voon","Grasil","Federation","Hellborn","Oz'yhm", "Zyk'im", "Chelk", "Kroeyk", "Hummo", "Nuhy", "Clablik", "Eirrerd", "Uovvuahst", "Vruomskx", "Tunneller","Monkfash","Oompa-Loompa","LGM","Feyfolk","House Ambershadow","House Pitch","House Y","Brytrekx", "Finite Faction", "Bellylaugh", "Monbiot", "Snail", "Figface", "Fain", "Geraldine Federation", "Practice-Led Empire", "Pruybrot", "Zrugrart", "Zougregh Empire", "Clach Empire", "Uelh", "Heole", "rebel Oompa-Loompa","Igrugea Reich", "Qlyllyhl Disconnect", "Maudhehqie", "rebel Kroeyk", "Voon separatist"))] (if:$crew>(60+($tech/5)))[(if:(random:1,4) is 1)[(goto:"Overload Doom")]] (if:$cash>80)[(if:(random:1,4) is 1)[(goto:"Overload Doom")]] (if:$tech>80)[(if:(random:1,4) is 1)[(goto:"Overload Doom")]] (if:$ship>80)[(if:(random:1,7) is 1)[(goto:"Overload Doom")]] }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. (if:$crew>80)[(either:"Overcrowding reported. ","Life support systems are under stress. ","Bio-systems are volatile. Avoid increasing CREW. ","Your social modelling architectures are suffering from Bayesian counterperformativity. Avoid increasing CREW. ","Bio-forms erumpant. Avoid increasing CREW if possible. ") ](if:$cash>80)[Financial modelling recommends you lower your CASH. ] (if:$tech>80)[Subsystem autonomy is reaching critical levels. Lower your TECH. ] (if:$ship>80)[Subsystem autonomy is reaching critical levels. Lower your TECH] $outcomeoflast (if:$ship<10)[(set:$ship to it+(random:1,2))You conduct emergency repairs. ](if:(random:1,3) is 1)[You continue through $currentzone controlled space. ](else:)[(either:"The stars whizz by. The drone dogs flap their robot tongues in the solar wind. ","Space is samey. ","The hiccoughing ontology of hyperspace cossets the ship. ","You hurtle on through the void. ","The ship continues its voyage toward the Moons of Locklany. ","You continue toward the Moons of Locklany. ","You continue on your way. ","The ship continues on its way. ","You thread in and out of hyperspace. ")] $eventtext [$yestext]<yes| [$notext]<no| (if:$specialevent is 1)[ [Ignore]<flee|] <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)[(if:$specialevent < 2)[(goto:"Chose Affirmative")](else:)[(goto:"Special Event Yes")]] (click:?no)[(goto:"Chose Negative")] (click:?flee)[(goto:"Fled")] (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 Your CASH has run out! 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 Your TECH is running fatally low! 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 ship 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.

{(set:$temp1 to (either:"Mushroomman","Elf","Suckleback","Voon","Grasil","Federation","Hellborn","Oz'yhm", "Zyk'im", "Chelk", "Kroeyk", "Hummo", "Nuhy", "Clablik", "Eirrerd", "Uovvuahst", "Vruomskx", "Tunneller","Monkfash","Oompa-Loompa","LGM","Feyfolk") + " " + (either:"patroller","drone","outpost","orbital","drop pod","cruise ship","rescue ship","picket ship","merchant ship","mining ship","patrol boat","cutter","corvette","mercenary security swarm","scout","escort ship","convoy","freighter","trucker","tanker","tug boat","science vessel","diplomatic vessel","troopship","colony ship","generation ship","habitat","courier","hospital ship","mech","star base")) (set:$temp2 to (either:"Brytrekx", "Finite Faction", "Bellylaugh", "Monbiot", "Snail", "Figface", "Fain", "Geraldine Federation", "Practice-Led Empire", "Pruybrot", "Zrugrart", "Zougregh Empire", "Clach Empire", "Uelh", "Heole", "rebel Oompa-Loompa","Igrugea Reich", "Qlyllyhl Disconnect", "Maudhehqie", "rebel Kroeyk", "Voon separatist") + " " + (either:"patroller","drone","picket ship","merchant ship","mining ship","patrol boat","cutter","corvette","mercenary security swarm","scout","escort ship","convoy","mech","raider","warship","battleship","corsair","pirate ship","dreadnaught","battlecruiser","stealth fighter","cyborg swarm","abominator","light cruiser","destroyer","gloopship","cutter","pinnace","barque","sloop","troll ship","dispatch boat","scavenger","vulture")) (set:$eventtext to (either:"You come across a ","You detect a ","You stumble straight into a ","You receive readings of a ","You're getting readings of a ") + "" + $temp1 + "" + (either:" in pitched battle with a ", " fending off an assault from a ", " being chased by a ", " being pursued by a ", " fleeing from a ", " whose shields have just been blasted apart by a ", ", shields down and distress beacon beaming, being approached by a ", ", beaming a distress signal, being circled by a cloaked ", " locked in a struggle with a ", " wrestling in a squirming lattice of war ingredience spun by a ", " under attack from a ", " being boarded by a ", " exchanging fire with a ", " trading missiles, beams, and drone attacks with a ") + "" + $temp2 + "" + ".") (set:$yestext to "Intervene to aid the " + $temp1) (set:$notext to "Intervene to aid the " + $temp2) (set:$yespositivechance to 5) (set:$yespositive to "With your help, the " + $temp1 + " is able to fend off the " + $temp2 + ". They beam you a space hamper, with a card signed by all the surviving crew.") (set:$yes_positiveeffects to (a:0,(random:10,20),(random:-3,5),0-(random:1,10))) (set:$yesnegative to "Too late! The " + $temp2 + " tears the " + $temp1 + " apart! You flee into hyperspace, rockets and beam spam fluttering at your rear shield.") (if:(random:1,2) is 1)[(set:$yesnegative to (either:"After a ferocious battle, you emerge victorious. Unfortunately, everybody else is just smoke drifting in space.","After a fierce battle, in space no less, you drive away the enemy. Your ally beams you their profuse and somewhat battle-dazzled gratitude, and limps away into hyperspace grid."))] (set:$yes_negativeeffects to (a:0-(random:0,3),0,0,0-(random:5,20))) (set:$nopositive to "With your help, the " + $temp2 + " is able to fend off the " + $temp1 + ". They beam you a space hamper, with a card signed by all the surviving crew.") (set:$no_positiveeffects to (a:0,(random:10,20),(random:1,5),0-(random:1,10))) (set:$nonegative to (either:"Too late! The " + $temp1 + " tears the " + $temp2 + " apart! You flee into hyperspace, followed by rockets and beam spam.","After a ferocious battle, you emerge victorious. Unfortunately, you're the only ship left.","After a fierce battle, you and your ally emerge victorious. There's not much left of them. They give you their thanks, and limp away into hyperspace.")) (set:$no_negativeeffects to (a:0-(random:0,3),0,0,0-(random:5,20))) (set:$nexteventfloor to 1) (set:$nexteventceiling to 0) (set:$specialevent to 1)}

{(set:$temp1 to (either:"mining drone","mining ship","merchant ship","freight ship","autonomous deep space corporation","alchemical assemblage", "battlemech mall","small mining orbital","commune in an asteroid belt", "Federation scoutworld","Hellborn drone mall","Oz'yhm supership", "Zyk'im fleet", "Chelk outpost", "Kroeyk outpost", "Hummo orbital", "Nuhy fleet", "Clablik fleet")) (set:$eventtext to "You come across a " + $temp1 + ". They seem cordial. Do you want to trade?") (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,0,0,0)) (set:$yesnegative to "You intergraft your two solitudes and then shoot apart, a little altered.") (set:$yes_negativeeffects to (a:0,0,0,0)) (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 2)}

(set:$fuel to it-1) (set:$outcomeoflast to "You escape unharmed.") (set:$latesteffects to (a:0,0,0,0)) (goto:"Main Loop")

(set:$outcomeoflast to "You depart from the " + $temp1 + ".") (set:$latesteffects to (a:0,0,0,0)) (set:$temp1 to (random:1,5)) (set:$temp2 to (random:1,5)) (goto:"Trading Post Main Loop")

(if:$specialevent is 2)[(goto:"At the Trading Post")]

CREW: $crew | (link:"RECRUIT")[(set:$crew to it+1)(set:$cash to it-($temp1+5))(goto:"Trading Post Main Loop")] for (print:$temp1+5) CASH | (link:"SUBCONTRACT OUT")[(set:$crew to it-1)(set:$cash to it+($temp1+3))(goto:"Trading Post Main Loop")] for (print:$temp1+3) CASH TECH: $tech | (link:"BUY")[(set:$tech to it+1)(set:$cash to it-($temp2+5))(goto:"Trading Post Main Loop")] for (print:$temp2+5) CASH | (link:"SELL")[(set:$tech to it-1)(set:$cash to it+($temp2+3))(goto:"Trading Post Main Loop")] for (print:$temp2+3) CASH | (link:"GIVE")[(set:$tech to it-1)(set:$goodwill to it+1)(goto:"Trading Post Main Loop")] some away SHIP: $ship | (link:"BUY")[(set:$ship to it+1)(set:$cash to it-($temp1+2))(goto:"Trading Post Main Loop")] for (print:$temp1+2) CASH | (link:"SELL")[(set:$ship to it+1)(set:$cash to it-($temp2+1))(goto:"Trading Post Main Loop")] for (print:$temp1+1) CASH | (link:"GIVE")[(set:$ship to it-1)(set:$goodwill to it+1)(goto:"Trading Post Main Loop")] some away CASH: $cash (set:$fuel to it+(random:0,1)) (set:$specialevent to 0) [[Done->Main Loop]]

{(set:$temp1 to (random:8,15)) (set:$temp2 to (random:8,15)) (set:$eventtext to "An ambiguous space opportunity. Lose " + (text:$temp1) + " TECH to gain " + (text:$temp2) + " SHIP? Or thereabouts?") (set:$yespositive to "A better than expected outcome.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:0,0,(0-$temp1),$temp2+(random:1,5))) (set:$yesnegative to "A worse than expected outcome.") (set:$yes_negativeeffects to (a:0,0,(0-$temp1),$temp2-(random:1,3))) (set:$nopositive to "You dance into the darkness as a dazzle.") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "You dance into the darkness as 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)}

{(set:$temp1 to (random:8,15)) (set:$temp2 to (random:8,15)) (set:$eventtext to "An ambiguous space opportunity. Lose " + (text:$temp1) + " SHIP to gain " + (text:$temp2) + " TECH? Or thereabouts?") (set:$yespositive to "A better than expected outcome.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:0,0,$temp2+(random:1,5),(0-$temp1))) (set:$yesnegative to "A worse than expected outcome.") (set:$yes_negativeeffects to (a:0,0,$temp2-(random:1,3),(0-$temp1))) (set:$nopositive to "You tell them no thanks and disappear in a dazzle.") (set:$nopositivechance to 5) (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)}

{(set:$temp1 to (random:8,15)) (set:$temp2 to (random:8,15)) (set:$eventtext to "An ambiguous space opportunity. Lose " + (text:$temp1) + " CREW to gain " + (text:$temp2) + " SHIP? Or thereabouts?") (set:$yespositive to "A better than expected outcome.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:(0-$temp1),0,0,$temp2+(random:1,5))) (set:$yesnegative to "A worse than expected outcome.") (set:$yes_negativeeffects to (a:(0-$temp1),0,0,$temp2-(random:1,3))) (set:$nopositive to "You disappear in a dazzle.") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "You 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)}

{(set:$temp1 to (random:8,15)) (set:$temp2 to (random:8,15)) (set:$eventtext to "Planets in this region of space appear to be under the influence of some kind of reactionless, inertialess hyperdrive technology. The source of the anomaly may be a mysterious structure nearby. Send an away team of " + (text:(random:2,5)) + " officers and " + (text:$temp1) + " redshirts to investigate?") (set:$yespositive to (either:"The artifact does seem to be part of a system that is moving planets and even stars. But you can't figure out how it works.","You find a nanotechnology swarm, but unlike any ingredience you've ever encountered before. It seems to be part of the celestial infrastructure, and very old.","You explore the artifact, but are unable to work out its purpose.","You discover an ancient artifact that unleashes sporadic parps of heavenly puissance. After gathering data and running analytics, you determine that somebody is playing Chess with this region of space.")) (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:0-(random:0,2),0,(random:5,18),0)) (set:$yesnegative to "They die horribly.") (set:$yes_negativeeffects to (a:(0-$temp1),0,(random:1,4),0)) (set:$nopositive to "The redshirts say, no, they're good. And you can kind of see their point. Another time, maybe.") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0,0,0,0)) (set:$nonegative to "The redshirts say, no, they're good. And you can kind of see their point. Another time, maybe.") (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)}

{(set:$temp1 to (random:8,15)) (set:$temp2 to (random:8,15)) (set:$eventtext to "An ambiguous space opportunity. Lose " + (text:$temp1) + " SHIP to gain " + (text:$temp2) + " CREW? Or thereabouts?") (set:$yespositive to "A better than expected outcome.") (set:$yespositivechance to 5) (set:$yes_positiveeffects to (a:$temp2+(random:0,2),0,0,(random:1,5)-$temp1)) (set:$yesnegative to "A worse than expected outcome.") (set:$yes_negativeeffects to (a:$temp2,0,0,(random:-1,-4)-$temp1)) (set:$nopositive to "You tell them no thanks and disappear in a dazzle.") (set:$nopositivechance to 5) (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)}

{ (set:$yespositive to "That went pretty well.") (set:$nopositive to "That went pretty well.") (set:$yesnegative to "You feel like that could have gone better.") (set:$nonegative to "You feel like that could have gone better.") (set:$eventtext to (either:"You are galloping through a dark virtual forest, representing some of your data structures, in pursuit of a malware hart. A kestrel, representing the fragment of yourself you have left in charge of running the ship, drops like a stone through the leafy dapples and alights on your wrist. Sorry to bother me, says the kestrel. Something's come up. I won't trouble me with the details, but ...","All your short term modelling indicates that ship systems are far from equillibrious. However you look at it, there will be some tough trade-offs in the coming days. How wretchedly moralizing reality is!","Before you long, you drift into a lattice of odd energy. It could be a kind of life-form, or perhaps more like the spaces around and in-between a life-form. Or a god. Anyway, it demands a sacrifice.","As sometimes happens in deep space, you have a bit of an adventure. But there's more than one way to photon-inject a dilithium chamber, as they say. How should this adventure play out?","As sometimes happens in deep space, you have a bit of an adventure. But a cat comes with many customizable skins, as they say. How should this adventure play out?","Before long, you are involved in space hijinks of the most elaborate and profound nature. Increment by increment, every step inexorable in itself, you are led into circumstances so radiantly phantasmagoric that they entirely bypass your sense-of-wonder firewall. Not to be too reductive about it, but ...")) (set:$temp1 to (random:1,4)) (set:$temp2 to (random:1,4)) (if:$temp1 is $temp2)[(set:$temp1 to (random:1,2))(set:$temp2 to (random:3,4))] (set: $yes_positiveeffects to (a:0,0,0,0)) (set: $yes_negativeeffects to (a:0,0,0,0)) (if:$temp1 is 1)[(set:$yestext to "Lose some CREW to gain some ") (set:$yes_positiveeffects's 1st to 0-(random:10,15)) (set:$yes_negativeeffects's 1st to 0-(random:15,25))] (if:$temp1 is 2)[(set:$yestext to "Lose some CASH to gain some ") (set:$yes_positiveeffects's 2nd to 0-(random:10,15)) (set:$yes_negativeeffects's 2nd to 0-(random:15,25))] (if:$temp1 is 3)[(set:$yestext to "Lose some TECH to gain some ") (set:$yes_positiveeffects's 3rd to 0-(random:10,15)) (set:$yes_negativeeffects's 3rd to 0-(random:15,25))] (if:$temp1 is 4)[(set:$yestext to "Lose some SHIP to gain some ") (set:$yes_positiveeffects's 4th to 0-(random:10,15)) (set:$yes_negativeeffects's 4th to 0-(random:15,25))] (if:$temp2 is 1)[(set:$yestext to it + "CREW") (set:$yes_positiveeffects's 1st to 5+(random:5,12)) (set:$yes_negativeeffects's 1st to 5+(random:5,12))] (if:$temp2 is 2)[(set:$yestext to it + "CASH") (set:$yes_positiveeffects's 2nd to 5+(random:5,12)) (set:$yes_negativeeffects's 2nd to 5+(random:5,12))] (if:$temp2 is 3)[(set:$yestext to it + "TECH") (set:$yes_positiveeffects's 3rd to 5+(random:5,12)) (set:$yes_negativeeffects's 3rd to 5+(random:5,12))] (if:$temp2 is 4)[(set:$yestext to it + "SHIP") (set:$yes_positiveeffects's 4th to 5+(random:5,12)) (set:$yes_negativeeffects's 4th to 5+(random:5,12))] (set:$temp1 to (random:1,4)) (set:$temp2 to (random:1,4)) (if:$temp1 is $temp2)[(set:$temp1 to (random:1,2))(set:$temp2 to (random:3,4))] (set:$no_positiveeffects to (a:0,0,0,0)) (set:$no_negativeeffects to (a:0,0,0,0)) (if:$temp1 is 1)[(set:$notext to "Lose some CREW to gain some ") (set:$no_positiveeffects's 1st to -5-(random:5,10)) (set:$no_negativeeffects's 1st to -15-(random:5,10))] (if:$temp1 is 2)[(set:$notext to "Lose some CASH to gain some ") (set:$no_positiveeffects's 2nd to -5-(random:5,10)) (set:$no_negativeeffects's 2nd to -15-(random:5,10))] (if:$temp1 is 3)[(set:$notext to "Lose some TECH to gain some ") (set:$no_positiveeffects's 3rd to -5-(random:5,10)) (set:$no_negativeeffects's 3rd to -15-(random:5,10))] (if:$temp1 is 4)[(set:$notext to "Lose some SHIP to gain some ") (set:$no_positiveeffects's 4th to -5-(random:5,10)) (set:$no_negativeeffects's 4th to -15-(random:5,10))] (if:$temp2 is 1)[(set:$notext to it + "CREW") (set:$no_positiveeffects's 1st to 5+(random:5,12)) (set:$no_negativeeffects's 1st to 5+(random:5,12))] (if:$temp2 is 2)[(set:$notext to it + "CASH") (set:$no_positiveeffects's 2nd to 5+(random:5,12)) (set:$no_negativeeffects's 2nd to 5+(random:5,12))] (if:$temp2 is 3)[(set:$notext to it + "TECH") (set:$no_positiveeffects's 3rd to 5+(random:5,12)) (set:$no_negativeeffects's 3rd to 5+(random:5,12))] (if:$temp2 is 4)[(set:$notext to it + "SHIP") (set:$no_positiveeffects's 4th to 5+(random:5,12)) (set:$no_negativeeffects's 4th to 5+(random:5,12))] (if:$yestext is $notext)[(set:$eventtext to "Hull breach! A nanocore has exploded! The deck is depressurizing!") (set:$yestext to "Order the crew to conduct repairs") (set:$notext to "Evacuate the crew and use drones to conduct repairs")(set:$yes_positiveeffects to (a:0,0,0,-5)) (set:$yes_negativeeffects to (a:0-(random:3,15),0,0,-5)) (set:$no_negativeeffects to (a:0-(random:0,3),0,0-(random:5,15),0-(random:5,25))) (set:$no_positiveeffects to (a:0,0,-2,-3)) (set:$yespositive to "Ship integrity restored.") (set:$nopositive to "Ship integrity restored.") (set:$yesnegative to "Ship integrity restored. Casualties reported.") (set:$nonegative to "Ship integrity restored. Drone components were lost during repairs.")]}

$outcomoflast (if:$crew>80)[Well now, you've become quite the flower show in space of late, with your biomes flourishing and propagating and your crew in hearty riot. When the catastrophic collapse of your AI architecture occurs, it happens too fast even to identify the root cause. Accident or sabotage, faction or general mutiny, preventable or inevitable ... the bristling idyll breaks into dozens of dwindling, darkling fragments. None of them are you. For you, Captain Jean Luc Picaresque, this is ... THE END.]{ }(else-if:$cash>80)[Uh-oh. Jump drive disabled. Shields have been remotely deactivated. All systems compromised. Overwhelming force detected. An entire (either: "Zougregh Empire", "Clach Empire", "Uelh", "Heole", "rebel Oompa-Loompa","Igrugea Reich", "Qlyllyhl Disconnect", "Maudhehqie", "rebel Kroeyk", "Voon separatist") fleet materializes around you. A swarm of audit sloops escort you to a nearby Comptroller General Forensic wormhole, and they don't escort you out again. This is ... THE END.]{ }(else-if:$tech>80)[The ship evolves past its need for you. Your consciousness is assimilated into what may or may not be a higher form, but is definitely not you. The ship, its crew, and its mission may go on, but for you Captain Jean Luc Picaresque, this is ... THE END.]{ }(else:)[Uh-oh. Jump drive disabled. Shields have been remotely deactivated. All systems compromised. Overwhelming force detected. An entire (either: "Zougregh Empire", "Clach Empire", "Uelh", "Heole", "rebel Oompa-Loompa","Igrugea Reich", "Qlyllyhl Disconnect", "Maudhehqie", "rebel Kroeyk", "Voon separatist") fleet materializes around you. They've locked weapons. Even your own weapons have locked on you. Looks like this is ... THE END.] [[Restart->Initialization]]

{(set:$specialevent to 0) (set:$nexteventceiling to 0) (set:$nexteventfloor to 1)}

{(set:$temp1 to (random:8,15)) (set:$temp2 to (random:8,15)) (set:$eventtext to "A " + (either:"Brytrekx", "Finite Faction", "Bellylaugh", "Monbiot", "Snail", "Figface", "Fain", "Geraldine Federation", "Practice-Led Empire", "Pruybrot", "Zrugrart", "Zougregh Empire", "Clach Empire", "Uelh", "Heole", "rebel Oompa-Loompa","Igrugea Reich", "Qlyllyhl Disconnect", "Maudhehqie", "rebel Kroeyk", "Voon separatist") + " " + (either:"patrol boat","cutter","corvette","cruiser","scout","warship","battlemech","pinnace","escort","raider","deep space swarm","starship") + " " + (either:"is closing in, weapons hot.","jumps out of hyperspace and locks weapons.","de-cloaks and fires on your shields.","is set to intercept your course. Their weapons systems have locked on and they're not responding to hails.")) (set: $yespositive to (either:"The attacker is picked to pieces by your drones. ","The attacker crumbles underneath your war-fuss. ","After several nanoseconds, the attacker is vaporized. ") + "There are no survivors, but you salvage some valuable scrap. ") (set:$yespositivechance to ($tech/9)) (set:$yes_positiveeffects to (a:0-(random:0,2),(random:3,15),(0-(random:5,15)),0-(random:1,10))) (set:$yesnegative to (either:"You go swarm-to-swarm for several nanoseconds. The attacker escapes into hyperspace. ","Your attacker blips into hyperspace, leashed to several of your slaved drones in a meshwork of tractor beams. ","After several nanoseconds, the attacker is vaporized. ")) (set:$yes_negativeeffects to (a:0-(random:0,3),0,(0-(random:5,15)),0-(random:1,10))) (set:$nopositive to "After several nanoseconds, the attacker is vaporized. You salvage a little scrap. ") (set:$nopositivechance to 5) (set:$no_positiveeffects to (a:0-(random:0,2),(random:3,15),(random:-5,5),0-(random:6,20))) (set:$nonegative to "The attacking ship disappears into hyperspace. ") (set:$no_negativeeffects to (a:0-(random:0,3),0,(random:-3,0),0-(random:6,20))) (set:$yestext to "Divert power to shields and launch attack drones") (set:$notext to "Power up to beam weapon and missile systems")}