Mars Crisis

#Mars Crisis The colony began as a playground in space. It was created by a coalition of Earth governments that advertised the project as multinational utopia. Thousands of citizens emigrated and the colony was built at an amazing speed. The truth about the colony, however, is less than ideal. The first colony on Mars is dying, torn apart by environmental hazards, shoddy infrastructure, and social unrest. The Earth Coalition is keeping the colony's failures a secret, and has instead decided to hire an expert to turn the colony around. You, Kelly Parker, are that expert. Based on your many achievements on Earth, you have been selected to act as special advisor to the colony. =><= (button:)[[Accept->Leadership Style]] <==

#The End Your term on Mars has come to an end. (if: $Trial)[Thank you for playing the trial version. ] (display: "Colony Epitaph") (display: "Kelly Epitaph") =><= (button:)[(link-rerun: "Play again")[(restart:)]] <==

(metadata: "district", "One") ##The Mayor's Office The mayor's office is located in the Colony Hall. The place is (either: "bustling", "unusually quiet", "currently being cleaned"). { (set: _storyhooks to (altered: via its name, ...(open-storylets: where its tags contains 'storyhook')) ) (if: _storyhooks's length > 0) [(display: _storyhooks's 1st)] (else:) [It's a quiet day today. Time to sharpen a few pencils. * [[Talk with Ridley Lang]] ] } $WhatDoYouDo

(metadata: "district", "Five") ##The Orphanage The orphanage is a small building next to the hospital. There is a playground out front. It smells of old shoes and cleaning agent inside. ###What do you do? { <ul> (if: ($discovered: "Sunshine"))[ <li>(link-goto: (either: "Go see Sunshine", "See Sunshine", "Spend some time with Sunshine", "Go spend some time with Sunshine"), "See Sunshine") ] <li>[[Go back to Ingenuity Square->Ingenuity Square]] </ul> }

(metadata: "district", "Four") ##Green Canyon A big sign reads "($topic:"Green Canyon") Luxury Resort". There is also a picture of a happy family. This is the project ($topicPopup: "Arnold Fletcher") told you about. (either: "The site is full of busy machines and workers. ", "Right now this place looks like a mess. ", "The view from here to the gardens of District Two is spectacular.") (unless: ($visited: "Meet with Arnold Fletcher"))[A man with a yellow helmet and a suit waves at you enthusiastically.] ###What do you do? { <ul> (if: ($visited: "Meet with Arnold Fletcher"))[ <li>[[Talk with Arnold Fletcher]] ](else:)[ <li>[[Go to Arnold Fletcher->Meet with Arnold Fletcher]] ] <li>[[Go back to Curiosity Gate->Curiosity Gate]] </ul> } \($addNote: "Green Canyon", "Overlooking the canyon and with a view to the green gardens in District Two. ")

##Notes (for:each _topic,...(altered: via its name, ...(open-storylets: where its tags contains "topic")))[(unless:(passage:_topic)'s tags contains 'person')[ ''_topic''. ($getNotes: _topic) ]] ###People (for:each _topic,...(altered: via its name, ...(open-storylets: where its tags contains "topic")))[(if:(passage:_topic)'s tags contains 'person')[ ''_topic''. ($getNotes: _topic) ]] $BackButton

(metadata: "district", "Three") ##High Street High street is a shopping area near the top of the dome that surrounds the colony. You can take a lift to a platform at the top of the dome that offers a splendid view of the surface. You are in District Three. ###What do you do? * [[Go to the platform->Platform]] * [[Go to the Police Station->Police Station]] * [[Go to the Museum->Colony Museum Location]] $WhereDoYouWantToGo

(metadata: "district", "Two") ##Colony Replicator The Colony Replicator is located in a huge square building. Tubes and wires are everywhere. Except for a light in a window on the first floor, the building looks empty. ###What do you do? { <ul> (if: ($discovered: "Elena Parker") and ($talks:"Elena Parker"))[ <li>[[Talk with Elena Parker]] ] <li>[[Go back to First Landing Plaza->First Landing Plaza]] </ul> }

(metadata: "district", "Three") ##Union Office ###What do you do? *[[Go back to High Street->High Street]]

(metadata: "district", "Two") ##Site of the accident This is the area where 72 worked died some time ago when the caves collapsed. The area is sealed off. There is a small shrine where relatives have placed pictures and items to commemorate those who died. ###What do you do? * [[Leave->Lava Caves Location]]

##Kelly at 24:37 You leave the show and feel relieved that you didn't say anything totally crazy... good that they didn't ask into your hobbies. $WhatDoYouDo

(metadata: "district", "Five") ##The Hospital The Colony Hospital provides care for the colony's citizens. It is run by Doctor ($topic:"Leigh Stuart"). ###What do you do? { <ul> (if: ($talks: "Leigh Stuart"))[ <li>[[Talk with Leigh Stuart]] ] <li>[[Go back to Ingenuity Square->Ingenuity Square]] </ul> }

(storylet: when ($discovered:"Project Nebula"))\ A government run research and processing facility is stalled due to lack of trained specialists. Expensive equipment is unused.

(metadata: "district", "Four") ##Lang Pharma ###What do you do? * [[Go back to Curiosity Gate->Curiosity Gate]]

(metadata: "district", "One") ##The Hub The Hub is the central node in the colony monorail. From here you can quickly get to anywhere in the colony. When it works. The station is (either:"buzzing with people", "unusually quiet", "full of people waiting to get on a train", "bustling", "deserted except for a cleaning crew"). $WhereDoYouWantToGo $WhatDoYouDo

(metadata: "district", "Five") ##Sam's Place Your brother ($topicPopup:"Sam Parker") lives in a small flat in District Five. ###What do you do? { <ul> (unless: ($visited: "Dinner with Sam and family"))[ <li>[[Have dinner with Sam and his family->Dinner with Sam and family]] ](else:)[ <li>[[Talk with Sam Parker]] ] <li>[[Go back to Ingenuity Square->Ingenuity Square]] </ul> }

(metadata: "district", "Three") ##Police station The formal name for the colony police is ($topic: "M-Sec"). ###What do you do? { <ul> (if: ($discovered:"Rawan Tahir"))[ <li>[[Talk with Rawan Tahir]] ](else:)[ <li>[[Ask to speak with the head of the police->Talk with Rawan Tahir]] ] <li>[[Go back to High Street->High Street]] </ul> } \(if: ($true:"Underground Stim Factory Raid Planned"))[(display: "Underground Stim Factory Raid")]

(metadata: "district", "Four") ##Underground stim factory (if: visits is 1)[You have discovered an (lowercase:($topic:"Underground Stim Factory"))!](else:)[You are at the underground stim factory. (if: ($true:"Underground Stim Factory Raided"))[It is closed now. ]] ###What do you do? { <ul> (unless: ($true:"Underground Stim Factory Raided"))[ <li>[[Call the police->Underground Stim Factory Call the Police]] ] (if: ($known: "Ask after Sasha"))+(unless: ($visited:"Underground Stim Factory Ask After Sasha"))[ <li>[[Ask after Sasha->Underground Stim Factory Ask After Sasha]] ] (if: ($visited:"Underground Stim Factory Ask After Sasha"))+(unless: ($true:"Underground Stim Factory Raided"))[ <li>[[Buy some bootleg stims->Underground Stim Factory Buy Stims]] ] <li>[[Go back to Gagarin Flats->Gagarin Flats Location]] </ul> }

(metadata: "district", "One") ##Kelly's Quarters Your home on Mars for the duration of your term. Small but functional, it provides you with some privacy. On the table next to the bed is a bottle of Mars Water and a package of E pills compliments of the colony. ($topicReveal: "E pills")(link: (either: "Try one", "Take one", "Take a pill") + ".")[(nth: visits, "It tastes a bit like candy.", "This one taste like strawberry.", "This one is bitter.")($choose: "Take E pills")] (if:visits is 1)[After a nap you shower and prepare to leave. A news story is running over the screen as you put on your shoes.](else:)[A news story is running as you (either: "brush your teeth", "put on your shoes", "pack your bag", "sip a quick cup of tea", "enjoy a quiet cup of tea", "microwave a vacuum packed dinner-for-one", "do your daily workout routine").] (text-style:"italic")(display: (either: ...(open-storylets: where its tags contains 'news')'s 1stto3rd)'s name) (set: _storyhooks to (altered: via its name, ...(open-storylets: where its tags contains 'storyhook')))\ (if: _storyhooks's length > 0)[(display: _storyhooks's 1st)]\ (else:) [It's a quiet day today. Time to catch up on Netflix. ] $WhatDoYouDo

##Messages \(set: _filter to 'unread') |ShowMessages>[\ { <table width="100%"> <tr> <td> (if:_filter is 'unread')[''Unread''](else:)[(link-reveal: "Unread")[(set: _filter to 'unread')(rerun:?ShowMessages)]] (if:_filter is 'all')[''All''](else:)[(link-reveal: "All")[(set: _filter to 'all')(rerun:?ShowMessages)]] </td> <td align=right> ($CheckMail:)(if: $YouGotMail)[(link-reveal: "Mark all as read")[($MarkAllAsRead:)(rerun:?ShowMessages)]] </td> </tr> </table> }\ --- (for: each _message, ...(altered: via its name, ...(open-storylets: where its tags contains 'message')) )[(unless: _message is in $ReadMessages and _filter is 'unread')[ From: ($GetSender:_message) Subject: ($GetSubject:_message) (text-style:"italic")(display: _message) =><= (unless: _message is in $ReadMessages)[ (link-reveal: "Mark as read")[(set: $ReadMessages to it + (ds:_message))(rerun:?ShowMessages)] ] --- ]]] $BackButton

##Transit to Mars Even on this fast lane transit to Mars, you have plenty of time to read up on the colony and get into the routines that will keep your body fit while away from Earth. //First landing 35 years ago. Now with a population of just under 10,000. Located in the Grand Canyon of Mars, it's a modern version of the hanging gardens of Babylon. High tech mining facilities, drilling into aquifers deep underground. Vast arrays of solar panels.// The informational videos tell stories of smiling families with rich homes, first class healthcare, schools and entertainment. Your confidential briefings tell stories of infrastructure breaking down, fatal workplace accidents, loss of property from theft and neglect - and a huge monthly deficit that your sponsors expect you to turn around. =><= [[Next->Landing]] ==> 4/5 <==

You are strong at building logical arguments that shows how proposed changes will benefit the group of people you are addressing. Sometimes this fails to inspire or entice people to action though. \($setLeadershipStyle: "Clever")

You project an aura of competence and control that makes people trust you and your decisions which means they can be carried out quickly. However, as people are not asked to contribute, important information is sometimes overlooked. \($setLeadershipStyle: "Competent")

You are great at inspiring and enticing people to action and people tend to enjoy your company. Sometimes though, there is not enough attention to detail and results will be different than expected. \($setLeadershipStyle: "Charming")

--- Turn: $Turn / $LastTurn Economy: $Economy / Infrastructure: $Infrastructure / Law: $Law Clever: $Explain / Competent: $Tell / Charming: $Sell Reserves: $Reserves / Integrity: $Integrity / Popularity: $Popularity Faction: $Faction / Admires: $Admire Allies: $Allies Opponents: $Opponents Rolls: $Rolls Modifiers: $Modifiers Promises: $Promises Choices: $Choices Known: $Known Conditions: $Conditions

(storylet: when true)(urgency:0)\ Welcome to Mars, Kelly! So happy that you have come. We have so much to do! Surely you will come to love Mars as much as I do! Mars is the great future of humanity and time will prove us right! I will send my PA to meet you at the spaceport and help you find your way to your quarters. When you are ready, come see me at the office. Lang

(storylet: when not ($visited: "See Tanya in Custody"))(urgency:1)\ The police arrested 28 year old ($topic: "Tanya Toropov") for illegal procreation, 5 months pregnant without a permit. The pregnancy was discovered after she had been calling in sick for two weeks and didn't show up for her monthly health check. She now faces forced abortion and community service.

##Ridley Lang On Mars, you will be working closely with Ridley Lang, the first mayor elected by the colony citizens. Lang's predecessor was installed by the Earth Coalition. Each of the five districts are represented in the Senate, the legislative branch of the colony. { (set: _question to "Which political party is Lang a member of?" ) (set: _options to (dm: "Conservatives", "The Conservatives. (display: \"Conservatives\")(set:$Faction to \"Conservatives\")", "Liberals", "The Liberals. (display: \"Liberals\")(set:$Faction to \"Liberals\")", "Socialists", "The Socialists. (display: \"Socialists\")(set:$Faction to \"Socialists\")" )) (set: _before to "You and Lang are both member of the same political party: ") (set: _after to " There is one more reason why you accepted the assignment... =><= [[Next->Family]] <== ") } (display: "Ask Question") ==> 2/5 <==

##Sam Parker You also have a brother who lives on Mars, Sam Parker. He migrated years ago and now lives with his family in District Five. { (set: _question to "What do you admire most about your brother?" ) (set: _options to (dm: "His attention to his children", "You admire his attention to his children. (set:$Admire to \"Kids\")", "His cheerfulness and resilience", "You admire his cheerfulness and resilience. (set:$Admire to \"Cheerfulness\")", "His resourcefulness and initiative", "You admire his resourcefulness and initiative. (set:$Admire to \"Initiative\")" )) (set: _before to "") (set: _after to " You can't wait to see him again! Time to leave Earth and go to Mars! =><= [[Next->Transit to Mars]] <== ") } (display: "Ask Question") ==> 3/5 <==

(storylet: when $Turn >= 0)\ The Conservatives seeks to maintain good relations with Earth to continue the long term investments and the well being of the citizens on Mars. Laws have been made for the common good and must be upheld least the colony succumbs into chaos.

(storylet: when $Turn >= 0)\ The Liberals believes that the colony should support its citizen in realising their full potential. A strong economy is the key to have the freedom to follow your dreams. The Earth is the past, Mars is the future of homo sapiens.

(storylet: when $Turn >= 0)\ The Socialists seeks to care for all of its citizens, to keep them safe and healthy. Good relations with Earth is key to continue the long term investments.

(storylet: when "Populists" is in $Topics)\ The Populists led by Doctor Leigh Stuart are in opposition and speaks loudly about everything that is wrong with the colony. They want independence from Earth.

##Landing As you approach Mars a message from Mayor Lang greets you. (text-style:"italic")[(display:"From Ridley Lang on Welcome")]($MarkAsRead:"From Ridley Lang on Welcome") When the landing capsule decompress, Mayor Lang's personal assistant greets you in person as the first in a crowd of many. After a short, hectic tour of the colony with many new faces and the physical discomfort of lower gravity and same mass, you finally get to your quarters for a moment of solitude. =><= (link-reveal-goto:"Great!", "Kelly's Quarters")[$AdvanceTurn] ==> 5/5 <==

(metadata: "faction", "None", "pronoun", "he")\ (storylet: when true)\ My brother. Sam is an electrical engineer. He lives with his wife and child in District Five. (unless: ($visited:"Dinner with Sam and family"))[I can't wait to see him again! ]

(metadata: "faction", "$Faction", "pronoun", "he")\ (storylet: when true)\ Mayor of the colony and head of the executive branch. Also owns Lang Pharma.

(storylet: when true)\ E pills or environment adaptation pills are designed to help the human body adjust to the lower gravity and different atmosphere of the colony.

(storylet: when true)(urgency:1)\ Dear Kelly, I'm so happy that you accepted the challenge. Mars is so much more than a job. It's the dream from generations past, it's the future of generations to come. And we are making it happen right here right now. Let me show you just how far we have come. Come to my place in District Four and I will give you a tour of ($topic: "Green Canyon"). I know all the members of the Earth Committee and can help you get your proposals through the committee. Looking forward to work with you, Arnold Fletcher Chairman of the Earth Committee

(storylet: when true)(urgency:1)\ Hi Kelly! This is Sam, I hope you arrived safely, it's quite a trip. Anyway, we can't wait to see you again. I know you have a job to do but swing by our place in District Five as soon as you can find time and meet the family. Natalia is so much looking forward to meet you! Hope to see you soon!

(storylet:when $Turn >=1)(urgency:2)\ Hey, this is Lang. Come in ''urgently'', we have a crisis brewing. I think I can handle it but you come with great recommendations so I'm looking forward to see what you can do. Anyway, I've sent Meriwether to come pick you up, he should be at your door anytime soon. Ps don't forget to take your e-pills, they will keep you healthy and ease the transition.

#Credits =><= Game design and development Frederik Jensen Playtesting Oskar Gewalli Ole Bundgaard Jensen Inspired by the game Mars Colony by Tim C. Koppang Built on Twine 2.0 (link-rerun:"twinery.org")[(open-url:"https://twinery.org")] Published by Thoughtful Games (link-rerun:"thoughtfulgames.com")[(open-url:"http://thoughtfulgames.com")] Copyright Frederik Jensen 2021 Version $Version $ReleaseDate Please report issues to mail@thoughtfulgames.com. Thank you for playing! <====> This is a work of fiction. Unless otherwise indicated, all the names, characters, businesses, places, events and incidents in this book are either the product of the author's imagination or used in a fictitious manner. Any resemblance to actual persons, living or dead, or actual events is purely coincidental. =><= $UndoButton

(metadata: "faction", "Socialists", "pronoun", "she")\ (storylet: when "Ursula Kaminski" is in $Topics)\ Foreman Ursula Kaminski from the workers union.

(metadata: "faction", "Conservatives", "pronoun", "she")\ (storylet: when "Yu Yan" is in $Topics)\ Managing Director of Mars Drilling.

(metadata: "faction", "Socialists", "pronoun", "he")\ (storylet: when "Neil Jackson" is in $Topics)\ Union representative, recently expelled from Mars Drilling. Large nose, pointy ears. Not a beauty queen but has a comforting voice.

(metadata: "faction", "None", "pronoun", "he")\ (storylet: when "Joe Mando" is in $Topics)\ Team Lead in Mars Drilling. Mando runs a mean team.

(storylet: when not ($visited: "Sick Children Resolved"))(urgency:1)\ ($topic:"Sarah Young"), the first child born on Mars, has been diagnosed with skin cancer, along with four other kids in District Five. Doctor ($topic:"Leigh Stuart") of the ($topic:"Populists") claims that the E pill is not effective for children born on Mars and demands that the colony increases spending on research into the unique challenges of Mars Generation One.

##Statement from Lang From a podium in the entry hall Mayor Lang gives a statement. "The E pill is well purposed also for Mars generations and the government program is well funded and monitors the health of all citizens." "Our recent changes to the ($topic:"Procreation laws") will ensure that future marsborn babies are the healthiest babies in the world." "Extensive license program and regulations have been introduced to screen potential parents and prevent unfit pregnancies." (t8n:"fade-up")+(link-replace: "Lang takes a question...")[==\ Lang takes a question from a journalist in the back: "Critics say that the procreation laws will keep the colony dependent on immigration from Earth for a long time. We are already lacking skilled professionals in almost every sector. What do you plan to do about this?" A journalist spots you and interrupts Lang's answer by asking you: "Kelly: how do we ensure we have skilled workers in every sector?" "Should we base our economy on immigration or on marsborn humans?" |Q1>[{ <ul> <li>(link-reveal: "Immigration")[(show:?A1-1)(hide:?Q1)] <li>(link-reveal: "Marsborn")[(show:?A1-2)(hide:?Q1)] <li>(link-reveal: "...")[(show:?A1-3)(hide:?Q1)] </ul> }]\ |A1-1)["We should base our economy on immigration." "Right now the only way is to have more immigration since it takes at least 30 years to get a new skilled martian worker." (show:?Next1)]\ |A1-2)["We should base our economy on marsborn humans." "We will of course depend on Earth and on immigration for a long time still. But in the long run, to earn our independence and freedom, we must make Mars place where people will want to live. A place where people find love, build families, raise kids, and live to see their grandchildren and great grandchildren take their first steps into the Martian sand." "We will only truly have made man a two planet species when homo sapiens have evolved into homo sapiens martiensis." (show:?Next1)]\ |A1-3)["Let me think about that for a while and get back to you."(show:?Next1)]\ |Next1)[==\ (t8n:"fade-up")+(link-replace: "The room is silent...")[==\ The room is silent for a moment as people take in your answer. Mayor Lang has used the opportunity to leave and is nowhere to be seen. Meriwether takes the podium and closes the press briefing. =><= [[Ok->Sick Children Deal With It]] <==

{ (if: "intro" is in (passage:)'s tags)[\ --- <== |= (link-reveal-goto:"Skip intro", "Kelly's Quarters")[$AdvanceTurn] =|= =><= [[Credits]] =| ==> [[Options]] |==| ](else-if: "location" is in (passage:)'s tags)[ --- <== |= (if: $YouGotMail)+(text-style:"fade-in-out")[ [[Mail]] ](else:)[ [[Mail]] ] =|= =><= [[Notes]] =| ==> [[Options]] |==| ] }

##Options (enchant: ?Link, (button:)) =><= (if:$Turn is 0)[(button:)+(link-rerun:"Start over")[(restart:)] ](else:)[(button:)[[Resign->The End]]] (button:)+(link-rerun:"Load game")[{ (if:(saved-games:) contains "Slot A")[ (load-game: "Slot A") ](else: )[ (set: _message to "Sorry, no saved game could be found.") (show: ?Message) ] }] (button:)+(link-rerun:"Save game")[{ (if:(save-game: "Slot A"))[ (set: _message to "Game saved!") ](else: )[ (set: _message to "Sorry, I couldn't save the game.") ] (show: ?Message) }] (button:)[[Help]] (button:)[[Credits]] (button:)(link-goto:"Back", (history:)'s last) <== |Message)[ =><= //_message// <== ] (set: _message to "")

TODO (set: $Infrastructure to it +1) (set: $Law to it + 1) "So has anyone listened to what the workers says?" "The workers probably don't think so. They are angry with you for allowing Mars Drilling to let one of their most vocal representatives be transferred to another company." Sam Parker on Energy consumption Sam calls you: Not much I can do about the license fees. On the energy consumption, dependent on what is being produced we need something like 20% of the colony energy output while the production is ongoing. Currently that means shutting down either basic facilities or stopping production elsewhere like on the drilling or construction sites. Are basic facilities up and running at all time? "People like to have hot water, fresh air and light." Are drilling and construction sites running at all time? Could they have scheduled down time in order to enable the use of the replicator? "They follow a schedule already. Don't know how well it works. We could also pick up on one of the energy research projects that was stalled." Could Sam investigate the schedule so that Kelly can go and investigate the energy research project? Ok Later: Sam beeps you. I have looked into the energy schedule for the replicator. ... Sam Parker on Research project Sam: "It's a mess." "I tried to find out how it works and found some old documents of the procedure. But when I talked to some guys in Mars Energy over in District Three, they said that is not at all how they do it." "How do they do it?" "Essentially the operator at the replicator calls out three days in advance and then Mars Drilling, Mars Construction and the Districts need to come back with a plan for reduced consumption but that doesn't happen and it's for the guys on duty at Mars Energy to decide what to switch off and they do that sort of randomly after who they think won't complain." "As the replicator sort of gets blamed for all outages, they are very hesitant to use it at all." "Are people at Mars Drilling and Mars Construction working 24 h shifts?" "Yes, except they are not actually drilling 24 hours and 37 minutes a day." "Each shift has an extensive safety routine and equipment check." "Can these be planned to coincide with using the Replicator?" "Probably. Though the Replicator typically requires quite long hours to do anything but very basic stuff" Perhaps you could do overlapping shifts if some of the teams agreed to start early. So there is a need for more energy overall. "The replicator can always use more energy. Assuming license fees are paid and staff is available." What do you want to build? Is there fuel to be had locally? What kind of fuel? "The colony uses a combination of solar and nuclear energy. Uranium, thorium deposits." Unless can use the replicator to jumpstart solar panel industry. "Can the replicator create solar panel factory parts?" "Don't know exactly what have been looked into and what have been found out, as far as I know, there are deposits on Mars that can be mined and used for nuclear energy." "The replicator can do both solar panels and parts for a nuclear reactor." "So could you then start look into it? What makes most sense?" "I expect it will be too expensive to use the replicator for most of the stuff even with the license and energy issues sorted out but I will look into it." "A new reactor will need a good location as well." "A lava tube could be good but I guess they will all be off limits before the (lowercase: ($topic: "Spoon diggers")) have checked them out now." "But not all of the tubes have markings?" "I guess you need a tube close to the colony or maintenance will be expensive. Then again, people tend to not like living on top of a reactor. But you are the expert on paperwork and policies." > What do you do? Start negotiations with Earth about waiving the license fees due to the circumstances and the need to bootstrap the colony So... what do you do? Having companies reapply patents in a different region is not nationalisation of private property It can be used as a fund for the colonisation effort "Well, as long as you can get a majority in both chambers you can call it what you want." "Do you want to push for new legislation on patents that will allow operating the replicator with a license cost limited by law?" Yes Or not limited, but initially limited. Fletcher is of the opinion that this is nationalisation of private property just under a new name so will oppose the proposal. You were talking quite rational and merely differ on fundamental principle. Ethos plus one for Fletcher being an ally. If you try to convince Fletcher by saying it's the right thing to do, roll 2d6+2 > Convince Fetcher to change the law 6, a miss. I get to choose Minus one Integrity, loose Fletcher as an ally After your conversation with Fletcher, in spite of Fletchers hesitation, you move to propose a law change. It passes the Senate as both the Socialists and Populists support it However, on its way through the Earth Committee it is rebounded several times by both Fletcher and Lee on technical changes, a process that leads you do defending a version of the proposal in a public hearing where you contradict the terms of your contract with the Earth Coalition that you signed before leaving. A point about not setting short term colony interests over the long term interests of the Earth Coalition. Fletcher even gets a question from a reporter with a reference to the initial backing of your assignment. If Fletcher still believes that Kelly is the best candidate for the job, a question that is left unanswered. So where is Kelly's loyalty? With Earth or with the Mars Colony? Could be torn? Maybe the final chapters of Kelly's story as special advisor on Mars will reveal the answer. Kelly attempted to pass legislation to change the laws regulating the use of the replicator. The proposal did not pass and you lost Fletcher as an ally in the process.

Have the police accompany one of the scientists in securing the artefact. Let a police officer accompany one of the scientist when dealing with the artefact at all times. So ten, a success! Joe Mando trusts you that this is the right thing to do. The artefact is willingly handed over to the spoon diggers and the spoon diggers are escorted at all times by a police officer. Ok, cool. That is what happens. We leave it as possible and disputed. So Anna Coleman and the team of spoon diggers examines the artefact and can't immediately falsify it. A request for funding further study including bringing in experts from Earth quickly pass both chambers. The lava cave is sealed and Yu Yan is not pleased. Productivity is still low and in the cover over the news of the possible alien artefact, Yu Yan announces layoffs. Entering negotiations with the union.

TODO You ask Meriwether help you find the files. Many research projects have been started in the early years of the colony including thermal energy and chemical processes using local minerals. One by one they have been closed down. >Why? Lack of progress, funding has been diverted, key researchers returning to Earth. Then you find a project that is not closed. Project Nebula. Funding has been approved, preliminary results are promising. There has just not been any progress the last one and a half year. Nothing recent in the files about it but there is contact details for researchers on Earth. You pull some strings with old contacts back on Earth. It turns out that the next stage is a proof of concept on Mars. Sounds good, what can we do? Funding was approved more than one year ago. But no one has applied for the position. Why is that? None qualified on Mars, none applied from Earth. Can I ask for favours from friends on Earth to get help from scientists there? They talk to Adrian, one of the most active researchers on the project. Adrian got a child recently. Barbara, another researcher, is concerned about the procreation laws and the health risk. Claire said yes to an offer in a private company. So if we can remove the procreation laws and the health risks, there could be progress? Do you ask Barbara to apply for the job and say that the Colony will fix the procreation laws and that having babies on Mars are perfectly safe? Not yet, let's not promise things we don't know.

(storylet: when ($location:"Kelly's Quarters") and not ($visited:"Strike at Mars Drilling"))(urgency:2)\ (after: 10s)[(t8n:"dissolve")+(link-reveal: "Knock, knock.")[ You answer the door. It's Meriwether, Lang's personal assistant. There is a crisis brewing, Lang asks if you want to come? * [[Follow Meriwether to the mayor's office->Strike Follow Meriwether]]] ]

##Help To help the colony thrive, Kelly needs to solve a number of political issues or dilemmas. Often there are no good choices. Make up your mind and find a way to influence someone to support the change you want the colony to make. If at first you don't succeed, try something else. Here is how you can find out what is going on in the colony: \ * Explore the colony * Read your mail * Follow the news * Review your notes \ When your time on Mars runs out, you will learn if the colony prosper or die, and how Kelly Parker's term as Special Advisor is remembered in the history books. Unlike real life, you can always play the game again and see if you do better next time. $UndoButton

##Persuade Yu Yan You decide to persuade the CEO of Mars Drilling Yu Yan to rehire the union representative and then let the police handle the criminal investigation. { (set: _someone to "Yu Yan") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is in her best interest", "Tell", "Tell Yu Yan that this is the right thing to do", "Sell", "Praise her for fighting so hard for Mars Drilling to succeed" )) (set: _afterMiss to "Strike at Mars Drilling") (set: _afterHit to "Strike Avoided") (set: _hitEffect to "(set: $Economy to it + 1)($set:\"Strike Avoided\")") (display: "Influence Someone") }

(storylet: when ($location:"The Mayor's Office") and not ($visited: "Strike at Mars Drilling"))(urgency:2)\ (link-reveal: "Mayor Lang is here.")[ "Hi Kelly, so you got my message? I knew you would want to get started right away. " "I sent ($topic: "Meriwether Lewis") to help you find your way around. " * [[Follow Meriwether to the Mayor's office->Strike Follow Meriwether]] ]

{ (set: $Turn to it +1) (if: $Turn>$LastTurn)[(goto:"The End")] (if: $Popularity<=0)[(goto:"The End")] (if: $Integrity<=0)[(goto:"The End")] (if: $Reserves<=0)[(goto:"The End")] (if:$Trial)+(if:$Turn>=3)[(goto: "The End")] ($CheckMail:) (display: "Run Timers") }

{  (set: $Trial to false) (set: $Version to "0.9.0") (set: $ReleaseDate to "7 November 2021")  (set: $AdvanceTurn to (display: "Advance Turn")) (set: $WhatDoYouDo to (display: "What do you do?")) (set: $DefaultKelly to (display: "Default Kelly")) (set: $WhereDoYouWantToGo to (display: "Where do you want to go?")) }

##Convince Foreman Ursula You think you can get the union representative some other job and have the company save face by not trying to challenge them on their decision, but get them to punish the ones really responsible for the theft. For this to work, you need to convince Foreman Ursula Kaminski to accept that Neil Jackson is not rehired. { (set: _someone to "Ursula Kaminski") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is the best solution", "Tell", "Tell Ursula that this is the best she can get", "Sell", "Praise her for how well she is doing her job" )) (set: _afterMiss to "On Strike!") (set: _afterHit to "Strike Avoided") (set: _hitEffect to "(set: $Economy to it + 1)($set:\"Strike Avoided\")") (display: "Influence Someone") }

##Let Lang handle it You decide to let Mayor Lang handle the strike. You excuse yourself. For a moment Lang looks surprised then panic sets in. $AdvanceTurn \($set: "Workers On Strike!") $WhatDoYouDo

##Names for inspiration { (set: _linebreak = " ") (set: _names = (split: _linebreak, "Maria Gelli Feng Li Ron Calderon Tafit Mahmudi Teruwo Sakuma Hanna Meyhoff Phil Valore Veronica Da Silva Alexandra Gauss Simon Lebedinets" )) (for: each _name, ...(subarray:(shuffled: ..._names),1,8))[ _name ] } [[Shuffle names->Names for inspiration]]

(if: ($true: "Workers On Strike!"))[\ ##Strike called off The union calls off the strike and workers return to their jobs. You have successfully helped the colony resolve the situation at Mars Drilling. Well done! ($unset: "Workers On Strike!") \](else:)[\ ##Strike at Mars Drilling avoided You have successfully helped the colony avoid a strike at Mars Drilling. Well done! \] $WhatDoYouDo

(storylet: when ($visited:"Strike at Mars Drilling") and ($true:"Workers On Strike!"))(urgency:2)\ (after: 4s)[(link-reveal: "Lang calls.")[ "Hi Kelly, I really need your help..." "The workers are on strike and the shit has hit the fan." * [[Help Lang->Strike at Mars Drilling]] ]]

(storylet: when ($true: "Workers On Strike!"))(urgency:2)\ A strike began today at Mars Drilling after the company had dispelled a union representative on accusations of theft. Foreman ($topic: "Ursula Kaminski") from the union says that no one is guilty until proven in court and that she is sure the accusations are wrong. One team is still working, lead by a Mr. ($topic: "Joe Mando"). This lead to tense moments as workers on strike tried to block Mr. Mando's team from going to the drill site. Blows were exchanged and the police had to separate the two sides. ($addNote: "Mars Drilling", "Blows were exchanged as workers on strike tried to block Joe Mando's team. ")

##Kelly Parker You accept the assignment, a unique opportunity to make a difference. Each of the nations in the Earth Coalition has appointed representatives on Mars. These make up the Earth Committee which approves the budget for the colony. The chairman of the committee, Arnold Fletcher has recommended you personally for the position. { (set: _question to "What was the reason?" ) (set: _options to (dm: "You are strong at building logical arguments", "Clever Kelly", "You project an aura of competence", "Competent Kelly", "You connect emotionally with people", "Charming Kelly" )) (set: _before to "Arnold Fletcher recommended you for a reason: ") (set: _after to " =><= [[Next->Political Faction]] <== ") } (display: "Ask Question") ==> 1/5 <==

{  (set: _answer to "") |Question>[_question <ul> (for: each _option, ...(dataentries: _options))[ <li>(link: _option's name)[ (set: _answer to (str: _option's value))(hide:?Question)(show:?Answer) ]</li> ]</ul> ] |Answer)[_before ($display: _answer) _after ] }

(metadata: "faction", "Liberals", "pronoun", "he")\ (storylet: when true)\ Chairman of the Earth Committee which approves the budget of the colony. Lives in District Four.

{ (set: array-type $Rolls to (a:)) (set: array-type $Modifiers to (a:)) (set: $rollDice to (macro: [ (set: _roll to (random: 1,6) + (random: 1,6)) [(set: $Rolls to (a: _roll,...$Rolls))] (output-data: _roll) ])) (set: $interpretResult to (macro: num-type _result, [ (output-data: (cond: _result >= 10, "Hit", _result >= 7, "Partial Hit", "Miss" )) ])) (set: $tryExplain to (macro: str-type _other, str-type _stance, [ (set: _roll to ($rollDice:)) (set: _otherFaction to ($faction: _other)) (set: _isSameFaction to (cond: $Faction is _otherFaction, 1, 0)) (set: _isOpponent to (cond: $Opponents contains _other, 1, 0)) (set: _isLiberal to (cond: _otherFaction is "Liberals", 1, 0)) (set: _isPopulist to (cond: _otherFaction is "Populists", 1, 0)) (set: _dontLikeIt to (cond: _stance is "dont like it", 1, 0)) (set: _modifier to $Explain + _isLiberal + _isSameFaction - _isOpponent - _dontLikeIt - _isPopulist) [(set: $Modifiers to (a: _modifier,...$Modifiers))] (set: _result to _roll + _modifier) (output-data: ($interpretResult: _result)) ])) (set: $tryTell to (macro: str-type _other, str-type _stance, [ (set: _roll to ($rollDice:)) (set: _isAlly to (cond: $Allies contains _other, 1, 0)) (set: _isOpponent to (cond: $Opponents contains _other, 1, 0)) (set: _isConservative to (cond: ($faction: _other) is "Conservatives", 1, 0)) (set: _dontGetIt to (cond: _stance is "dont get it", 1, 0)) (set: _modifier to $Tell + _isConservative + _isAlly - _isOpponent - _dontGetIt) [(set: $Modifiers to (a: _modifier,...$Modifiers))] (set: _result to _roll + _modifier) (output-data: ($interpretResult: _result)) ])) (set: $trySell to (macro: str-type _other, str-type _stance, [ (set: _roll to ($rollDice:)) (set: _isSocialist to (cond: ($faction: _other) is "Socialists", 1, 0)) (set: _dontGetIt to (cond: _stance is "dont get it", 1, 0)) (set: _modifier to $Sell + _isSocialist - _dontGetIt) [(set: $Modifiers to (a: _modifier,...$Modifiers))] (set: _result to _roll + _modifier) (output-data: ($interpretResult: _result)) ])) }

{ (set: _leaveOptions to (dm: "The Mayor's Office", (a: "Go to the Mayor's Office", "Go to the Mayor's Office and see what's going on", "Go to the Mayor's Office", "Go to the Mayor's Office and see what Lang is doing", "Go see what Lang is doing", "Go to the Mayor's Office", "Go to the Mayor's Office"), "The Hub", (a: "Go to the Hub", "Go to the Hub and explore the city", "Go to explore the city", "Go to the Hub", "Go to the Hub and grab something to eat", "Go to the Hub"), "Kelly's Quarters", (a: "Go back home", "Go home", "Go home and get some sleep", "Go home", "Go home and take a quick shower", "Go home", "Go home and exercise", "Go home") )) (set: _stayputOptions to (dm: "The Mayor's Office", (a: "Hang around for a while", "Hang around for a while and see what happens"), "The Hub", (a: "Hang around for a while", "Grab some lunch and check the news", "Hang around for a while and see what happens"), "Kelly's Quarters", (a: "Order pizza and call in sick", "Watch Mars attacks! on the telly", "Catch up on that status report for the Earth Committee", "See what's on tv") )) }\ ###What do you do? { <ul> (for: each _option, ...(dataentries: _leaveOptions))[{ (if: (passage:)'s name is not _option's name) [ <li>(link-goto: (nth: visit, ... _option's value), (str: _option's name))]}] (if:$Turn > 1) + (if: (passage:)'s name is in (a: "The Mayor's Office", "The Hub", "Kelly's Quarters"))[\ <li>(link-reveal-goto: (nth: visit, ...(passage:)'s name of _stayputOptions), (passage:)'s name)[$AdvanceTurn]] </ul> }

(metadata: "faction", "None", "pronoun", "he")\ (storylet: when true)\ Lang's personal assistent.

(metadata: "faction", "Populists", "pronoun", "she")\ (storylet: when ($discovered:"Leigh Stuart"))\ Doctor Leigh Stuart heads up the Populists and is a member of the Senate. Runs a hospital and an orphanage.

(metadata: "faction", "Socialists", "pronoun", "she")\ (storylet: when ($discovered: "Elena Parker"))\ Sam's wife.

(metadata: "faction", "None", "pronoun", "she")\ (storylet: when ($discovered:"Sarah Young"))\ The first child born on Mars who is now 11.

{ (set: str-type $Faction to "None") (set: $setLeadershipStyle to (macro: str-type _style, [ (set: $Explain to (cond: _style is "Clever", +2, _style is "Competent", 0, _style is "Charming", 0, +1 )) (set: $Tell to (cond: _style is "Clever", +1, _style is "Competent", +2, _style is "Charming", 0, +1 )) (set: $Sell to (cond: _style is "Clever", 0, _style is "Competent", +1, _style is "Charming", +2, +1 )) (output:)[] ]))  (set: $popularityAsString to (macro: [ (output:)[(cond: $Popularity is 3, "The people in the colony loves me! ", $Popularity is 2, "Most people in the colony like me. ", $Popularity is 1, "People in the colony don't like me. ", "People despise me and blame me for everything that is wrong in the colony. ")] ]) ) (set: $integrityAsString to (macro: [ (output:)[(cond: $Integrity is 3, "I'm here to help the colony thrive. How awesome is that? ", $Integrity is 2, "Lying is part of politics, right? I don't like it but it gets the job done. ", $Integrity is 1, "Lying is part of politics, right? Everyone knows that and I'm good at it. ", "I don't know why I am here any more. ")] ]) ) (set: $budgetAsString to (macro: [ (output:)[(cond: $Reserves is 3, "The government has a decent reserve for unforeseen expenses. ", $Reserves is 2, "The government reserve for unforeseen expenses is running low. ", $Reserves is 1, "The government reserve for unforeseen expenses is running dangerously low. ", "The government is bankrupt. ")] ]) ) (set: $healPopularity to (macro: [ (if:$Popularity < 3)[(set:$Popularity to it + 1)] (output:)[] ]) ) (set: $healIntegrity to (macro: [ (if:$Integrity < 3)[(set:$Integrity to it + 1)] (output:)[] ]) ) (set: $healReserves to (macro: [ (if:$Reserves < 3)[(set:$Reserves to it + 1)] (output:)[] ]) ) (set: $choose to (macro: str-type _choice, [ (set: $Choices to it + (ds:_choice)) (output:)[] ]) ) (set: $chosen to (macro: str-type _choice, [ (output-data: _choice is in $Choices) ]) ) (set: $learn to (macro: str-type _hint, [ (set: $Known to it + (ds:_hint)) (output-data: _hint) ]) ) (set: $known to (macro: str-type _hint, [ (output-data: _hint is in $Known) ]) ) (set: $promise to (macro: str-type _promise, [ (set: $Promises to it + (ds:_promise)) (output:)[] ]) ) (set: $fulfill to (macro: str-type _promise, [ (set: $Promises to it - (ds:_promise)) (output:)[] ]) ) (set: $promised to (macro: str-type _promise, [ (output-data: _promise is in $Promises) ]) ) }

(metadata: "faction", "$Faction", "pronoun", "she")\ (storylet: when true)\ Me. I was appointed Special Advisor to the mayor of the colony by the Earth Coalition. ($inventoryAsString:)($integrityAsString:)($popularityAsString:)

(storylet: when "Mars Drilling" is in $Topics)\ The colony mining company. Second largest employer on Mars in terms of number of workers. Run by Yu Yan.

(storylet: when "Union" is in $Topics)\ The Union represents the workers in companies on Mars. The Foreman is Ursula Kaminski of the Socialists.

(storylet: when $Turn >= 1)\ The company that produces E pills. Owned by Mayor Ridley Lang.

(storylet: when "Green Canyon" is in $Topics)\ Luxury flats under construction in District Four.

(metadata: "faction", "None", "pronoun", "she")\ (storylet: when ($discovered:"Tanya Toropov"))\ 28 year old. 5 months pregnant without a permit.

(storylet: when ($discovered:"M-Sec"))\ The colony security and police force. The head of the police is Rawan Tahir.

(metadata: "faction", "Conservatives", "pronoun", "he")\ (storylet: when ($discovered:"Rawan Tahir"))\ Head of M-Sec, the colony security and police force.

(storylet: when ($discovered:"Mars Shipping"))\ Monopoly for lifting anything off the surface of Mars. Owned by Lee Hatting.

(metadata: "faction", "Conservatives", "pronoun", "he")\ (storylet: when ($discovered:"Lee Hatting"))\ Conservative. CEO of Mars Shipping. Member of the Earth Committee.

(storylet: when ($discovered:"Mars Construction"))\ Mars Construction is a construction company run by Kirin Nanyonga.

(metadata: "faction", "Socialists", "pronoun", "he")\ (storylet: when ($discovered:"Kirin Nanyonga"))\ CEO of Mars Construction.

(storylet: when ($discovered:"Replicator"))\ The Colony Replicator can create exact copies of complex components at a significant cost in energy and license fee.

(storylet: when ($discovered:"24:37"))\ A popular talkshow. The show's title is a reference to the fact that a day on Mars is 24 hours and 37 minutes. (if: ($visited: "Kelly at 24:37 completed"))[I was a guest there! ]

(storylet: when $Turn >= 2 and $Turn <= 8 and not ($visited: "Kelly at 24:37 story") and ($location:"The Mayor's Office"))\ Kelly is invited to the talk show ($topic: "24:37") to talk about the person behind the Special Advisor to the colony. * [[Accept invitation->Kelly at 24:37 story]]

(set: _stayLonger to false) ##Kelly at 24:37 Kelly is invited to the popular talk show 24:37. "Welcome to 24:37, the show that invites you to get to know the person behind a public face of the people in the colony." "This week we have invited in Kelly Parker, Special Advisor to the colony." "Kelly, how do you like the colony so far?" (t8n:"fade-up")+(link-replace: "It's inspiring...")[==\ "It's inspiring to be a part of this colony. I find it a very different experience compared to my previous assignments. The (either: "grand", "magnificent") architecture of the colony is striking and pleasing against the emptiness of the landscape surrounding it." (t8n:"fade-up")+(link-replace:"What do...")[==\ "What do people on Earth say about the colony?" (t8n:"fade-up")+(link-replace: "They are curious...")[==\ "The people on Earth are intensely curious. I've heard many adventurous people wanting to go and help with the colonisation effort." "I have a brother here who joined the colony some ten years ago so I thought had a good idea of what life here was like and I was eager to experience it for myself in spite of leaving close friends and relatives behind." (t8n:"fade-up")+(link-replace:"We are happy...")[==\ "We are very happy that you are here and have great hopes for what we can achieve together. Your assignment is for one Mars year. Do you see yourself staying longer?" [{<ul> <li>(link-replace: "Yes")[(show:?A1-1)(hide:?Q1)(show:?2)] <li>(link-replace: "No")[(show:?A1-2)(hide:?Q1)(show:?2)] <li>(link-replace: "Maybe")[(show:?A1-3)(hide:?Q1)(show:?2)] </ul>}]<Q1|\ ["Yes, definitely. It is very inspiring to work for the future of humanity."(set: _stayLonger to true)($choose:"Stay on Mars")](A1-1|\ ["No. I'm here to do a job. After that I will return to Earth."(set: _stayLonger to false)](A1-2|\ ["I hope that I'll find my place here so that I can stay longer."(set: _stayLonger to true)](A1-3| |2)[==\ (if: _stayLonger)[(link-replace: "I'm sure you...")["I'm sure you will find your place here in the colony. Do you see yourself raising children on Mars?" [{<ul> <li>(link-replace: "Yes")[(show:?A2a-1)(hide:?Q2a)(show:?3)] <li>(link-replace: "No")[(show:?A2a-2)(hide:?Q2a)(show:?3)] <li>(link-replace: "Maybe")[(show:?A2a-3)(hide:?Q2a)(show:?3)] </ul>}]<Q2a|\ ["Yes, absolutely! When the time is right, with the right partner, and with the required permissions, I would love to raise a family on Mars just as everyone else."($choose:"Have kids")](A2a-1|\ ["No, alas not. I have chosen to leave that responsibility to someone else, my brother for example.(if: $Admire is "Kids")[ He does a great job.]"](A2a-2|\ ["I've yet to find a partner. The workload has thus far prevented me from finding anyone."($addNote: "Kelly Parker", "I'm single. ") "Well, a lot of potential partners out there are listening and more people are coming from Earth every day so I'm sure you will find someone special for you one day."](A2a-3| ]\ ](else:)[(link-replace: "I'm sure you...")["I'm sure you will do a great job here. Sounds like there is something -- or perhaps someone? -- very special waiting for you back on Earth? [{<ul> <li>(link-replace: "Someone")[(show:?A2b-1)(hide:?Q2b)(show:?3)] <li>(link-replace: "Something")[(show:?A2b-2)(hide:?Q2b)(show:?3)] </ul>}]<Q2b|\ ["Yes, there is someone very special waiting for me when I come home."($addNote: "Kelly Parker", "There is someone special waiting for me back on Earth. ")](A2b-1|\ ["Yes, there is something very special waiting for me when I come back to Earth."](A2b-2|\ ]\ ] |3)[==\ (t8n:"fade-up")+(link-replace:"We wish you...")[\ "We wish you all the best! Thanks for taking time to join us on the show." "Thanks! I enjoy being on Mars and I enjoyed visiting your show." =><= (link-reveal-goto:"Leave", "Kelly at 24:37 completed")[(if: _stayLonger)[($healPopularity:)](else:)[($healIntegrity:)]] <== ]

(storylet: when true)\ The legislative branch of the colony, elected from the five districts.

(storylet: when true)\ The representatives on Mars of the nations in the Earth Coalition. The chairman of the Earth Committee is Arnold Fletcher.

(storylet:when true)\ The nations on Earth who together constructed the colony.

(storylet: when true)\ The executive branch of the colony. ($budgetAsString:)

[{  (assert: (passage: _someone)'s tags contains "person" ) (set: str-type _result = "", str-type _approach = "") |Prompt>[ ###What do you do? <ul> <li>(link: "Explain" of _prompt)[ (set: _approach to "Explain") (set: _result to ($tryExplain: _someone, _stance)) (show:?Result)(hide:?Prompt) ]</li> <li>(link: "Tell" of _prompt)[ (set: _approach to "Tell") (set: _result to ($tryTell: _someone, _stance)) (show:?Result)(hide:?Prompt) ]</li> <li>(link: "Sell" of _prompt)[ (set: _approach to "Sell") (set: _result to ($trySell: _someone, _stance)) (show:?Result)(hide:?Prompt) ]</li></ul> ] |Result)[{ (display: (passage:)'s name + " " + _approach) (set: _link to (cond: _result is "Miss", "Try something else", "Great!" ), _goto to (cond: _result is "Miss", _afterMiss, _afterHit) ) } =><= (link-reveal-goto: _link, _goto)[ (if: _result is "Miss")[ ($sourRelation: _someone) ](else:)[ _hitEffect ] $AdvanceTurn ] <== ] }]

Running tests... (for: each _passage, ...(passages:))[\ (if: _passage's tags contains 'test')[\ (if: _passage's tags contains 'skip')[\ Skipping (str: _passage's name) ](else:)[\ Running (str: _passage's name)... (display:_passage's name)\ ]]\ \] Test run completed.

(metadata: "faction", "Populists", "pronoun", "he" )\ (storylet: when ($discovered: "Populist Testesen"))\ Ready for adventures!

{ (display: "Mock rollDice") ($setLeadershipStyle: "Clever") (set: $Faction to "Socialists") (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Partial Hit", "8", "Partial Hit", "9", "Partial Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Explain", "Populist Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Partial Hit", "7", "Partial Hit", "8", "Partial Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Explain", "Populist Testesen", "dont get it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Partial Hit", "6", "Partial Hit", "7", "Partial Hit", "8", "Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Explain", "Socialist Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Partial Hit", "5", "Partial Hit", "6", "Partial Hit", "7", "Hit", "8", "Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Explain", "Socialist Testesen", "dont get it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Partial Hit", "6", "Partial Hit", "7", "Partial Hit", "8", "Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Explain", "Liberal Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Partial Hit", "5", "Partial Hit", "6", "Partial Hit", "7", "Hit", "8", "Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Explain", "Liberal Testesen", "dont get it", _expectedResults) $DefaultKelly (display:"Define Influence") }

(metadata: "faction", "Socialists", "pronoun", "he")\ (storylet: when ($discovered: "Socialist Testesen"))\ Not much to say.

{ (for: each _passage, ...(passages:))[ (if: _passage's tags contains "person")[ (set: _person to _passage's name) (if: (datanames: _passage)contains "faction")[ (set: _faction to ($faction: _person)) (if: _faction is not in $KnownFactions)[ _person has unknown faction _faction ] ](else:)[ _person does not have a faction assigned ] (if: (datanames: _passage)contains "pronoun")[ (set: _pronoun to ($pronoun: _person)) (if: _pronoun is not in (a: "he", "she", "it"))[ _person has unknown pronoun _pronoun ] ](else:)[ _person does not have a pronoun assigned ] ] ]  (set: str-type _defaultFaction to $Faction, str-type _expected to "", str-type _faction to "") (for: each _person, ... (a: "Kelly Parker", "Ridley Lang"))[ (set: _expected to _defaultFaction) (set: _faction to ($faction: _person)) (if: _faction is not _expected)[ _person has unexpected faction _faction, expected _expected ] (set: _expected to "Rebels") (set: $Faction to _expected) (set: _faction to ($faction: _person)) (if: _faction is not _expected)[ _person has unexpected faction _faction, expected _expected ] (set: $Faction to _defaultFaction) ] }

(metadata: "faction", "Liberals", "pronoun", "he")\ (storylet: when ($discovered: "Liberal Testesen"))\ Not much to say. Really.

{ (set: $isPerson to (macro: str-type _maybeSomeone, [ (output-data: (passage: _maybeSomeone)'s tags contains "person" ) ])) (set: $faction to (macro: str-type _someone, [ (output-data: (cond: _someone is "Ridley Lang", $Faction, _someone is "Kelly Parker", $Faction, (passage: _someone)'s "faction" )) ])) (set: $factionAsString to (macro: str-type _someone, [ (set: _faction to ($faction: _someone)) (output-data: (cond: _faction is "None", "", (substring: _faction, 1, -2) + ". " )) ])) (set: $opinionAboutMe to (macro: str-type _someone, [ (set: _pronoun to ($pronoun: _someone)) (output-data: (upperfirst: (cond: _someone is in $Opponents, _pronoun + " doesn't like me. ", _someone is in $Allies, _pronoun + " trusts me. ", "" ))) ]))  (set: $pronoun to (macro: str-type _someone, [ (output-data: "he" ) ])) }

{ (set: num-type $Economy to 0, num-type $Infrastructure to 0, num-type $Law to 0 ) (set: const-type $KnownFactions to (a: "Socialists", "Conservatives", "Liberals", "Populists", "None" ))  (set: $progress to (macro: [ (set: _progress to $Economy + $Infrastructure + $Law) (if: _progress > $MaxProgress)[(error: "Progress " + _progress + " is above 100!")] (set: _result to (trunc:(_progress * 100)/$MaxProgress)) (output-data: _result) ])) }

(set: $testRun to (macro: str-type _approach, str-type _someone, str-type _stance, dm-type _expectedResults, [ (output:) [{ (for: each _roll, ...(range: 2, 12))[ (set: _expected to (str:_roll) of _expectedResults) (set:$MockRoll to _roll) (set: _actual to (cond: _approach is "Explain", ($tryExplain: _someone, _stance), _approach is "Tell", ($tryTell: _someone, _stance), _approach is "Sell", ($trySell: _someone, _stance), (error: "Unknown approach: " + _approach) )) (if: _actual is not _expected)[ Expected _expected, was _actual : Approach was _approach, roll was _roll, someone was _someone, stance was _stance ] ] }] ]))

{ (display: "Mock rollDice") ($setLeadershipStyle: "Clever") (set: $Faction to "Socialists") (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Partial Hit", "7", "Partial Hit", "8", "Partial Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Tell", "Populist Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Partial Hit", "8", "Partial Hit", "9", "Partial Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Tell", "Populist Testesen", "dont get it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Partial Hit", "6", "Partial Hit", "7", "Partial Hit", "8", "Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Tell", "Conservative Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Partial Hit", "7", "Partial Hit", "8", "Partial Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Tell", "Conservative Testesen", "dont get it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Partial Hit", "7", "Partial Hit", "8", "Partial Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Tell", "Liberal Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Partial Hit", "8", "Partial Hit", "9", "Partial Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Tell", "Liberal Testesen", "dont get it", _expectedResults) $DefaultKelly (display:"Define Influence") }

(metadata: "faction", "Conservatives", "pronoun", "he")\ (storylet: when ($discovered: "Conservative Testesen"))\ Not much to say. At all.

{ (display: "Mock rollDice") ($setLeadershipStyle: "Clever") (set: $Faction to "Socialists") (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Partial Hit", "8", "Partial Hit", "9", "Partial Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Sell", "Populist Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Miss", "8", "Partial Hit", "9", "Partial Hit", "10", "Partial Hit", "11", "Hit", "12", "Hit")) ($testRun: "Sell", "Populist Testesen", "dont get it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Partial Hit", "8", "Partial Hit", "9", "Partial Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Sell", "Conservative Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Miss", "8", "Partial Hit", "9", "Partial Hit", "10", "Partial Hit", "11", "Hit", "12", "Hit")) ($testRun: "Sell", "Conservative Testesen", "dont get it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Partial Hit", "7", "Partial Hit", "8", "Partial Hit", "9", "Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Sell", "Socialist Testesen", "dont like it", _expectedResults) (set: _expectedResults to (dm: "2", "Miss", "3", "Miss", "4", "Miss", "5", "Miss", "6", "Miss", "7", "Partial Hit", "8", "Partial Hit", "9", "Partial Hit", "10", "Hit", "11", "Hit", "12", "Hit")) ($testRun: "Sell", "Socialist Testesen", "dont get it", _expectedResults) $DefaultKelly (display:"Define Influence") }

{ (set: _someone to "Socialist Testesen") (if: _someone is in $Opponents)[ Did not expect _someone to be an opponent. ] (if: _someone is in $Allies)[ Did not expect _someone to be an ally. 1 ] ($sourRelation: _someone) (if: _someone is not in $Opponents)[ Expected _someone to be an opponent. ] (if: _someone is in $Allies)[ Did not expect _someone to be an ally. 2 ] ($sweetenRelation: _someone) (if: _someone is in $Opponents)[ Did not expect _someone to be an opponent. ] (if: _someone is in $Allies)[ Did not expect _someone to be an ally. 3 ] ($sweetenRelation: _someone) (if: _someone is in $Opponents)[ Did not expect _someone to be an opponent. ] (if: _someone is not in $Allies)[ Expected _someone to be an ally. 4 ] ($sourRelation: _someone) (if: _someone is in $Opponents)[ Did not expect _someone to be an opponent. ] (if: _someone is in $Allies)[ Did not expect _someone to be an ally. 1 ] }

{ (set: ds-type $Opponents to (ds:), ds-type $Allies to (ds:) ) (set: $sourRelation to (macro: str-type _someone, [ (set: $Opponents to (cond: _someone is in $Allies, $Opponents, $Opponents + (ds:_someone) )) (set: $Allies to $Allies - (ds:_someone)) (output:)[] ])) (set: $sweetenRelation to (macro: str-type _someone, [ (set: $Allies to (cond: _someone is in $Opponents, $Allies, $Allies + (ds:_someone) )) (set: $Opponents to $Opponents - (ds:_someone)) (output:)[] ])) (set: $ally to (macro: str-type _someone, [ (output-data: _someone is in $Allies) ]) ) (set: $opponent to (macro: str-type _someone, [ (output-data: _someone is in $Opponents) ]) ) }

{  (set: ds-type $Topics to (ds:))  (set: dm-type $Notes to (dm:))  (set: $isTopic to (macro: str-type _maybeTopic, [ (output-data: (passage: _maybeTopic)'s tags contains "topic" ) ]))  (set: $topic to (macro: str-type _topic, [ (unless: ($isTopic:_topic))[(error: _topic + " is not a topic")] (set: $Topics to it + (ds:_topic)) (output-data: _topic) ]))  (set: $discovered to (macro: str-type _topic, [  (set: _revealed to _topic is in $Topics) (output-data: _revealed) ]))  (set: $topicPopup to (macro: str-type _topic, [ ($topic: _topic) (output:)[(link-reveal-goto:_topic, "Note")[(set: $ShowTopic to _topic)]] ]))  (set: $topicReveal to (macro: str-type _topic, [ ($topic: _topic) (set: str-type _hook to (str:"($getSummary:\"" +_topic + "\")")) (set: str-type _link to (str: "(click:\"" + _topic + "\")[" + _hook + "]")) (output-data: _link) ]))  (set: $addNote to (macro: str-type _topic, str-type _details, [ (set: str-type _current to "") (if: _topic is in $Notes)[ (set: str-type _current to _topic of $Notes)] (unless: _details is in _current)[ (set: $Notes to it + (dm: _topic, _current + _details))] ($topic: _topic) (output:)[] ]))  (set: $getNotes to (macro: str-type _topic, [ (set: _notes to (passage: _topic)'s source) (if: ($isPerson: _topic))[ (set: _notes to it + ($factionAsString: _topic))] (if: _topic is in $Notes)[ (set: _notes to it + (str:_topic of $Notes))] (if: ($isPerson: _topic))[ (set: _notes to it + ($opinionAboutMe: _topic))] (output-data: _notes) ]))  (set: $getSummary to (macro: str-type _topic, [ (set: _notes to (passage: _topic)'s source) (output-data: _notes) ])) }

{  (set: _topic to "Test Topic") (if: _topic is in $Notes)[ Did not expect topic "_topic" to be in Notes! ] ($addNote: _topic, "42! ") (if: _topic is not in $Topics)[ Expected topic "Test" to have been introduced after (addNote). ] (if: "42! " is not _topic of $Notes)[ Expected topic to be "42! " but was "(str: _topic of $Notes)" ] ($addNote: _topic, "42! ") (if: "42! " is not _topic of $Notes)[ Expected topic to be "42! " but was "(str: _topic of $Notes)" ] ($addNote: _topic, "43 and 44. ") (if: "42! 43 and 44. " is not _topic of $Notes)[ Expected topic to be "42! 43 and 44. " but was "(str: _topic of $Notes)" ]  (set: _topic to "Populist Testesen") (if: ($discovered: _topic))[ Did not expect topic _topic to have been discovered yet! ] |test-output>[ ($topic: _topic) ] (if: not ($discovered: _topic))[ Expected topic _topic to have been discovered after (topic)! ]  (set: _topic to "E pills") (if: ($discovered: _topic))[ Did not expect topic _topic to have been discovered yet! ] |test-output>[ E pills are the best! ($topicReveal: "E pills") ] (if: not ($discovered: _topic))[ Expected topic _topic to have been discovered after (topicReveal)! ]  (set: _topic to "Test Topic") (set: _endsWith to (macro: str-type _string, str-type _end, [ (output-data: (substring: _string, - _end's length, -1) is _end) ])) (set: _summary to ($getSummary: _topic)) (set: _expected to "Test topic summary. ") (if: not (_endsWith: _summary, _expected))[ Expected summary to be "_expected", was "_summary" ] (set: _notes to ($getNotes: _topic)) (set: _expected to "Test topic summary. " + "42! 43 and 44. ") (if: not (_endsWith: _notes, _expected))[ Expected summary to be "_expected", was "_notes" ] (for: each _passage, ...(passages: where its tags contains "note"))[ (str:_passage's name) has obsolete tag "note", should be "topic" ] (for: each _passage, ...(passages: where its tags contains "person"))[ (unless: _passage's tags contains "topic")[ (str:_passage's name) does not have a "topic" tag ] ] }

##$ShowTopic ($getNotes: $ShowTopic) $UndoButton

(storylet: when $Turn >1 and ($location:"The Mayor's Office") and not ($visited: "Sick Children Statement from Lang"))(urgency:2)\ The story about the sick children have been all over the news this morning. When you arrive at the office, journalists are trying to get a statement from Mayor Lang. Mayor Lang is also the CEO of ($topic: "Lang Pharma") that produces the ($topic: "E pills"). * [[Go closer->Sick Children Statement from Lang]]

{ ($setLeadershipStyle: "Balanced") (set: $Faction to (either: "Socialists", "Conservatives", "Liberals")) (set: $Admire to (either: "Kids", "Cheerfulness", "Initiative")) (set: num-type $Reserves to 3, num-type $Integrity to 3, num-type $Popularity to 3 ) }

##Strike at Mars Drilling Meriwether fills you in on the way to the Mayor's office. Workers at ($topic:"Mars Drilling") are threatening to strike as two workers have been expelled from the company and charged with theft of property. Production rates of Mars Drilling are still down following the (lowercase:($topic:"Accident")) eight months ago where 72 workers tragically lost their lives when a mineshaft collapsed. A strike could push the company into bankruptcy. Mars Drilling is the second largest private employer on Mars, only beaten by Mars Construction. One of the expelled workers was a union representative. The ($topic: "Union") believes the theft is an excuse to get rid of a union representative after that person has been outspoken about safety rule violations. ($topicReveal: "Union") The union demands that the expelled workers are rehired. * [[Arrive at the Mayor's office->Strike at Mars Drilling]] { ($addNote: "Mars Drilling", "Mars Drilling is the second largest private employer on Mars, only beaten by Mars Construction. 72 workers lost their lives when a mineshaft collapsed eight months ago. Two workers were expelled recently charged with theft of property. ") }

##Union Representative Jackson You want to hear the expelled union representative's version of the events. You find the union representative ($topic: "Neil Jackson") who gives you a name of a team lead ($topic: "Joe Mando"). Mando's team has been drilling outside appointed targets and is routinely violating safety rules. Most likely someone from Mando's team has tried to get the union representative blamed and removed. (t8n:"fade-up")+(link-replace: "Check Mando's team in the company records")[==\ In the company records you see no indication that Joe Mando's team has more reported violations but you see that the team is about two to three times as productive as the second most productive team in the last quarter. You also see a big drop in production rates in the last three quarters.\ { ($addNote: "Joe Mando", "His team is two to three times as productive as the second most productive team in Mars Drilling. Mando's team has been drilling outside appointed areas and is routinely violating safety rules. ") } (display:"Strike What Do You Do")

##Strike at Mars Drilling Mayor Lang greets you when you arrive at the office. (unless: ($visited:"Strike Leave it to Lang"))["Don't worry I got this covered."](else:)["Thanks a lot for coming. I really need your help."] (display: "Strike What Do You Do")

###What do you do? { <ul> (unless: ($visited: "Strike Union Representative View"))[ <li>[[What does the expelled union representative say?->Strike Union Representative View]] ] (if: ($talks: "Yu Yan"))[ <li>[[What does the company say?->Strike Talk With Yu Yan]]</li> ] (if: ($visited: "Strike Talk With Yu Yan")) + (unless: ($visited:"Strike Influence Yu Yan"))[ <li>[[Persuade the CEO of Mars Drilling to rehire the union representative->Strike Influence Yu Yan]]</li> ] (if: ($visited: "Strike Union Representative View")) + (unless: ($visited:"Strike Influence Ursula"))[ <li>[[Convince the union to accept that Neil Jackson is not rehired->Strike Influence Ursula]]</li> ] (unless: ($visited: "Strike Leave it to Lang"))[ <li>[[Let Lang handle it->Strike Leave it to Lang]]</li> ] (if: ($visited: "Strike Talk With Yu Yan")) + (if: ($visited:"Underground Stim Factory Call the Police"))[ <li>[[Inform Yu Yan that the stolen equipment has been found->Strike Stolen Equipment Found]] ] (if: ($visited:"Strike Influence Ursula") and ($visited:"Strike Influence Yu Yan") and ($visited: "Strike Leave it to Lang"))[ <li>[[Nothing->Strike Do Nothing]] ] </ul> }

(storylet: when ($discovered: "Test Topic"))\ Test topic summary.

{  (set: num-type $Turn to 0) (set: num-type $LastTurn to 8) (set: $Rolls to (a:)) (set: $Modifiers to (a:)) (set: $Topics to (ds:)) (set: $Notes to (dm:)) $DefaultKelly (set: $Opponents to (ds: "Leigh Stuart")) (set: $Allies to (ds: "Arnold Fletcher", "Sam Parker", "Ridley Lang")) (set: $Economy to 0, $Infrastructure to 0, $Law to 0 ) (set: $MaxProgress to 9) (set: $Promises to (ds:)) (set: $Choices to (ds:)) (set: $Known to (ds:)) (set: $Inventory to (ds:"some space stims")) }

##Dinner at Sam's place You meet Sam and his family at his place in District Five. His wife ($topic:"Elena Parker") welcomes you warmly. Kids are overjoyed to see their famous aunt that has arrived to Mars to save the colony. The oldest, a daughter, hangs around you. "I'm Natalia!" she says. Loudly. "Take it down a notch, Natalia." (if: $Admire is "Kids")[Sam's voice is firm but his face is one big smile. ] Sam has a detailed knowledge about the technology that makes the colony possible and you trust his advice. He is also a nice person to be around and spending time with him and his family makes you feel great. \($addNote: "Sam Parker", "Wife Elena Parker. Daughter Natalia. ") ###What do you do? { <ul> (if: ($talks:"Sam Parker"))[ <li>[[Talk with Sam Parker]] ] (if: ($talks:"Natalia Parker"))[ <li>[[Talk with Natalia Parker]] ] (if: ($talks:"Elena Parker"))[ <li>[[Talk with Elena Parker]] ] (if: ($visited: "Talk with Sam Parker") and not ($visited: "Sick Children Stims From Earth") and not ($visited: "Sick Children Bootleg Space Stims") and not ($visited: "Sick Children Resolved") and not ($visited: "Walk after dinner"))[ <li>[[Go for a walk with Sam after dinner->Walk after dinner]] ] <li>[[Leave->Sam's Place]] </ul> }

##Walk after dinner Sam pulls you out for a walk after dinner. "Hey Kelly, we are really concerned about this thing with the pills not being safe." "Do you have any Space stims left?" ($topicReveal: "Space stims")Sam stops and looks at you. { (set: _kellyGaveSpaceStims to false) |Q1>[ <ul> <li>(link-replace:"Yes")[(hide:?Q1)(show:?A1-1)] <li>(link-replace: "No")[(hide:?Q1)(show:?A1-2)] </ul> ] |A1-1)["Yes, these are what I have left." You give ($drop: "some space stims") to Sam. (set: _kellyGaveSpaceStims to true)(show:?1)] |A1-2)["No, I handed in whatever I had left when I left the shuttle." (show:?1)] } |1)[==\ "Elena has noticed a skin change on Natalia. They say that the space stims used for transit is better than the stuff produced here on Mars. Do you know if it's true?" (link-replace:"\"I don't know\"")["No, I don't know."(show:?2)] |2)[==\ "Is it safe for kids? The space stims. I don't want to experiment but frankly Elena is desperate." (link-replace: "\"I don't know\"")["I have no medical knowledge, so I really can't say." (show:?3)] |3)[==\ "She wants to buy the bootleg pills that they are offering." (link-replace: "\"Bootleg pills?\"")["Bootleg pills?" "($topic:"Bootleg space stims"). Elena says she can buy them from someone on her job. Produced here on Mars." \($addNote: "Space stims", "There is a rumour of a bootleg space stim factory somewhere in the colony. Supposedly better than E pills. ")] (link-replace: "\"Better with...\"")["Better with the Earth pills" I say. (show:?4)] |4)[==\ "Maybe I can hold her off for a while. (if:_kellyGaveSpaceStims)[How many do you have? Can you get more?](else:)[Do you think you can get some?]" |Q4>[{ <ul> <li>(link-reveal: "Yes")[(show:?A4-1)(hide:?Q4)] <li>(link-reveal: "No")[(show:?A4-2)(hide:?Q4)] </ul> }]\ |A4-1)["I'll see what I can do." ($addNote: "Sam Parker", "Natalia may be sick. I've promised to find space stims for her. ")($promise: "Find space stims for Natalia") "Thanks. I don't really like to ask you that kind of favour but we are in a pinch." (show:?5)]\ |A4-2)["I can't make such a promise, please don't ask me again." "Ok. I know. I won't." Sam looks unhappy.(show:?5)] |5)[==\ =><= [[Leave->Dinner with Sam and family]] <==

(storylet: when $Turn >1 and (passage:)'s name is "The Mayor's Office" and not ($visited: "Dinner with Sam and family") and ($true: "Strike Avoided"))\ So you leave the office and the pile of work and go see your brother ($topicPopup: "Sam Parker") and his family. [[Dinner with Sam and family]]

##Cause of illness found! You have successfully helped the colony find the cause of children getting sick and how to avoid it. Well done! $WhatDoYouDo

(metadata: "district", "Three") ##Platform (if: ($true:"Dust Storm Happening"))[\ The platform is closed due to the dust storm. \](else:)[\ The view from here is (either:"spectacular", "amazing", "like nothing you have ever seen before"). \] ###What do you do? * [[Go back to High Street->High Street]]

(metadata: "district", "Two") ##Space port The space port is at a raised plateau 10 miles south of the colony. ###What do you do? * [[Buy a ticket home]] * [[Go back to First Landing Plaza->First Landing Plaza]]

##Arnold Fletcher at Green Canyon District Four is full of busy machines and workers. Working on ($topic:"Green Canyon"), a luxury project intended to attract high skilled workers from Earth. Right now it looks like a mess. Fletcher meets you with a big smile. "Can you see - this is the future!" "Let me show you around!" He hands you ($pickup:"a hard hat"). After a hectic tour of the construction site, you end in a quiet cafe area in a park. "Kelly, is there anything I can do for you?" * [[Talk with Arnold Fletcher]] * [[Thank Arnold Fletcher for his time and leave->Green Canyon Location]]

(storylet: when ($discovered:"Mars Energy"))\ Provides the energy for the colony. Solar and nuclear.

##Talk with Arnold Fletcher You decide to go see ($topicPopup:"Arnold Fletcher"). \(set: _someone to "Arnold Fletcher") \(set: _afterConversationGoto to "Sick Children Deal With It") \(display: "Talk with Someone")

(storylet: when ($discovered:"Space stims"))\ Space stims is the popular name for the medicine space travellers take to offset the negative impact on the body of the increased radiation exposure and lower gravity.

(storylet: when ($discovered:"Olympus Mons"))\ The largest volcano in the solar system.

#Mars Crisis =><= //Can you save the colony?//

(enchant:?click, (t8n:"dissolve") + (t8n-time:0.4s) )(enchant:?passage, (b4r:'solid') + (color: black) + (b4r-color: #0f0f0f) + (b4r-size: 2) + (corner-radius: 16) + (font:'sans-serif') + (text-style: 'expand') + (size:7/8) + (background: white) )(enchant:?link, (size:7/8) + (color: #900000) + (hover-style: (color: #0000f0)) + (t8n-time:0.4s) + (t8n:"dissolve") )(enchant:?page, (background: white) )

{ (set: $Integrity to 2, $Popularity to 2, $Reserves to 2, ) ($healIntegrity:) (unless: $Integrity is 3)[Expected Integrity to be 3, was $Integrity] ($healIntegrity:) (unless: $Integrity is 3)[Expected Integrity to be 3, was $Integrity] ($healPopularity:) (unless: $Popularity is 3)[Expected Popularity to be 3, was $Popularity] ($healPopularity:) (unless: $Popularity is 3)[Expected Popularity to be 3, was $Popularity] ($healReserves:) (unless: $Reserves is 3)[Expected Reserves to be 3, was $Reserves] ($healReserves:) (unless: $Reserves is 3)[Expected Reserves to be 3, was $Reserves] }

(storylet: when ($discovered:"Bootleg space stims"))\ Space stims produced illegally on Mars.

##Talk with Sam You converse your brother ($topicPopup:"Sam Parker"). \(set: _someone to "Sam Parker") \(set: _afterConversationGoto to (history:)'s last) \(display: "Talk with Someone")

(storylet: when true)(urgency:2)\ "Sam, how is work? What are you working on?" "I'm with ($topic: "Mars Construction") now. I'm working on the ($topic: "Green Canyon") project." "Any fun?" "Yeah, it's ok. It pays the bills. That guy ($topic: "Arnold Fletcher") thinks big. I wonder if and when anyone will actually move in." \{ ($addNote: "Sam Parker", "Works in Mars Construction on Green Canyon. ") ($addNote: "Mars Construction", "Your brother Sam works for Mars Construction. ") }

{  (set: $visited to (macro: str-type _passage, [ (set: _result to false) (if: _passage is in (history:)) [(set: _result to true)] (else-if: (passage:)'s name is _passage) [(set: _result to true)] (else:) [(set: _temp to (passage: _passage)'s name)] (output-data: _result) ]))  (set: $display to (macro: str-type _input, [ (output:)[(if: (passages: where its name is _input)'s length >0)[(display:_input)](else:)[_input] ] ]))  (set: $average to (macro: array-type _nums, [ (set: _result to 0) (if: _nums's length > 0)[ (set: num-type _sum to 0) (for: each _number, ..._nums)[(set: _sum to it + _number)] (set: _result to _sum / length of _nums) ] (output-data: _result) ]))  (set: $location to (macro: str-type _passage, [ (unless: (passage: _passage)'s tags contains 'location') [(error: "Expected passage " + _passage +" to be a location.")] (set: _result to false) (if: (passage:)'s name is _passage)[ (set: _result to true) ](else-if: 'location' is not in (passage:)'s tags)[ (set: _history to (history: where its tags contains 'location')) (if:_history's length > 0)[ (set: _result to _passage is _history's last) ] ] (output-data: _result) ])) (set: $listAsString to (macro:...str-type _items, [ (set: _result to "") (set: _temp to (a:..._items)) (set: _length to _temp's length) (unless:_length is 0)[ (for: each _ix, ...(range: 1, _length))[ (set: _item to _ix of _temp) (if: _ix is 1)[ (set: _result to _item) ](else-if: _ix is _length)[ (set: _result to it + ' and ' + _item) ](else:)[ (set: _result to it + ', ' + _item) ] ]] (output-data: _result) ])) }

{ (mock-visits: "Welcome") (unless:($visited: "Welcome"))[ Expected passage "Welcome" to be visited, history is: (history:), current passage is (str:(passage:)'s name) ] |test-output>[ ($display: "Socialist Testesen") ($display: "Not a passage") Output above should be the content of the Socialist Testesen passage and "Not a passage" ] (set: _average to ($average: (a: 1 , 2, 3))) (unless:_average is 2)[ Expected average to be 2, was _average. ] (set: _average to ($average: (a: 1 , 2))) (unless:_average is 1.5)[ Expected average to be 1.5, was _average. ] |test-output>[ ($listAsString:...(ds:)) ($listAsString:...(ds:"item 1", "item 2", "item 3")) ] }

(storylet: when true)(urgency:2)\ "Natalia is a bright kid, Sam. There is a lot of you in her." "Thanks! Me and Elena are very happy and love her very much. She is one of very few kids born on Mars."

(storylet: when true)(urgency:2)\ "Sam, you and your wife look happy." "Elena is wonderful, we love each other. I'm lucky." "Life in the colony is not easy though. Having a kid together can be stressful enough back on Earth, here in the colony it is really something extra. We were lucky we passed the strict criteria in the ($topic: "Procreation laws"). Now we are fighting to do what is best for Natalia every day."

(storylet: when ($discovered:"Procreation laws"))\ "What do you think about the procreation laws?" "They are tough. I don't know, when you look at it from behind a desk, I guess it makes sense to control who get's to have babies and when. But when you live in it, when you have met someone... It's just such a fundamental drive for humans, to want to have and raise children."

{  (set: $ConversationWith to (macro: str-type _someone, [ (set: _conversationMap to (dm: )) (for: each _conversation, ...(altered: via its name, ...(passages: where its tags contains 'conversation')))[ (unpack: _conversation into (p: str-type _with, " on ", str-type _about)) (if: _with is _someone)[ (set: _conversationMap to it + (dm: _about, _conversation)) ] ] (output-data: _conversationMap) ]))  (set: $AskAbout to (macro: str-type _someone, [ (set: _abouts to (a:)) (for: each _conversation, ...(altered: via its name, ...(open-storylets: where its tags contains 'conversation')))[ (unless: ($expired:_conversation))[ (unpack: _conversation into (p: str-type _with, " on ", str-type _about)) (if: _with is _someone)[ (set: _abouts to it + (a: _about)) ] ] ] (output-data: _abouts) ])) (set: $talks to (macro: str-type _someone, [ (set: _talks to ($AskAbout: _someone)'s length > 0) (output-data: _talks) ])) (set: $GetSomeone to (macro: str-type _conversation, [ (unpack: _conversation into (p: str-type _someone, " on ", str-type _about)) (output-data: _someone) ])) (set: $GetAskAbout to (macro: str-type _conversation, [ (unpack: _conversation into (p: str-type _someone, " on ", str-type _about)) (output-data: _about) ])) (set: $Expired to (ds:)) (set: $expire to (macro: str-type _snippet, [ (set: $Expired to it + (ds:_snippet)) (output:)[] ])) (set: $expired to (macro: str-type _snippet, [ (set: _expired to _snippet is in $Expired) (output-data: _expired) ])) (set: $sticky to (macro: str-type _snippet, [ (set: _sticky to (passage:_snippet)'s tags contains 'sticky') (output-data: _sticky) ])) }

(storylet: when ($discovered: "Procreation laws"))\ Strict procreation laws have been introduced in the colony to ensure the colony has the necessary resources to supply and support each new individual.

##Talk with Natalia You talk with your brother's kid ($topicPopup:"Natalia Parker"). \(set: _someone to "Natalia Parker") \(set: _afterConversationGoto to "Dinner with Sam and family") \(set: $toysSeen to false) \(display: "Talk with Someone")

##Talk with Elena You have a talk with your brother's wife ($topicPopup:"Elena Parker"). \(set: _someone to "Elena Parker") \(set: _afterConversationGoto to (history:)'s last) \(display: "Talk with Someone")

{  (set: _conversation to ($ConversationWith: _someone)) (set: _discussed to (a:)) (set: _waitingForReply to false) |Conversation>[] |AskAbout>[ (set: _discovered to ($AskAbout: _someone)) (set: _remaining to _discovered - _discussed) (if: _remaining's length > 3)[ (set: _remaining to (_remaining's 1stTo3rd)) ] (if:_remaining's length > 0)+(unless: _waitingForReply)[ ###Ask _someone about... <ul> (for: each _about, ..._remaining)[ <li>(link-reveal: _about)[ (set: _discussed to it + (a: _about)) (unless: ($sticky: _someone + " on " + _about))[ ($expire: _someone + " on " + _about) ] (append:?Conversation)[ ($display: _about of _conversation) ] (rerun:?AskAbout) ] ] </ul> ] (unless: _waitingForReply)[ =><= (link-goto: "Leave", _afterConversationGoto) <== ] ] }

(storylet:when true)\ "Why did you go to Mars?" "Pragmatic reasons, mostly. I was feeling bored back then, same old, same old and then I got a job offer. Nothing much to lose so I accepted. And hey, it has turned out pretty well. I wouldn't have met Elena and I wouldn't have had Natalia otherwise." "What is it, like 10 years since you signed up?" "Ten Earth years? Something like that." "Do you think you will ever go back to Earth?" "Unlikely. I have my life here now. Elena and Natalia. And you are here." "Isn't there anything you miss about Earth? How about when you get old?" "Maybe. To smell the ocean again, that sort of thing. But I don't think so. It's too far away now. All that." { (set: _question to "How about you? Are you thinking about staying longer?" ) (set: _options to (dm: "Yes", "Yes. I'm thinking about it. I haven't decided.", "No", "No. I don't think so.", "I don't know", "I dont' know." )) } (display:"Someone Asks a Question Back")

(storylet: when ($discovered:"Replicator"))\ "Tell me about the Replicator." What do you do there?" "The Colony Replicator can create exact copies of complex components. It means that we in principle can create any spare part we need for the colony without waiting for it to be shipped from Earth. It's not just the structure and the shape, it can also replicate electrical and mechanical parts." "It's expensive though," Elena adds. "Expensive?" "Yes, it requires a lot of energy to operate, but then there are also the (lowercase:($topic:"License fees"))." "License fee?" "Yes, ($topic:"Tarkelan Industries") pay a license fee to access the blueprints for every component we create. It's the law." "It's an expensive technology, then." "Yes, that is why it is mostly idle. Often it is cheaper to produce spare parts in other ways." \($addNote:"Replicator","Owned by Tarkelan Industries. ")

(storylet: when true)\ "How did you and Sam meet?" Elena blushes.

(storylet: when not ($visited:"Sick Children Resolved"))\ "How are things?" "I'm fine, thanks." Elena gives you a superficial answer but you can see how she looks at Sam when you ask that they are concerned about something.

(storylet: when true)\ "Natalia, what do you know about Earth?" "Earth is the planet where my mother and my father were born!" (if: ($true:"toys seen"))["Would you like to (either: "see some more toys?", "see my toys again?", "hug my favourite teddy?")"](else:)["Would you like to see my toys?"]

(storylet: when not ($visited: "Sick Children Resolved"))\ You notice that Natalia's skin is miscoloured on the back of her neck. "Natalia, what is that on you neck?" "Mom says it's because I am a Martian!" (if: ($true:"toys seen"))["Would you like to (either: "see some more toys?", "see my toys again?", "hug my favourite teddy?")"](else:)["Would you like to see my toys?"]

(storylet:when true)(urgency:2)\ (if: ($true:"toys seen"))["Can I see your toys again?"](else:)["What is your favourite toy, Natalia?"] Natalia lights up in a big smile, her eyes gleaming with joy and she shows you all of her toys. ($set: "toys seen")

(storylet:when true)\ "So Elena, what is it you do here in the colony? I mean, besides raising this wonderful girl?" "I work at the Colony ($topic:"Replicator") in District Two. Except there is not much work to do there, it is very quiet." "Quiet?" "Yes, it's expensive to operate so most of the time it's idle." \($addNote:"Elena Parker", "Works at the Colony Replicator in District Two. ") \($addNote:"Replicator", "Located in District Two. ")

(storylet: when ($visited:"Walk after dinner") and ($promised:"Find space stims for Natalia") and not ($visited: "Sick Children Resolved"))(urgency:3)\ { (set: _question to "Kelly, do you have any more space stims? Elena thinks they help." ) (set: _options to (dm: "No", "No, unfortunately not. How is Natalia?", )) (if: ($has:"some space stims"))[ (set: _options to it + (dm: "Yes", "Yes, here are ($drop:'some space stims'). (either:\"I found some in my bag. They were for my flight home.\", \"I got some from the pharmacy at the Colony Hall.\") How is Natalia?") ) ] (if: ($has:"some bootleg space stims"))[ (set: _options to it + (dm: "I have some bootleg pills", "No, but I have ($drop:'some bootleg space stims'), take these instead. How is Natalia?") ) ] } (display:"Someone Asks a Question Back")\ |Answer)[==\ "She is ok at the moment but Elena is worried."

{ (set: _someone to "Natalia Parker") (set: _conversationMap to ($ConversationWith: _someone)) (set: _abouts to ($AskAbout: _someone)) (for: each _about, ..._abouts)[ (unless: _about is in (datanames:_conversationMap))[ Expected to find about "_about" in ask abouts for _someone ] ] |test-output>[ (set: _about to "Toys") ($display: (str: _about of _conversationMap)) Expected output Natalia Parkers conversation snippet on toys. ]  (for: each _passage, ...(passages: where its tags contains 'conversation'))[ (set: _passageName to name of _passage) (unless: _passageName matches (p: uppercase, str, whitespace, uppercase, str, " on ", uppercase, str))[ Expected _passageName to be 'Firstname Lastname on Topic' ] (unpack: _passageName into (p:str-type _name, " on ", str-type _topic)) (unless: (passage: _name)'s tags contains 'person')[ Expected _name to be tagged with 'person'. ] ] (unless: 'Natalia Parker' is ($GetSomeone:"Natalia Parker on Toys"))[ Expected Natalia Parker to be someone of 'Natalia Parker on Toys'. ] (unless: 'Toys' is ($GetAskAbout:"Natalia Parker on Toys"))[ Expected Toys to be about of 'Natalia Parker on Toys'. ] (if: ($expired:"Natalia Parker on Toys"))[ Did not expect Toys to be expired. ] ($expire:"Natalia Parker on Toys") (if: 'Toys' is in ($AskAbout: "Natalia Parker"))[ Expected Toys to be expired. ] (unless: ($expired:"Natalia Parker on Toys"))[ Expected Toys to be expired. ] (unless: ($talks: "Natalia Parker"))[ Expected Natalia Parker to have something to talk about. ] (if: ($talks: "Conservative Testesen"))[ Did not expect 'Conservative Testesen' to have anything to talk about. ] (unless: ($sticky:"Natalia Parker on Toys"))[ Expected "Natalia Parker on Toys" to be sticky. ] (if: ($sticky: "Natalia Parker on Skin"))[ Did not expect "Natalia Parker on Skin to be sticky. ] }

##Talk with Arnold You talk with ($topicPopup:"Arnold Fletcher"). "(cond: ($ally:"Arnold Fletcher"), "Hi Kelly, great to see you, is there anything I can do for you?", ($opponent:"Arnold Fletcher"), "Hi Kelly. What is on your mind?", "Hi Kelly, what can I do for you?" )" \(set: _someone to "Arnold Fletcher") \(set: _afterConversationGoto to "Green Canyon Location") \(display: "Talk with Someone")

(storylet: when ($discovered:"Green Canyon"))\ "How is the construction at Green Canyon moving forward?" "Great! I expect the first families can move in (either: "soon", "any day now", "in the very near future")!"

(metadata: "faction", "None", "pronoun", "she")\ (storylet: when ($discovered: "Natalia Parker"))\ Sam's daughter.

##Doctor Stuart at the clinic You go see Doctor ($topicPopup:"Leigh Stuart") at the clinic in District Five. Next to the clinic is an orphanage and this is where you find Stuart. (link-replace:"Ask about the sick children")[==\ "Earth does not care about our children, they just want to dump their criminals and take our resources." "Sooner and later we have to become independent and I say sooner." "Stop the crazy ($topicPopup:"Green Canyon") project and the utopia dream of a luxury for the rich and privileged." "Spend the money on space stims for everyone right here right now instead." "Remove the ban on procreation." "And don't send the research money into the coffers of ($topicPopup:"Lang Pharma") where nothing new has happened in years." "Of course if Earth cares and wants to send a research team say yes but read the small print and don't accept any concessions towards making Mars a penal colony for Earth misfits." "By the way, have you met Sarah?" (link-replace:"Meet Sarah")[==\ ($topic:"Sarah Young") is 11, orphan since both her parents died in an accident. First baby born on Mars. Her skin is miscoloured and she is receiving treatment in a light box. Long hair, green slacks and black eyes. As she comes out of the light box, journalists grabs the opportunity to get some shots of you, Sarah and Stuart. A reporter turns the camera to you and asks: "What is the government doing to help Sarah?" |Q1>[{ <ul> <li>(link-reveal: "Everything it can")[(show:?A1-1)(hide:?Q1)] <li>(link-reveal: "Everything it should")[(show:?A1-2)(hide:?Q1)] <li>(link-reveal: "No comments")[(show:?A1-3)(hide:?Q1)] </ul> }]\ |A1-1)["The government is doing everything it can to help Sarah." "Sarah gets the best treatment available on Mars just as everyone else in the colony. The mayor works without pause to make the colony the safest and best place for humans to live on Mars." (show:?Next1)]\ |A1-2)["The government is doing everything it should be doing: Providing the institutions of the colony with the funding and the priorities needed to provide the best possible help for the people in the colony." "Life on Mars is not risk free, just as life on Earth is not risk free." (show:?Next1)]\ |A1-3)["No comments at this time. Please attend the press briefings at the Mayor's office and ask your questions there." (show:?Next1)]\ |Next1)[==\ You excuse yourself and leave. (display:"Sick Children What Do You Do")

###What do you do? {<ul> (unless: ($visited: "Sick Children Talk with Ridley Lang"))[<li> [[Talk with Ridley Lang->Sick Children Talk with Ridley Lang]] ] (unless:($visited:"Sick Children Talk with Arnold Fletcher"))[<li> [[Talk with Arnold Fletcher->Sick Children Talk with Arnold Fletcher]] ] (unless:($visited:"Sick Children Talk with Leigh Stuart"))[<li>[[Talk with Leigh Stuart->Sick Children Talk with Leigh Stuart]] ] (if: ($visited: "Sick Children Talk with Ridley Lang"))+(unless: ($visited:"Sick Children Influence Lang") and ($visited:"Sick Children Influence Fletcher") and ($visited:"Sick Children Influence Stuart") and ($visited:"Sick Children No Funding"))[<li>[[Fund a research program->Sick Children Research Program]] ] (if: ($visited: "Sick Children Talk with Leigh Stuart"))+(unless:($visited:"Sick Children Space Stims"))[<li>[[Buy space stims for everyone->Sick Children Space Stims]] ] <li>[[Leave it for now->The Mayor's Office]] </ul>}

##Talk with Lang "Hi Kelly! What can I do for you?" "Here, have some coffee, it's Martian Blend, a new product we are testing." (t8n:"fade-up")+(link-replace: "Have some coffee.")[==\ You try the coffee. A bit of a metallic after taste but still with the burning, fruity bitterness and the fresh smell you associate with good coffee. "Do you like it?" Lang asks. "Yes, I do appreciate it!" "Coffee is one of the luxuries from Earth that are expensive to maintain so we try to make a local variant." "This one is 40% imported beans." "Sounds like a thing we can use to cultivate a patriotic Mars spirit." "I prefer to call it building a Martian identity. We are still very much dependent on Earth." "Yes, of course. Can be helpful in order to galvanise some native efforts. How does one with 0% imported beans taste like?" Lang pours you a 100% native coffee. (t8n:"fade-up")+(link-replace: "Try the native coffee.")[==\ You try the native coffee. It needs a lot of patriotic spirit to appreciate. "Can it be mixed with milk substitute in order to make it more palatable?" "Talking about milk, it's one of the trickier things to produce locally." "We don't have any cows in the colony which is mainly an issue for kids and women to get enough calcium. While common on Earth, it is not common on the surface layers on Mars what we have found so far. So we use chemical substitutes in farming. "The substitutes have some downsides." (t8n:"fade-up")+(link-replace: "What are the downsides?")[==\ "What are the downsides?" "It doesn't give the same bone structure." "For adults that is only here for a shorter while, it's not an issue. For kids growing up on Mars, they may never be able to walk on Earth. So once we start having babies big time here on Mars, there is no way back." "I digress, what did you want to talk with me about? Probably not coffee making? Or?" \(set: _someone to "Ridley Lang") \(set: _afterConversationGoto to "Sick Children Deal With It") \(display: "Talk with Someone")

##Talk with Stuart You talk with Doctor ($topicPopup:"Leigh Stuart"). \(set: _someone to "Leigh Stuart") \(set: _afterConversationGoto to "The Hospital") \(display: "Talk with Someone")

(storylet: when true)\ "Earth does not care about our children, they just want to dump their criminals and take our resources." "Sooner and later we have to become independent and I say sooner."

##Buy a ticket home You catch the next flight back to Earth and leave the colony behind. =><= [[Ok->The End]] <==

(storylet: when ($discovered:"Green Canyon"))\ "Stop the crazy Green Canyon project and the utopia dream of a luxury for the rich and privileged." "Spend the money on health care right here right now instead."

(storylet: when ($discovered:"Procreation laws"))\ "Remove the ban on procreation."

\(set: _custom to (ds:'person', 'news', 'message', 'topic', 'talk', 'conversation', 'location', 'influence', 'story', 'storyhook', 'intro', 'timer', 'sticky', 'test', 'menu', 'template')) \(set: _standard to (ds: 'startup', 'debug-header', 'footer', 'header')) \(set: _known to _standard + _custom) ##Passages with unknown tags { (for: each _passage,...(passages: where '' is not in its tags))[ (unless: 'Test' is in _passage's name)[ (for:each _tag,..._passage's tags)[ (unless: _tag is in _known)[ Passage (str:_passage's name) has unknown tag _tag ] ] ] ] } ##Overview of passages by tag (Test passages excluded) (for: each _tag, ..._custom)[ ###(upperfirst: _tag) (for: each _passage, ...(passages: where its tags contains _tag))[(unless: 'Test' is in _passage's name)[(str: _passage's name) ]] ] ##Passages with no tags { (for: each _passage,...(passages: where its tags contains ''))[ (unless: 'Test' is in _passage's name)[ Passage (str:_passage's name) does not have any tags ] ] }

(storylet: when true)\ "What about Earth? Do you think the colony can become independent?" "The colony is a dream of a better future for all of humankind. Dreams cost money and money comes from Earth. We have found no other reasons for humans to live on Mars. Whether we like it or not, we are only here as long as Earth agrees to pay for the dream."

(storylet: when ($discovered:"Lang Pharma"))\ "Tell me about Lang Pharma." "Lang Pharma? My company? I happened to be on the team that trialled and developed the E-pill. When the drug was approved, I set up the company to manage the production and the distribution. We also research into other products, but I'm no longer active in the labs." "Why not?" "I'm too old for the long hours in the laboratory, these days I prefer to help the colony by influencing how we spend our time and money."

(storylet: when ($discovered:"Procreation laws"))\ "What do you think about the procreation laws? Are they fair?" "Fair? Probably not. It is one of the greatest sacrifices an immigrant makes when going to Mars. The right to create life. The freedom to decide when and where and with whom." "Humans did not evolve on Mars. For life to adapt to live on Mars through natural selection, billions of individuals would die. With pre-conception selection, we avoid that. The procreation laws are necessary."

##Talk with Lang You talk with ($topicPopup:"Ridley Lang"). "(cond: ($ally:"Ridley Lang"), "Hi Kelly! How can I help? Anything you need?", ($opponent:"Ridley Lang"), "Hi Kelly. Is this important?", "Hi Kelly, what can I do for you?" )" \(set: _someone to "Ridley Lang") \(set: _afterConversationGoto to "The Mayor's Office") \(display: "Talk with Someone")

##Sick children Immigration is down in spite of commercials and incentive programs have been cancelled to save money. People still migrate but more because of adventure and to get away from Earth, not because they believe in Mars or have the skills needed. With stories like this breaking on Earth, fewer people want to migrate to Mars to stay. And you still have kids born on Mars getting sick right here right now. (t8n:"fade-up")+(link-replace: "Ok, let's deal with it...")[==\ (display:"Sick Children What Do You Do")

(storylet: when ($visited:"Sick Children Statement from Lang") and not ($visited: "Sick Children Resolved"))(urgency:2)\ You can't stop thinking about the sick children. * [[Ok, let's deal with it->Sick Children Deal With It]]

##Launch a research program You decide to launch a research program dedicated to finding the cause and a treatment for the illness that impacts children born on Mars. It will settle the nerves of everyone and could yield other beneficial treatments. You want the support from both Mayor Lang and Doctor Stuart so the program needs to be anchored outside Lang Pharma and you want Doctor Stuart to support but not to lead the program. How are you going to fund the program? ###What do you do? { <ul> (unless: ($visited:"Sick Children Influence Stuart"))[<li> [[Ask Earth for more money->Sick Children Money From Earth]] ] (unless:($visited:"Sick Children Influence Lang") and ($visited:"Sick Children Influence Fletcher"))[<li> [[Fund the program within the current budget->Sick Children Within Current Budget]] ] (unless: ($visited:"Sick Children No Funding"))[<li> [[Launch the program without funding->Sick Children No Funding]] ] <li>[[Try something else->Sick Children Deal With It]] </ul> }

##Space stims for everyone You decide that getting space stims for everyone is the best way forward. ###What do you do? { <ul> <li>[[Order space pills from Earth->Sick Children Stims From Earth]] (if: ($discovered: "Bootleg space stims"))[ (if: ($true:"Underground Stim Factory Raided"))[ <li>[[Distribute the confiscated bootleg space stims->Sick Children Bootleg Space Stims]] ](else:)[ (if: ($visited:"Underground Stim Factory Location"))[ <li>[[Raid the underground stim factory->Underground Stim Factory Call the Police]] ](else:)[ <li>[[Find the underground stim factory->The Hub]] ] ] ] <li>[[Try something else->Sick Children Deal With It]] </ul> }

##Launch a research program with no funding You decide to launch a research program without funding. The Mayor announces that there is a pool of money for research projects to apply for. The money will come from “an infrastructure reserve”. And then the administration stalls approval and never pays out funds. Hence there is no progress on solving the problem. =><= [[Ok->Sick Children Deal With It]] <== $AdvanceTurn

##Fund the program within the current budget Funding the program with money from the current budget essentially means to take the money from Lang Pharma or Green Canyon. ###What do you do? { <ul> (unless: ($visited:"Sick Children Influence Lang"))+(if: ($visited:"Sick Children Talk with Ridley Lang"))[ <li>[[Convince Ridley Lang to provide funding->Sick Children Influence Lang]] ] (unless: ($visited: "Sick Children Influence Fletcher"))+(if: ($visited:"Sick Children Talk with Arnold Fletcher"))[ <li>[[Convince Arnold Fletcher to provide funding->Sick Children Influence Fletcher]] ] <li>[[Try something else->Sick Children Deal With It]] </ul> }

(storylet: when ($visited: "Sick Children Resolved") and ($location:"The Mayor's Office") and not ($visited: "See Tanya in Custody"))(urgency:2)\ Meriwether (Lang's personal assistant) informs you that a woman called ($topic: "Tanya Toropov") has asked for you to see her. * [[See her->See Tanya in Custody]]

##See Tanya Toropov Tanya is held in custody for violating procreation laws. Her forced abortion is due tomorrow. She asks you to pardon her and allow her to give birth to her baby boy. (t8n:"fade-up")+(link-replace: "Check her case...")[==\ You check her case. She violates the terms of not having a partner and not having a Class A health record. She has gene defect that did not prevent her from going to Mars but that was later added to the list that would exclude you from procreation. There is a small probability that the child will have a rare bone disease. Furthermore, the father is unknown so there could be more complications. ###What do you do? * [[Talk with Tanya]] * [[Leave->Tanya What Do You Do]]

(storylet: when ($visited:"See Tanya in Custody") and not ($visited:"Tanya Resolved"))(urgency:3)\ "Lang, have you heard about Tanya Toropov? Held in custody for breaking the procreation laws." "Yes, I have heard about this unfortunate girl. I don't think we can win this one. We have to enforce the rules and every rational being in the colony knows that we don't have infinite resources and the only way we can ensure the survival of the colony is through controlled procreation and controlled immigration. One more baby doesn't break the colony but it sets a precedent that can threaten the survival of the colony." "What do common people think about this?" "I was elected Mayor on a pro immigration and strict procreation policy and it will stay this way until we can ensure there is food and houses and jobs for everyone. We are gambling with the long term survival of the colony." "Yes, so unless she can give us reason to pardon her, there isn't much we can do." "Do we know who the father is?" "No, we do not."

##Day of the abortion At the time of the forced abortion the doctor who is appointed to carry out the abortion refuses. It's Doctor Stuart. (t8n:"fade-up")+(link-replace: "Talk with Doctor Stuart...")[==\ "This baby boy has the right to live. It is alive. He just happens to be inside his mothers womb still. An abortion this late is murder." ###What do you do? * [[Convince Stuart to perform the abortion->Convince Stuart to Perform the Abortion]] * [[Accept the abortion is not done->Accept the Abortion is not Done]]

##Convince Lang to pardon Tanya You decide the convince the Mayor to pardon Tanya and let nature run its course. { (set: _someone to "Ridley Lang") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "\"There is a way we can win this\"", "Tell", "Tell Lang to not hide behind the law", "Sell", "\"Maybe it is time for a policy shift?\"" )) (set: _afterMiss to "Tanya What Do You Do") (set: _afterHit to "Lang Pardons Tanya") (set: _hitEffect to "(set: $Law to it + 1)") (display: "Influence Someone") }

##Persuade Stuart You decide to persuade Doctor Stuart to perform the abortion. { (set: _someone to "Leigh Stuart") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "\"An abortion is the rational choice\"", "Tell", "\"It is your duty to the colony\"", "Sell", "\"Imagine the suffering if you don't do it\"" )) (set: _afterMiss to "Tanyas Baby is Born Sad") (set: _afterHit to "Stuart Performs the Abortion") (set: _hitEffect to "(set: $Law to it + 1)") (display: "Influence Someone") }

##Convince Tanya You decide to persuade Tanya to reveal who the father is. { (set: _someone to "Tanya Toropov") (set: _stance to "dont get it") (set: _prompt to (dm: "Explain", "Explain why screening the father's genes is necessary", "Tell", "Scold her for being selfish", "Sell", "Sell her the idea that the father loves her" )) (set: _afterMiss to "Tanya What Do You Do") (set: _afterHit to "Tanya Reveals the Father") (set: _hitEffect to "(set: $Law to it + 1)") (display: "Influence Someone") }

##Talk with Lang You talk with ($topicPopup: "Ridley Lang") about ($topicPopup: "Tanya Toropov"). \(set: _someone to "Ridley Lang") \(set: _afterConversationGoto to "Tanya What Do You Do") \(display: "Talk with Someone")

##Tanya's baby Tanya is held in custody for violating procreation laws. Her forced abortion is due tomorrow. She has asked you to pardon her and allow her to give birth to her baby boy. ###What do you do? { <ul> (unless:($visited:"Tanya Talk with Lang"))[ <li>[[Talk with the Mayor->Tanya Talk with Lang]] ] (unless:($visited:"Tanya Talk with Stuart"))[ <li>[[Talk with Doctor Stuart->Tanya Talk with Stuart]] ] (if:($talks:"Tanya Toropov"))[ <li>[[Talk with Tanya]] ] (if: ($visited: "Tanya Talk with Lang"))+(unless: ($visited: "Convince Lang to Pardon Tanya"))[ <li>[[Convince Lang to Pardon Tanya->Convince Lang to Pardon Tanya]] ] (if: ($visited: "Talk with Tanya"))+(unless: ($visited: "Convince Tanya to Reveal the Father"))[ <li>[[Convince Tanya to reveal who the father is->Convince Tanya to Reveal the Father]] ] <li>[[Nothing->Ignore Tanyas Plead For Help]] </ul> }

##Talk with Doctor Stuart You talk with ($topicPopup: "Leigh Stuart") about ($topicPopup: "Tanya Toropov"). \(set: _someone to "Leigh Stuart") \(set: _afterConversationGoto to "Tanya What Do You Do") \(display: "Talk with Someone")

##Do nothing You decide to ignore Tanya's plead. As hard it may seem, the alternative is worse. The needs of the many outweighs the needs of the few. $AdvanceTurn $WhatDoYouDo

(storylet: when ($visited:"Ignore Tanyas Plead For Help") and not ($visited:"Tanya Resolved") and ($location:"The Mayor's Office"))\ At the time of the forced abortion the next day. The doctor who is appointed to carry out the abortion refuses. * [[Investigate->Stuart Refuses to Perform the Abortion]]

(storylet: when ($discovered: "Tanya Toropov") and ($visited:"See Tanya in Custody") and not ($visited:"Tanya Resolved"))\ "Have you met Tanya Toropov?" "Yes. The young woman that is pregnant." "Did you know of her pregnancy? "Not until yesterday. She came to the clinique. She is carrying a healthy boy embryo."

(storylet: when ($discovered:"Lang Pharma"))\ "What do you think of Lang Pharma?" "Our dear mayor had one bright idea in is youth and managed to get his drug approved as the first of its kind. Now Lang Pharma is a convenient money machine and nothing new has come out of his research lab for a long, long time." "Personally, I take space stims, even if I also hate sending money back to Earth. A little competition wouldn't hurt."

(metadata: "district", "Three") ##The museum There is a small museum with relics from the colony and telling the story of exploration of Mars. ###What do you do? { <ul> (if: ($discovered:"Anna Coleman"))[ <li>[[Talk with Anna Coleman]] ](else:)[ <li>[[See the exhibition->Talk with Anna Coleman]] ] <li>[[Go back to High Street->High Street]] </ul> }

(storylet: when ($discovered:"Green Canyon"))\ "What do you think of Green Canyon?" "It's a big project. I wonder if it will ever get finished."

(storylet: when ($discovered:"Mars Construction"))\ "Mars construction is the largest construction company in the colony. They have some decent perks, but you have to put in the work to get them. I like that."

{  "_question" (set: _answer to "") (set: _waitingForReply to true) |Question>[{ <ul> (for: each _option, ...(dataentries: _options))[ <li>(link: _option's name)[ (set: _answer to (str: _option's value))(hide:?Question)(show:?Answer)]</li> ] </ul> }] |Answer)["_answer"(set: _waitingForReply to false)(rerun:?AskAbout)] }

(storylet: when true)\ "What do you know about Mars?" "Nothing."

##Talk with Populist Testesen You converse with ($topicPopup:"Populist Testesen"). \(set: _someone to "Populist Testesen") \(set: _afterConversationGoto to "") \(display: "Talk with Someone")

(storylet: when true)\ "What do you know about Earth?" { (set: _question to "What do you want to know?") (set: _options to (dm: "Everything", "Tell me everything." )) } (display:"Someone Asks a Question Back") |Answer)[==\ "Ok, you asked for it......"

(storylet: when ($discovered: "Green Canyon"))\ "What do you think about Green Canyon?" "It keeps the dream alive. Even if we never finish Green Canyon, we must keep the project going."

(storylet: when true)(urgency:2)\ "What can we do to make the colony survive and maybe even thrive?" "Let's start with what we are doing already. We are trying to establish an economy: creating houses where people want to live, jobs that generate products we need and money for people to spend." "Our health system is rudimentary, I am really worried what happens when people start growing old and either asks for return tickets or need to be treated for diseases mankind have not seen before." "I am worried about having a generation of Martian born babies where going back to Earth is not an option." "Most of the initial ideas for how to generate goods and money turned out duds. We are only here as long as Earth Coalition agrees to pay for the dream. The ($topic:"Green Canyon") project is very much about keeping the dream alive back on Earth." "But hey, if it was easy, we wouldn't be here, we would be doing something else, right?"

(storylet: when ($visited: "Sick Children Statement from Lang") and not ($visited: "Sick Children Resolved"))(urgency:3)\ "What can we do about the sick children?" "What can we do that we are not already doing do you mean? It's science, it's slow, it's uncertain. People get sick and die also on Earth. There could be a million reasons. Of course we should look into it. In the mean time, it's important to keep the proportions, to not spread panic based on guesses and misinformation." { (set: _question to "Do you agree?" ) (set: _options to (dm: "Yes", "Yes, we need to communicate based on facts and work methodically. How many children are sick? How old are they? Where do they live? What do they eat? Do we see any patterns?", "No", "No, I don't. We are talking about children here, the first humans born on Mars, the future of the colony. We need to acknowledge that this is a serious threat to the colony, act accordingly, and throw all our resources at it.", "I don't know", "I don't know, I'm not sure. We are talking about the first humans born on Mars here, the future of the colony. Maybe we need to do more?" )) } (display:"Someone Asks a Question Back")\ |Answer)[==\ "Ok. What do you suggest?" "Can we set up a research program?" "Sure, but isn't this what we are already doing? Lang Pharma continues to monitor reported side effects from use of its drugs and the hospital diagnoses and treats patients as cases appears?"

(storylet: when ($discovered: "E pills"))\ "Tell me about the E pills. What are they? Do they work?" "The E pill helps your body adapt to the environment in the colony. Lower gravity, lower pressure, higher background radiation. The evolution created a life form well suited to life on Earth, not on Mars. The E pill helps your body compensate for that. Eventually humans will adapt to life on Mars but it will take many generations." { (set: _question to "Did you remember to take one?" ) (set: _options to (dm: "Yes", "Yes. Yes of course.", "No, not yet", "No, not yet. I usually take one every evening.", "No, I forgot", "No, I forgot. I will take one as soon as I come home.", "No, I don't do drugs", "No, I don't do drugs. I meditate instead.", "I took space stims", "No. I don't think so.", )) } (display:"Someone Asks a Question Back")\ |Answer)[==\ "Take one every day and you will be fine."

##Funding secured You launch a research program to find out what is causing the skin cancers among children born on Mars. The government organises a three day workshop to present the data and analyze the situation. Kelly actively participates in the workshop among many other specialists. Including Doctor Stuart. And employees from Lang Pharma. And Sarah. And Sam. During the workshop the problem is located to be a fungus spreading seeds through the ventilation system that haven't been properly maintained. It's not about the E pill at all.($fulfill: "Find space stims for Natalia") =><= [[Great!->Sick Children Resolved]] <==

##Convince Arnold Fletcher You decide to persuade Arnold Fletcher to accept that the research program is funded by funds currently going to Green Canyon. { (set: _someone to "Arnold Fletcher") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is a smart solution", "Tell", "Tell Fletcher: \"I need you to do this for me\"", "Sell", "Say: \"What is a future without children?\"" )) (set: _afterMiss to "Sick Children Deal With It") (set: _afterHit to "Sick Children Funding Secured") (set: _hitEffect to "(set: $Economy to it + 1)($set: \"Green Canyon funding reduced\")") (display: "Influence Someone") }

##Convince Mayor Lang You decide to persuade Mayor Lang to accept that the research program is funded by money currently going to Lang Pharma. { (set: _someone to "Ridley Lang") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is the best option", "Tell", "Tell Lang: \"This is the right thing to do\"", "Sell", "Ask Lang to imagine how popular he will be" )) (set: _afterMiss to "Sick Children Deal With It") (set: _afterHit to "Sick Children Funding Secured") (set: _hitEffect to "(set: $Infrastructure to it + 1)") (display: "Influence Someone") }

##Convince Doctor Stuart You decide to persuade Stuart to fund the research into the sick children with money from Earth in exchange for continued immigration from Earth and strict procreation laws. { (set: _someone to "Leigh Stuart") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is a good solution", "Tell", "Tell Stuart that this is how it will be done", "Sell", "Highlight the benefits and downplay the downsides" )) (set: _afterMiss to "Sick Children Deal With It") (set: _afterHit to "Sick Children Funding Secured") (set: _hitEffect to "(set: $Infrastructure to it + 1)") (display: "Influence Someone") }

(storylet: when true)\ "So Arnold, what do you think about creating a colony on Mars?" "Mars is so much more than a job. It's the dream from generations past, it's the future of generations to come. And we are making it happen right here right now. There is no other place I'd rather be." \(if: ($ally:"Arnold Fletcher"))[ "I'm so happy that you accepted the challenge and came to Mars."]

(storylet: when true)\ "Is there a way the colony can get more money from Earth?" "Earth didn't send you here to go and ask for more money. The Earth Coalition has already committed to a long term investment." "We must build a healthy society that set people free to realise their potential, not a society that is forever dependent on funds from Earth." "If there is the problem you want to solve, is there a way to solve it without sending the bill back to Earth and to future generations?"

(storylet: when true)\ "What about Earth? Do you think the colony can become independent?" "Yes! It will take a longer time than most people think, but yes. The human race is resourceful, creative and curious. Life will find a way."

(storylet: when ($discovered: "Bootleg space stims") and not ($true: "Underground Stim Factory Raided"))\ "I've heard rumours about bootleg space stims. That there is a place where you can buy these." "Yes. Do you know if they are any good?" "No, I don't. They could be a health hazard. Or they could be a way to provide the colony with better and cheaper environment pills. I want to find out. Do you have any?" (if: $Tell > 0)[\ Elena is quiet for a while. Then she looks you in the eyes and decides that she can trust you. "I don't have any." "Do you know where I can get some?" "There is a place. A friend of a friend lives there. In District Four. Near ($topic: "Gagarin Flats"). ($learn:"Ask after Sasha")."($addNote:"Bootleg space stims", "There is a place in District Four where you can buy them. ") \](else:)[\ Elena is quiet for a while. Then she looks down and says: "No, I don't have any." "Do you know where I can get some?" "No." \]

TODO Yu Yan's husband. Populist. Laureen Pierce. Arnold Fletchers sleepover/daughter. Socialist. Niko Paraskevas. Runs a bootleg stim factory. Socialist. Occupations: Journalist Hair dresser Nurse Teacher Traffic control Shopkeeper Nanny Locations: Frosty Spring Utopia Planitia - water source Valles Marineris

(storylet: when ($discovered:"Tarkelan Industries"))\ Tarkelan Industries owns and runs the Colony ($topic:"Replicator").

(metadata: "faction", "Liberals", "pronoun", "he")\ (storylet: when ($discovered:"Sasha Barbett"))\ Knows about the underground stim factory.

(metadata: "faction", "Conservatives", "pronoun", "she")\ (storylet: when ($discovered:"Anna Coleman"))\ Museum curator.

(metadata: "faction", "Liberals", "pronoun", "he")\ (storylet: when ($discovered:"Sofia Kirakous"))\ Head of Replicator. Lang's research buddy. Bored. Runs a bootleg stim factory.

(metadata: "faction", "Conservatives", "pronoun", "he")\ (storylet: when ($discovered:"Charles Bauer"))\ Head of Project Nebula. Ursula's husband. Meriwether's uncle.

(metadata: "faction", "Populists", "pronoun", "he")\ (storylet: when ($discovered:"Tom Blumberg"))\ Head of Mars Energy.

(metadata: "faction", "Liberals", "pronoun", "she")\ (storylet: when ($discovered:"Paula Badosa"))\ Head of Tarkelan Industries.

(metadata: "district", "Four") ##Gagarin Flats There is a shady looking building over there. (if: ($true:"Underground Stim Factory Raided"))[It used to be an underground stim factory. It's empty now. ] ###What do you do? { <ul> (unless: ($true:"Underground Stim Factory Raided"))+(unless: ($visited:"Underground Stim Factory Location"))[ <li>[[Go to the shady looking building->Underground Stim Factory Location]] ] (unless: ($true:"Underground Stim Factory Raided"))+(if: ($visited:"Underground Stim Factory Location"))[ <li>[[Go to the underground stim factory->Underground Stim Factory Location]] ] <li>[[Go back to Curiosity Gate->Curiosity Gate]] </ul>}

(metadata: "district", "Five") ##Ingenuity Square Ingenuity Square is a rectangular area carved out in the Mars bedrock. Led lights in the ceiling and on the walls create different moods throughout the day. Right now the lights are (either: "pale blue", "bright orange", "soft white", "glowing red"). You are in District Five. ###What do you do? * [[Go to Sam's Place->Sam's Place]] * [[Go to the hospital->The Hospital]] * [[Go to the orphanage->The Orphanage]] $WhereDoYouWantToGo

(metadata: "district", "Two") ##First Landing Plaza First Landing Plaza is the place of the first touch down of the colony landers. It is an open area with large domes connected by transparent tubes. You need pressure suits in most of the area. You can get to the space port from here, located a safe distance from the colony habitats. You are in District Two. (if: ($true:"Dust Storm Happening"))[Due to the dust storm, most of District Two is closed.] ###What do you do? { <ul> (unless: ($true:"Dust Storm Happening"))[ <li>[[Go to Eden Gardens->Eden Gardens]] ] (unless: ($true:"Dust Storm Happening"))[ <li>[[Go to the space port->Space port]] ] <li>[[Go to the Replicator->Replicator Location]] </ul> }\ $WhereDoYouWantToGo

(metadata: "district", "Two") ##Eden Gardens The green gardens of District Two are vast areas of green houses with hydroponic farms that produce all the fresh vegetables that the colony consumes. ###What do you do? * [[Go back to First Landing Plaza->First Landing Plaza]] * [[Go to the Lava Caves->Lava Caves Entrance]]

(metadata: "district", "Four") ##Curiosity Gate Curiosity Gate is a natural archway across a narrow canyon. Tubes and tunnels connect the scattered buildings on the hillside. (set: _storyhooks to (altered: via its name, ...(open-storylets: where its tags contains 'storyhook')))\ (if: _storyhooks's length > 0)[(display: _storyhooks's 1st)]\ (else:) [You are in District Four. ] ###What do you do? * [[Go to Green Canyon->Green Canyon Location]] * [[Go to Lang Pharma->Lang Pharma Location]] * [[Go to Gagarin Flats->Gagarin Flats Location]] $WhereDoYouWantToGo

(storylet: when ($discovered:"Gagarin Flats"))\ Located in District Four.

{ (for: each _passage, ...(passages:))[ (if: _passage's tags contains "location")[ (set: _location to _passage's name) (if: (datanames: _passage)contains "district")[ (set: _district to (passage: _location)'s "district") (if: _district is not in (a: 'One', 'Two', 'Three', 'Four', 'Five'))[ _location has unknown district _district ] ](else:)[ _location does not have a district assigned ] ] ] }

##Overview of Locations (for: each _passage, ...(passages: where its tags contains 'location'))[(set:_name to _passage's name)(unless: 'Test' is in _name)[(str: _name) ((str:(passage: _name)'s "district")) ]]

##Overview of Persons (for: each _passage, ...(passages: where its tags contains 'person'))[(set:_name to _passage's name)(unless: 'Test' is in _name)[(str: _name) (($faction:_name)) ]]

##Ask Earth for more money Funding the program with money from Earth means increased debt, increased long term dependency on Earth. To solve an issue that impacts Mars only, not Earth. Following lengthy negotiations, the Earth Coalition agrees to release the funds given two concessions: \ * No further procreation licenses are granted before the cause of the illness has been found. * The colony accepts to receive an additional 700 immigrants from Earth with no additional funding and no influence on the selection. ###What do you do? * [[Persuade Stuart->Sick Children Influence Stuart]] * [[Try something else->Sick Children Deal With It]]

##Buy space stims from Earth You organise that additional shipments of space stims are included with the next cargo drop from Earth. In the mean while, you trace down and confiscate all space stims in the colony and hand them out to all children in the colony.(set: $Reserves to it -1) Unfortunately, it is soon clear that the space stims do not cure the sick children. =><= [[Ok->Sick Children Deal With It]] <== $AdvanceTurn

##Hand out bootleg space stims You organise that the bootleg space stims confiscated from the raid of the underground stim factory are handed out to all the children in the colony. Unfortunately, it is soon clear that the bootleg space stims do not cure the sick children. =><= [[Ok->Sick Children Deal With It]] <== $AdvanceTurn

###Where do you want to go? { <table width="100%"> <tr> <td width="35%" align=center>''District Two'' [[First Landing Plaza]]</td> <td> </td> <td width="35%" align=center>''District Five'' [[Ingenuity Square]]</td> </tr> <tr> <td> </td> <td align=center>''District One'' [[The Hub]] </td> <td> </td> </tr> <tr> <td align=center>''District Three'' [[High Street]]</td> <td> </td> <td align=center>''District Four'' [[Curiosity Gate]]</td> </tr> </table> }

(storylet: when ($discovered:"Underground Stim Factory"))\ A bootleg operation that produces space stims on Mars.

(storylet: when ($true:"Dust Storm Approaching"))(urgency:4)\ A huge dust storm is gathering over the Borealis basin and heading this way. Early predictions says it will hit the colony early next week. Close your windows and stay indoors! This will be a big one! ($topic: "Mars Energy") says that the storm may lead to reduced energy production. Some auxiliary systems may be turned off to compensate. You can help by turning off devices that are not needed.($set: "Dust Storm Approaching")

{ (set: _progress to ($progress:)) (unless: _progress is 0)[ Expected progress to be 0, was _progress ] (if: ($colonySurvives:))[ Expected the colony to fail ] (set: $Economy to 1) (set: _progress to ($progress:)) (unless: _progress is 11)[ Expected progress to be 11, was _progress ] (set: $Economy to 1, $Infrastructure to 1, $Law to 2) (set: _progress to ($progress:)) (unless: _progress is 44)[ Expected progress to be 44, was _progress ] (unless: ($colonySurvives:))[ Expected the colony to survive ] (display: "Define Colony State") }

{ (set: $choseWisely to (macro: [ (output-data: ($average: $Modifiers) >= 2) ])) (set: $chosePoorly to (macro: [ (output-data: ($average: $Modifiers) <= 0) ])) (set: $wasLucky to (macro: [ (output-data: ($average: $Rolls) > 9) ])) (set: $wasUnlucky to (macro: [ (output-data: ($average: $Rolls) < 5) ])) (set: $colonySurvives to (macro: [ (output-data: (cond: $Economy is 0, false, $Infrastructure is 0, false, $Law is 0, false, true ) ) ])) }

###How is Kelly Parker remembered? { (if: 0 < length of $Rolls)[ (set: _progress to ($progress:)) (if: _progress is 100)[ Kelly's role in turning around the colony is legendary. Future generations of Martians learn about Kelly Parker in school. (if: ($wasLucky:))[ Historians argue exactly how much of Kelly's success was down to luck. ] ](else-if: _progress is 0)[ Kelly Parker failed to make any lasting impact on the colony, despise the high hopes at the start of her term. ](else:)[ Kelly Parker made an impact on the colony but also left issues unresolved for her successors to deal with. ] (if: $Popularity is 3)[ (if: ($colonySurvives:))[ People remember Kelly with fond memories. She was as popular when she left as when she came. ] ](else-if: $Popularity is 0)[ (if: ($colonySurvives:))[ People despised Kelly at the end of her term, however, the unpopular and tough decisions she made saved the colony. ](else:)[ Kelly is despised. People blame her for everything that went wrong with the colony. ] ] (if: $Reserves is 0)[ Kelly had a flair for spending other people's money. ](else-if: $Reserves is 3)[ (if: ($colonySurvives:))[ Kelly knew how to save a penny. ] ] (if: $Integrity is 3)[ (if: ($colonySurvives:))[ Kelly stayed true to the ideals that led her to Mars. ] ](else-if: $Integrity is 0)[ Kelly lost sight of the vision that led her to Mars and was caught up in politics and intrigues. ] (if: ($colonySurvives:))[ (if: ($choseWisely:))[ History remembers Kelly as a wise and influential leader. ] (if: ($chosen:"Stay on Mars"))[ Kelly eventually decides to stay on Mars(if: ($chosen:"Have kids") and ($chosen:"Take E pills"))[ and raises a little flock of Martians of her own]. ] ] ](else:)[ Kelly's time on Mars was short and uneventful. People hardly remember Kelly Parker at all. ] }

{ |test-output>[ ##End immediately (display:"Colony Epitaph") (display:"Kelly Epitaph") ##Failing Law and Order (set: $Rolls to (a: 7, 7, 5), $Modifiers to (a: 2, 3, 0), $Economy to 1, $Infrastructure to 1, $Law to 0, $Integrity to 3, $Popularity to 3, $Reserves to 2, $Choices to (ds:) ) ($choose:"Stay on Mars") (display:"Colony Epitaph") (display:"Kelly Epitaph") ##Failing Infrastructure (set: $Rolls to (a: 7, 7, 5), $Modifiers to (a: 2, 3, 0), $Economy to 1, $Infrastructure to 0, $Law to 1, $Integrity to 3, $Popularity to 3, $Reserves to 2, $Choices to (ds:) ) ($choose:"Stay on Mars") (display:"Colony Epitaph") (display:"Kelly Epitaph") ##Happy Ending (set: $Rolls to (a: 7, 7, 12), $Modifiers to (a: 2, 3, 2), $Economy to 1, $Infrastructure to 1, $Law to 1, $Integrity to 3, $Popularity to 3, $Reserves to 3, $Choices to (ds:) ) ($choose:"Stay on Mars") ($choose:"Have kids") (display:"Colony Epitaph") (display:"Kelly Epitaph") ##So-so Ending (set: $Rolls to (a: 7, 7, 12), $Modifiers to (a: 2, 1, 0), $Economy to 1, $Infrastructure to 1, $Law to 1, $Integrity to 2, $Popularity to 2, $Reserves to 2, $Choices to (ds:) ) ($choose: "Stay on Mars") (display:"Colony Epitaph") (display:"Kelly Epitaph") ##Failing Integrity (set: $Rolls to (a: 7, 7, 12), $Modifiers to (a: 2, 1, 0), $Economy to 1, $Infrastructure to 1, $Law to 1, $Integrity to 0, $Popularity to 2, $Reserves to 2, $Choices to (ds:) ) ($choose: "Stay on Mars") (display:"Colony Epitaph") (display:"Kelly Epitaph") ##Failing Popularity (set: $Rolls to (a: 7, 7, 12), $Modifiers to (a: 2, 1, 0), $Economy to 1, $Infrastructure to 1, $Law to 1, $Integrity to 2, $Popularity to 0, $Reserves to 2, $Choices to (ds:) ) ($choose: "Stay on Mars") (display:"Colony Epitaph") (display:"Kelly Epitaph") ]  (display: "Initialize Globals") }

###What happens to the colony? { (set: _progress to ($progress:)) (if: $Economy is 0)[ The colony miserably fails to provide any source of income and continues to be hopelessly dependent on Earth. When the dream of a future on Mars for humankind fades, funding dies out and the colony is eventually abandoned, leaving behind a few die-hards that either are unwilling or unable to return to Earth. ](else-if: $Infrastructure is 0)[ The colony fails to maintain and expand the infrastructure that was so elaborately designed and thought out. Power outages are common. Trains stop running. Heating and plumbing breaks down. Accidents frequently kill and maim the habitants that one by one give up and return to Earth. The last human on Mars forgets to turn off the light and a fire engulfs the colony. ](else-if: $Law is 0)[ The colony fails to provide and uphold adequate laws for life on Mars. The population largely ignores the government and do as they please, struggling to get along. Corruption is rampant. When the Earth Coalition finally withdraws its support and its institutions, the colony succumbs into chaos and anarchy. ](else-if: _progress is 100)[ Congratulations! You have saved the colony! Well done! The colony eventually recovers into a prosperous base for humans to live on Mars. ](else:)[ The colony struggles towards an uncertain future. Stuff breaks down, people quarrel and bicker constantly, but somehow the colony manages to stay alive. ] }

##Call the police You call the police. They raid the facility. They find a lot of gear that was stolen from Mars Drilling. Plus a lot of bootleg space stims. =><= [[Ok->Underground Stim Factory Location]] <== (display: "Underground Stim Factory Raid")

##Buy bootleg stims You buy ($pickup: "some " + (lowercase:($topic:"Bootleg space stims"))). (link: (either: "Try one", "Take one", "Take a pill") + ".")[(nth: visits, "It tastes a bit like candy.", "This one taste like strawberry.", "This one is bitter.")($choose: "Take bootleg stims")] =><= [[Ok->Underground Stim Factory Location]] <== ($addNote:"Bootleg space stims", "I've bought some. ")

##Talk with Sasha You ask after Sasha and after a short while, a man with ponytail and earrings appears. He looks at you guardedly. "Yes?" (t8n:"fade-up")+(link-replace: "I'm here to buy")[==\ "I'm here to buy. For a friend. Stims." "Cash only. How many?" "One package." ###What do you do? { <ul> <li>[[Buy bootleg space stims->Underground Stim Factory Buy Stims]] <li>[[Leave->Underground Stim Factory Location]] </ul> }

##Talk with Anna Coleman (if: visits is 1)[You meet ($topicPopup:"Anna Coleman")($addNote:"Colony Museum", "The director of the museum is Anna Coleman. "), the director of the ($topic: "Colony Museum"). She shows you around and tells you the story of the colony. ](else:)[You talk with ($topicPopup:"Anna Coleman"), the museum director. ] \(set: _someone to "Anna Coleman") \(set: _afterConversationGoto to "Colony Museum Location") \(display: "Talk with Someone")

##Talk with Rawan Tahir You talk with ($topicPopup:"Rawan Tahir"), Head of ($topic:"M-Sec"), the colony security and police force. \(set: _someone to "Rawan Tahir") \(set: _afterConversationGoto to "Police Station") \(display: "Talk with Someone")

(storylet: when ($visited: "Sick Children Statement from Lang") and not ($visited: "Sick Children Resolved"))(urgency:3)\ "Mr Fletcher, have you heard about the sick children, the children in District Five that see abnormal skin changes?" "Yes. What about them?" "Doesn't it worry you that humans may not be able to reproduce on Mars? That humans born on Mars will not grow old?" "If I worried about everything that could go wrong, I wouldn't have been where I am. Can't you solve it?"

=><= (button:)(link-goto:"Ok", (history:)'s last) <==

=><= (if:(history:)'s length >0)[(button:)(link-undo: "Ok")] <==

##Tanya's baby resolved Congratulations, you have resolved the situation around Tanya Toropov and the procreation laws. $WhatDoYouDo

##Do nothing You accept Doctor Stuart's decision to not carry out the abortion. As no one else is qualified and available, Tanya's pregnancy continues. Following the letter of the law, Lang then insists that the child is adopted away at birth and that Tanya is deported back to Earth immediately after giving birth. =><= [[Ok->Foster Parents for Tanyas Child]] <== $AdvanceTurn

##Talk with Tanya You talk with ($topicPopup: "Tanya Toropov"). \(set: _someone to "Tanya Toropov") \(set: _afterConversationGoto to "Tanya What Do You Do") \(display: "Talk with Someone")

##Tanya reveals who the father is You learn the name of the father from Tanya: Tom Blumberg. You access his medical file and calculate the longevity score for the child. The score is sufficiently high for it to pass the genetic criteria, even with Tanya's gene defect. It's just the fact that the father has not consented to have a child and to raise it. You ask Tom Blumberg for a donation to the orphanage. He agrees. While never spoken directly, he understands what this is about. You explain the situation to Ridley Lang. Legally, the mayor can allow the child to be born under two conditions: That the mother returns to Earth immediately after the child is born. That someone else in the colony adopts the child. Lang agrees to pardon Tanya if you find someone who will adopt her child. =><= [[Ok->Foster Parents for Tanyas Child]] <==

{ (set: $MockRoll to 7) (set: $rollDice to (macro: [ (set: _roll to $MockRoll) [(set: $Rolls to (a: _roll,...$Rolls))] (output-data: _roll) ])) }

(storylet: when not ($visited: "Tanya Resolved"))(urgency:2)\ "Tanya, who is the father? Why is he not registered as your partner?" "I'm not going to tell you and he doesn't know." "Why?" "I want a baby, he doesn't."

(storylet: when not ($visited: "Tanya Resolved"))(urgency:3)\ "How can I help you get a pardon?" (if: ($visited:"Sick Children Resolved"))[\ "I thought now that it's safe for kids to grow up on Mars, the health requirements will be changed. But I can't wait for that. My baby can't wait for that." "Why is that?" \]\ "I have pleaded with the mayor but he hasn't answered. He can pardon me. Help me get Lang to pardon me. Before tomorrow! They will take my baby away from me!"

(storylet: when not ($visited: "Tanya Resolved"))\ "How can we make it easier for me to help you? Can we talk to the father for instance?" "I don't know!" "There must be a way!" "I will tell my son who the father is when he is old enough but no one else!" "Stupid rules!" "My baby didn't need any rules to get into this world."

(storylet: when not ($visited: "Tanya Resolved"))(urgency:2)\ "Tanya, you have a gene defect. Your baby may need help we cannot give him here on Mars." "I can take care of him! He will be strong, I feel it." There is a fire in Tanya's eyes. She wants this to happen.

(storylet: when not ($visited: "Tanya Resolved"))(urgency:2)\ "How do you know the embryo is a boy?" "Doctor Stuart did a scanning yesterday. He says the baby is healthy and most likely will be a boy. I already knew that. I could feel it."

(storylet: when not ($visited: "Tanya Resolved"))(urgency:3)\ "Congratulations on your pregnancy. Not everyone are as lucky as you. Still it is a bold decision. To carry on with a pregnancy. Alone." Tanya listens attentively. She calms down some but is on her guard.

##Mayor Lang pardons Tanya Tanya is allowed to give birth to her child. However, she will be deported to Earth immediately after giving birth. The child will be adopted by someone else in the colony. =><= [[Ok->Foster Parents for Tanyas Child]] <==

##Doctor Stuart performs the abortion Doctor Stuart performs the abortion. Tanya's pregnancy is terminated. People in the colony quietly accepts and life moves on. =><= [[Ok->Tanya Resolved]] <==

(if:_result is 'Hit')[\ "There is a way we can win this." You look at Lang and continue: "Clearly we cannot set a precedent that hiding a pregnancy is a way around the procreation laws. The procreation laws must stand. Or that getting pregnant without the consent of the father is a way." "However, everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Our ratings went up. Babies are hope. Hope for a future for humans on Mars." "We don't know who the father is. We don't need to know. It could be anyone, it could be the holy spirit. Stuff like this happened thousands of years ago, it will happen again tomorrow." "Find someone to adopt the child. Send Tanya back to Earth after giving birth. Be firm but merciful." Ridley Lang studies you intensely. Then smiles. "Who do you have in mind?" \](else-if: _result is 'Partial Hit')[\ "There is a way we can win this." You look at Lang and continue: "Clearly we cannot set a precedent that hiding a pregnancy is a way around the procreation laws. The procreation laws must stand. Or that getting pregnant without the consent of the father is a way." "However, everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Our ratings went up. Babies are hope. Hope for a future for humans on Mars." "We don't know who the father is. We don't need to know. It could be anyone, it could be the holy spirit. Stuff like this happened thousands of years ago, it will happen again tomorrow." "Find someone to adopt the child. Send Tanya back to Earth after giving birth. We can find the resources to raise one more child. Be firm but merciful."(set: $Reserves to it - 1) Ridley Lang studies you intensely. Then smiles. "Who do you have in mind?" \](else:)[\ "There is a way we can win this. Everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Our ratings went up. Babies are hope. Hope for a future for humans on Mars." "We don't know who the father is. We don't need to know. It could be anyone, it could be the holy spirit. Stuff like this happened thousands of years ago, it will happen again tomorrow." "We can find the resources to raise one more child. Be merciful." Ridley Lang studies you intensely. Then frowns. "The answer is no. We rule by law." \]

(if:_result is 'Hit')[\ TODO \](else-if: _result is 'Partial Hit')[\ TODO \](else:)[\ TODO \]

(if:_result is 'Hit')[\ "Tanya, the only chance I have to help you is if I know who the father is. No one else needs to know, but I need to know so I can check that the baby will have a good chance to survive here on Mars. Maybe there is some help or medicine that is needed urgently after the baby is born. When I know that, I can make sure that you and the baby get the help you need." Tanya looks at you attentively. "The father doesn't need to know. It will be just you and me. I promise I won't tell anyone."($promise:"I won't tell anyone who the father of Tanya's baby is.") After a moment of silence, Tanya speaks: "($learn: "The father is " + ($topic:"Tom Blumberg"))."($addNote:"Tom Blumberg", "Father of Tanya's child. ") Tom Blumberg is the head of ($topic:"Mars Energy"). \](else-if: _result is 'Partial Hit')[\ "Tanya, the only chance I have to help you is if we can screen the father's profile and assess the baby's longevity score. Only then can the colony allocate the resources needed to support the birth and upbringing of this new citizen." You see that Tanya doesn't follow. "Maybe there is some help or medicine that is needed urgently after the baby is born. The father doesn't need to know. It will be just you and me. I promise I won't tell anyone."($promise:"I won't tell anyone who the father of Tanya's baby is.") It's a promise you can't keep. You will need to write the name in the files and the father will need to consent to the child being born. Tanya doesn't know that. (set: $Integrity to it - 1) After a moment of silence, Tanya speaks: "($learn: "The father is " + ($topic:"Tom Blumberg"))."($addNote:"Tom Blumberg", "Father of Tanya's child. ") Tom Blumberg is the head of ($topic:"Mars Energy"). \](else:)[\ "Tanya, the only chance I have to help you is if we can screen the father's profile and assess the baby's longevity score. Only then can the colony allocate the resources needed to support the birth and upbringing of this new citizen." "You and your stupid rules. Doctor Stuart says the baby is healthy and I feel it too. That is all that matters." Tanya's voice is calm but you see in her eyes that you have just become one of "them". \]

(storylet: when ($discovered: "Tarkelan Industries"))\ "Tarkelan Industries owns and runs the Colony Replicator."

(storylet: when ($discovered:"Space stims"))\ "What about space stims? Can't they be used?" "Space stims are designed to help the human body adapt to long term space travel, such as when travelling between Earth and Mars. However, long term space travel isn't the same as living the rest of your life on Mars. Some of the stuff in there could be harmfull on a longer time scale." "Also, we don't have a local production of space stims, we need to get them from Earth. If we use these instead of E pills, we will run out and don't have space stims for the people who need to travel back to Earth. Such as you. Unless you choose to stay of course."

##Workers on strike Workers at Mars Drilling go on strike. They demand that the company re-hires union representative Jackson that was dispelled on false accusations. ($set: "Workers On Strike!") (display:"Strike What Do You Do")

##Do nothing You decide to turn your attention to other issues and let the strike play its course. $AdvanceTurn \($set: "Workers On Strike!") $WhatDoYouDo

##Inform Yu Yan You inform ($topicPopup:"Yu Yan") that the missing equipment from Mars Drilling has been found during a raid of an underground stim factory in District Four. As far as the police can tell, union representative Jackson had nothing to do with the factory. Yu Yan apologises and agrees to rehire the union representative. (set: $Economy to it + 1)($set:"Strike Avoided")$AdvanceTurn ($fulfill: "The police will take on the case") =><= [[Great!->Strike Avoided]] <==

{  (set: $Conditions to (ds:)) (set: $set to (macro: str-type _event, [ (set: $Conditions to it + (ds:_event)) (output:)[] ]) ) (set: $true to (macro: str-type _event, [ (output-data: _event is in $Conditions) ]) ) (set: $unset to (macro: str-type _event, [ (set: $Conditions to it - (ds:_event)) (output:)[] ]) ) }

{ (if: ($true: "Event!"))[ Did not expect Event! to be active! ] ($set:"Event!") (unless: ($true: "Event!"))[ Did not expect Event! to be active! ] ($unset:"Event!") (if: ($true: "Event!"))[ Did not expect Event! to be active! ] }

(enchant: ?test-output, (text-colour:gray) + (background: #f0f0f0) )

(storylet: when ($location:"Kelly's Quarters") and $YouGotMail and $Turn > 2)\ You notice that you have unread mail. * [[Read mail->Mail]]

{ (set: $BackButton to (display: "Back Button")) (set: $UndoButton to (display: "Undo Button")) }

(if:_result is 'Hit')[\ You explain Ursula why this is the best solution given the circumstances. She listens and you answer her questions until she understands and agrees with you. On your advice, Mayor Lang gives Neil Jackson a job in Lang Pharma. The union accepts the compromise and the strike is avoided. Production rates in Mars Drilling continue to be appalling though. \](else-if: _result is 'Partial Hit')[\ You explain Ursula why this is the best solution given the circumstances. She listens and you answer her questions until she understands and agrees with you. On your advice, Mayor Lang gives Neil Jackson a job in Lang Pharma. The union accepts the compromise and the strike is avoided. The workers in Mars Drilling are not happy though and production rates continue to be appalling.(set: $Popularity to it -1) \](else:)[\ You begin a long monologue explaining the details of your proposal but are soon interrupted. Foreman Ursula Kaminski from the union is furious! "The union will under no circumstances accept that union representatives are fired based on accusations not proven in court!" "(cond: $Faction is "Socialists", "Special Advisor Parker, I expected better of you!", $Faction is "Conservatives", "Special Advisor Parker, don't think I don't know the law!", $Faction is "Liberals", "Special Advisor Parker, you disappoint me!", (error: "Unknown faction " + $Faction))" A strike notice is sent to Mars Drilling and from the lightning shooting from Ursula's eyes, you realise that you have just made an enemy. \]

(if:_result is 'Hit')[\ You tell Ursula that this is the best she can get and look her straight into the eyes. She hesitates and then says: "I trust you are right, even if I don't like it." On your advice, Mayor Lang gives Neil Jackson a job in Lang Pharma. The union accepts the compromise and the strike is avoided. Production rates in Mars Drilling continue to be appalling though. \](else-if: _result is 'Partial Hit')[\ You tell Ursula that this is the best she can get and look her straight into the eyes. She hesitates and then says: "I trust you are right, even if I don't like it." On your advice, Mayor Lang gives Neil Jackson a job in Lang Pharma. The union accepts the compromise and the strike is avoided. You can't stop a nagging thought that Mars Drilling got away with this a bit too easy on this one...(set: $Integrity to it - 1) \](else:)[\ You tell Foreman Kaminski from the union that this is the best she can get. However, you know this is not true and can't look her straight into the eyes. Kaminski is furious! "The union will under no circumstances accept that union representatives are fired based on accusations not proven in court!" "(cond: $Faction is "Socialists", "Special Advisor Parker, I expected better of you!", $Faction is "Conservatives", "Special Advisor Parker, don't think I don't know the law!", $Faction is "Liberals", "Special Advisor Parker, you disappoint me!", (error: "Unknown faction " + $Faction))" A strike notice is sent to Mars Drilling and from the lightning shooting from Ursula's eyes, you realise that you have just made an enemy. \]

(if:_result is 'Hit')[\ You defuse the situation with some small talk and Ursula relaxes a bit. She starts talking about her concerns for the workers safety at Mars Drilling and you promise to take the matter to the mayor as soon as this situation is resolved. On your advice, mayor Lang gives Neil Jackson a job in Lang Pharma. The union accepts the compromise and the strike is avoided. Production rates in Mars Drilling continue to be appalling though. \](else-if: _result is 'Partial Hit')[\ You defuse the situation with some small talk and Ursula relaxes a bit. In the end she trusts your assurances that the company will deal with Joe Mando's team once the case is out of the media.($promise:"Mars Drilling will deal with Mando") On your advice, mayor Lang gives Neil Jackson a job in Lang Pharma. The union accepts the compromise and the strike is avoided. Production rates in Mars Drilling continue to be appalling though.(set: $Integrity to it - 1) \](else:)[\ You praise Foreman Kaminski from the union for how well she is doing her job to defuse the situation and get her to relax. She is furious! How she performs her job is none of your fracking business. "(cond: $Faction is "Socialists", "Special Advisor Parker, I expected better of you!", $Faction is "Conservatives", "Special Advisor Parker, don't think I don't know the law!", $Faction is "Liberals", "Special Advisor Parker, you disappoint me!", "Unknown faction " + $Faction)" A strike notice is sent to Mars Drilling and from the lightning shooting from Ursula's eyes, you realise that you have just made an enemy. \]

(if:_result is 'Hit')[\ You explain to Yu Yan that she cannot fire a union representative on accusations alone, the case will need to be proven in court. If the union files charges for unlawful dismissal or proceeds with a strike, Mars Drilling will eventually loose. There is more to be gained to work with the union and the police to find the stolen property. Yu Yan accepts to give Neil Jackson his job back and to hand over the result of the internal investigation to the police for them to start a criminal investigation. \](else-if: _result is 'Partial Hit')[\ You explain to Yu Yan that she cannot fire a union representative on accusations alone, the case will need to be proven in court. If the union files charges for unlawful dismissal or proceeds with a strike, Mars Drilling will eventually loose. There is more to be gained to work with the union and the police to find the stolen property. You offer to redirect funding such that the police can take on the case immediately. Yu Yan accepts to give Neil Jackson his job back and to hand over the result of the internal investigation to the police.(set: $Reserves to it -1) \](else:)[\ You explain to Yu Yan that she cannot fire a union representative on accusations alone, the case will need to be proven in court. "See you in court then!" she interrupts. From her eyes you can tell that you have just made an opponent. \]

(if:_result is 'Hit')[\ You tell Yu Yan that she cannot fire a union representative on accusations alone, the case will need to be proven in court. If the union files charges for unlawful dismissal or proceeds with a strike, Mars Drilling will loose. The right thing to do is to work with the union and the police to find the stolen property. Yu Yan looks you in the eyes for a while and then says: "Ok, you are right." Yu Yan accepts to give Neil Jackson his job back and to hand over the result of the internal investigation to the police. \](else-if: _result is 'Partial Hit')[\ You tell Yu Yan that she cannot fire a union representative on accusations alone, the case will need to be proven in court. If the union files charges for unlawful dismissal or proceeds with a strike, Mars Drilling will loose. The right thing to do is to work with the union and the police to find the stolen property. Yu Yan looks you in the eyes for a while and then says: "I've been trying to work with them for a long time." You promise that the police will take on the case immediately and that the union will cooperate. It's a promise that will be hard to keep.($promise: "The police will take on the case") "Ok." Yu Yan accepts to give Neil Jackson his job back and to hand over the result of the internal investigation to the police.(set: $Integrity to it -1) \](else:)[\ You tell Yu Yan that she cannot fire a union representative on accusations alone, the case will need to be proven in court. "See you in court then!" she interrupts. From her eyes you can tell that you have just made an opponent. \]

(if:_result is 'Hit')[\ "I love how hard you fight for Mars Drilling to succeed,\" you begin \"and I want to help you. I want Mars Drilling to succeed as well. It's the most important company on Mars and crucial to the success of the colony.\" \"With the investigations you have made, it must be real easy for the police to solve the crimes happening at Mars Drilling. Maybe even get the stolen equipment back. Let me help you. But first you need to rehire Jackson. Two wrongs doesn't make a right.\" Yu Yan accepts to give Neil Jackson his job back and to hand over the result of the internal investigation to the police. \](else-if: _result is 'Partial Hit')[\ "I love how hard you fight for Mars Drilling to succeed," you begin, "and I want to help you. I want Mars Drilling to succeed as well. It's the most important company on Mars and crucial to the success of the colony." "With the investigations you have made, it must be real easy for the police to solve the crimes happening at Mars Drilling. Maybe even get the stolen equipment back. Let me help you." You offer to redirect funding such that the police can take on the case immediately. "But first you need to rehire Jackson. Two wrongs doesn't make a right." Yu Yan accepts to give Neil Jackson his job back and to hand over the result of the internal investigation to the police.(set: $Reserves to it -1) \](else:)[\ "I love how hard you fight for Mars Drilling to succeed," you begin. "But you cannot fire a union representative on accusations alone, the case will need to be proven in court." "See you in court then!" she interrupts. From her eyes you can tell that you have just made an opponent. \]

(if:_result is 'Hit')[\ You explain your reasoning to Arnold Fletcher: Why a delay in the construction of Green Canyon is worth the goodwill he will get from the people in the colony from solving the most pressing issue, not just for the colony but for the dream of humans living on Mars. At first he hesitates, then he starts liking the idea, you can see it in his eyes. Half-heartedly he objects, but soon he outlines the communication plan and describes the staged photos of cured children moving into Green Canyon. \](else-if: _result is 'Partial Hit')[\ You explain your reasoning to Arnold Fletcher: Why a delay in the construction of Green Canyon is worth the goodwill he will get from the people in the colony from solving the most pressing issue, not just for the colony but for the dream of humans living on Mars. At first he hesitates, then he starts liking the idea, you can see it in his eyes. Then the business man in him kicks in, and before you realise it, he has talked you into splitting the cost 50-50 with a budget contingency buffer while still getting all the publicity for the deal in case a cure is found.(set: $Reserves to it -1) \](else:)[\ You explain your reasoning to Arnold Fletcher: Why a delay in the construction of Green Canyon is worth the goodwill he will get from the people in the colony from solving the most pressing issue, not just for the colony but for the dream of humans living on Mars. He looks you straight into your eyes and says: "You are kidding, right? This is the worst proposal ever. I have misjudged you. We are done here." \]

(if:_result is 'Hit')[\ "I need you to do me a favour. I need to cut the funds from Green Canyon to fund a research program to find out why the children get sick." Arnold Fletcher is not happy. He finally decides to trust you and accepts that the funds going to Green Canyon is redirected to the new research program. \](else-if: _result is 'Partial Hit')[\ "I need you to do me a favour. I need to cut the funds from Green Canyon to fund a research program to find out why the children get sick." Arnold Fletcher is not happy. He finally understands that you really need this and he decides to work with you. "Ok, but then let's do it this way: We fund the program 50-50 from Green Canyon and the budget contingency buffer. Funding is announced to come from an anonymous donater. Then if the program is a success and a cure is found, I get to step forward and get the publicity for sponsoring the program." You accept.(set: $Reserves to it - 1) \](else:)[\ "I need you to do me a favour. I need to cut the funds from Green Canyon to fund a research program to find out why the children get sick." Arnold Fletcher is not happy. "What is this? A dictatorship?" "The funding for Green Canyon have been approved by the committee and the senate. You can't touch it. It will go to build Green Canyon and not to some fancy idea you thought up last night when you couldn't sleep. It won't happen." \]

(if:_result is 'Hit')[\ "What is a future without children? How can we dream of Mars if our kids get sick and die? How can we build for tomorrow if there will be no tomorrow?" "Finding the cause and a cure for whatever is threatening the health of our children and our existence as a race on Mars is the number one priority for the colony right now. Be a part of it." Arnold Fletcher is silent. Then he nods. "Yes. You are right. I accept." \](else-if: _result is 'Partial Hit')[\ "What is a future without children? How can we dream of Mars if our kids get sick and die? How can we build for tomorrow if there will be no tomorrow?" "Finding the cause and a cure for whatever is threatening the health of our children and our existence as a race on Mars is the number one priority for the colony right now. Be a part of it." Arnold Fletcher is silent. At first he hesitates, then he starts liking the idea, you can see it in his eyes. Then the business man in him kicks in, and before you realise it, he has talked you into splitting the cost 50-50 with a budget contingency buffer while still getting all the publicity for the deal in case a cure is found.(set: $Reserves to it - 1) \](else:)[\ "What is a future without children? How can we dream of Mars if our kids get sick and die? How can we build for tomorrow if there will be no tomorrow?" "Cut it. That is bullshit and you know if. Go find that money someplace else." Arnold Fletcher looks at you with dismay. "We are done here. Leave." \]

(if:_result is 'Hit')[\ You explain to Lang why getting Doctor Stuart on board is key to success and that the only way to do that is by not anchoring the program with Lang Pharma. This will ensure his cooperation which is crucial in getting to the root cause of the disease. Lang doesn't like it but understands your reasoning and hesitantly accepts. \](else-if: _result is 'Partial Hit')[\ You explain to Lang why getting Doctor Stuart on board is key to success and that the only way to do that is by not anchoring the program with Lang Pharma. This will ensure his cooperation which is crucial in getting to the root cause of the disease. Lang doesn't like it and hesitates. Then says: "Ok, we can launch an independent program. But the government must own the rights to whatever results come out of it. And Lang Pharma must be given exclusive right to buy or license the results." This will essentially hand over any upside to Lang Pharma at a price determined by the mayor. If not straight out corruption then definitely in a grey zone. You give it a thought and decide to deal with these complications later. "This is how it will be."(set: $Integrity to it - 1) \](else:)[\ You explain to Lang why getting Doctor Stuart on board is key to success and that the only way to do that is by not anchoring the program with Lang Pharma. "No way!" Lang is furious! "I don't know what Doctor Stuart did or said or promised! I will not allow him to sabotage Lang Pharma and the crucial health benefits provided by the E pills through slander or political manoeuvring!" \]

(if:_result is 'Hit')[\ You tell Lang: "To win the help and support from Doctor Stuart on finding the cause and the cure for the colony's children, we must leave the past in the past and offer a fresh start. It is the right thing to do." Lang doesn't like it but he hesitantly decides to trust you. "Ok, if you say so, and if this can get Stuart off my back." \](else-if: _result is 'Partial Hit')[\ You tell Lang: "To win the help and support from Doctor Stuart on finding the cause and the cure for the colony's children, we must leave the past in the past and offer a fresh start. It is the right thing to do." Lang doesn't like it and hesitates. Then says: "Ok, we can launch an independent program. But the government must own the rights to whatever results come out of it. And Lang Pharma must be given exclusive right to buy or license the results." This will essentially hand over any upside to Lang Pharma at a price determined by the mayor. If not straight out corruption then definitely in a grey zone. You give it a thought and decide to deal with these complications later. "This is how it will be."(set: $Integrity to it - 1) \](else:)[\ You tell Lang: "To win the help and support from Doctor Stuart on finding the cause and the cure for the colony's children, we must leave the past in the past and offer a fresh start. It is the right thing to do." "No way!" Lang is furious! "I don't know what Doctor Stuart did or said or promised! I will not allow him to sabotage Lang Pharma and the crucial health benefits provided by the E pills through slander or political manoeuvring!" "I thought I could trust you but I was obviously mistaken!" \]

(if:_result is 'Hit')[\ "Imagine how popular you will be! The mayor who saved the children of Mars, the future of the colony, the future of mankind!" Lang is quiet but smiling. He can see it. "Keep talking. Will there be a statue?" "Absolutely. Right there in front of the Colony Hall." \](else-if: _result is 'Partial Hit')[\ "Imagine how popular you will be! The mayor who saved the children of Mars, the future of the colony, the future of mankind!" "Cut the bullshit. I'm not a moron." Lang interrupts you. "The Lang Pharma E-pill provides vital health benefits to the colony. The funding needs to continue. We can't rely on space stims imported from Earth, they are too strong for the kids born on Mars." "However, if we can win Stuart over to work with us by launching and independent program, then let's play along. We launch the program with a cut of the funding from Lang Pharma and funds from the reserves. But the government must own the rights to whatever results come out of it." "Sounds like a plan."(set: $Reserves to it - 1) \](else:)[\ "Imagine how popular you will be! The mayor who saved the children of Mars, the future of the colony, the future of mankind!" "Cut the bullshit. I'm not buying it." Lang interrupts you quickly. "Doctor Stuart sweet-talked you into some crap idea trying to get to me. The Lang Pharma E-pill provides vital health benefits to the colony and needs continuous funding. And you Kelly Parker, you need to get your loyalties straight." \]

(if:_result is 'Hit')[\ "A research program without funding will get nowhere. You know that as well as me. With this kind of budget we can put the sick children on top of the agenda and fix it right here, right now. No rest until we have found the cause and the cure for the illness. That is what we want anyway. After that, we are free to change the procreation laws as we decide. Who would want to have babies on Mars if the colony can't guarantee their health and safety anyway?" Doctor Stuart looks at you. He is clearly thinking about it. "You will get a key role in the program of course," you add. Doctor Stuart nods slowly. "And the immigrants?" "You yourself is an immigrant. Remember?" "Ok. I'll do it for Sarah." \](else-if: _result is 'Partial Hit')[\ "A research program without funding will get nowhere. You know that as well as me. With this kind of budget we can put the sick children on top of the agenda and fix it right here, right now. No rest until we have found the cause and the cure for the illness. That is what we want anyway. After that, we are free to change the procreation laws as we decide. Who would want to have babies on Mars if the colony can't guarantee their health and safety anyway?" Doctor Stuart looks at you. He is clearly thinking about it. "You will head up the program of course," you add. A promise that you can't keep, but hopefully the ball will already be moving by then. Doctor Stuart nods slowly. "And the immigrants?" "You yourself is an immigrant. Remember?" "Ok. I'll do it for Sarah."(set: $Integrity to it -1) \](else:)[\ "A research program without funding will get nowhere. You know that as well as me. With this kind of budget we can put the sick children on top of the agenda and fix it right here, right now. No rest until we have found the cause and the cure for the illness. That is what we want anyway. After that, we are free to change the procreation laws as we decide. Who would want to have babies on Mars if the colony can't guarantee their health and safety anyway?" Doctor Stuart looks at you with disbelief. "Earth can keep their money and their criminals." "You yourself is an immigrant. Remember?" (unless: ($visited: "Sick Children Bootleg Space Stims") or ($visited: "Sick Children Stims From Earth"))["Mars can take care of its own now. Just give them proper medicine instead of that fake Lang Pharma stuff."](else:)["The answer is still no. I believe we are done here."] \]

(if:_result is 'Hit')[\ "This is how it will be done: We will get the money we need from Earth to find the cause and a cure for the illness. We will then do whatever we can to help Sarah and Natalia and all the other children on Mars. We will do this because it is the right thing to do." "Keep your quarrels with Lang out of this. Neither blaming the E pills nor handing out space stims before we know more about the disease will do anyone any good." Doctor Stuart is quiet, looking down. "Ok then," he says. "For Sarah." \](else-if: _result is 'Partial Hit')[\ "This is how it will be done: We will get the money we need from Earth to find the cause and a cure for the illness. We will then do whatever we can to help Sarah and Natalia and all the other children on Mars. We will do this because it is the right thing to do." "I will need someone to head up the program of course," you add. "I was thinking you could be the right candidate. Are you interested?" It's a promise that you can't keep, but hopefully the program will already be moving by then. Doctor Stuart is quiet for a while, then nods slowly. "Yes of course. What about the immigrants?" "You yourself is an immigrant. Remember?" Doctor Stuart looks down. "Ok," he says. "For Sarah."(set: $Integrity to it -1) \](else:)[\ "This is how it will be done: We will get the money we need from Earth to find the cause and a cure for the illness. We will then do whatever we can to help Sarah and Natalia and all the other children on Mars. We will do this because it is the right thing to do." "Don't you use that tone with me! You and Lang don't know what is best for the colony or the children of Mars." Doctor Stuart is visibly angry. "Earth can keep their money and their criminals." "You yourself is an immigrant. Remember?" (unless: ($visited: "Sick Children Bootleg Space Stims") or ($visited: "Sick Children Stims From Earth"))["Mars can take care of its own now. Just give them proper medicine instead of that fake Lang Pharma stuff."](else:)["The answer is still no."] \]

(if:_result is 'Hit')[\ "We are only here because of money from Earth anyway! What is an additional one time concession? Once we find the cause and the cure for the illness we are free to decide our own procreation laws, even get rid of them completely if we want. Who would want to have babies anyway if the colony can't guarantee their health and safety?" Doctor Stuart looks at you. He is clearly thinking about it. "You will get a key role in the program of course," you add. Doctor Stuart nods slowly. "And the immigrants?" "You yourself is an immigrant. Remember?" "Ok. I'll do it for Sarah." \](else-if: _result is 'Partial Hit')[\ "We are only here because of money from Earth anyway! What is an additional one time concession? Once we find the cause and the cure for the illness we are free to decide our own procreation laws, even get rid of them completely if we want. Who would want to have babies anyway if the colony can't guarantee their health and safety?" Doctor Stuart looks at you. He is clearly thinking about it. "You will head up the program of course," you add. A promise that you can't keep, but hopefully the ball will already be moving by then. Doctor Stuart nods slowly. "And the immigrants?" "You yourself is an immigrant. Remember?" "Ok. I'll do it for Sarah."(set: $Integrity to it -1) \](else:)[\ "We are only here because of money from Earth anyway! What is an additional one time concession? Once we find the cause and the cure for the illness we are free to decide our own procreation laws, even get rid of them completely if we want. Who would want to have babies anyway if the colony can't guarantee their health and safety?" Doctor Stuart looks at you with disbelief. "Earth can keep their money and their criminals." "You yourself is an immigrant. Remember?" (unless: ($visited: "Sick Children Bootleg Space Stims") or ($visited: "Sick Children Stims From Earth"))["Mars can take care of its own now. Just give them proper medicine instead of that fake Lang Pharma stuff."](else:)["The answer is still no. I believe we are done here."] \]

(if:_result is 'Hit')[\ "Don't hide behind the law. You as mayor has the power to pardon anyone in the colony, regardless of their crime. Clearly it is wrong what Tanya did, to hide a pregnancy from the colony and from the father. We cannot let it set a precedent." "However, everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Our ratings went up. Babies are hope. Hope for a future for humans on Mars." "Be firm but be merciful. Find someone to adopt the child. Send Tanya back to Earth after giving birth. Let this baby be the light that inspires us all to remember that we are humans, not machines." Ridley Lang studies you intensely. Then he smiles. "Who do you have in mind?" \](else-if: _result is 'Partial Hit')[\ "Don't hide behind the law. You as mayor has the power to pardon anyone in the colony, regardless of their crime. Clearly it is wrong what Tanya did, to hide a pregnancy from the colony and from the father." "However, everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Babies are hope. Hope for a future for humans on Mars." "Be firm but be merciful. Find someone to adopt the child. Send Tanya back to Earth after giving birth." Ridley Lang hesitates but eventually agrees to your proposal. Tanya gets to deliver her baby boy but is then deported. This compromise tends to leave few happy and your ratings drop.(set: $Popularity to it - 1) \](else:)[\ "Don't hide behind the law. You as mayor has the power to pardon anyone in the colony, regardless of their crime. Show some compassion. Show you are a human, not a machine." Lang is visibly annoyed. "Sorry, the answer is no. I cannot let one child set a precedent and tear down the public support for the hard won procreation laws. It is wrong what Tanya did and for the good of the colony, she will not be pardoned. Don't ask me again." \]

(if:_result is 'Hit')[\ "What a selfish young girl you are! Tricking a man into a one night stand so you can have a baby! Violating all the rules that the rest of the world has built up over generations. Don't you see the damage that your selfish actions is doing? Don't you have any respect for other people? " Tanya looks down under your stern gaze and firm voice. "This is not just about you. It is for the best of the colony. I won't promise I can fix anything, but I will need you to start acting like an adult for this baby dream of yours having any chance of happening." "Now Tanya, tell me who the father is!" Tanya is quiet for a while under your stern gaze. Finally she speaks. "($learn: "The father is " + ($topic:"Tom Blumberg"))."($addNote:"Tom Blumberg", "Father of Tanya's child. ") Tom Blumberg is the head of ($topic:"Mars Energy"). \](else-if: _result is 'Partial Hit')[\ "What a selfish young girl you are! Tricking a man into a one night stand so you can have a baby! Violating all the rules that the rest of the world has built up over generations. Don't you see the damage that your selfish actions is doing? Don't you have any respect for other people? " Tanya looks down under your stern gaze and firm voice. "You get one chance to redeem yourself. I won't promise I can fix anything, but I will need you to start acting like an adult for this baby dream of yours having any chance of happening. Now Tanya, tell me who the father is!" Tanya is quiet for a while under your stern gaze. Finally she speaks. "($learn: "The father is " + ($topic:"Tom Blumberg"))."($addNote:"Tom Blumberg", "Father of Tanya's child. ") Tom Blumberg is the head of ($topic:"Mars Energy"). While you got what you wanted from Tanya, word of your confrontation gets out and you earned yourself a reputation as a bitch.(set: $Popularity to it - 1)($addNote:"Kelly Parker", "Some think I was too hard on Tanya. ") \](else:)[\ "What a selfish young girl you are! Tricking a man into a one night stand so you can have a baby! Violating all the rules that the rest of the world has built up over generations. Don't you see the damage that your selfish actions is doing? Don't you have any respect for other people? " Tanya looks down under your stern gaze and firm voice. "You get one chance to redeem yourself. Tell me at once who the father is! I won't promise I can fix anything, but I will need you to start acting like an adult for this baby dream of yours having any chance of happening." Tanya says nothing, she just stares at her feet. \]

(if:_result is 'Hit')[\ "Maybe it is time for a policy shift? Everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Our ratings went up. Babies are hope. Hope for a future for humans on Mars." "Find someone to adopt the child. Send Tanya back to Earth after giving birth. Be firm but merciful. Let this baby be the light that inspires us all to remember that we are humans, not machines." Ridley Lang studies you thoughtfully. Then smiles. "It might just work!" \](else-if: _result is 'Partial Hit')[\ "Maybe it is time for a policy shift? Everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Our ratings went up. Babies are hope. Hope for a future for humans on Mars." "Find someone to adopt the child. Send Tanya back to Earth after giving birth. Be firm but merciful." Ridley Lang hesitates but eventually agrees to your proposal. Tanya gets to deliver her baby boy but is then deported. This compromise tends to leave few happy and your ratings drop.(set: $Popularity to it - 1) \](else:)[\ "Maybe it is time for a policy shift? Everyone likes babies, especially when they look like me and you. We have just found and eliminated a threat to procreation on Mars. Babies are hope. Hope for a future for humans on Mars. Show some compassion. Show that you are human, not a machine." Lang is visibly annoyed. "Sorry, the answer is no. I cannot let one child set a precedent and tear down the public support for the hard won procreation laws. It is wrong what Tanya did and for the good of the colony, she will not be pardoned. Don't ask me again." \]

(if:_result is 'Hit')[\ "Tanya, maybe the father loves you more than you think. Maybe the father wants to have a child. Maybe there is hope for the three of you to become a happy family. You are a wonderful person. Let me speak to him. Let me convince him how lucky he is. How stupid he will be for letting this opportunity pass. Give me a chance to sort it out. What do you say? Let's give love a chance?" Tanya's eyes shine. Her face lights up in a smile. Her body relaxes and tears of joy run down her cheeks. "You will do that for me? You think he loves me?" "Yes! For sure he loves you!" Through tears of joy, Tanya confides in you the name of the father: "($learn: "The father is " + ($topic:"Tom Blumberg"))."($addNote:"Tom Blumberg", "Father of Tanya's child. ") Tom Blumberg is the head of ($topic:"Mars Energy"). \](else-if: _result is 'Partial Hit')[\ "Tanya, maybe the father loves you more than you think. Maybe the father wants to have a child. Maybe there is hope for the three of you to become a happy family. You are a wonderful person. Let me speak to him. Let me convince him how lucky he is. How stupid he will be for letting this opportunity pass. Give me just one chance to sort it out. What do you say? Let's give love a chance?" Tanya's eyes shine. Her face lights up in a smile. Her body relaxes and tears of joy run down her cheeks. "You will do that for me? You think he loves me?" You got all her hopes of a better future up. You are pretty sure the father doesn't care one bit about her. Still you say with enthusiasm: "Yes! For sure he loves you!" (set: $Integrity to it - 1) Tanya confides in you the name of the father: "($learn: "The father is " + ($topic:"Tom Blumberg"))."($addNote:"Tom Blumberg", "Father of Tanya's child. ") Tom Blumberg is the head of ($topic:"Mars Energy"). \](else:)[\ "Tanya, maybe the father loves you more than you think. Maybe the father wants to have a child. Maybe there is hope for the three of you to become a happy family. Let me speak to him. Let me convince him how lucky he is. How stupid he will be for letting this opportunity pass. Give me just one chance to sort it out. What is the worst that can happen?" "He doesn't love me. Don't be naive. Do you think I am stupid?" Tanya's voice is calm but you see in her eyes that you have just become one of "them". \]

(if:_result is 'Hit')[\ "An abortion is the rational choice. Are you not a skilled doctor? Is an abortion not a perfectly safe operation for Tanya?" You look sternly at Doctor Stuart and continue: "Tanya may or may not get another chance to bring life into this world, a life that the colony is able to support in full. If you do nothing, if this child is born, you steal resources away from another child, a child whose parents have worked hard according to the rules to earn the support of the colony in bringing a child into this world." You pause to let the words seep in. "You, as the only qualified person in the colony for this job, simply do not have the luxury to turn away from serving the colony." Doctor Stuart looks at you. From his eyes you sense his internal agony, his internal pain. After a long silence, he finally speaks. "I shall perform the operation." \](else-if: _result is 'Partial Hit')[\ "An abortion is the rational choice. Are you not a skilled doctor? Is an abortion not a perfectly safe operation for Tanya?" You look sternly at Doctor Stuart and continue: "Tanya may or may not get another chance to bring life into this world, a life that the colony is able to support in full. If you do nothing, if this child is born, you steal resources away from another child, a child whose parents have worked hard according to the rules to earn the support of the colony in bringing a child into this world." You pause to let the words seep in. "Between us, in confidence, Tanya has told me who the father is. I have checked his records. The child will not grow old." It's a lie but Stuart doesn't know.(set: $Integrity to it - 1) Doctor Stuart looks at you. From his eyes you sense his internal agony, his internal pain. After a long silence, he finally speaks. "I shall perform the operation." \](else:)[\ "An abortion is the rational choice." You look sternly at Doctor Stuart. "Tanya will get another chance to bring life into this world, a life that the colony is able to support in full. If you do nothing, if this child is born, you steal resources away from another child, a child whose parents have worked hard according to the rules to earn the support of the colony in bringing a child into this world." "If you are so smart, why don't you do it yourself?" Doctor Stuart turns and leaves. \]

(if:_result is 'Hit')[\ "It is your duty. You, as the only qualified person in the colony for this task, simply do not have the luxury to turn away from serving the colony." "Is an abortion not a perfectly safe operation for Tanya? Isn't the alternative that Tanya is deported back to Earth? What future lays ahead for Tanya if this child is born?" You look sternly at Doctor Stuart and continue: "Tanya may get another chance to bring life into this world, a life that the colony is able to support in full." You pause to let the words seep in. Doctor Stuart looks at you. From his eyes you sense his internal agony, his internal pain. After a long silence, he finally speaks. "I shall perform the operation." \](else-if: _result is 'Partial Hit')[\ "You, as the only qualified person in the colony for this task, simply do not have the luxury to chose what you want to do. It is your duty to serve the colony. If you refuse to perform the abortion, you will not have a job for long." You pause to let the words seep in. From his eyes you sense his internal agony, his internal pain. After a long silence, he finally speaks. "I shall perform the operation. But I will let everyone know that this was done against my will."(set: $Popularity to it - 1) \](else:)[\ "You, as the only qualified person in the colony for this task, simply do not have the luxury to chose what you want to do. It is your duty to serve the colony. If you refuse to perform the abortion, you will not have a job for long." You pause to let the words seep in. Doctor Stuart looks at you. Then he calls your bluff. "You can fire me and do the operation yourself then." \]

(if:_result is 'Hit')[\ "Imagine the suffering if you don't do it. Is an abortion not a perfectly safe operation for Tanya? Isn't the alternative that Tanya is deported back to Earth? What future lays ahead for Tanya if this child is born?" You look at Doctor Stuart and continue: "Tanya may get another chance to bring life into this world, a life that the colony is able to support in full. Choose the better future for Tanya." Doctor Stuart looks at you. From his eyes you sense his internal agony, his internal pain. After a long silence, he finally speaks. "I shall perform the operation." \](else-if: _result is 'Partial Hit')[\ "Imagine the suffering if you don't do it. Is an abortion not a perfectly safe operation for Tanya? Isn't the alternative that Tanya is deported back to Earth? What future lays ahead for Tanya if this child is born?" You look at Doctor Stuart and continue: "Tanya may or may not get another chance to bring life into this world, a life that the colony is able to support in full. Choose the better future for Tanya." You pause to let the words seep in. "Between us, in confidence, Tanya has told me who the father is. I have checked his records. The child will not grow old." It's a lie but Stuart doesn't know.(set: $Integrity to it - 1) Doctor Stuart looks at you. From his eyes you sense his internal agony, his internal pain. After a long silence, he finally speaks. "I shall perform the operation." \](else:)[\ "Imagine the suffering if you don't do it. Is an abortion not a perfectly safe operation for Tanya? Isn't the alternative that Tanya is deported back to Earth? What future lays ahead for Tanya if this child is born?" You pause to let the words seep in. Doctor Stuart looks at you. "An abortion this late is murder. I will not do it." \]

(storylet: when false and ($location:"The Mayor's Office") and ($true: "Strike Avoided") and not ($visited:"Mars Drilling Productivity Resolved"))\ Lang asks: "So then, what about the appalling productivity at Mars Drilling?" "Can we try to get the union and the company to talk?" "Sure, see if you can get Yu Yan CEO of Mars Drilling and Ursula the union foreman in a room together." * [[Look into the issue->Mars Drilling Productivity]] TODO

##Mars Drilling productivity is up! TODO $WhatDoYouDo

###What do you do? { <ul> (if: ($talks:"Yu Yan"))[ <li>[[Talk with Yu Yan->Mars Drilling Productivity Talk With Yu Yan]] ] (if: ($talks:"Ursula Kaminski"))[ <li>[[Talk with Ursula Kaminski->Mars Drilling Productivity Talk With Ursula]] ] (if: ($talks:"Joe Mando"))[ <li>[[Talk with Joe Mando->Mars Drilling Productivity Talk With Joe Mando]] ] (if: ($talks:"Neil Jackson"))[ <li>[[Talk with Jackson->Mars Drilling Productivity Talk With Jackson]] ] (if: ($talks:"Rawan Tahir"))[ <li>[[Talk withg the police->Mars Drilling Productivity Talk With Rawan Tahir]] ] (if: ($visited:"Mars Drilling Productivity Talk With Ursula"))+(unless: ($visited:"Mars Drilling Productivity Convince Ursula"))[ <li>[[Convince Ursula to help make safety procedures smoother->Mars Drilling Productivity Convince Ursula]] ] (if: ($visited:"Mars Drilling Productivity Talk With Yu Yan"))+(unless: ($visited:"Mars Drilling Productivity Convince Yu Yan"))[ <li>[[Convince Yu Yan to invest in worker safety measures->Mars Drilling Productivity Convince Yu Yan]] ] <li>[[Leave it for later->Mars Drilling Productivity Do Nothing]] </ul> }

##Talk with Yu Yan You give ($topicPopup:"Yu Yan") a call to discuss Mars Drilling productivity. \(set: _someone to "Yu Yan") \(set: _afterConversationGoto to "Mars Drilling Productivity") \(display: "Talk with Someone")

##Mars Drilling Productivity (if: visits is 1)[\ A strike was avoided but productivity at Mars Drilling is still appalling. The union is still insisting rigidly on a work-by-the-rules policy with extensive safety checks at the start of each shift that slows everything down. Except Joe Mando's team. Maybe the situation can be improved? \](else:)[\ The more you look into Mars Drilling, the more you run into the same questions: * What happened at the accident where 72 workers died? * Why is Joe Mando's team more productive? * Who stole equipment from Mars Drilling? \] (display: "Mars Drilling Productivity What Do You Do")

##Talk with Joe Mando You converse ($topicPopup:"Joe Mando"). \(set: _someone to "Joe Mando") \(set: _afterConversationGoto to "Mars Drilling Productivity") \(display: "Talk with Someone")

##Talk with the police You decide to contact the police and ask them to look into ($topic: "Mars Drilling"). The head of the police is ($topicPopup:"Rawan Tahir"). \(set: _someone to "Rawan Tahir") \(set: _afterConversationGoto to "Mars Drilling Productivity") \(display: "Talk with Someone")

##Talk with Ursula Kaminski You converse ($topicPopup:"Ursula Kaminski"). \(set: _someone to "Ursula Kaminski") \(set: _afterConversationGoto to "Mars Drilling Productivity") \(display: "Talk with Someone")

##Talk with Jackson You converse ($topicPopup:"Neil Jackson"). \(set: _someone to "Neil Jackson") \(set: _afterConversationGoto to "Mars Drilling Productivity") \(display: "Talk with Someone")

##Convince Foreman Kaminski You decide to persuade the union to meet the company half way. { (set: _someone to "Ursula Kaminski") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is a smart solution", "Tell", "Tell Kaminski: \"I need you to do this for me\"", "Sell", "Sell: \"What is ...\"" )) (set: _afterMiss to "Mars Drilling Files for Bankruptcy") (set: _afterHit to "Mars Drilling Productivity Resolved") (set: _hitEffect to "(set: $Economy to it + 1)") (display: "Influence Someone") }

##Convince Yu Yan You decide to persuade Yu Yan to meet the union half way. TODO { (set: _someone to "Yu Yan") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is a smart solution", "Tell", "Tell Yu Yan: \"I need you to do this for me\"", "Sell", "Sell: \"What is ...\"" )) (set: _afterMiss to "Mars Drilling Files for Bankruptcy") (set: _afterHit to "Mars Drilling Productivity Resolved") (set: _hitEffect to "(set: $Economy to it + 1)") (display: "Influence Someone") }

(storylet: when true)\ "How are things with the colony? Can you keep the criminals off the street?" "We are doing our best, but we don't have a lot of staff. We need to prioritise what we look into." "What are you working on right now?" "(either: "Some complaint about Green Canyon. That it is violating regulations.", "Sometimes people get a little crazy and break things. If they are homesick and such. Got some bad news from home. Then we take them in to cool down.", "A dispute between neighbours.", "Some missing equipment. Presumably stolen.", "Paperwork. Compiling the monthly statistics for the mayor.")"

(storylet: when ($true:"Investigation started"))(urgency:2)\ "How is it going with the investigation?" (unless: ($true: "Alien artefact found"))[\ "(either: "Great! I'm following up on a lead! Come back again later and I will have news for you.", "A bit slow today, I'm afraid.", "Nothing new to report, I'm sorry. Have you found out anything?" )" "Chief Tahir, these investigations require focus." "Special Advisor Parker, these investigations have our full attention." \](else:)[\ "Mando's team were caught violating several safety procedures.($set:"Safety violations discovered") Two of his crew failed drug tests.($set:"Drug tests failed") Also, it looks like they are drilling outside their designated zone."($set:"Drilling outside designated zone") "Sounds like that warrants further investigation?" "Sure, we are following up. The safety violations will result in a fine for the company. Drilling outside the designated zone is somewhat unclear." \]

(storylet: when not ($true:"Missing equipment found") and ($visited:"Strike at Mars Drilling"))\ "Chief Tahir, do you know that expensive drilling equipment are missing from Mars Drilling?" "Yes, I have the all the reports from Yu Yan here." "Get some people assigned to find out what's going on at Mars Drilling right away. I suspect this is more than just a misplaced digger." "Yes, I will get on it right away. As soon as I get any leads."($set:"Investigation started")($fulfill: "The police will take on the case")

(storylet: when ($true:"Missing equipment found"))(urgency:2)\ "Great job that you found the missing equipment. Have you found out who stole it?" "No. The facilities have been abandoned but we are checking the neighbourhood."($set:"Investigation started") "Keep it high on your list. Let me know as soon as you find out anything." "I will."

(storylet: when ($visited:"Underground Stim Factory Location"))(urgency:2)\ (if: not ($true: "Underground Stim Factory Raided"))[\ "Chief Tahir, do you know there is a factory in District Four that produces illegal drugs?" "Illegal drugs? Where? In District Four? No, I don't know. I will send a patrol right away."($set: "Underground Stim Factory Raid Planned") \](else:)[\ "What happened with the underground stim factory?" "We raided the facility. We found a lot of gear that was stolen from Mars Drilling. Plus a lot of bootleg space stims." "Do you know who was behind it?" "No. When we arrived, there was no one there. We are still investigating." \]

(storylet: when ($discovered: "Accident"))\ "What happened with the accident at Mars Drilling where 72 workers died?" "It was tragic. A cave-in while a team was drilling in Zone 7. The entire cave depressurised. It happened during a change of shift so many workers were present and many workers were not wearing their safety gear." "Was there any investigation into the matter?" "No. I think everyone was too shocked."

(storylet: when ($discovered:"Accident"))\ Eight months ago 72 workers tragically lost their lives when a mineshaft collapsed at a Mars Drilling site.

##Leave it for later You decide that the conflict at Mars Drilling needs to mature a bit more before you get involved. $WhatDoYouDo

{ (set: $TestLog to (a:)) (set: _someone to "Populist Testesen") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why this is the best solution", "Tell", "Tell Testesen that this is the best she can get", "Sell", "Praise her for how well she is doing her job" )) (set: _afterMiss to "Try Influence Testesen Result") (set: _afterHit to "Try Influence Testesen Result") (set: _hitEffect to "(set: $TestLog to it + (a:\"Hit\"))") (display: "Influence Someone") }

##The result The result of all this influencing was: (print: $TestLog)

_approach _result (set: $TestLog to it + (a: _approach + " " +_result)) (if: _result is "Hit")[ (set: $TestLog to it + (a:1)) ($set:"Hit") ](else-if: _result is "Partial Hit")[ (set: $TestLog to it + (a:2)) ($set:"Partial Hit") ](else:)[ (set: $TestLog to it + (a:3)) ($set:"Miss") ]

_approach _result (set: $TestLog to it + (a: _approach + " " +_result))

(storylet: when ($true:"Underground Stim Factory Raided"))\ Last night the police raided a bootleg operation in District Four after a tip from a citizen. Equipment reported missing from Mars Drilling was found as well as a large quantity of so called space stims. Presumably, counterfeit drugs were produced and sold from the facility. It is unclear for how long the operation was active. The head of the police, ($topic: "Rawan Tahir"), gave a statement earlier today: "Let this be a warning to all. ($topic:"M-Sec") has eyes and ears everywhere and we will not tolerate any illegal activity in the colony."

{ ($set:"Missing equipment found") ($set:"Underground Stim Factory Raided") ($unset:"Underground Stim Factory Raid Planned") ($addNote:"Underground Stim Factory", "It is closed now. ") (set: $Law to it + 1) $AdvanceTurn }

{ (set: $ReadMessages to (ds:)) (set: $ReceivedMessages to (macro: [ (set: _messages to (altered: via its name, ...(open-storylets: where its tags contains 'message'))) (output-data: _messages) ])) (set: $CheckMail to (macro: [ (set: _receivedCount to (open-storylets: where its tags contains 'message')'s length) (set: _readCount to $ReadMessages's length) (set: $YouGotMail to _receivedCount > _readCount) (output:)[] ])) (set: $MarkAsRead to (macro: str-type _message, [ (set: $ReadMessages to it + (ds:_message)) (output:)[] ])) (set: $MarkAllAsRead to (macro: [ (set: $ReadMessages to (ds:...($ReceivedMessages:))) (output:)[] ])) (set: $GetSender to (macro: str-type _message, [ (unpack: _message into (p:"From ", str-type _sender, " on ", str-type _subject)) (output-data: _sender) ])) (set: $GetSubject to (macro: str-type _message, [ (unpack: _message into (p:"From ", str-type _sender, " on ", str-type _subject)) (output-data: _subject) ])) ($CheckMail:) }

{ (unless: $YouGotMail)[ Expected there to be unread messages $Turn ] ($MarkAllAsRead:)($CheckMail:) (if: $YouGotMail)[ Expected there to be ''no'' unread messages $Turn ] $AdvanceTurn (unless: $YouGotMail)[ Expected there to be unread messages $Turn ] $AdvanceTurn (unless: $YouGotMail)[ Expected there to be unread messages $Turn ] (set: _messages to (altered: via its name,...(passages: where its tags contains 'message'))) (for:each _message,...(find: _message where _message contains 'Sam Parker', ..._messages))[ (set: _sender to ($GetSender: _message)) (unless: _sender is 'Sam Parker')[ Expected sender to be Sam Parker was _sender ] ] (for:each _message,...(find: _message where _message contains 'Welcome', ..._messages))[ (set: _subject to ($GetSubject: _message)) (unless: _subject is 'Welcome')[ Expected subject to be Welcome was _subject ] ] }

(storylet: when ($visited: "Sick Children Resolved"))(urgency:2)\ Hi Kelly. Just want to say thank you once again for all your help with finding out what caused Natalia to be sick. You don't know how much it means to us. It has taken up so much of our time and energy these last many months. As for the rest of your stay on Mars: We should really go sightseeing one day, you don't want to miss out on, Mars has some pretty unique sights. /Sam (and family)

(storylet: when ($true:"Strike Avoided"))(urgency:2)\ Dear Kelly, Congratulations on solving your first challenge here on Mars. Mars Drilling is a cornerstone of the colony, it provides the fuel with which we realise our vision. There is more to be done, but it was a good start. It pleases me that you have not let our high hopes down. I have some ideas we can discuss on how to improve things further. Do come by Green Canyon when you have time. Sincerely, Arnold Fletcher Chairman of the Earth Committee

(storylet: when ($true: "Strike Avoided") and not ($opponent:"Arnold Fletcher"))\ "Do you have any ideas of how we can improve the colony?" "YES! We need to invest in projects that enables growth." Arnold Fletcher's eyes lights up and he speaks with passion. (unless: ($visited:"Project Nebula Resolved"))[\ "The colony's energy infrastructure is hopelessly under dimensioned. This is holding us back. Cheap, realiable, and abundant energy is the greatest catalysator for growth. Look into the stalled ($topic:"Project Nebula") and see if you can get it running again." \](else-if: not ($visited:"Mars Drilling Productivity Resolved"))[\ "A company like ($topic:"Mars Drilling") is crucial to produce the cheap building materials of high quality that we need to expand the colony. It must be possible to fix the issues that is slowing everything down." \](else:)[\ "We must inspire furture generations to come to Mars!" \]

(storylet: when ($true:"Underground Stim Factory Raided"))(urgency:2)\ Hi Kelly, great job on closing down that underground stim factory. I can't believe that it has been going on under our nose for so long. I got hold on some of the bootleg stims and got them analysed at my lab, they are pretty much identical to the e pills. I think this is good news: Could you imagine what crisis we would have if half the colony came down with a long term side effect of an unknown drug. Still, it would be great to know who was running the bootleg operation? See if you can find out anything. Lang

(storylet: when ($discovered:"Colony Museum"))\ A small museum with relics from the colony and telling the story of exploration of Mars. Located in District Three.

##Tanya's baby is born Months later, Tanya gives birth to a beautiful baby boy. Shortly after, mother and child are separated. Tanya is escorted to the shuttle. She is distraught, leaving while crying. You are present when Tanya leaves. "Tanya, I did what I had to, to save the child." Tanya does not believe you. Does Kelly? (t8n:"fade-up")+(link-replace: "It was what could be done....")[==\ Kelly believes she did the right thing. You ask Tanya to name the child. She names it ($topic:"Sunshine"). "Kelly, you let Sunshine into this world." "Take care of him." "-- It's not fair!" The shuttle door closes. You are holding the baby. The baby smiles. =><= [[Ok->Tanya Resolved]] <==

(if:_result is 'Hit')[\ TODO \](else-if: _result is 'Partial Hit')[\ TODO (set: $Popularity to it - 1) \](else:)[\ TODO \]

(if:_result is 'Hit')[\ TODO \](else-if: _result is 'Partial Hit')[\ TODO (set: $Reserves to it - 1) \](else:)[\ TODO \]

##Mars Drilling goes bankrupt TODO ($set: "Mars Drilling is bankrupt")

(storylet: when ($known:"Ask after Sasha") and ($visited:"Underground Stim Factory Location"))\ "Do you know someone called Sasha with a ponytail and earrings? I think he may have been involved in the underground stim factory." (if: ($true:"Drug tests failed"))[\ "One of the guys in Joe Mando's team that failed their drug tests this week is called Sasha. ($topic:"Sasha Barbett")."($addNote: "Sasha Barbett", "Failed a drug test. ")($addNote: "Sasha Barbett", "Ponytail and earrings. ")($addNote: "Sasha Barbett", "Works in Mando's team. ") \](else:)[\ "Thanks for the tip! I will look into it!" \]

(storylet: when ($visited: "Strike Avoided") and $Turn > 2)(urgency:1)\ Are we alone? Ever since the dawn of civilisation, humans have looked up into the sky and asked themselves that question. Are we alone in this universe? When the first humans landed and settled here on Mars, we proved that life can spread not only between continents but also between planets. Yesterday, a drilling team hit into a lava cave. In the cave, they found evidence that just may indicate that someone visited the cave thousands of years ago. Footage shows red and black patterns on a wall and a tube being carefully pulled out of layers of dust and rock.($set:"Alien artefact found")

(set: $Infrastructure to it + 1) Fix with Sam Replicator? Find out what is causing the breakdown and fix it.

##Meeting with the Earth Committee Kelly appears before the Earth Committee. You are half way through your term on Mars. You have been asked to present a status of ongoing initiatives and an outline of what you plan to achieve for the remainder of your term. (if: ($progress:) <= 10)[\ "Kelly, you have very little to show for your achievements. Half your term is up. To be frank, we are very disappointed with your lack of results." "We don't want excuses. We just want to know: Are you up for the challenge? What do you need to succeed for the remainder of your term?" (t8n:"fade-up")+(link-replace: "\"Yes, I'm up for the challenge...\"")[==\ "Yes, I'm up for the challenge. It has been a rough start and I've run into some bad luck. However, things will improve from here." "We need to fix the colony infrastructure. We need to make sure the colony has a stable income from activities and exports such as from Mars Drilling. Finally, we need to make and enforce laws fit for life on Mars. I have a plan for achieving all of this." "What I need from you is a little bit more time and patience - and your continued support." (t8n:"fade-up")+(link-replace: "You wait while the committee considers your request.")[==\ "We will extend your term for you to be able to complete the work you have started. Use the extra time wisely. The survival of the colony is at stake."(set: $LastTurn to 12)(show:?Leave) \](else-if: ($progress:) >= 40)[\ "Kelly, your results so far have been very impressive. Half your term is up and we are very pleased with what you have achieved so far. Great job!" "We are curious for what your ideas are for the remainder of the term and if there is anything we can do to help?" (t8n:"fade-up")+(link-replace: "\"I'm grateful for...\"")[==\ "I'm grateful for all the help and support I have received and happy that I have helped set the colony on course for a better future." "We still need to fix the colony infrastructure. We still need to make sure the colony has a stable income from activities and exports such as from Mars Drilling. Finally, we need to continue to make and enforce laws fit for life on Mars. What I need from you is a little bit more time and patience - and your continued support." (t8n:"fade-up")+(link-replace: "You wait while the committee considers your request.")[==\ "We are happy (if: $Reserves < 3)[to release extra funding(set: $Reserves to it + 1) and ]to extend your term for you to be able to complete the work you have started. We look forward to see where you will lead the colony."(set: $LastTurn to 12)(show:?Leave) \](else:)[\ "Kelly, you have made some progress. Not as much as we had hoped, to be frank. But we still believe in you." "We would like to hear your plans for the colony going forward. Also, if there is something we can do to help you succeed, please tell us. (t8n:"fade-up")+(link-replace: "\"Thank you for your support...\"")[==\ "Thank you for your support. It has been a slow start. However, I sincerely believe that things will improve from here." "We need to fix the colony infrastructure. We need to make sure the colony has a stable income from activities and exports such as from Mars Drilling. Finally, we need to make and enforce laws fit for life on Mars. I have a plan for achieving all of this." "What I need from you is a little bit more time and patience - and your continued support." (t8n:"fade-up")+(link-replace: "You wait while the committee considers your request.")[==\ "We have decided (if: $Reserves < 3)[to release extra funding(set: $Reserves to it + 1) and ]to extend your term for you to be able to complete the work you have started. Please have in mind that the survival of the colony is at stake. Do not dissappoint us."(set: $LastTurn to 12)(show:?Leave) \] |Leave)[ =><= [[Leave->Earth Committee Performance Review Completed]] <== ]

(storylet: when $Turn >= 5)\ Dear Kelly, On behalf of the Earth Committee, I would like to summon you to appear before the Earth Committee and give a status on initiatives and an outline for what you plan to achieve for the remainder of your term. Sincerely yours, Arnold Fletcher Chairman of the Earth Committee

(storylet: when $Turn >= 6 and not ($visited:"Earth Committee Performance Review Completed") and ($location:"The Mayor's Office"))(urgency:3)\ As per the invitation from ($topic:"Arnold Fletcher"), you have been summoned to appear before the ($topic:"Earth Coalition"). * [[Go to the meeting->Earth Committee Performance Review]]

(storylet: when false and $Turn >= 6)\ Three out of five carriers are now out of order after an accident at High Street station earlier this morning. Martian Monorail Inc says that this leaves them no option than to reduce the departures in the time table. Replacement parts have been ordered from Earth. Until then, passengers are advised to find other means of transportation. Expect longer travel times. TODO

(metadata: "district", "Two") ##Lava Caves Entrance A network of lava tubes formed by volcanic activity million of years ago has recently been discovered by a team from ($topic: "Mars Drilling"). You are standing at the entrance. (set: _needed to (ds: "a hard hat", "a bio suit"))\ (unless: ($hasAll: ..._needed))[\ (set: ds-type _missing to _needed - $Inventory)\ You need ($listAsString:..._missing) to enter. ] ###What do you do? { <ul> (if: ($hasAll: ..._needed))[ <li> [[Enter->Lava Caves Location]] ] <li> [[Go back to Eden Gardens->Eden Gardens]] </ul> }

(metadata: "district", "Two") ##Lava Caves Mars Drilling is mining for minerals in the remnants of ancient lava tubes. (either: "Workers wearing heavy bio suits move around between heavy drilling equipment", "Tracks from heavy machinery lead off into the tunnels", "A figure in a yellow bio suit waves and yells at you angrily"). ###What do you do? { <ul> (if: ($discovered:"Accident"))[ <li>[[Go to the site of the accident->Site of the Accident]] ] (if: ($true:"Alien artefact found"))[ <li>[[Go to where the alien artefact was found->Alien Artefact Site]] ] <li>[[Leave->Lava Caves Entrance]] </ul> }

(storylet: when ($visited: "Sick Children Statement from Lang") and not ($visited: "Sick Children Resolved"))\ "We need to set up a research program to look into the cancers seen among the children of the colony. Is there a way we can get funding for this from Earth?" Arnold Fletcher listens to you attentively and is quiet for a while, thinking. "Life will never be risk free. When we decided to go to Mars, it was the dream of what is possible, not the fear of what might go wrong." "You can ask for more money, but I think both the ($topic:"Senate") and the ($topic:"Earth Coalition") will say no given that we already have a big deficit and no plan for getting back on track." "But if you want to try it out, your fiercest opponent in the Senate will be Stuart as Earth will insist on continued lenient immigration laws and strict procreation laws until science can solve the health issues with marsborn humans."

##Project Nebula break through Congratulations! You have secured a heap, reliable and abundant energy source for the colony. Well done! $WhatDoYouDo

##Meeting with the Earth Committee (if: ($progress:) <= 10)[\ You leave the meeting in a heavy mood. You sense there is a lot of pressure for the colony to succeed. \](else:)[\ You leave the meeting and feel relieved that it went well. You sense there is a lot of pressure for the colony to succeed. \] $WhatDoYouDo

(storylet: when ($location:"Kelly's Quarters") and $Turn is $LastTurn and not ($true:"Dust Storm Happening"))(urgency:2)\ It is your last week as Special Advisor to the colony. (if: ($chosen:"Stay on Mars") and ($colonySurvives:))[\ You have filed an application to stay in the colony. You have just learned that your application has been approved. You feel like celebrating with Sam and his family. \](else:)[\ Soon you will return to Earth. You think back on your time in the colony. The people you have met. The places you have seen. But you haven't actually seen Mars-the-planet, only Mars-the-colony. Perhaps now is the time to change that? \] * [[Go sightseeing with Sam->Sightseeing with Sam]]

(set: _stay to ($chosen:"Stay on Mars") and ($colonySurvives:))\ ($topic:"Sunshine") ##Sightseeing with Sam Sam has arranged for the two of you to drive a rover along the rim of Valles Marineris and into the volcanic plains of Tharsis from where you can see Olympus Mons, the largest volcano in the solar system. Sam has maintenance tasks to do on the radio beacons you pass along the route but you have plenty of time to talk about old days and about dreams for the future.(unless: _stay)[ You also get to pick your very own rock sample to bring home to Earth.] You camp under the stars. One evening you leave the rover in your biosuits and watch the Earth rise above the horison. So far away, so immensely small. (if: _stay)[\ "Sam, I have decided to stay on Mars." "Are you sure? That is great news!" "Yes. I have considered it for a long while." Sam is silent. You look out over the barren Martian landscape. "There is much work to be done yet, but I believe that in the end, we will make it. The colony will survive. Humans will evolve. Over generations we will transform the surface of Mars. One day there will be trees and lakes and schools and houses where we stand. I want to make that happen." "Me too." \](else:)[\ "Sam, I will return to Earth soon." "I know." (if: ($discovered: "Sunshine"))[\ "What about Sunshine?" "I have arranged with Doctor Stuart that Sunshine will stay at the orphanage. Sunshine will never be able to go to Earth." Sam looks down. "I know." ]\ "It has been great seeing you again. Meeting your family. Elena is a wonderful woman. Natalia is a wonderful child." "Thanks." "But I have to go back. There is no future for me on Mars." "Kelly, you are truly an extraordinary person. The task you have taken upon yourself. Not many people could or would have done even half of what you have done for the colony. Go back to Earth with fond memories and be proud of yourself. Enjoy life. Find yourself a partner, have kids and tell them about your time on Mars. Go out on a starlight sky, point at Mars and tell them that up there, they have an uncle, they have a family." "I will." \] =><= (link-reveal-goto: "Ok", "Kelly's Quarters")[$AdvanceTurn] <==

(storylet: when ($discovered: "License fees"))\ "What kind of license fees?" "($topic:"Tarkelan Industries") own the equipment but the firms on Earth who owns the blueprints to be copied takes a cut per copy that is printed. I guess that's how it has to be but the consequence is that it's only used for emergency repairs and most of the time we just try to make do with workarounds when something breaks." "I don't know if you can do anything about it. Anyway we were not supposed to talk work."

(storylet: when ($discovered:"License fees"))\ It is expensive to operate the ($topic: "Replicator") due to license fees.

(storylet: when ($discovered: "Accident"))\ "What is this about an accident?" "The big one. Elena knew many of those who died." You read about it. It's like eight months ago. A mine collapsed. 72 workers died. "After the accident, the union forced a work by the rules policy. To force a safety first policy. That hit productivity for almost all teams. Which led to the crisis with the strike."

(storylet: when ($visited:"Walk after dinner"))\ "You are welcome back to hang out with us. We could do a trip to ($topic: "Olympus Mons") with the kids. If you haven't been there yet? The view is super nice." "That would be nice, I've not done anything other than work." "Nice to see you. Overall it works out pretty well and Natalia is awesome. We are just a bit worried you know. Especially Elena. Especially since the (lowercase:($topic: "Accident"))."

(storylet: when ($true: "Green Canyon funding reduced"))\ "Work outlook is not the best at the moment." "Why is that?" "I was reassigned. You know I used to work on the Green Canyon project." "Because of my work?" "I don't know. I'm mostly doing maintenance on the Colony ($topic:"Replicator") facility but that is dwindling down. It's mostly idle so nothing much to fix." "Why is that?" "I guess it's too expensive to operate but I don't know. It takes a shitload of energy to create stuff and then there are the (lowercase:($topic:"License fees")).

(storylet: when ($discovered:"Spoon diggers"))\ "Spoon diggers?" "Xenoarchaologists. Not the fastest bureaucrats on the planet."

(storylet: when ($discovered:"Spoon diggers"))\ Slang for Xenoarchaologists.

(storylet: when ($discovered: "Replicator") and not ($visited:"Replicator Resolved"))\ "How do we fix the replicator?" "You need a way to ensure there is enough energy for a long time. And you need to solve the high license costs for using the replicator."

##Replicator fixed Congratulations! You have found a way for the colony to make better use of the replicator! Well done! $WhatDoYouDo

##Talk with Arnold Fletcher The president of the Earth Committee who represents the Earth Coalition on Mars is Fletcher. "Hi Kelly! Nice to see you!(if: ($visited:"Alien Artefact Resolved"))[ Cool that you secured the artefact, now the people of Earth believe in the vision again!]" "What is on your mind?" \(set: _someone to "Arnold Fletcher") \(set: _afterConversationGoto to "Replicator What Do You Do") (display: "Talk with Someone")

(storylet: when ($discovered: "Replicator"))\ "We could boost the colony by producing more equipment with the replicator. However, we do not have the funds to spend on (lowercase:($topic:"License fees")). "The replicator, ah, such a great invention. Hardly practical for large scale production. License fees?" "As you say, it's not suitable for large scale production, but could be used to bootstrap some of the local initiatives." "Part of the license fee goes to the company who invented and helped place the replicator here. Unfortunately they were bought up by a hedge fund and the original owners has left the company and the new management clearly has a different vision." "The other part is paid as compensation to ($topic: "Mars Shipping"). You may have some luck there if you speak to my colleague ($topic: "Lee Hatting") in the ($topic: "Earth Committee"). ($topic: "Tarkelan Industries") owns the replicator."

###What do you do? { <ul> (unless: ($visited:"Replicator Talk with Fletcher"))[ <li>[[Talk with Arnold Fletcher->Replicator Talk with Fletcher]] ] (unless: ($visited:"Replicator Talk with Sam"))[ <li>[[Talk with Arnold Fletcher->Replicator Talk with Sam]] ] (unless: ($visited:"Convince Fletcher to Nationalise the Replicator"))+(if:($visited:"Replicator Talk with Fletcher"))[ <li>[[Convince Fletcher to Nationalise the Replicator]] ] <li>[[Leave it for now->Replicator Do Nothing]] </ul> }

(storylet: when ($discovered: "Tarkelan Industries") and ($discovered: "Replicator"))\ "What vision does Tarkelan Industries have for the replicator?" "I believe the term is //cash cow//. It's not like we can go and buy another product like it elsewhere. Unless of course you will run it bootleg or try hack it to replicate an item on Mars rather than from the repository on Earth." "That sounds like a plan." "Don't tell me." "I won't." "I'm just saying that it is technically possible while not according to the law." "We could change the law." "Well something like that will be close to nationalisation of private property which I personally do not believe is in the best interest of the colony."

(storylet: when false and ($discovered:"Replicator") and ($location:"Kelly's Quarters"))\ It bothers you that the colony doesn't get more benefit from an amazing invention like the Colony Replicator. Just imagine what problems it could solve. Maybe now is the time to look into the underlying issues? * [[Try fixing the replicator->Replicator Deal With It]]

##Fixing the Colony Replicator The colony replicator is mostly idle due to high license fees and high energy demands. If something could be done about that, it could boost the colony immensely. (display:"Replicator What Do You Do")

##Leave the Replicator for later You decide to let the situation around the colony replicator simmer a bit more and address other issues. $WhatDoYouDo

##Alien artefact resolved Congratulation! You have resolved the situation around the discovery of an object of possible extraterrestrial origin. ($fulfill:"Help Yu Yan with the spoon diggers") $WhatDoYouDo

##Talk with Sam \(set: _someone to "Sam Parker") \(set: _afterConversationGoto to "Replicator What Do You Do") (display: "Talk with Someone")

##Persuade Fletcher You decide to persuade Fletcher to back a law change that essentially nationalises the replicator. { (set: _someone to "Arnold Fletcher") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain why TODO", "Tell", "Tell TODO", "Sell", "Sell TODO" )) (set: _afterMiss to "Replicator What Do You Do") (set: _afterHit to "Replicator Nationalised") (set: _hitEffect to "(set: $Law to it + 1)") (display: "Influence Someone") }

##Replicator is nationalised TODO =><= [[Great!->Replicator Resolved]] <==

(storylet: when false and ($discovered:"Project Nebula") and ($location:"The Mayor's Office"))\ You have found out that a promising energy research called Project Nebula has been stalled. Perhaps if that is put back on track, the colony could get a cheap, abundant and reliable energy source? * [[Look into Project Nebula->Nebula Deal With It]]

Double-click this passage to edit it.

###What do you do? { <ul> <li> <li>[[Leave it for now->Nebula Do Nothing]] </ul> }

##Leave Project Nebula for later You decide to let the situation around the stalled energy research project simmer a bit more and address other issues. $WhatDoYouDo

(storylet: when true)\ "Doctor Stuart, what is your opinion of the mayor, Ridley Lang?" "The mayor is elected by the people in the colony - the first - and though I do not agree with Lang's views on many issues, he still represents the people on Mars."

Start working on the procreation laws. TODO You know that Mayor Lang feels deeply for strong procreation laws. > So let's try to depose Lang then How? What do you do? See if I can convert his political opponent to an ally. Doctor Stuart as front for the populists is clearly Lang's political opponent. Also yours. Doctor Stuart doesn't like you. So perhaps not an option However, Doctor Stuart is clearly interested in deposing Lang. So by talking to Stuart could perhaps turn his opinion. Well. Strictly speaking Doctor Stuart is not in opposition to what you propose (depose Lang) so you should not roll against Stuart. Lang clearly is in opposition. Let's hear what Kelly says to Stuart. Sounds like you go and talk with Stuart to open for the idea of deposing the mayor. "Hi Kelly! Great that you are here! I'm really happy that we solved the problem with the ventilation systems causing the skin disease. And congratulations with the baby! How is Sunshine?" "He is better now that he is out of harms way." "We should not be in conflict. We want the same thing. Removal of the procreation laws. We must protect the future and enable more children. My heart is breaking for Tanya. It is not right. I had to save the child. But at what cost? I could not go against our laws or the mayor. The logical and sensible thing would be to depose the mayor in order to enact laws that does not cause us to fail mothers and fathers." "Whom would Earth prefer to put in Lang's place?" "Earth would like for the colony to thrive. If Lang has failed the people, then we must make sure that we try to enable the people to find a better representative."

##Foster parents You have a task: To find someone who will adopt Tanya's boy immediately after birth and raise it on Mars. Who do you ask? { (set: _conversation to (dm: "Doctor Stuart", "Perhaps Stuart could be willing? Doctor Stuart is happy to host Tanya and her son in his hostel. As he has many other children to take care of, he asks that someone else is allowed to volunteer. You perhaps?", "Sam and Elena", "You visit Elena and Sam in District Five. You tell them about Tanya. Ask them to consider to adopt her child. Give them some time to think about it. After some days they come back to you. They want to meet Tanya. You set up a meeting. After meeting with Tanya, Sam gets back to you: \"It is really hard for us. We know what we have been through to be allowed to have Natalia. She will always be our child. While it shouldn't have to be so, we are not sure we can love Tanya's boy as much as he deserves. We have to decline.\"", "None", "I ask Tanya if she is willing to have me as foster parent? Tanya says yes though she is obviously in a state of mind where she will do anything(unless: ($visited:\"Tanya Reveals the Father\"))[ (except naming the father)] for her baby to live.(show:?Leave)(hide:?Options)" )) (set: _options to (a: "Sam and Elena", "Doctor Stuart", "None")) (set: _discussed to (a:)) |Conversation>[] |Options>[ (set: _remaining to _options - _discussed) (if:_remaining's length > 0)[ <ul> (for: each _about, ..._remaining)[ <li>(link-reveal: _about)[ (set: _discussed to it + (a: _about)) (append:?Conversation)[ ($display: _about of _conversation) ] (rerun:?Options) ] ] </ul> ] ] } |Leave)[ =><= [[Ok->Tanyas Baby is Born]] <== ]

(metadata: "faction", "None", "pronoun", "he")\ (storylet: when ($discovered: "Sunshine"))\ The baby boy born by Tanya Toropov that you adopted.

##See Sunshine (nth: visit, ...(a: "You go see Sunshine just to hold her for a while. You still feel a bit out of your comfort zone and worry if you are doing it right. Sunshine gives you a big smile and you forget everything around you for a while.", "Sunshine has a medical checkup today. You are a little stressed and worried but Doctor Stuart says everything is fine.", "Sunshine is crying today when you come. Maybe it is something with his stomach? You carry Sunshine around in a front strap for a walk around the area and he calms down eventually." )) =><= [[Ok->The Orphanage]] <==

(storylet: when ($true:"Dust Storm Happening"))\ As you may have noticed, a gigantic dust storm has hit the colony as of this morning. The eye of the storm will be over the colony in a few days but it may be weeks before the storm has passed completely. Energy production from solar panels is down. You can help the colony by lowering your energy consumption the coming days and weeks. Parts of the colony have been closed down for your protection. The colony is designed to withstand this type of events. As long as you stay inside the central habitats, you will be perfectly safe. Take care and as always, if you notice any leaks or malfunctions, please report to the police immediately.

(storylet: when not ($true: "Dust Storm Passed") and $Turn >= 5) (if: ($true: "Dust Storm Happening"))[ ($unset: "Dust Storm Happening")($set: "Dust Storm Passed") ](else-if: ($true: "Dust Storm Approaching"))[ ($unset: "Dust Storm Approaching")($set: "Dust Storm Happening") ](else:)[ ($set:"Dust Storm Approaching") ]

{ (for:each _timer,...(altered: via its name, ...(open-storylets: where its tags contains "timer")))[ (display: _timer) ] }

(storylet: when ($visited: "Tanyas Baby is Born"))\ ($discovered: "Sunshine") Dear Kelly Parker, What you did for Tanya is an amazing thing. While I still do not believe that strict procreation laws is for the long term benefit for the colony, what we have now is a little human being that we need to give the best care we can. At the orphanage we have staff and facilities to take care of Sunshine. Sarah for instance, will love to help. I have taken the liberty to prepare a room and to transfer Sunshine to the Orphanage. You are welcome at any time. Sincerely yours, Doctor Leigh Stuart

(storylet: when ($visited: "Lava Caves Entrance"))\ "Do you know where I can get a bio suit?" "Well, yes. They keep spare ones at the ($topic:"Replicator"), Elena can get one for you."

(storylet: when ($visited: "Lava Caves Entrance") and ($location: "Replicator Location"))\ "Can you help me get ($pickup:"a bio suit")?" "Sure. We have plenty of spare ones, please help yourself."

(metadata: "district", "Two") ##Alien artefact site You are at the place where a crew from ($topic:"Mars Drilling") found a mysterious item buried in ancient bedrock. Remants from a perimeter marking lays on the floor. (if: ($has: "a clean room suit"))[For a short while you consider to put on the clean room suit you got from Ken Chukwu then decides against it. ] You check out the place and find nothing of interest, just a few broken artefacts clearly made by humans. ###What do you do? * [[Leave->Lava Caves Location]]

(storylet: when ($true:"Alien artefact found") and not ($visited: "Alien Artefact Yu Yan Calls") and ($true:"Investigation started"))(urgency:3)\ Yu Yan calls. * [[Take call->Alien Artefact Yu Yan Calls]]

##Yu Yan calls You take a call from ($topicPopup: "Yu Yan"). "I demand that you stop harassing my teams!" "Who have I been harassing?" "The police have been running drug screening and safety inspections for a week now and I've been fined for the most absurd violations."($set:"Safety violations discovered") "And now with this discovery of an alien artefact or what have we being out in the public all your (lowercase:($topic:"Spoon diggers")) will come and block us from doing our jobs." "I might as well just go ahead with the layoffs." (t8n:"fade-up")+(link-replace: "\"I will talk to the spoon diggers...\"")[==\ "I will talk to the spoon diggers and make sure this is cleared."($promise:"Help Yu Yan with the spoon diggers") "Good. You do your job and I will do mine." =><= (link-goto: "Ok", (history:)'s last) <==

(storylet: when ($true:"Alien artefact found"))\ "Have you heard the news? That they have found an alien artefact?" "Probably another hoax," Lang says. "How many such hoaxes had there been?" Lang: "I didn't go to Mars to hunt for aliens though I know many other did. You can look them up, but frankly you will be wasting your time. ($topic:"Anna Coleman") at the ($topic:"Colony Museum") can tell you all about it."

(storylet: when ($true:"Alien artefact found") and not ($true:"The spoon diggers have the artefact"))\ "I heard in the news that someone at Mars Drilling found an alien artefact. Do you think it is for real?" "Hard to say. It must be examined immediately of course. We have routines to deal with it. Until proven otherwise, we must assume it is real." "Is this something that happens often?" "Let's say it's not the first time that someone claimed to have found an alien artefact. We have a whole corner of the collection dedicated to hoaxes. They tell more about humans than about aliens." She shows you a strange collection of objects, ranging from the obvious fakes to more elaborate attempts.

(storylet: when ($discovered:"Accident"))\ "Have there been many accidents like the one they call the 'big one' months back where 72 worker died?" "There have been accidents and setbacks of course. The one ten months ago was the worst yet, thank God." "What happened?" "The ceiling of a lava tube collapsed. Because the cave had been partly pressurised, many workers were not wearing their heavy bio suits or even protective helmets."

(storylet: when true)\ "Tell me about the history of the colony. When was is founded?" "The colony was constructed over many years. The first team of humans arrived only after robots had set up habitats. They landed in the place we now call First Landing Plaza." "The first generation of humans that came without a return ticket touched ground a decade later." "But the history of the colony goes back even further, to those visionaries on Earth that got together and funded the venture." "We have a copy of the declaration where the members of the Earth Coalition spells out the vision and the rules for the colony." She shows you a hologram of a document with seals on display right near the entrance of the museum.

(storylet: when true)\ You pass by a picture of Lang. "Tell me about Lang." "Ridley Lang is the first elected mayor of the colony. Prior to his election, the executive leadership of the colony was anchored in a governor appointed by the Earth Coalition. These were more technocrats, with a focus on steering the colony construction projects. But with more and more people in the colony, there was a clear need for an elected, political leadership to govern the more complex cases."

###What do you do? { <ul> (unless:($visited:"Alien Artefact Talk with Anna Coleman"))+(unless: ($visited:"Alien Artefact at Joe Mando's place"))[ <li>[[Talk with Anna Coleman->Alien Artefact Talk with Anna Coleman]] ] (unless: ($visited:"Alien Artefact Talk with the Spoon Diggers"))[ <li>[[Talk with the spoon diggers->Alien Artefact Talk with the Spoon Diggers]] ] (unless: ($visited:"Alien Artefact at Joe Mando's place"))+(if: ($visited:"Alien Artefact Talk with the Spoon Diggers"))[ <li>[[Go see Joe Mando->Alien Artefact at Joe Mando's place]] ] (if: ($talks:"Yu Yan"))[ <li>[[Call Yu Yan->Alien Artefact Call Yu Yan]] ] (unless: ($visited:"Alien Artefact Influence Joe Mando"))+(if:($visited:"Alien Artefact at Joe Mando's place"))[ <li>[[Convince Joe Mando to hand over the artefact->Alien Artefact Influence Joe Mando]] ] (unless: ($visited:"Alien Artefact Influence Ken Chukwu"))+(if: ($visited:"Alien Artefact at Joe Mando's place"))[ <li>[[Convince Ken Chukwu that the artefact is not handed over->Alien Artefact Influence Ken Chukwu]] ] (if: ($visited:"Alien Artefact at Joe Mando's place"))[ <li>[[Ask the police to arrest Joe Mando->Arrest Joe Mando and Take the Artefact by Force]] ] (if: ($visited:"Alien Artefact at Joe Mando's place"))[ <li>[[Ask the police to stand down->Alien Artefact Stand Down]] ] (unless: ($visited:"Alien Artefact at Joe Mando's place"))+(if:($visited:"Alien Artefact Talk with the Spoon Diggers"))[ <li>[[Nothing->Alien Artefact Do Nothing]] ] </ul> }

##Stand down You decide to stay out of the trouble caused by the disputed alien artefact. Ken Chukwu is visibly upset as you order the police to stand down and leave the place. "The artefact is just another hoax," you say. "Tell Yu Yan that they can start digging right away and that they can disregard the perimeter." You hope you are right. The odds are good, right? (set: $Popularity to it - 1)(set: $Economy to it + 1) $AdvanceTurn =><= [[Ok->Alien Artefact Resolved]] <==

##Talk with Anna Coleman You decide to visit ($topicPopup:"Anna Coleman") at the ($topicPopup: "Colony Museum"). \(set: _someone to "Anna Coleman") \(set: _afterConversationGoto to "Alien Artefact Deal With It") \(display: "Talk with Someone")

(storylet: when ($promised:"Help Yu Yan with the spoon diggers") and ($location:"The Mayor's Office"))\ You promised Yu Yan to help her with the 'spoon diggers' that are blocking a drill site. * [[Look into the case->Alien Artefact Deal With It]]

##At Joe Mando's place You meet ($topic:"Joe Mando") outside a residence building in District Four. There is a crowd. Arguing. Joe Mando is refusing entrance. The police arrives and bring out the handcuffs. Several people are recording the situation. Joe Mando shouts: "Let me go!"($set:"Joe Mando has the artefact")($addNote:"Joe Mando", "Joe Mando found an artefact of possibly alien origin. (if:($true:'Joe Mando has the artefact'))[He keeps it in a safe in his apartment. ]") (t8n:"fade-up")+(link-replace: "\"What's the problem?\"")[==\ "What's the problem?" "Special Councillor! You of all should know the law! They request of me to hand over an artefact that they have no right to have! Of course I object! Now they are taking me into custody for defending my right to follow the law." "Who has the right to handle the artefact?" "The item was found outside the Earth Coalition zone.($set:"Drilling outside designated zone") It belongs to all of humanity, not to the colony. As finder, I will not give it over to this corrupt organisation. I demand that it is sent to Earth to be analysed by properly educated and professional specialists, not this local riffraff." (t8n:"fade-up")+(link-replace: "\"These are not riffraff...\"")[==\ "These are not local riffraff. They can handle the artefacts in preparation to send it to Earth for further study." "They will spoil or break it and claim that it is a hoax just like last time." (t8n:"fade-up")+(link-replace: "\"Is there someone you trust to examine it?\"")[==\ "How did they come to the conclusion that it's a hoax? Is there someone qualified that you trust?" Joe Mando: "There is no one on Mars that I trust to examine the artefact." "Why is that?" Ken Chukwu adds: "Anna Coleman apparently 'broke' the previous artefact and refused to give it back to Joe Mando. It disappeared from a storage locker before the matter could be settled. Joe Mando believes a lot of money was lost because of that. Maybe money is more important than fame, right Joe Mando?" Joe Mando: "How dare you!" Chukwu: "... and how exactly did you manage to find the artefact outside the Earth Coalition zone which is also the only place your team is allowed to work? Did you use company equipment for private ventures?" Joe Mando: "I am digging where there is stuff to be found and if you have a problem with that you can take it up with Yu Yan. I'm pretty sure she appreciates every penny coming in at the moment. Who is paying your lunch?" (t8n:"fade-up")+(link-replace: "\"Calm down...\"")[==\ You tell them to calm them down. They calm down. The police officers look at you. Formally you are the highest ranking person present at the scene. You can order the police to go and retrieve the artefact. Or order them to go home. (display:"Alien Artefact What Do You Do")

##Alien artefact (if: visits is 1)[\ You know that the Earth Coalition exactly on the point of discovery of trace of extraterrestrial life has quite long, complex and detailed legislation. If there is any chance this is not a hoax, fast tracking this investigation will need the support of President Fletcher of the Earth Coalition. Of course the drilling company can dig elsewhere so maybe Yu Yan is not playing with open cards here. Or maybe she just needed to vent a bit? Many people could benefit both from forcing a resolution of the situation with Mars Drilling but also from a renewed interest from Earth in the colony. On the other hand, if it is a hoax, and it is being found out that someone staged it to further their own agenda... The stakes are high. \](else-if: ($visited:"Alien Artefact at Joe Mando's place"))[\ You are outside Joe Mando's place. There is a crowd. The police has arrived. Joe Mando is refusing to hand over the artefact. Several people are recording the situation. The police officers look at you. Formally you are the highest ranking person present at the scene. You can order the police to go and retrieve the artefact. Or order them to go home. \](else:)[\ You are looking into the situation around the discovery of an artefact of possibly extraterrestrial origin that is currently stopping production at Mars Drilling. \] (display: "Alien Artefact What Do You Do")

##Talk with the xenoarchaeologist You decide to talk with the 'spoon diggers' and try to get to the bottom of this. It is ($topicPopup:"Ken Chukwu") at the planning department who deals with xenoarchaeology. Tall. Slim. Long black hair. (t8n:"fade-up")+(link-replace: "Let's talk.")[==\ "What have you found so far? What is this talk about hoaxes?" "Firstly, we haven't had a chance to explore the item yet and the location was severely spoiled by the digging operations. Also, I must say that the item was removed by unqualified staff and not according to procedure. It is far too early to say if it is a hoax. But clearly from the above facts alone, any investigation is complicated by the pollution by the circumstances." "The item is right now in a safety box in the quarters of one drilling manager ($topic:"Joe Mando"). While we have requested that the item is transferred to a clean room research environment, that hasn't happened yet." (t8n:"fade-up")+(link-replace: "\"So what the company says about...\"")[==\ "So, the talk from the drilling company about you stopping work is bullshit in other words?" "I have mentioned to the mayor that this imposes a risk to the colony and is in violation of several laws. Excuse me bullshit? We have of course invoked our right to set up a research perimeter around the location of the discovery. If that is what you mean." "So let's make sure that you get the artefact. I will talk to the drilling manager and see what the holdup is." "That would be much appreciated. But please don't touch the artefact or contaminate it further. It needs to be handled by qualified staff only." (t8n:"fade-up")+(link-replace: "\"Can you spare someone to accompany me...\"")[==\ "Can you spare someone to accompany me in order to handle it?" "I will go with you personally and bring ($pickup:"a clean room suit") for you to wear according to the regulation." "I will only do the talking, no need for me to put on a suit." "Don't go within 25 meters of it without the suit. It's the regulation. For your safety and to avoid contamination." "Let me guess, the team lead hasn't followed this procedure?" "I'm afraid so but we have informed Joe Mando about the regulation - as far as I've been told." =><= [[Ok->Alien Artefact Deal With It]] <==

##Call Yu Yan You decide to call ($topicPopup:"Yu Yan") to get some help with dealing with the situation. \(set: _someone to "Yu Yan") \(set: _afterConversationGoto to "Alien Artefact Deal With It") \(display: "Talk with Someone")

(storylet: when ($visited:"Alien Artefact at Joe Mando's place") and not ($visited:"Alien Artefact Resolved"))(urgency:2)\ "Yu Yan, we need to have Joe Mando hand over the artefact in order to speed things up." "Makes sense, I will instruct Joe Mando to hand it over as soon as possible. What about the perimeter? When will they be done?" "Tell Joe Mando that a qualified person will do the handling of the artefact to ensure that there is no contamination risks." "Ok, and the perimeter?" "I'm going to be part of the team to make sure that it is not misplaced. Oh, and Joe Mando must wear a clean suit when he opens the safe." Yu Yan: "Ok, as long as it doesn't interfere with the drilling. When can the teams start drilling again?" "Soon."

##Convince Joe Mando You decide to convince Joe Mando to hand over the artefact such that it can be examined. { (set: _someone to "Joe Mando") (set: _stance to "dont like it") (set: _prompt to (dm: "Explain", "Explain what the options are", "Tell", "Ask Mando to trust you", "Sell", "Praise Mando for the discovery" )) (set: _afterMiss to "Alien Artefact Deal With It") (set: _afterHit to "Joe Mando Hands Over Artefact") (set: _hitEffect to "(set: $Economy to it + 1)") (display: "Influence Someone") }

##Joe Mando hands over the artefact The artefact is handed over to the spoon diggers and the spoon diggers are escorted at all times by a police officer.($unset:"Joe Mando has the artefact")($set:"The spoon diggers have the artefact") Anna Coleman and the team of spoon diggers examine the artefact and can't immediately falsify it. A request for funding further study including bringing in experts from Earth quickly pass both chambers. The perimeter is kept in place for weeks and Yu Yan decides that opening a new drill site can be done in a day or two. =><= [[Ok->Alien Artefact Resolved]] <==

(metadata: "faction", "Conservatives", "pronoun", "he")\ (storylet: when ($discovered:"Ken Chukwu"))\ Ken Chukwu. Works at the planning department with responsibility for xenoarcheology.

##Convince Ken Chukwu You decide to convince Ken Chukwu to accept that the artefact is not handed over. { (set: _someone to "Ken Chukwu") (set: _stance to "dont get it") (set: _prompt to (dm: "Explain", "Explain why Mando should keep it", "Tell", "Order Chukwu to back off", "Sell", "Praise Chukwu for doing a good job" )) (set: _afterMiss to "Alien Artefact Deal With It") (set: _afterHit to "Joe Mando Keeps the Artefact") (set: _hitEffect to "(set: $Economy to it + 1)") (display: "Influence Someone") }

(storylet: when ($true:"Alien artefact found") and not ($visited:"Alien Artefact Resolved"))(urgency:2)\ "Yu Yan, what's all this about the discovery of an artefact blocking production? Mars is big, why don't you just drill somewhere else?" "You don't know much about mining on Mars, do you?" "No?" "Securing a new drill site and moving the machinery will take the best part of two weeks. Then getting to the ore will take another few weeks. If we had all the time in the world, of course it wouldn't be a problem."

(storylet: when ($true:"Alien artefact found") and ($true:"The spoon diggers have the artefact"))\ The object that was discovered recently by a drilling team at ($topic: "Mars Drilling") has now been examined by a team of local experts. Anna Coleman from the Colony museum states: We cannot completely rule out that the retrieved object is constructed by an artificial process, but most likely the artefact is either a natural rock formation or a hoax. The research study has not yet been peer reviewed and the object will be sent to Earth for further studies.

(storylet: when ($discovered:"Mars Drilling"))\ "Tell me about Mars Drilling." "Mars Drilling is the foundation of the colony. Without raw materials to build the colony and without rare minerals to export to Earth, we have no future. If Mars Drilling fails, the colony fails."

(storylet: when ($discovered: "Joe Mando"))\ "Have you looked into your most productive team? The one run by Joe Mando?" "Say Kelly, how about I do my thing and that is to lead my company and you do your thing which is to make sure the law is upheld and ownership of private property is respected and in case of violations ensuring that justice is done?"

(storylet: when ($visited: "Strike Avoided"))\ "What do you think about Lang?" "(if: $Faction is "Socialists")[He likes to spend other people's money.]\ (if: $Faction is "Conservatives")[He is more concerned about ratings than solving real problems.]\ (if: $Faction is "Liberals")[He would privatise the police if he could.]"

(storylet: when ($discovered: "Union"))\ "What do you think about the Union?" "Foreman Kaminski of the Union has taken a very confrontational approach since the (lowercase:($topic:"Accident"))."

(storylet: when ($discovered:"M-Sec"))\ "What is your opinion of M-Sec, the police?" "They are incompetent. I have called and filled in forms and complained and whatnot for months and nothing happens. Are you any better?"

(storylet: when not ($true:"Missing equipment found") and ($visited: "Strike Avoided"))\ "Tell me about the missing equipment." "The last few months, expensive and crucial equipment has been sabotaged, parts removed, delaying production. The police has not been helpful. Our own investigations indicate that it has happened when ($topic:"Neil Jackson") was on duty and even if I can't prove that he has stolen the equipment, I hold him accountable for not taking better care of company property." "I demand that the police spend the time and resources necessary to find the stolen equipment and the criminals who are sabotaging my company."

(storylet: when ($visited: "Strike Avoided") and not ($visited: "Mars Drilling Productivity Resolved"))\ "Yu Yan, the more I look into the situation, the more it seems like Mars Drilling is trying to punish the union and to not lose face. I'm not convinced about the stories of sabotage." "It's not about not losing face, it's about the survival of Mars Drilling. And the survival of the colony. I can't prove sabotage but that should also be the job of the law enforcement here on Mars, not a private company."

(storylet: when ($discovered:"Neil Jackson") and not ($visited:"Strike Avoided"))(urgency: 2)\ "Why go after Neil Jackson?" "Perhaps Neil Jackson is not personally to blame. But as a team lead I need him to show initiative and solve problems, not create problems by starting a rebellion." "Rebellion?!" "Accusing our most productive team for the thefts rather than getting his own team in order."

(storylet: when ($visited: "Strike Avoided"))(urgency:2)\ (if:($true:"Investigation started"))[\ "I have spoken with Rawan Tahir, the head of the police. He has launched a thorough investigation into the issues you have reported." "Great. When can I expect a report?" "When we have completed the investigation. We need full access to crime scenes and witnesses." "You are of course welcome to visit our workplace and speak with whomever you want when you want. I prefer we plan it to not intercept production and that you obey our strict safety codex." \](else:)[\ "I will appoint people to do a thorough investigation into Mars Drilling. Depending on what we find from that, we expect to get more compliance in the future." "Assuming a criminal investigation is started you are of course welcome to visit our workplace and speak with whomever you want when you want though I prefer we plan it to not intercept production and that you obey our strict safety codex." \] "I cannot promise that it won't interfere with production. We will of course make sure that the investigation is done in a safe manner."

(storylet: when ($true:"Safety violations discovered"))\ "What kind of safety violations?" "They were working in regular suits, not the reinforced ones. We will issue a fine for the company and then the company will probably discharge the crew members."

(storylet: when ($true:"Drug tests failed"))\ "Drug tests?" "Yes. Two guys in Joe Mando's team failed their tests this week. One of them was a guy called ($topic:"Sasha Barbett")."($addNote: "Sasha Barbett", "Works in Mando's team. ")($addNote: "Sasha Barbett", "Failed a drug test. ") (if:($known:"Ask after Sasha"))[\ "Sasha? With ponytail and earrings? I met him at the underground stim factory when I was... checking out the area."($addNote: "Sasha Barbett", "Ponytail and earrings. ") \]

(storylet: when ($true:"Drilling outside designated zone"))\ "You said Joe Mando's team was drilling outside their designated drill zone?" "Yes. The lava tube where the artefact was discovered is actually not colony territory. But this is hard for me to follow up on." "Why?" "That is outside my jurisdiction."

(storylet: when ($true: "Alien artefact found") and ($true:"Investigation started"))\ Special Advisor Kelly, Just to let you know that I have news for you on the investigation at Mars Drilling. Best Rawan Tahir Head of M-Sec

(storylet: when ($discovered:"Accident"))\ "I've heard there was a terrible accident some months ago where many workers died?" "True. Many good people died that day. It was terrible." "What happened?" "The roof collapsed. The cave depressurized. People were trapped. Most died instantly. A few we managed to pull out alive the following days." "Could anything have been done to prevent it?" "Besides not going to Mars? Besides not drilling with a human crew? Work in Mars Drilling is dangerous. We take our precautions but we don't have much experience with operating mines on Mars yet. The conditions are different from anything on Earth."

(storylet: when ($discovered:"Accident") and (($visited: "Strike Avoided")) and not ($visited: "Mars Drilling Productivity Resolved"))\ "What changes have you made to ensure accidents will not happen again?" "Work safety regulations have been tightened. Penalties for violations are severe. We had a lax satefy culture. We pressurise the caves and people woud take off their helmets. People would work long hours to meet targets. There is not much else to do in the evenings." Yu Yan looks at you with an expression of despair. "But production rates are down as a consequence. It threatens the very survival of the company."

##CEO Yu Yan (if: visits is 1)[\ You want to hear what the company thinks about this. \]\ Mars Drilling is run by ($topicPopup: "Yu Yan") who is also a member of the Senate. You get her on the intercom. (if: visits is 1)[\ "Kelly, nice to have you here on Mars. Hopefully you can bring some sense into this boneheaded government.(click:"boneheaded")[ \ (if: $Faction is "Socialists")[They like to spend other people's money.]\ (if: $Faction is "Conservatives")[They are more concerned about ratings than solving real problems.]\ (if: $Faction is "Liberals")[They would privatise the police if they could.]]" \](else:)[\ "Kelly, have you got the police on the case yet?" "Working on it, just one more thing..." \] \(set: _someone to "Yu Yan") \(set: _afterConversationGoto to "Strike at Mars Drilling") \(display: "Talk with Someone")

(storylet: when ($visited: "Strike Follow Meriwether") and not ($visited: "Strike Avoided"))(urgency:3)\ "The last few months, expensive and crucial equipment has been sabotaged, parts removed, delaying production. The police has not been helpful. Our own investigations indicate that it has happened when ($topic:"Neil Jackson") was on duty." "I demand that the police spend the time and resources necessary to find the stolen equipment and the criminals who are sabotaging the company." "Under no circumstances can I accept that the expelled workers return." \{ ($addNote: "Mars Drilling", "The last few months expensive and crucial equipment has been sabotaged, parts removed, delaying production. ") ($addNote: "Yu Yan", "Does not find the police helpful. ") }

(storylet: when ($known:"Ask after Sasha"))\ "Do you know someone named Sasha?" "($topic:"Sasha Barbett")? Isn't it someone in Mando's team?"

TODO * [[Look into the issue->Mars Drilling Productivity]] { (mock-visits: "Strike Avoided", "Strike Follow Meriwether") (for: each _topic, ...(a: "Neil Jackson", "Union", "Joe Mando", "Mars Drilling", "Accident") )[($topic: _topic), ] (set:$Turn to 4) ($set: "Investigation started") ($learn:"Ask after Sasha") }

(storylet: when ($true: "Mars Drilling is bankrupt"))\ TODO

(storylet: when true)\ TODO

(storylet: when true)\ "Do you do drugs?" "Not like hard stuff, just the legal stuff, like stims and so. It keeps you focused when working in the caves."

## Joe Mando keeps the artefact You convince Ken Chukwu that Joe Mando keeps whatever he claims to have found in his possession. The research parameter at the drill site is quickly cleared. Some paperwork is cleared out and proper permissions are granted so that drilling can continue without wasting more time. Yu Yan is pleased. Rumours of a find is never officially confirmed nor rebuked. Those who want to believe believe and a lot of money is made by people in the Martian artefact business. =><= [[Ok->Alien Artefact Resolved]] <==

## Arrest Joe Mando You order the police officers to arrest Joe Mando and to take the artefact by force. After a short struggle that is filmed and shared on social media(set: $Popularity to it -1), Joe Mando is arrested. His home is ransacked and a yellow and orance briefcase with a strange looking object is secured and handed over to the experts.($unset:"Joe Mando has the artefact")($set:"The spoon diggers have the artefact") Joe Mando is released soon after. Anna Coleman and the team of spoon diggers examine the artefact and can't immediately falsify it. A request for funding further study including bringing in experts from Earth quickly pass both chambers. The perimeter is kept in place for weeks and Yu Yan decides that opening a new drill site can be done in a day or two. (set: $Economy to it + 1) $AdvanceTurn =><= [[Ok->Alien Artefact Resolved]] <==

(if:_result is 'Hit')[\ "Joe Mando, you may or may not have found the artefact outside colony territory but both you and the artefact are now within the jurisdiction of the colony. The artefact is a potential health hazard, not only to you but the entire colony and must be handled and stored properly. You can hand it over voluntarily or I can ask these gentlemen to use whatever force is necessary to take it. I'm perfectly fine with both options but you may prefer one over the other. If so let me know before I run out of patience." You give him a stern look to make sure he got the message. "I see." He got your message. One moment later Joe Mando appears in the doorway with an orange and green briefcase. He opens it and shows you the artefact. (Ken Chukwu gasps and quickly puts on his clean room suit). Mando closes the briefcase and hands it over. \](else-if: _result is 'Partial Hit')[\ "Joe Mando. The artefact is a potential health hazard, not only to you but the entire colony and must be handled and stored properly. You can hand it over voluntarily or I can ask these gentlemen to use whatever force is necessary to take it. I'm perfectly fine with both options but you may prefer one over the other. If so let me know before I run out of patience." You give him a stern look to make sure he got the message. "I see a third option." He turns and runs. Soon after he is pinned to the floor by two police officers. "Wrong," you say. "Only two options. Now hand over the artefact." In front of the curious crows, Mando is escorted into his appartment.(set: $Popularity to it -1) One moment later he appears in the doorway with an orange and green briefcase. He opens it and shows you the artefact. (Ken Chukwu gasps loudly and puts on his clean room suit). You quickly secure and close the suitcase. \](else:)[\ "Joe Mando. The artefact is a potential health hazard, not only to you but the entire colony and must be handled and stored properly. I can ask these gentlemen to use whatever force is necessary to take it." You give him a stern look to make sure he gets the message. "You can arrest me but you won't find the artefact." He smiles because he knows you can't win. \]

(if:_result is 'Hit')[\ "Joe, there is one you can trust: Me. Whatever happened last time, I promise you, it will not happen again. The artefact will be properly examined and you will get credit where credit is due." Joe Mando gives you a long, skeptical look before he relaxes and says: "Ok. Very well then. Don't let me down." He turns and enters his appartment. You consider to follow him then decides that mutual trust is perhaps due here. One moment later Joe Mando appears in the doorway with an orange and green briefcase. He opens it and shows you the artefact. (Ken Chukwu gasps and quickly puts on his clean room suit). Mando closes the briefcase and hands it over. \](else-if: _result is 'Partial Hit')[\ "Joe, there is one you can trust: Me. Whatever happened last time, I promise you, it will not happen again. The artefact will be properly examined and you will get credit where credit is due. In fact, I will arrange for a transfer of finder's fee right away."(set: $Reserves to it -1) Joe Mando gives you a long, skeptical look. Then he checks his account that the money has arrived and looks pleasantly surprised: "Ok. Very well then. You shall have it." He turns and enters his appartment. One moment later Joe Mando appears in the doorway with an orange and green briefcase. He opens it and shows you the artefact. (Ken Chukwu gasps and quickly puts on his clean room suit). Mando closes the briefcase and hands it over. \](else:)[\ "Joe, there is one you can trust: Me. Whatever happened last time, I promise you, it will not happen again. The artefact will be properly examined and you will get credit where credit is due." Joe Mando gives you a long, skeptical look. "How stupid do you think I am?" \]

(if:_result is 'Hit')[\ "Joe, what you have done is incredible. Just imagine, if what you have found proves that someone was here long before humans even could even light a fire. I understand if you are on your guard. Don't be. I believe you. I'm on your side." You look at him with a nod and a smile. "No one can be allowed to take the discovery away from you. However, the artefact does not belong in someone's home. It belongs to all of mankind. You must hand it over. To be studied, examined, and stored in a safe place. Do you understand?" Joe Mando relaxes. "Ok. Let me get it." He turns and enters his appartment. One moment later Joe Mando appears in the doorway with an orange and green briefcase. He opens it and shows you the artefact. (Ken Chukwu gasps and quickly puts on his clean room suit). Mando closes the briefcase and hands it over. \](else-if: _result is 'Partial Hit')[\ "Joe, what you have done is incredible. Just imagine, if what you have found proves that someone was here long before humans even could even light a fire. I understand if you are on your guard. Don't be. I believe you. I'm on your side." You look at him with a nod and a smile. "No one can be allowed to take the discovery away from you. However, the artefact does not belong in someone's home. It belongs to all of mankind. You must hand it over. I promise I will not let it out of sight." (set: $Integrity to it - 1) Joe Mando relaxes. "Ok. Let me get it." He turns and enters his appartment. One moment later Joe Mando appears in the doorway with an orange and green briefcase. He opens it and shows you the artefact. (Ken Chukwu gasps and quickly puts on his clean room suit). Mando closes the briefcase and hands it over. \](else:)[\ "Joe, what you have done is incredible. Just imagine, if what you have found proves that someone was here long before humans even could even light a fire. I understand if you are on your guard." You look at him with a nod and a smile. "However, the artefact does not belong in someone's home. It belongs to all of mankind. You must hand it over." "Nice try. Not happening." He smiles. \]

(if:_result is 'Hit')[\ "Ken Chukwu, this artefact was found outside the colony territory, this is not a matter for you or me to look into. Joe Mando can do with it what he wants, send it to Earth, hand it in to the colony museum in due time, whatever he fancies. Someone claims that it is of alien origin, I have no proof of that and without proof I am going to assume it is not. It's just a peculiar looking rock and Mando is free to collect and store these as he wants." "You can kindly ask Yu Yan if you can get a couple of hours to finish investigating the area where the rock was found but she is in her full right to say no." "Take off that funny looking suit and go home." Ken Chukwu looks at you like a scolded dog and is about to say something but then turns and leave. "Everyone, go home, nothing to see here." The police officers turn to disperse the crowd. You look at Joe Mando. "As you were, citizen. Don't you have a job to do?" \](else-if: _result is 'Partial Hit')[\ "Ken Chukwu, if indeed this artefact was found outside the colony territory, then it is not a matter for you or me to look into. Joe Mando can do with it what he wants, send it to Earth, hand it in to the colony museum in due time, whatever he fancies. Someone claims that it is of alien origin, I have no proof of that and without proof I am going to assume it is not. It's just a peculiar looking rock and Mando is free to collect and store these as he wants." "But you don't know that, and the regulation says..." Ken objects but you quickly interrupt him: "I'm telling you, it is not a bio hazard. Take off that funny looking suit and go home." (set: $Integrity to it - 1) Ken Chukwu looks at you like a scolded dog and is about to say something but then turns and leave. "Everyone, go home, nothing to see here." The police officers turn to disperse the crowd. You look at Joe Mando. "Whatever it is you have found, keep it away from me." \](else:)[\ "Ken Chukwu, if indeed this artefact was found outside the colony territory, then it is not a matter for you or me to look into. Joe Mando can do with it what he wants, send it to Earth, hand it in to the colony museum in due time, whatever he fancies. Someone claims that it is of alien origin, I have no proof of that and without proof I am going to assume it is not. It's just a peculiar looking rock and Mando is free to collect and store these as he wants." "But you don't know that, and the regulation says..." Ken objects but you quickly interrupt him: "I'm telling you, it is not a bio hazard. Take off that funny looking suit and go home." "Everyone: This artefact is a potential bio hazard! Evacuate this area immediately!" Ken Chukwu waves and shouts at the crowd and the crowd panics, leaving you with Ken, Joe and a single worried-looking police officer. \]

(if:_result is 'Hit')[\ "Ken Chukwu, stand down. As I understand, this object was found outside the colony territory, and thus is not a matter for you or me to look into. Joe Mando can do with it what he wants." "You can kindly ask Yu Yan if you can get a couple of hours to finish investigating the area where the object was found but she is in her full right to say no." "I suggest you take off that funny looking suit and go home." Ken Chukwu looks at you like a scolded dog and is about to say something but then turns and leave. You look at Joe Mando. "If you have found an object of possible extraterrestrial origin, you are expected to hand it in for examination at the museum. Please also be informed that objects of possible extraterrestrial origin is a potential bio hazard and must be stored appropriately. Have a nice day." "Everyone, go about your business, nothing more to see here." The police officers turn to disperse the crowd. \](else-if: _result is 'Partial Hit')[\ "Ken Chukwu, stand down. As I understand, this object was found outside the colony territory, and thus is not a matter for you or me to look into. It's just a peculiar looking rock and Mando is free to collect and store these as he wants." "But you don't know that, and the regulation says..." Ken objects but you quickly interrupt him: "I'm telling you, it is not a bio hazard. Take off that funny looking suit and go home." (set: $Integrity to it - 1) Ken Chukwu looks at you like a scolded dog and is about to say something but then turns and leave. "Everyone, go about your business, nothing to see here." The police officers turn to disperse the crowd. You look at Joe Mando. "If you have found an object of possible extraterrestrial origin, you are expected to hand it in for examination at the museum. Please also be informed that objects of possible extraterrestrial origin is a potential bio hazard and must be stored appropriately. Have a nice day." \](else:)[\ "Ken Chukwu, stand down. As I understand, this object was found outside the colony territory, and thus is not a matter for you or me to look into. It's just a peculiar looking rock and Mando is free to collect and store these as he wants." "But you don't know that, and the regulation says..." Ken objects but you quickly interrupt him: "I'm telling you, it is not a bio hazard. Take off that funny looking suit and go home." "Everyone: This artefact is a potential bio hazard! Evacuate this area immediately!" Ken Chukwu waves and shouts at the crowd and the crowd panics, leaving you with Ken, Joe and a single worried-looking police officer. \]

(if:_result is 'Hit')[\ "Ken, I love your dedication to your job. If everyone did their job with the same zeal as you, the colony would be a better place." "A smart person like Joe Mando would never risk the health of the people of the colony by bringing with him home something truly dangerous." You pause for a quick glance at Joe. "We have absolutely no reason to bother this gentleman. Please just inform him of the rules and let's move on." Ken Chukwu looks puzzled, then picks up that everyone is looking at him. "Sir, according to the regulation, objects of possible extraterrestrial origin must be handed in for examination at the nearest authorised entity. Furthermore, due to the risk of contamination, a bio hazard suit must be worn for anyone within 25 meters of the object." Joe Mando returns a big smile. "Thanks, now I know!" "Great. Now let's leave. By the way, you look really good in that suit." You turn and leave. \](else-if: _result is 'Partial Hit')[\ "Ken, I love your dedication to your job. If everyone did their job with the same zeal as you, the colony would be a better place." "Joe Mando would never risk the health of the people of the colony by bringing with him home something truly dangerous." You pause for a quick glance at Joe. "But you don't know that, and the regulation says..." Ken objects but you quickly interrupt him: "I'm telling you, it is not a bio hazard. We have absolutely no reason to bother this gentleman. Take off that funny looking suit and go home."(set: $Integrity to it - 1) You shove him gently towards the exit. Ken Chukwu looks puzzled then leaves. "Everyone, you can go home now, nothing to see here." The police officers turn to disperse the crowd. You look at Joe Mando. "Whatever it is you have found, keep it away from me." \](else:)[\ "Ken, I love your dedication to your job. If everyone did their job with the same zeal as you, the colony would be a better place." "Joe Mando would never risk the health of the people of the colony by bringing with him home something truly dangerous." You pause for a quick glance at Joe. "But you don't know that, and the regulation says..." Ken objects but you quickly interrupt him: "I'm telling you, it is not a bio hazard. We have absolutely no reason to bother this gentleman. Take off that funny looking suit and go home." "Everyone: This artefact is a potential bio hazard! Evacuate this area immediately!" Ken Chukwu waves and shouts at the crowd and the crowd panics, leaving you with Ken, Joe and a single worried-looking police officer. \]

(display:"News Alien Artefact") (mock-visits:"Strike Avoided") * [[Take call->Alien Artefact Yu Yan Calls]] * [[Look into the case->Alien Artefact Deal With It]]

(storylet: when ($visited:"Alien Artefact at Joe Mando's place"))\ "Joe Mando claims that an artefact handed over to the colony was lost?" "Yes, unfortunately it was misplaced. But trust me, it was not the real thing. It probably ended up in the trash."

{ (set: $Inventory to (ds:)) (set: $pickup to (macro: str-type _item, [ (set: $Inventory to it + (ds:_item)) (output-data: _item) ]) ) (set: $drop to (macro: str-type _item, [ (set: $Inventory to it - (ds:_item)) (output-data: _item) ]) ) (set: $has to (macro: str-type _item, [ (output-data: _item is in $Inventory) ]) ) (set: $hasAll to (macro: ...str-type _items, [ (set: _result to (all-pass: _item where _item is in $Inventory, ..._items)) (output-data: _result) ]) ) (set: $inventoryAsString to (macro: [ (set: _inventory to ($listAsString: ...$Inventory)) (unless: _inventory is "")[(set: _inventory to "I have " + it + ". ")] (output-data: _inventory) ]) ) }

{ |test-output>[ Inventory: ($inventoryAsString:) ] (if: ($has: "a funny looking hat"))[ Did not expect Kelly to have a funny looking hat ] |test-output>[ Kelly found ($pickup:"a funny looking hat")! Inventory: ($inventoryAsString:) ] (unless: ($has:"a funny looking hat"))[ Expected Kelly to have a funny looking hat ] |test-output>[ Kelly found ($pickup:"a strange artefact")! Inventory: ($inventoryAsString:) Kelly finds ($pickup:"some fancy earrings")! Inventory: ($inventoryAsString:) Kelly drops ($drop:"a funny looking hat"). ] (if: ($has: "a funny looking hat"))[ Did not expect Kelly to have a funny looking hat ] (if: ($hasAll:"a funny looking hat", "a strange artefact"))[ Did not expect Kelly to have a funny looking hat ] (unless: ($hasAll:"some fancy earrings", "a strange artefact"))[ Expected Kelly to have all of the above. ] }

## Do nothing You decide to stay out of the trouble caused by the disputed alien artefact. $WhatDoYouDo

(storylet: when ($location: "Curiosity Gate") and not ($visited: "Alien Artefact at Joe Mando's place") and ($visited: "Alien Artefact Do Nothing"))\ There is a crowd in front of an apartment block nearby. * [[Go closer->Alien Artefact at Joe Mando's place]]

(storylet: when ($promised:"Help Yu Yan with the spoon diggers") and not ($visited:"Alien Artefact Resolved"))(urgency:2)\ "Kelly, what is going on with the spoon diggers, have you talked with them yet?" "I'm clearing out things as we speak!" "Good. Any further delay and I will have to consider layoffs."

(storylet: when ($true:"The spoon diggers have the artefact"))\ "So, have you examined the artefact yet?" "Yes, I have. Most likely it has been created by a natural process here on Mars. However, I cannot completely rule out other options. We have sent the artefact for further analysis on Earth. It will take a long while before we know more."