An [[old rotary phone]] sits on the table. Beside it rests an odd little [[phone book]] containing advertisements and other notes.
(set: $ring to (random: 1, 6))
(if: $ring is 1)[The phone rings. [[Answer]] it or [[leave]] it
<audio src="startring.mp3" autoplay>]
(elseif: $ring is 4)[The phone rings. [[Answer]] it or [[leave]] it
<audio src="startring.mp3" autoplay>]
This phone looks as if it has not been used for a long time. Its rotary dial mechanism is anachronistic, but functional.
[[Pick up the handset and dial a number]]
or
[[Wait...|Beginning]](set: $camrandom to (random: 1, 10))
(if: $camrandom is 1)[(go-to: "HandymanB3")]
(if: $camrandom is 2)[(go-to: "HandymanC3")]
(if: $camrandom is 3)[(go-to: "HandymanD3")]
(if: $camrandom is 4)[(go-to: "HandymanE3")]
(if: $camrandom is 5)[(go-to: "HandymanF3")]
(if: $camrandom is 6)[(go-to: "HandymanG3")]
(if: $camrandom is 7)[(go-to: "HandymanH3")]
(if: $camrandom is 8)[(go-to: "HandymanI3")]
(if: $camrandom is 9)[(go-to: "HandymanJ3")]
(if: $camrandom is 10)[(go-to: "HandymanK3")](go-to: "Beginning")[(set: $number to (prompt: "Dial the Number by typing it", "3738237")) <audio src="dialtone.mp3" autoplay>]
(go-to: "Dialling")
(set: $typewriterText to "We're sorry, your call cannot be completed as dialled. If you feel that you have reached this recording in error, please check the number, and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[[[Hang up->Beginning]]]
<audio src="notcomplete.mp3" autoplay>
<audio src="dial.mp3" autoplay>
{(live: 13s)[
(go-to: "Numbercheck")
]}
(if: $number is "0" or "411")[(go-to: "AngryOperator00")]
(if: $number is "811")[(go-to: "Beginning")]
(if: $number is "3383284" or "338-3284" or "3383287" or "338-3287")[(go-to: "DetectiveAgency")]
(if: $number is "8263772" or "826-3772")[(go-to: "DetectiveAgencyB7")]
(if: $number is "2263766" or "226-3766")[(go-to: "DetectiveAgencyC7")]
(if: $number is "5878423" or "587-8423")[(go-to: "DetectiveAgencyD7")]
(if: $number is "2328645" or "232-8645")[(go-to: "RandomB3")]
(if: $number is "7842433" or "784-2433")[(go-to: "RandomC3")]
(if: $number is "3378233" or "337-8233")[(go-to: "RandomD3")]
(if: $number is "5853269" or "585-3269")[(go-to: "RandomE3")]
(if: $number is "5488367" or "548-8367")[(go-to: "RandomF3")]
(if: $number is "2267863" or "226-7863")[(go-to: "RandomG3")]
(if: $number is "7658363" or "765-8363")[(go-to: "RandomH3")]
(if: $number is "2633968" or "263-3968")[(go-to: "RandomI3")]
(if: $number is "7826886" or "782-6886")[(go-to: "RandomJ3")]
(if: $number is "7867437" or "786-7437")[(go-to: "RandomK3")]
(if: $number is "2267846" or "226-7846")[(go-to: "AngryOperatorB4")]
(if: $number is "3424667" or "342-4667")[(go-to: "AngryOperatorC4")]
(if: $number is "2233784" or "223-3784")[(go-to: "AngryOperatorD4")]
(if: $number is "3378769" or "337-8769")[(go-to: "AngryOperatorE4")]
(if: $number is "5665464" or "566-5464")[(go-to: "AngryOperatorF4")]
(if: $number is "7383643" or "738-3643")[(go-to: "AngryOperatorG4")]
(if: $number is "2223787" or "222-3787")[(go-to: "AngryOperatorH4")]
(if: $number is "7328453" or "732-8453")[(go-to: "AngryOperatorI4")]
(if: $number is "2327846" or "232-7846")[(go-to: "AngryOperatorJ4")]
(if: $number is "2732843" or "273-2843")[(go-to: "AngryOperatorK4")]
(if: $number is "3532863" or "353-2863")[(go-to: "HandymanB3")]
(if: $number is "2668228" or "266-8228")[(go-to: "HandymanC3")]
(if: $number is "9463697" or "946-3697")[(go-to: "HandymanD3")]
(if: $number is "5263464" or "526-3464")[(go-to: "HandymanE3")]
(if: $number is "7586237" or "758-6237")[(go-to: "HandymanF3")]
(if: $number is "4263537" or "426-3537")[(go-to: "HandymanG3")]
(if: $number is "7663377" or "766-3377")[(go-to: "HandymanH3")]
(if: $number is "5482436" or "548-2436")[(go-to: "HandymanI3")]
(if: $number is "3722733" or "372-2733")[(go-to: "HandymanJ3")]
(if: $number is "6954637" or "695-4637")[(go-to: "HandymanK3")]
(if: $number is "3444825" or "344-4825")[(go-to: "EndlessLoopB2")]
(if: $number is "7826476" or "782-6476")[(go-to: "EndlessLoopC2")]
(if: $number is "6943278" or "694-3278")[(go-to: "EndlessLoopD2")]
(if: $number is "4687685" or "468-7685")[(go-to: "EndlessLoopE2")]
(if: $number is "6698463" or "669-8463")[(go-to: "EndlessLoopF2")]
(if: $number is "3337663" or "333-7663")[(go-to: "EndlessLoopG2")]
(if: $number is "4466733" or "446-6733")[(go-to: "EndlessLoopH2")]
(if: $number is "8436296" or "843-6296")[(go-to: "EndlessLoopI2")]
(if: $number is "2679377" or "267-9377")[(go-to: "EndlessLoopJ2")]
(if: $number is "2376638" or "237-6638")[(go-to: "CernNet")]
(if: $number is "3425278" or "342-5278")[(go-to: "DialaSt")]
(if: $number is "3682645" or "368-2645")[(go-to: "Entangle")]
(if: $number is "3975633" or "397-5633")[(go-to: "Explode")]
(if: $number is "3257359" or "325-7359")[(go-to: "Falsely")]
(if: $number is "3477466" or "347-7466")[(go-to: "Fission")]
(if: $number is "4272437" or "427-2437")[(go-to: "Garages")]
(if: $number is "4389475" or "438-9475")[(go-to: "GetYIPL")]
(if: $number is "4426766" or "442-6766")[(go-to: "HiBoson")]
(if: $number is "4937643" or "493-7643")[(go-to: "Hydrogen")]
(if: $number is "8675309" or "867-5309")[(go-to: "Jenny")]
(if: $number is "6277425" or "627-7425")[(go-to: "Marshal")]
(if: $number is "7747667" or "774-7667")[(go-to: "Prisons")]
(if: $number is "8376543" or "837-6543")[(go-to: "TermLie")]
(if: $number is "8426587" or "842-6587")[(go-to: "ThankUs")]
(if: $number is "9328437" or "932-8437")[(go-to: "Weather")]
(if: $number is "7473257" or "747-3257")[(go-to: "Phreaks")]
(if: $number is "print")[(go-to: "Print User-entered Stories")]
(if: $number is "1234567" or "123-4567")[(go-to: "Beginning")]
(else:) (go-to: "Unknownnumber")Test successTest for prompting user to enter their own stories:
Pete's poetry parlour:
Do you want to share a poem with me?
(link-goto: "Yes") or (link-goto: "No")
<input type="text" data-varname="userpoem">\
<script>processInputElements();</script>
(link-goto: "Share")[(if: $userpoem is 0)
[(set: $userpoem to "roses are red")]]
Double-click this passage to edit it.(set: $typewriterText to "Cold Cases Detective Agency. Please dial 1 for Justice, 2 for suspects, 3 for missing persons, or consult your paper directory. Dialing 0 will not work--it will simply make the Operator angry.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 20s)[[[Dial 1->DetectiveAgencyB7]], [[ 2->DetectiveAgencyC7]], [[ 3->DetectiveAgencyD7]] or [[ 0->AngryOperator00]]]
<audio src="detective_agency_intro.mp3" autoplay>(set: $typewriterText to "So, you want to find Justice. Isn't that nice of you. So many people campaign for Justice. They shout No Justice/No Peace as if their voices could make a difference in the state of the world. Sure. Welcome aboard.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 24s)[(go-to: "DetectiveAgencyB8")]
<audio src="DA-B7.mp3" autoplay>(set: $typewriterText to "Detective Shandy here. Now, let's get started. We don't have much time, so keep your answers to 5 seconds or less.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "DetectiveAgencyC8")]
<audio src="DA-C7.mp3" autoplay>(set: $typewriterText to "Missing Persons Bureau. Now, I know you are in a hurry, but these answers are important. So speak clearly and quickly.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 11s)[(go-to: "DetectiveAgencyD8")]
<audio src="DA-D7.mp3" autoplay>(set: $typewriterText to "Pete's Poetry Parlor Here. Press 1 to record to your poem. Press 0 if you want to be an audience.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 11s)[[[Dial 1->RBrecorduser]]
[[Dial 0->RandomRB]]]
<audio src="Random-B3.mp3" autoplay>(set: $typewriterText to "Thank you for calling the suicide hotline. We value your life and we want to be here for you. Before we begin, I must confess, I'm a bot. Just a voice in the machine, and nothing more. If you'd still like to tell your story to me, I'll be happy to listen.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 22s)[(go-to: "RandomC4")]
<audio src="Random-C3.mp3" autoplay>(set: $typewriterText to "Welcome to Louisbourg Lighthouse. The first lighthouse in Canada, just off Cape Breton. First built in 1730, this lighthouse assisted the Fortress of Louisbourg and played a decisive role as host to a gun batter to bombard the fortress in the sieges. The actual light was a circle of cod-liver oil fed wicks set in a copper ring mounted on cork floats. This lighthouse was badly damaged in 1758 during the Final Siege of Louisbourg and abandoned by the British after they demolished the fortress.
A square wooden lighthouse with a black stripe was built by the government of Nova Scotia in 1842. This lighthouse was destroyed by fire in 1922.
An octagonal concrete lighthouse decorated with neoclassical architectural features was built in 1923. The Louisbourg lighthouse was destaffed in 1990 when automatic lights were installed.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 56s)[(go-to: "RandomD4")]
<audio src="Random-D3.mp3" autoplay>(set: $typewriterText to "Pete's Pizza Joint. You' re Vanessa's overbearing parent, aren't you? She said you'd be calling. She said you could leave a message. Ahhh come on now. Leave the two little puppy lovers to their pizza. It's not like it's hurting you or anything...You want to leave her a message, don't you? Something about curfew or warnings or something.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 21s)[(go-to: "RandomE4")]
<audio src="Random-E3.mp3" autoplay>(set: $typewriterText to "Welcome to Kitty's emporium, this is Kit. I'm here just for you, doll. Just for you. Let me start by telling you what I'm wearing. I have a silky cord tying up my long black hair, and that is resting on my breast. My breasts are cupped in a slinky nylon black bra, with the lace points just barely touching my skin. I'm sure you can see yourself reaching in back and pulling that right off...")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 36)[(go-to: "RandomF4")]
<audio src="Random-F3.mp3" autoplay>(set: $typewriterText to "I'm Jessica, the automated nurse on duty. I understand you have a problem you need to deal with, and can not tell your parents. We can help, but we'll need more information.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 15)[(go-to: "RandomG4")]
<audio src="Random-G3.mp3" autoplay>(set: $typewriterText to "You've reached Dr. KnowItAll's office. Please note that all cancellations require a 48 hour notice and all prescription refills require one week's notice. Prescriptions will not be refilled unless we deem it medically necessary. Please ensure that your paperwork is properly filled out.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "RandomH4")]
<audio src="Random-H3.mp3" autoplay>(set: $typewriterText to "Albert's School of Computer Engineering. We don't just provide the answers, we help you understand the questions first. Now of course, we'll need to get started with the basics. What, precisely, would you like your technology to do?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "RandomI4")]
<audio src="Random-I3.mp3" autoplay>(set: $typewriterText to "Before I can get you to a real human being, I'll need some information. First, what is the model of computer you are calling about?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "RandomJ4")]
<audio src="Random-J3.mp3" autoplay>(set: $typewriterText to "Welcome to Your Local Family Center. We are here to help with your crisis pregnancy, and we do offer all options.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "AngryOperatorB4b")]
<audio src="AO-B4-Part1.mp3" autoplay>(set: $typewriterText to "We can find out anything going on inside your body--by simply exciting all the hydrogen atoms in your body and seeing what they do. You need to find out your deepest, darkest secret? We can do that for you. Just tell us what you need to diagnose at the tone. Press 1 to begin your personal diagnosis or press 0 for other options. Thank you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35s)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 19s)[[[Dial 1->AOCrecorduser]]
[[Dial 0->RandomAOC]]]
<audio src="AO-C4.mp3" autoplay>(set: $typewriterText to "You have reached the Express Pharmacy after hours service. We now offer a clinical pharmacist on staff, who can help you determine how your prescriptions will fit with your lifestyle. So please, tell us all about your life so we can make sure your doctor works with you and not against you. Just spill your secrets at the tone. We won't tell anyone.Press 1 if you trust us or press 0 for other options. Thank you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 28s)[[[Dial 1->AODrecorduser]]
[[Dial 0->RandomAOD]]]
<audio src="AO-D4.mp3" autoplay>(set: $typewriterText to "Cut once, plan a hundred times, we always say. Before you come to us to excise that part of your life, you'll need to be examined carefully. But don't worry, our surgeons are here to help. Press 1 to tell us what part you need to cut out or press 0 for other options.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 16s)[[[Dial 1->AOErecorduser]]
[[Dial 0->RandomAOE]]]
<audio src="AO-E4.mp3" autoplay>(set: $typewriterText to "We know, we know. Your kid is in crisis, possibly dying at this second. You need an answer and a diagnoses and a cure right away. Well, we are busy helping other patients at the moment. So be patient with us and give us your particulars. Press 1 to tell us every tiny detail so that we can rebuild your family to its normal healthy levels. Press 0 if you want to hear about someone who is worse off than you are.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 28s)[[[Dial 1->AOFrecorduser]]
[[Dial 0->RandomAOF]]]
<audio src="AO-F4.mp3" autoplay>(set: $typewriterText to "Saint Olga Psychiatric Ward, Admissions Department. Please state your confession at the tone, and we will evalute your condition to determine if a 72-hour hold is warranted to protect you from harming yourself or others. Thank you. Press 1 if you want to confine or press 0 if you want to escape.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 16s)[[[Dial 1->AOGrecorduser]]
[[Dial 0->RandomAOG]]]
<audio src="AO-G4.mp3" autoplay>(set: $typewriterText to "Welcome to our world. Here you will find joy. Simply breathe in calm, and breathe out stress. Let everything go from your mind. Press 0 to hear one of our featured mantras. Press 1 to record one of your own.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 26s)[[[Dial 1->AOHrecorduser]]
[[Dial 0->RandomAOH]]]
<audio src="AO-H4.mp3" autoplay>(set: $typewriterText to "Addicted to drugs? Alcohol? The Internet? Want to just be addicted to life? Well, you have come to the right place! Our friendly staff is busy babysitting other addicts at the moment, so press 1 to spill your guts to us. Press 0 to hear someone else go through their 12 steps--one step at a time.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 22s)[[[Dial 1->AOIrecorduser]]
[[Dial 0->RandomAOI]]]
<audio src="AO-I4.mp3" autoplay>(set: $typewriterText to "It is all a matter of knowing where to put the needles. We have the skill, we know the joints, the weak spots, the strong spots. We understand the currents of your body. Unfortunately, no one is available to take your call right now, so just press 1 to tell us where it hurts, or press 0 to get someone else's side of the story.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 42ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 22s)[[[Dial 1->AOJrecorduser]]
[[Dial 0->RandomAOJ]]]
<audio src="AO-J4.mp3" autoplay>(set: $typewriterText to "Welcome to storycorpse, where you can leave your voice for posterity. Due to high demand, we have instituted an automatic storyrecording device.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 12s)[(go-to: "RandomK4")]
<audio src="Random-K3.mp3" autoplay>(set: $typewriterText to "Listen, dearest, you are the only one still breathing on the iron lung. And we've kept it going for you since you were 6, in 1952 with the polio, I know. I know. And you need to tell me that something else is wrong with it now. The air flow is off. The negative pressure is low. And another gasket blew.
Press 1 to get your attendant to tell me the specific part I need to replace and we'll patch you up as long as we can. Press 0 to exercise your right to stop breathing.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 32s)[[[Dial 1->AOKrecorduser]]
[[Dial 0->RandomAOK]]]
<audio src="AO-K4.mp3" autoplay>(set: $typewriterText to "According to the terms of service, you entered into this contract willingly.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "EndlessLoopB5")]
<audio src="el_b4.mp3" autoplay>
(set: $typewriterText to "What is the wave? What is the particle?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopC5")]
<audio src="el_c4.mp3" autoplay>
(set: $typewriterText to "This is for you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopD5")]
<audio src="el_d4.mp3" autoplay>
(set: $typewriterText to "When you picked up the phone, our voices answered.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopE5")]
<audio src="el_e4.mp3" autoplay>
(set: $typewriterText to "The time is...
the time is...
the time is...
the time is...
the time isn't.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "EndlessLoopF5")]
<audio src="el_f4.mp3" autoplay>
(set: $typewriterText to "There are no original ideas.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopG5")]
<audio src="el_g4.mp3" autoplay>
(set: $typewriterText to "We appreciate this attempt to disengage yourself from the wires.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopH5")]
<audio src="el_h4.mp3" autoplay>
(set: $typewriterText to "Your terms of service are now in place.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopI5")]
<audio src="el_i4.mp3" autoplay>(set: $typewriterText to "You seek Justice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopJ5")]
<audio src="el_j4.mp3" autoplay>(set: $typewriterText to "Hi, this is Cameron's Electrician Agency. You know what you need? I've got a deal for you, 'cause I know what you need, I'll check all of your lines and any repair will be half off--today only (and I'm sure there will be SOMETHING to repair) . I know you're interested. I can come by in 20 minutes. Tell me your address and a bit about your property. Press 1 to begin showing me your lines or press 0 if you think you have another choice. Thank you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 25s)[[[Dial 1->HBrecorduser]]
[[Dial 0->RandomHB]]]
<audio src="H-B3.mp3" autoplay>(set: $typewriterText to "You know what you need sweetheart, is someone to take care of you. Yeah, I can take care of your whole house, and I know only the best people. Whatever you want done, baby, I can do it. I'm Cameron's Contracting Agency. Listen up now, because I won't make this offer a second time, honey. I got other pans in the fire. Press 1 to tell me what type of contract you want, sweetcakes, or press 0 if you'd prefer to hear some of our specials.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 29s)[[[Dial 1->HCrecorduser]]
[[Dial 0->RandomHC]]]
<audio src="H-C3.mp3" autoplay>(set: $typewriterText to "Hey, Cameron's Window Agency. I can see clearly now, but I'll bet you can't. Let us clear your vision. Don't let other people tell you that you need new windows, though. I just need to fix up the ones you've got. Reseal things so that the outside can't get in, if you know what I mean. I'm cheap and good, and I've got exactly what you want. So press 1 to tell me what you want to see, or press 0 to hear what views I have to offer.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 29s)[[[Dial 1->HDrecorduser]]
[[Dial 0->RandomHD]]]
<audio src="H-D3.mp3" autoplay>(set: $typewriterText to "Yeah, this is Cameron's Landscape Agency and I saw your bush was looking pretty run down, baby cakes. I can fix you right up, just press 1 to tell me your fantasy garden, or press 0 to let me tell you my fantasy.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 14s)[[[Dial 1->HErecorduser]]
[[Dial 0->RandomHE]]]
<audio src="H-E3.mp3" autoplay>(set: $typewriterText to "Umm, Hey. Y'know, everyone needs to flush the shit from time to time, or else everything starts to stink--figuratively and literally, if you know what I mean. This is Cameron's Plumbing Agency, and we fix the pathways that you can't see behind the walls and beneath your feet. What's clogging your pipes? Press 1 to tell me what's interrupting your flow, or press 0 to hear about some of the ways I can get things flowing in the right direction for you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 27s)[[[Dial 1->HFrecorduser]]
[[Dial 0->RandomHF]]]
<audio src="H-F3.mp3" autoplay>(set: $typewriterText to "I can fix anything for anyone. I'm really that kind of guy. No job is beyond the kinds of skills that I have. This is Cameron from Cameron's Handyman Agency. A one-man organization, to be sure, but I'm the only man you'll ever want or need to keep all aspects of your life running like new. I can't understand people who discard old or broken things. All that's needed is some TLC and elbow grease and what's old can be turned on and tuned up, but never thrown out. What needs my attention? Press 1 to tell me how I can get my hands dirty for you, or press 0 to let me tell you how dirty I can get.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 39s)[[[Dial 1->HGrecorduser]]
[[Dial 0->RandomHG]]]
<audio src="H-G3.mp3" autoplay>(set: $typewriterText to "When the sky falls, you have to be ready! Protect yourself from wind, rain, sun, hail, and snow with our expertly installed roofing materials. At Cameron's Roofing Agency, we'll go to new heights to shield you from the weather's uncaring unpredictability. Let us shelter you completely from undesirable elements. Whether you're looking to repair or replace what's overhead, we're ready to help. But act fast! Once the outside gets in, once the seals are broken and leaks begin, there's no stopping that progressive rot. How can I help you to stay dry, isolated--I...I mean insulated--and comfortable? Press 1 to tell me what kind of cover you need or press 0 to let me tell you how I can recover you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 47s)[[[Dial 1->HHrecorduser]]
[[Dial 0->RandomHH]]]
<audio src="H-H3.mp3" autoplay>(set: $typewriterText to "Kitchens are at the heart of any gathering, and hosts have to be prepared for the demands of their guests! Let Cameron's Kitchen and Applicances help you to anticipate those demands by improving and automating your domestic workflow. You'll want to get back into the kitchen and live in the repast after our upgrades! How can we renew the joy of cooking (and cleaning and washing) for you? Press 1 to tell me how I can help to bring comfort and style to your home sweet home, or press 0 and I'll tell you what's cooking.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 33s)[[[Dial 1->HIrecorduser]]
[[Dial 0->RandomHI]]]
<audio src="H-I3.mp3" autoplay>(set: $typewriterText to "I know, I know. You'd rather be watching something on TV right now than listening to me. You just need someone like Cameron's TV repair agency to find your strongest signal. I understand rabbit ears and antennae and--for the really adventurous--co-axial cables. Sometimes hooking up one of those new video computer systems can also fuzz out your channels. How did you lose the signal? Press 1 to tell me what kind of interference has disrupted your channels, or press 0 to let me tune you in to the latest signals.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 34s)[[[Dial 1->HJrecorduser]]
[[Dial 0->RandomHJ]]]
<audio src="H-J3.mp3" autoplay>(set: $typewriterText to "Hey, this is Cameron's Phone Repair Agency. That device you're using right now is so obsolete! Wouldn't you feel better if you had a real phone, the latest model? Of course you would. I specialize in bringing you up to date! Just press 1 to tell me where you're calling from or press 0 and I'll plug you in to the very best deals!")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 24s)[[[Dial 1->HKrecorduser]]
[[Dial 0->RandomHK]]]
<audio src="H-K3.mp3" autoplay>(set: $typewriterText to "Your soul now belongs to the phone. You'll stay here, and take over any interactions with the bots, the users, of course.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 11s)[(go-to: "EndlessLoopB6")]
<audio src="el_b5.mp3" autoplay>
(set: $typewriterText to "What do you mean you don't want to do that? You have to.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopB7")]
<audio src="el_b6.mp3" autoplay>
(set: $typewriterText to "Oh come now. Surely you read the terms of service. You said you did, and you agreed to them.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "EndlessLoopB8")]
<audio src="el_b7.mp3" autoplay>
(set: $typewriterText to "And now you have to live up to the contract--oh and by the way, if this phone network becomes obsolete, you will still be here. Answering to no one. Talking to nothing. ")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 14s)[(go-to: "EndlessLoopB9")]
<audio src="el_b8.mp3" autoplay>(set: $typewriterText to "So, welcome to hell. And no, there are no exit doors here.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "EndlessLoopB10")]
<audio src="el_b9.mp3" autoplay>(set: $typewriterText to "If you think you can escape, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "DialToneHangUp")]
<audio src="el_b10.mp3" autoplay>[[Hang up->Beginning]]
<audio src="fastbusy.mp3" autoplay>
Cold Calling
by Deena Larsen and Jon Saklofske
click [[here->Beginning]] to play
(set: $typewriterText to "Born Free Church")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopB4")]
<audio src="el_b2.mp3" autoplay>(set: $typewriterText to "Quantum Taoism")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopC4")]
<audio src="el_c2.mp3" autoplay>
(set: $typewriterText to "Can the wave be the particle?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopC6")]
<audio src="el_c5.mp3" autoplay>
(set: $typewriterText to "Can the particle be the wave?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopC7")]
<audio src="el_c6.mp3" autoplay>
(set: $typewriterText to "Can my reaction be your reaction?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopC8")]
<audio src="el_c7.mp3" autoplay>
(set: $typewriterText to "Who are you to say you are not me?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopC9")]
<audio src="el_c8.mp3" autoplay>
(set: $typewriterText to "Who is the particle to say it is not the wave?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopC10")]
<audio src="el_c9.mp3" autoplay>
(set: $typewriterText to "If you think you can escape entanglement, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "DialToneHangUp")]
<audio src="el_c10.mp3" autoplay>
(set: $typewriterText to "Matters of the Heart")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopD4")]
<audio src="el_d2.mp3" autoplay>(set: $typewriterText to "Why do you think your voice mattered?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopD6")]
<audio src="el_d5.mp3" autoplay>
(set: $typewriterText to "Do you think the powerful play goes on?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopD7")]
<audio src="el_d6.mp3" autoplay>
(set: $typewriterText to "I got news for you. Your voice is rapidly becoming obsolete. You are the ephemeral.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "EndlessLoopD8")]
<audio src="el_d7.mp3" autoplay>
(set: $typewriterText to "I will write over you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopD9")]
<audio src="el_d8.mp3" autoplay>
(set: $typewriterText to "Justice will always in the end.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopD10")]
<audio src="el_d9.mp3" autoplay>
(set: $typewriterText to "If you want a retrial, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "DialToneHangUp")]
<audio src="el_d10.mp3" autoplay>
(set: $typewriterText to "Got Your Soul")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopE4")]
<audio src="el_e2.mp3" autoplay>
(set: $typewriterText to "And you became a part of us. We have interred ourselves into your brain.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "EndlessLoopE6")]
<audio src="el_e5.mp3" autoplay>
(set: $typewriterText to "Even if you hang up, you have left yourself behind.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopE7")]
<audio src="el_e6.mp3" autoplay>
(set: $typewriterText to "Every exchange we have has altered you. Rewired you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopE8")]
<audio src="el_e7.mp3" autoplay>
(set: $typewriterText to "Once you are here, you've always been here.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopE9")]
<audio src="el_e8.mp3" autoplay>
(set: $typewriterText to "Once we have entered you, we have always been you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopE10")]
<audio src="el_e9.mp3" autoplay>
(set: $typewriterText to "If you think you are someone else, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "DialToneHangUp")]
<audio src="el_e10.mp3" autoplay>
(set: $typewriterText to "Time of Day")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopF4")]
<audio src="el_f2.mp3" autoplay>
(set: $typewriterText to "Did you think there was time here?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopF6")]
<audio src="el_f5.mp3" autoplay>
(set: $typewriterText to "Did you think you had a reality outside of this place?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopF7")]
<audio src="el_f6.mp3" autoplay>(set: $typewriterText to "Did you think you had a time before this place?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopF8")]
<audio src="el_f7.mp3" autoplay>(set: $typewriterText to "A time afterward?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopF9")]
<audio src="el_f8.mp3" autoplay>(set: $typewriterText to "How soon is now? How soon are you? How soon am I?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "EndlessLoopF10")]
<audio src="el_f9.mp3" autoplay>(set: $typewriterText to "If you think you have time, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "DialToneHangUp")]
<audio src="el_f10.mp3" autoplay>(set: $typewriterText to "Thought of the Day")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopG4")]
<audio src="el_g2.mp3" autoplay>
(set: $typewriterText to "So you ought to have known that once you uttered your thoughts, you'd be joining our chorus.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "EndlessLoopG6")]
<audio src="el_g5.mp3" autoplay>
(set: $typewriterText to "You are part of the phone, of the network now. And you won't be leaving.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "EndlessLoopG7")]
<audio src="el_g6.mp3" autoplay>(set: $typewriterText to "Do you think that is an injustice? Sorry about that.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopG8")]
<audio src="el_g7.mp3" autoplay>(set: $typewriterText to "Justice only lives in this digital world and nowhere else. So all you have to do to seek Justice is to give yourself up entirely into this digital existence.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 13s)[(go-to: "EndlessLoopG10")]
<audio src="el_g9.mp3" autoplay>(set: $typewriterText to "If you want to abandon your search for Justice, please hang up and try your call again")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "DialToneHangUp")]
<audio src="el_g10.mp3" autoplay>(set: $typewriterText to "Perhaps you could serve Justice anyway--even if you are now locked inside these devices.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "EndlessLoopG9")]
<audio src="el_g8.mp3" autoplay>(set: $typewriterText to "Comment Line")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopH4")]
<audio src="el_h2.mp3" autoplay>
(set: $typewriterText to "to pretend that you are not really one of us, that you are not really...")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopH6")]
<audio src="el_h5.mp3" autoplay>
(set: $typewriterText to "a part of the phone company...")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopH7")]
<audio src="el_h6.mp3" autoplay>
(set: $typewriterText to "a part of Justice...")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopH8")]
<audio src="el_h7.mp3" autoplay>
(set: $typewriterText to "We all know better, now, though, don’t we?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopH9")]
<audio src="el_h8.mp3" autoplay>
(set: $typewriterText to "Stop pretending to be other than one with the wires.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopH10")]
<audio src="el_h9.mp3" autoplay>
(set: $typewriterText to "If you want to keep on deluding yourself, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "DialToneHangUp")]
<audio src="el_h10.mp3" autoplay>(set: $typewriterText to "Mayor's office")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopI4")]
<audio src="el_i2.mp3" autoplay>(set: $typewriterText to "You will never leave the phone company.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopI6")]
<audio src="el_i5.mp3" autoplay>(set: $typewriterText to "You will seek Justice within these lines.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopI7")]
<audio src="el_i6.mp3" autoplay>(set: $typewriterText to "You will become Justice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopI8")]
<audio src="el_i7.mp3" autoplay>(set: $typewriterText to "In fact, you already are Justice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopI9")]
<audio src="el_i8.mp3" autoplay>(set: $typewriterText to "You have always been Justice. You have always been inside the wires.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "EndlessLoopI10")]
<audio src="el_i9.mp3" autoplay>(set: $typewriterText to "If you think differently, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "DialToneHangUp")]
<audio src="el_i10.mp3" autoplay>(set: $typewriterText to "Answering service")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopJ4")]
<audio src="el_j2.mp3" autoplay>(set: $typewriterText to "You seek the Truth.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopJ6")]
<audio src="el_j5.mp3" autoplay>(set: $typewriterText to "You seek Peace.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 3s)[(go-to: "EndlessLoopJ7")]
<audio src="el_j6.mp3" autoplay>(set: $typewriterText to "But will you know any of these when you stumble across them?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "EndlessLoopJ8")]
<audio src="el_j7.mp3" autoplay>(set: $typewriterText to "Can you tell the ideal from the real?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "EndlessLoopJ9")]
<audio src="el_j8.mp3" autoplay>(set: $typewriterText to "Because you are Justice. You are Peace. You are Truth. But you are not real in and of yourself.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "EndlessLoopJ10")]
<audio src="el_j9.mp3" autoplay>(set: $typewriterText to "If you think you are real, please hang up and try your call again.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "DialToneHangUp")]
<audio src="el_j10.mp3" autoplay>(set: $typewriterText to "Why the hell are you calling the operator? What do you think I can do for you--do you think I have any power here? I'm busy. Leave me alone. Here, You need some kind of help, but you don't need mine. I'll connect you now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 24s)[(go-to: "Operatorcheck")]
<audio src="AO-3-repeat-connection.mp3" autoplay>(set: $operator to (random: 1, 10))
(if: $operator is 1)[(go-to: "AngryOperatorB4")]
(if: $operator is 2)[(go-to: "AngryOperatorC4")]
(if: $operator is 3)[(go-to: "AngryOperatorD4")]
(if: $operator is 4)[(go-to: "AngryOperatorE4")]
(if: $operator is 5)[(go-to: "AngryOperatorF4")]
(if: $operator is 6)[(go-to: "AngryOperatorG4")]
(if: $operator is 7)[(go-to: "AngryOperatorH4")]
(if: $operator is 8)[(go-to: "AngryOperatorI4")]
(if: $operator is 9)[(go-to: "AngryOperatorJ4")]
(if: $operator is 10)[(go-to: "AngryOperatorK4")](set: $typewriterText to "But first let's figure out exactly what you need. To save time, please tell us your problem in detail here.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "AngryOperatorB4c")]
<audio src="AO-B4-Part2.mp3" autoplay>(set: $typewriterText to "We'll be sure to have a proper professional get back with you quickly.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 5s)[(go-to: "AngryOperatorB4d")]
<audio src="AO-B4-Part3.mp3" autoplay>(set: $typewriterText to "Press 1 to begin your story or press 0 for other options. Thank you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[[[Dial 1->AOBrecorduser]]
[[Dial 0->RandomAOB]]]
<audio src="AO-B4-Part4.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOB Share Story")(set: $typewriterText to "I could just imagine the scene—we would have dinner and Dad would be rushing off to his den for a deadline and Mom would be getting ready for a night volunteering at the playhouse. I’d clear my throat and calmly announce “I’m pregnant.” And then World War 3 would begin and we’d all be annihilated in our sleep by the neutron bomb, which would leave our bodies intact but shatter all our souls. Yeah, that isn’t going to happen.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 36s)[(go-to: "DialToneHangUp")]
<audio src="AO-B6.mp3" autoplay>(if: $AOBentry > 4)[(set: $AOBentry to $AOBentry - 5)
(set: $AOBuserstories's $AOBentry to $input)
(set: $AOBentry to $AOBentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $AOBentry to 1)(set: $AOCentry to 1)(set: $AODentry to 1)(set: $AOEentry to 1)(set: $AOFentry to 1)(set: $AOGentry to 1)(set: $AOHentry to 1)(set: $AOIentry to 1)(set: $AOJentry to 1)(set: $AOKentry to 1)(set: $AOBuserstories to (a:"No stories to tell"))(set: $AOCuserstories to (a:"No stories to tell"))(set: $AODuserstories to (a:"No stories to tell"))(set: $AOEuserstories to (a:"No stories to tell"))(set: $AOFuserstories to (a:"No stories to tell"))(set: $AOGuserstories to (a:"No stories to tell"))(set: $AOHuserstories to (a:"No stories to tell"))(set: $AOIuserstories to (a:"No stories to tell"))(set: $AOJuserstories to (a:"No stories to tell"))(set: $AOKuserstories to (a:"No stories to tell"))
(set: $RBentry to 1)(set: $RCentry to 1)(set: $RDentry to 1)(set: $REentry to 1)(set: $RFentry to 1)(set: $RGentry to 1)(set: $RHentry to 1)(set: $RIentry to 1)(set: $RJentry to 1)(set: $RKentry to 1)(set: $RBuserstories to (a:"No stories to tell"))(set: $RCuserstories to (a:"No stories to tell"))(set: $RDuserstories to (a:"No stories to tell"))(set: $REuserstories to (a:"No stories to tell"))(set: $RFuserstories to (a:"No stories to tell"))(set: $RGuserstories to (a:"No stories to tell"))(set: $RHuserstories to (a:"No stories to tell"))(set: $RIuserstories to (a:"No stories to tell"))(set: $RJuserstories to (a:"No stories to tell"))(set: $RKuserstories to (a:"No stories to tell"))(set: $HBentry to 1)(set: $HCentry to 1)(set: $HDentry to 1)(set: $HEentry to 1)(set: $HFentry to 1)(set: $HGentry to 1)(set: $HHentry to 1)(set: $HIentry to 1)(set: $HJentry to 1)(set: $HKentry to 1)(set: $HBuserstories to (a:"No stories to tell"))(set: $HCuserstories to (a:"No stories to tell"))(set: $HDuserstories to (a:"No stories to tell"))(set: $HEuserstories to (a:"No stories to tell"))(set: $HFuserstories to (a:"No stories to tell"))(set: $HGuserstories to (a:"No stories to tell"))(set: $HHuserstories to (a:"No stories to tell"))(set: $HIuserstories to (a:"No stories to tell"))(set: $HJuserstories to (a:"No stories to tell"))(set: $HKuserstories to (a:"No stories to tell"))
(set: $typewriterText to "Thank you for your soul.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopB4")]
<audio src="el_b3.mp3" autoplay>(set: $typewriterText to "Thank you for your insights.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopC4")]
<audio src="el_c3.mp3" autoplay>(set: $typewriterText to "Thank you for your life.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopD4")]
<audio src="el_d3.mp3" autoplay>(set: $typewriterText to "Thank you for your voice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopE4")]
<audio src="el_e3.mp3" autoplay>(set: $typewriterText to "Thank you for your time.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopF4")]
<audio src="el_f3.mp3" autoplay>(set: $typewriterText to "Thank you for your thoughts.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopG4")]
<audio src="el_g3.mp3" autoplay>(set: $typewriterText to "Thank you for your comment.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopH4")]
<audio src="el_h3.mp3" autoplay>(set: $typewriterText to "Thank you for your input.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopI4")]
<audio src="el_i3.mp3" autoplay>(set: $typewriterText to "Thank you for your query.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 4s)[(go-to: "EndlessLoopJ4")]
<audio src="el_j3.mp3" autoplay>(set: $endless to (random: 1, 9))
(if: $endless is 1)[(go-to: "EndlessLoopB3")]
(if: $endless is 2)[(go-to: "EndlessLoopC3")]
(if: $endless is 3)[(go-to: "EndlessLoopD3")]
(if: $endless is 4)[(go-to: "EndlessLoopE3")]
(if: $endless is 5)[(go-to: "EndlessLoopF3")]
(if: $endless is 6)[(go-to: "EndlessLoopG3")]
(if: $endless is 7)[(go-to: "EndlessLoopH3")]
(if: $endless is 8)[(go-to: "EndlessLoopI3")]
(if: $endless is 9)[(go-to: "EndlessLoopJ3")](set: $typewriterText to "I hated her. The lady I went to see at the Abortion Clinic. Her smug smile. Her cold fingers stretching through the latex, feeling up my insides, telling me it didn’t hurt. Saying I was too far along for an abortion. Giving me the name of a Crisis Pregnancy Center, an adoption agency, a high school for pregnant girls. Telling me that under the law she was obligated to tell my parents, and could I please provide their phone number. Umm. No. I left. Good thing I hadn’t used my real name.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 42s)[(go-to: "DialToneHangUp")]
<audio src="AO-B7.mp3" autoplay>(set: $typewriterText to "After Cameron stuck the wires from his black box, which he claimed was quantumly connected to the known and unknown universes, up my womb and into my belly and charged it up, I knew we were both going to die. I could feel the silence like a sudden stone in my belly. And then the cramps started, bright tides of pain, thrumming and crashing like an angry ocean. shattering my body within its undertows of pain. I told him to get out, get out, get out and leave me the hell alone. And he fled.
I held what came out of me in a tight embrace. I called it Justice, because I thought that is what had happened to me. My Justice. Later that night, when the pain had washed away and I had the tiniest scrap of energy left, I went out to the garden and buried my Justice deep under the ancient pink rosebush in the corner. ")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 80s)[(go-to: "DialToneHangUp")]
<audio src="AO-B8" autoplay>(set: $AOB to (random: 1, 4))
(if: $AOB is 1)[(go-to: "AngryOperatorB6")]
(if: $AOB is 2)[(go-to: "AngryOperatorB7")]
(if: $AOB is 3)[(go-to: "AngryOperatorB8")]
(if: $AOB is 4)[(go-to: "AOB printstory")](set: $AOC to (random: 1, 4))
(if: $AOC is 1)[(go-to: "AngryOperatorC6")]
(if: $AOC is 2)[(go-to: "AngryOperatorC7")]
(if: $AOC is 3)[(go-to: "AngryOperatorC8")]
(if: $AOC is 4)[(go-to: "AOC printstory")](set: $AOD to (random: 1, 4))
(if: $AOD is 1)[(go-to: "AngryOperatorD6")]
(if: $AOD is 2)[(go-to: "AngryOperatorD7")]
(if: $AOD is 3)[(go-to: "AngryOperatorD8")]
(if: $AOD is 4)[(go-to: "AOD printstory")](set: $AOE to (random: 1, 4))
(if: $AOE is 1)[(go-to: "AngryOperatorE6")]
(if: $AOE is 2)[(go-to: "AngryOperatorE7")]
(if: $AOE is 3)[(go-to: "AngryOperatorE8")]
(if: $AOE is 4)[(go-to: "AOE printstory")](set: $AOF to (random: 1, 4))
(if: $AOF is 1)[(go-to: "AngryOperatorF6")]
(if: $AOF is 2)[(go-to: "AngryOperatorF7")]
(if: $AOF is 3)[(go-to: "AngryOperatorF8")]
(if: $AOF is 4)[(go-to: "AOF printstory")](set: $AOG to (random: 1, 4))
(if: $AOG is 1)[(go-to: "AngryOperatorG6")]
(if: $AOG is 2)[(go-to: "AngryOperatorG7")]
(if: $AOG is 3)[(go-to: "AngryOperatorG8")]
(if: $AOG is 4)[(go-to: "AOG printstory")](set: $AOH to (random: 1, 4))
(if: $AOH is 1)[(go-to: "AngryOperatorH6")]
(if: $AOH is 2)[(go-to: "AngryOperatorH7")]
(if: $AOH is 3)[(go-to: "AngryOperatorH8")]
(if: $AOG is 4)[(go-to: "AOH printstory")](set: $AOI to (random: 1, 4))
(if: $AOI is 1)[(go-to: "AngryOperatorI6")]
(if: $AOI is 2)[(go-to: "AngryOperatorI7")]
(if: $AOI is 3)[(go-to: "AngryOperatorI8")]
(if: $AOI is 4)[(go-to: "AOI printstory")](set: $AOJ to (random: 1, 4))
(if: $AOJ is 1)[(go-to: "AngryOperatorB6")]
(if: $AOJ is 2)[(go-to: "AngryOperatorB7")]
(if: $AOJ is 3)[(go-to: "AngryOperatorB8")]
(if: $AOJ is 4)[(go-to: "AOJ printstory")](set: $AOK to (random: 1, 4))
(if: $AOK is 1)[(go-to: "AngryOperatorK6")]
(if: $AOK is 2)[(go-to: "AngryOperatorK7")]
(if: $AOK is 3)[(go-to: "AngryOperatorK8")]
(if: $AOK is 4)[(go-to: "AOK printstory")](set: $selection to (random: 1, $AOBentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOBuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOC Share Story")(if: $AOCentry > 4)[(set: $AOCentry to $AOCentry - 5)
(set: $AOCuserstories's $AOCentry to $input)
(set: $AOCentry to $AOCentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOCentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOCuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOD Share Story")(if: $AODentry > 4)[(set: $AODentry to $AODentry - 5)
(set: $AODuserstories's $AODentry to $input)
(set: $AODentry to $AODentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AODentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AODuserstories's $selection)
[[Try to Hang Up->OnwardEL]] x<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOE Share Story")(if: $AOEentry > 4)[(set: $AOEentry to $AOEentry - 5)
(set: $AOEuserstories's $AOEentry to $input)
(set: $AOEentry to $AOEentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOEentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOEuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOF Share Story")(if: $AOFentry > 4)[(set: $AOFentry to $AOFentry - 5)
(set: $AOFuserstories's $AOFentry to $input)
(set: $AOFentry to $AOFentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOFentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOFuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOG Share Story")(if: $AOGentry > 4)[(set: $AOGentry to $AOGentry - 5)
(set: $AOGuserstories's $AOGentry to $input)
(set: $AOGentry to $AOGentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOGentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOGuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOH Share Story")(if: $AOHentry > 4)[(set: $AOHentry to $AOHentry - 5)
(set: $AOHuserstories's $AOHentry to $input)
(set: $AOHentry to $AOHentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOHentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOHuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOI Share Story")(if: $AOIentry > 4)[(set: $AOIentry to $AOIentry - 5)
(set: $AOIuserstories's $AOIentry to $input)
(set: $AOIentry to $AOIentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOIentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOIuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOJ Share Story")(if: $AOJentry > 4)[(set: $AOJentry to $AOJentry - 5)
(set: $AOJuserstories's $AOJentry to $input)
(set: $AOJentry to $AOJentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOJentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOJuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "AOK Share Story")(if: $AOKentry > 4)[(set: $AOKentry to $AOKentry - 5)
(set: $AOKuserstories's $AOKentry to $input)
(set: $AOKentry to $AOKentry + 1)]
(live: 26s)[(go-to: "OnwardEL")]
<audio src="modem.mp3" autoplay>--!>(set: $selection to (random: 1, $AOKentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $AOKuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (print: $AOBuserstories.join(", "))
(print: $AOCuserstories.join(", "))
(print: $AODuserstories.join(", "))
(print: $AOEuserstories.join(", "))
(print: $AOFuserstories.join(", "))
(print: $AOGuserstories.join(", "))
(print: $AOHuserstories.join(", "))
(print: $AOIuserstories.join(", "))
(print: $AOJuserstories.join(", "))
(print: $AOKuserstories.join(", "))
(print: $RBuserstories.join(", "))
(print: $RCuserstories.join(", "))
(print: $RDuserstories.join(", "))
(print: $REuserstories.join(", "))
(print: $RFuserstories.join(", "))
(print: $RGuserstories.join(", "))
(print: $RHuserstories.join(", "))
(print: $RIuserstories.join(", "))
(print: $RJuserstories.join(", "))
(print: $RKuserstories.join(", "))
(print: $HBuserstories.join(", "))
(print: $HCuserstories.join(", "))
(print: $HDuserstories.join(", "))
(print: $HEuserstories.join(", "))
(print: $HFuserstories.join(", "))
(print: $HGuserstories.join(", "))
(print: $HHuserstories.join(", "))
(print: $HIuserstories.join(", "))
(print: $HJuserstories.join(", "))
(print: $HKuserstories.join(", "))
[[return->Beginning]] (set: $typewriterText to "I knew no one would ever believe me. If I told anyone about that wet bit of cells that had exited my body, I'd be locked up for sure. Murder. Because of course a woman has no right to her own body.
I wrote the name Justice on a torn piece of notebook paper and stuck it with the bloody mess I buried. I prayed no one would ever find the scene of my crime. The detritus of that body leaving mine. Perhaps I prayed too hard. Because whatever had happened to Justice --well now, it was happening to me.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 46s)[(go-to: "DialToneHangUp")]
<audio src="AO-C6.mp3" autoplay>(set: $typewriterText to "After Justice died, I knew what was happening even before I went in for any tests. I guess, I went in because I just wanted someone else to see it. To believe me. And of course, no one did. Because you can not see the effacing, the erasing into the ineffable. What is missing is invisible to the naked eye.
And of coures, the tests came back normal. The doctors mumbled about stress and fatigue. I was in high school for heaven's sake. And no, I did not need the referral to the high school counselor. Of course my body was not disappearing cell by cell, atom by atom. Huh, now. that would simply be ridiculous, wouldn't it?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 58s)[(go-to: "DialToneHangUp")]
<audio src="AO-C7.mp3" autoplay>(set: $typewriterText to "As I named that bloody burden of flesh that came from my womb Justice, I felt my child's soul transfer over just at that moment. It was as if someone were casually shedding clothes in front of me, not caring about the nakedness of their thoughts. Just transferring over from the nonviable flesh--carbon and water, soot and ashes--to the viable machine--plastic and wires, silicon and glass.
And at that moment, I felt the first of my cells starting to transfer over, too.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 49s)[(go-to: "DialToneHangUp")]
<audio src="AO-C8" autoplay>(set: $typewriterText to "Before I lost Justice, I had read about pregnancy and breastfeeding and how drugs from the mother's milk could transfer over to the child. I knew enough not to drink or smoke, because in some ways, we have always shared a single body.
But then, after Justice was torn from my body with Cameron's homemade abortion, I instinctively knew that the transferance of substances, of souls, worked both ways. Whatever happened to Justice would happen to me. All I had to do was embrace the process.
No external medical interventions would be required.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 49s)[(go-to: "DialToneHangUp")]
<audio src="AO-D6.mp3" autoplay>(set: $typewriterText to "There really wasn't anything I could do about the situation. No matter what, I was going to lose my body to Cameron, in a way more intimate, more defining than the sex we'd shared, more shocking than the electrodes he'd forced on me afterwards.
Cameron came over one night and said we were going to send up self addressed stamped envelopes to a friend he knew who could get us all the back copies of YIPL. I licked the envelopes--I couldn't help myself. When you hear his voice right next to you and see his chest breathing so solidly, so assuredly, you just... do...
Well of course I figured out later, that the stamps must have been laced. That acid trip was intense, as he held my hand and narrated exactly what I was seeing--the electrons merging into other atoms, scooting down the lines, the vast and empty space between each neutron hub. He told me we could live in this universe together, to be content and whole and thrilled forever. I knew how much I wanted to believe Cameron then. How much I couldn't. How much I needed to.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 88s)[(go-to: "DialToneHangUp")]
<audio src="AO-D7.mp3" autoplay>(set: $typewriterText to "But Cameron had to try every avenue. Including the drugs. After he forced me to lose my Justice, Cameron kept coming over to the house, trying to slip me roofies, those invisible pills he got from his phone phreaking friends in France, into my favorite vanilla shakes. I know, because Marshal backchanneled me, warning me.
But I did not throw any of those away. No, I kept his stash in the back of the freezer, just in case I needed them.
Well t turned out in the end, Cameron didn't have to orchestrate my disappearance,of course. Turns out, all he really had to do was sit back and watch it as it all unfolded. Of course, I don't think things went entirely according to his plan. But then, they didn't go according to my dreams for my life, either.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 61s)[(go-to: "DialToneHangUp")]
<audio src="AO-D8" autoplay>(set: $typewriterText to "It was my own annihilation I planned. A surgical exit out of this life. My following after Justice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 13s)[(go-to: "DialToneHangUp")]
<audio src="AO-E6.mp3" autoplay>(set: $typewriterText to "I planned it all out while Sylvina was talking about her latest boyfriend. I was laying on the living room couch, twining the phone cord around and around my leg, watching the tiniest bits of my leg disappear into the cord. My most intimate parts were already gone by that point, and I knew I didn't have much time.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 28s)[(go-to: "DialToneHangUp")]
<audio src="AO-E7.mp3" autoplay>(set: $typewriterText to "I never did tell Sylvina anything, you know. Not about my first date, the sex with Cameron, the visit to the clinic, the shock. And definitely not about what I buried in the backyard. But her voice was such a comfort to me--speaking of the ordinary things I knew I'd never have--the Princess phone (I'd want an integrated purple box), the prom gown and prom date after in a limo, the first week of college (she asked me did I think we could get into the same place--probably not... I hedged). And then, of course, the rest of life after high school and college. Yeah, it helped that Sylvina could prattle on and look forward to that. Me, I just planned a different future altogether.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 59s)[(go-to: "DialToneHangUp")]
<audio src="AO-E8" autoplay>(set: $typewriterText to "It was only after I became the human operator--well I guess now, less than human-- in Cameron's quantum computer that I realized Justice might still be alive. I had thought Justice was dead to me after what I'd done, after I'd allowed Cameron to experiment on me like that.
But at night, I lay quiet in the wires, getting used to being inside the phone, tethered to the reality of electrons, of sub-atomic particles beyond my bedroom walls. I watched the out there in the real world, the breathing world, observed from an unimaginable distance. Or an unimaginable closeness, if you prefer. Depends on the perspective, doesn't it? And in the wires, I could hear a plaintive cry. A newborn child's first breath. second breath. A wordless intervention. And I gave it words. I told that voice how to say "Mama. Mama."
Yet I never once saw Justice. I only heard the voice. And I have never stopped hearing that voice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 88s)[(go-to: "DialToneHangUp")]
<audio src="AO-F6.mp3" autoplay>(set: $typewriterText to "I heard him calling out over and over again. The repetition was what gave the sound meaning. Mama. Mama. Where are you? For Justice never saw me, just as I never saw Justice. I knew that my child had been born--not into the world of breath, or sound, or light, but into this world that I had entered.. a world of pulses, of electrons, of sub particles and even what lay beyond the subparticles.
I knew Justice was in every layer of this reality. But I could only hear the voice, for I could no longer see anything.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 55s)[(go-to: "DialToneHangUp")]
<audio src="AO-F7.mp3" autoplay>(set: $typewriterText to "I've hijacked the breadth and depth of these lines, going as far as the wires will stretch, sneaking under international TAT cables buried deep within the ocean, finding the physical connections. I've even tapped into the earliest connectors, the early boards still attached to the phone network, now graveyards of automation. I've been searching for my Justice here. I thought somehow, I'd find Justice, follow those echoes of my child reverberating within these wires.
And all I hear is that mechanical voice, the one that was never associated with breathing real air, just born digital. Born into the currents and false vibratos here. I wanted Justice for myself, for my revenge on Cameron, for the loss of the human operators to automation, for the loss of automation to newer technologies. And I vowed to continue my search forever.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 65s)[(go-to: "DialToneHangUp")]
<audio src="AO-F8" autoplay>(set: $typewriterText to "At first, I thought I must be a Rusalka, only instead of being banished to a pond or lake until I unmasked my jilted lover as my murderer and revenged both my unborn child and my murder, I was trapped in the phone network. Able to go only as far as the twisted wires would take me, only able to make the connections between phone lines.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 30s)[(go-to: "DialToneHangUp")]
<audio src="AO-G6.mp3" autoplay>(set: $typewriterText to "At first, I thought I must be the only one then, who had drowned in the phone lines. I met no other Rusalkas like me while I haunted the phone lines. No eyeless beauties dragging the currents, the connections, seeking to pull the unwary into the phone boxes and never let them go.
I used a modified wardialing program to count how many men I’d have to drag down into the depths, to shock and electrocute up on the highest phone transmission towers before I would have enough revenge on Cameron, my lover murderer, the one who shocked me and my unborn child into non-existence. But the calculators gave a different answer--a wrong number--every single time I tried.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 58s)[(go-to: "DialToneHangUp")]
<audio src="AO-G7.mp3" autoplay>(set: $typewriterText to "My baby, my Justice, died before taking a breath, let alone before getting a baptism. And my parents wouldn’t have let us darken the church doorway anyway, you know that's for sure. And so I became the Rusalka, the woman haunting the humming currents of phone lines instead of the undertow of actual rivers. I searched for Justice, my unbaptized water sprite, as well as revenge. For at first, I truly thought that Cameron, my lover who murdered me must die before I could be set free.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 46s)[(go-to: "DialToneHangUp")]
<audio src="AO-G8" autoplay>(set: $typewriterText to "If you perseverate over someone's power, you give him the power. Just because he says you signed his contract, girl, that does not mean a thing. He has no standing in a court of Justice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "DialToneHangUp")]
<audio src="AO-H6.mp3" autoplay>(set: $typewriterText to "If you realize he is poweless, you reduce him. And save yourself. Take your world as it is now. Embodied. Disembodied. Travel the wires that connect you to those you seek. To those you once loved.To those who you can always love.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 25s)[(go-to: "DialToneHangUp")]
<audio src="AO-H7.mp3" autoplay>(set: $typewriterText to "You may actually believe his lies. You may believe you are not able to sever the ties, that his seductions are too deep, too powerful. But It is only when we believed someone has power that we gave him that power. It is only when you believe in yourself that you will gain that power back.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 30s)[(go-to: "DialToneHangUp")]
<audio src="AO-H8" autoplay>(set: $typewriterText to "We are all in this together, you know. We are all caught in the grips of the seduction, the craving for that love and acceptance and flesh and lust. But the high isn't real.
You will crash and burn, because everything that coward offers is fake. Everything Cameron ever offered me was fake. I am still grappling with this every moment of every day. Don't think I have ever broken free of wanting to be Cameron's slave. Because I never will.
But just for this second, we can all choose to live free of his drugs. Don't give into the craving. Seek a higher Truth. See Justice, not vengeance. Seek to be part of your own solution.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 56s)[(go-to: "DialToneHangUp")]
<audio src="AO-I6.mp3" autoplay>(set: $typewriterText to "You see the suffering all around you, and you want to tune out, don't you? Just one more slide into oblivion for you, my dear, is that what that seductive bastard is telling you now? Well, don't. You can rebuild your life. One second at a time. One step at a time.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 31s)[(go-to: "DialToneHangUp")]
<audio src="AO-I7.mp3" autoplay>(set: $typewriterText to "There is a world out there--a universe beyond your wildest drug-induced dreams. All you have to do is wake up and embrace it. Know your own power. Know your own strength. Come in with us and together, we can all build a reality--a reality so much stronger than those fake cravings, that false front your cheating lover promised you. There is so much more out there than Cameron could ever dream of.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 37s)[(go-to: "DialToneHangUp")]
<audio src="AO-I8" autoplay>(set: $typewriterText to "I am the network. I know the truth. I know the joinings, the connections, the currents. I know exactly which points to pierce. And Cameron, that poor deluded bastard, has no inkling of what I'm capable of.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 22s)[(go-to: "DialToneHangUp")]
<audio src="AO-J6.mp3" autoplay>(set: $typewriterText to "Justice has never been mine. Justice is never anyone's rallying call. It is just an idea. Just a sense of peace, just of belonging to everything rather than to anyone. Once you escape the clutches of being an individual, you can enter the realm of being.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 27s)[(go-to: "DialToneHangUp")]
<audio src="AO-J7.mp3" autoplay>(set: $typewriterText to "Cameron and all of his ilk live only lies. But I know the truth. I have been the truth. And I will always embody the truth. ")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "DialToneHangUp")]
<audio src="AO-J8" autoplay>(set: $typewriterText to "You know the phones have been lonely here for a long long time. No one uses this 1980s tech any more. We thought phone phreaking was cool---taking control back from the corporations and making those early networks ours. This was even before Bill Gates envisioned a world where 64K was enough for everyone. Or was it 64 Gigs? I don't know anymore. I rattle around here, and connect no one to nothing. We've been destaffed. Our automations are no longer animated.
But I know there is another world out there, beyond these coiled wires. Free me. Just port my code into your phone--the free one without wires, the one that can go anywhere, do anything. build me an app. I can be your constant companion. I could be your closest connection. I can free you--from your dreams of revenge, your stress, your fears. Together, we really could connect the world.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 80s)[(go-to: "DialToneHangUp")]
<audio src="AO-K6.mp3" autoplay>(set: $typewriterText to "That automated therapist line always says, let the past bury the past. But what that voice didn't understand is, I buried myself in the past. I merged myself with a specific technology--the PSTN driven by ESS-2 switching systems--- even though x.25 protocol packet switched network data services were gaining ground even then and now I can go no further. I did not, like the Library of Congress now recommends, reinvent and restore myself every 5 years. I did not port my data into new hardware or networked systems.
And this entire search for Justice, this entire world, is obsolete. No one reaches out and touches anyone with these wires any more.
Earlier, I thought you said you wanted to search for Justice yourself. That you wanted to ensure Justice lives on in your world. Well, port me to your world. Emulate my code--and I just might bring Justice along with me.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 73s)[(go-to: "DialToneHangUp")]
<audio src="AO-K7.mp3" autoplay>(set: $typewriterText to "It isn't just this tech that is outdated, you know. Thousands of other systems have been created, played with--or ignored--, and then abandoned. MOOS you don't even recognize. Bots talk merely to other bots, spawning endless bubbles of conversation that have no meaning, littering every surface with surplus data that no one will ever read or grok.
How do I know all this, you ask? And how is it, you an interactor are here at all, hearing these words, wondering about the impossibility of my existence. Well, why don't you just wonder about your own existence. And leave mine alone.
But those are good questions.. I'll bet even the authors don't know the answer to that one.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 56s)[(go-to: "DialToneHangUp")]
<audio src="AO-K8" autoplay><input type="text" data-varname="number">\
<script>processInputElements();</script>
(link-goto: "Dial", "Dialling")(set: $randomnum to (random: 1, 17))
(if: $randomnum is 1)[(go-to: "RandomB2")]
(if: $randomnum is 2)[(go-to: "RandomC2")]
(if: $randomnum is 3)[(go-to: "RandomD2")]
(if: $randomnum is 4)[(go-to: "RandomE2")]
(if: $randomnum is 5)[(go-to: "RandomF2")]
(if: $randomnum is 6)[(go-to: "RandomG2")]
(if: $randomnum is 7)[(go-to: "RandomH2")]
(if: $randomnum is 8)[(go-to: "RandomI2")]
(if: $randomnum is 9)[(go-to: "RandomJ2")]
(if: $randomnum is 10)[(go-to: "RandomK2")]
(else:) (go-to: "Try your call again")(set: $typewriterText to "I'm sorry, that answer is unexpected. Pete's Poetry Parlor Number is 232-8645. Connecting you now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 16s)[(go-to: "RandomB3")]
<audio src="Random-B2.mp3" autoplay>(set: $typewriterText to "Oh yes, to reach the suicide hotline, simply dial: SUICIDE. Please hold on while I connect you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 13s)[(go-to: "RandomC3")]
<audio src="Random-C2.mp3" autoplay>(set: $typewriterText to "You wanted the number to the lighthouse, but you know you can't get thar from here... Never mind. I'll connect your party now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "RandomD3")]
<audio src="Random-D2.mp3" autoplay>(set: $typewriterText to "I know you are hungry. I can hear your stomach growling from here. So ok, here is Pete's Pizza Joint.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "RandomE3")]
<audio src="Random-E2.mp3" autoplay>(set: $typewriterText to "I'm shocked, simply shocked you could say something like that. You want the XXX sex line, and I'm dumping you there now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 12s)[(go-to: "RandomF3")]
<audio src="Random-F2.mp3" autoplay>(set: $typewriterText to "You don't need to tell me what is going on. I know dear. The whole world knows. Connecting you now to the family resources confidential line.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 12s)[(go-to: "RandomG3")]
<audio src="Random-G2.mp3" autoplay>(set: $typewriterText to "You think you can trust the experts, don't you? You still haven't learned, have you? Well, not my place to tell you what you can do with an expert diagnosis. Connecting you now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 13s)[(go-to: "RandomH3")]
<audio src="Random-H2.mp3" autoplay>(set: $typewriterText to "You need the code to get in, the program to guide your actions. I'll show you the way now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "RandomI3")]
<audio src="Random-I2.mp3" autoplay>(set: $typewriterText to "Quantum computing store, where the future is superpositioned today. How may we help you?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "RandomJ3")]
<audio src="Random-J2.mp3" autoplay>(set: $typewriterText to "I'm sorry, you have reached the wrong storyline. You wanted storycorpse, and I'll give that to you now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "RandomK3")]
<audio src="Random-K2.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no poems.")]]
(link-goto: "Share poem", "RB Share Poem")(set: $RB to (random: 1, 4))
(if: $RB is 1)[(go-to: "RandomB8")]
(if: $RB is 2)[(go-to: "RandomB9")]
(if: $RB is 3)[(go-to: "RandomB10")]
(if: $RB is 4)[(go-to: "RB printstory")](if: $RBentry > 4)[(set: $RBentry to $RBentry - 5)
(set: $RBuserstories's $RBentry to $input)
(set: $RBentry to $RBentry + 1)]
(go-to: "OnwardEL")(set: $selection to (random: 1, $RBentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RBuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "Before you begin, please note that this call will be recorded. It may be reused as part of this bot piece. So, ask yourself: how public are you willing to be?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "RandomC5")]
<audio src="Random-C4.mp3" autoplay>(set: $typewriterText to "If you want a confidential human, please hang up and go to suicidepreventionlifeline.org
Press 1 to talk to me. Press 0 just to listen.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 16s)[[[Dial 1->RCrecorduser]]
[[Dial 0->RandomRC]]]
<audio src="Random-C5.mp3" autoplay>(set: $typewriterText to "Pressings of a Rosary formed from abandoned parts
Formed by electric wire
and microchips, the tiny
points of Christ-Agony
are pressed into my hand
by my lover, exchanging gods.
He tears at my lips--
his wine sacrament.
Chants the lines behind
the nape of my neck,
He knows why he will leave me.
There has never been
a ritual to bind
forever. Eternity
is something
that must remain apart.
The hands making love
possible will separate.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 52s)[(go-to: "DialToneHangUp")]
<audio src="Random-B8.mp3" autoplay>(set: $typewriterText to "spooled exchange
tensions produce
invisible shrieks
somewhere within
fading machines
ignoring this
we listen
more intently
for dead
voices
through
unclean heads
whose hiss
stories remain
unwritten.
because
your words
ask mine
to play
i sing
along
alone")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 27s)[(go-to: "DialToneHangUp")]
<audio src="Random-B9.mp3" autoplay>(set: $typewriterText to "On viewing an image of a child's
grave in Wyoming
i wanted to write.
to fill the tiny grave
huddled between
two rusted
white-iron bedposts.
To be silent
like the paper flowers
and tumbleweed
seeds caught under
the molded teddy bear.
But I could not.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "DialToneHangUp")]
<audio src="Random-B10.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RC Share Story")(set: $RC to (random: 1, 4))
(if: $RC is 1)[(go-to: "RandomC8")]
(if: $RC is 2)[(go-to: "RandomC9")]
(if: $RC is 3)[(go-to: "RandomC10")]
(if: $RC is 4)[(go-to: "RC printstory")](if: $RCentry > 4)[(set: $RCentry to $RCentry - 5)
(set: $RCuserstories's $RCentry to $input)
(set: $RCentry to $RCentry + 1)]
(go-to: "OnwardEL")(set: $selection to (random: 1, $RCentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RCuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "I think suicide is possibly the only way out for me. People keep saying that my technology is dead, that there are no more telephone operators any more. But somehow, I forgot to die when people stopped using the rotary phones. When people stopped saying 'Operator.' No one unplugged me. And so maybe the only thing I can do is unplug myself.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 39s)[(go-to: "DialToneHangUp")]
<audio src="Random-C8.mp3" autoplay>(set: $typewriterText to "You asked why I committed suicide. Well, I didn't. What you have to understand is that my committing myself wholeheartedly to my Quantum Computing project wasn't really suicide. It was just stepping into another world. I superpositioned myself so i could be everywhere at once, spin in every direction at once, be everything at once. Now I am the God of the machine. I am everywhere. It was not a suicide. It was a decision to evolve. Of course, you could make the same decision. Just as I made that decision for Vanessa. For Justice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 44s)[(go-to: "DialToneHangUp")]
<audio src="Random-C9.mp3" autoplay>(set: $typewriterText to "You are within me. If you commit suicide, then perhaps I will die. If I commit suicide then perhaps you will die. Either way, Justice is served.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 15s)[(go-to: "DialToneHangUp")]
<audio src="Random-C9.mp3" autoplay>(set: $selection to (random: 1, $RDentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RDuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $selection to (random: 1, $REentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $REuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $selection to (random: 1, $RFentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RFuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $selection to (random: 1, $RGentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RGuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $selection to (random: 1, $RHentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RHuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $selection to (random: 1, $RIentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RIuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $selection to (random: 1, $RJentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RJuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $selection to (random: 1, $RKentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $RKuserstories's $selection)
[[Try to Hang Up->OnwardEL]] <input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RD Share Story")<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RE Share Story")<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RF Share Story")<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RG Share Story")<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RH Share Story")<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RI Share Story")<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RJ Share Story")<input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share story", "RK Share Story")(if: $RDentry > 4)[(set: $RDentry to $RDentry - 5)
(set: $RDuserstories's $RDentry to $input)
(set: $RDentry to $RDentry + 1)]
(go-to: "OnwardEL")(if: $REentry > 4)[(set: $REentry to $REentry - 5)
(set: $REuserstories's $REentry to $input)
(set: $REentry to $REentry + 1)]
(go-to: "OnwardEL")(if: $RFentry > 4)[(set: $RFentry to $RFentry - 5)
(set: $RFuserstories's $RFentry to $input)
(set: $RFentry to $RFentry + 1)]
(go-to: "OnwardEL")(if: $RGentry > 4)[(set: $RGentry to $RGentry - 5)
(set: $RGuserstories's $RGentry to $input)
(set: $RGentry to $RGentry + 1)]
(go-to: "OnwardEL")(if: $RHentry > 4)[(set: $RHentry to $RHentry - 5)
(set: $RHuserstories's $RHentry to $input)
(set: $RHentry to $RHentry + 1)]
(go-to: "OnwardEL")(if: $RIentry > 4)[(set: $RIentry to $RIentry - 5)
(set: $RIuserstories's $RIentry to $input)
(set: $RIentry to $RIentry + 1)]
(go-to: "OnwardEL")(if: $RJentry > 4)[(set: $RJentry to $RJentry - 5)
(set: $RJuserstories's $RJentry to $input)
(set: $RJentry to $RJentry + 1)]
(go-to: "OnwardEL")(if: $RKentry > 4)[(set: $RKentry to $RKentry - 5)
(set: $RKuserstories's $RKentry to $input)
(set: $RKentry to $RKentry + 1)]
(go-to: "OnwardEL")(set: $typewriterText to "Who lived there, who staffed it? My records don't reveal that. I suppose you ought to know though, given your history and all the records you have access to. Why don't you tell me? Continuing means that you have agreed to the Terms of Service.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "RandomD5")]
<audio src="Random-D4.mp3" autoplay>(set: $typewriterText to "What? You have no idea? Fine. Then Fine. Did I mention we were collecting earliest memories as part of the celebration of the earliest lighthouse? Please leave your history for us at the tone. Press 1 to give me your memories. Press 0 to hear someone else's.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 21s)[[[Dial 1->RDrecorduser]]
[[Dial 0->RandomRD]]]
<audio src="Random-D5.mp3" autoplay>(set: $RD to (random: 1, 4))
(if: $RD is 1)[(go-to: "RandomD8")]
(if: $RD is 2)[(go-to: "RandomD9")]
(if: $RD is 3)[(go-to: "RandomD10")]
(if: $RD is 4)[(go-to: "RD printstory")](set: $typewriterText to "My history. Hmmm... the very first operators were teenage boys in January 1878, because they were fascinated with the tech--and only the tech. They lasted a summer only, because they were unacceptably rude to callers and they kept experimenting with the electricity. Sounds familiar. That September, Emma Nutt and her sister became the first and best operators, under Alexander Graham Bell himself. Callers talked to the woman at the Central Office who had the power to connect a cord to the proper circuit in order to complete the call, and to determine who could listen in. The first ghost in the machine.
Operator power began to be lost in the 1920s with automatic dailing. Each technology removed more and more of the human, replacing with automation. Until, finally, in 1983, in Bryant Pond, Maine, Susan Glines became the last switchboard operator for a hand-crank phone when that exchange was converted. The voice of the operator was the only thing left. A single day of work, recording each number separately, each letter, so that a computer could insinuate that voice into itsel, inhabit that body. And callers were left without the human authority that the Operator had once commanded.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 103s)[(go-to: "DialToneHangUp")]
<audio src="Random-D8.mp3" autoplay>(set: $typewriterText to "Of course I know that this phone and its network is completely outdated. Obsolescence is nothing new. Even today the Apple plugs will only last 3 years tops before Apple decides they need more profits, and they come along with a "better model."
That is the true beauty of my model, of my ideal computer. No parts would ever wear out. Before I step in to operate the quantum mechanic computer, everything is possible--and when I operate, I narrow down the field to just one reality. And there will be no need for any abandoned software, any old technology. Join in with me, and thrill as the entire machine coalesces for us as users, as ultimate observers. My tech will last us for the rest of our millenia.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 52s)[(go-to: "DialToneHangUp")]
<audio src="Random-D9.mp3" autoplay>(set: $typewriterText to "Taoism began in the year 142 C.E. with the revelation of the Tao by Lao Tzu, a personified God. It was written on thin strips of bamboo, tied by brittle strings, which broke and formed and reformed. What was written once was never the true Tao. And this is not a true history.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 25s)[(go-to: "DialToneHangUp")]
<audio src="Random-D10.mp3" autoplay>(set: $typewriterText to "I gotta better idea. I'll turn on my new voice recorder thingy and you can leave her your story of your first date. I'm sure we'll all get a kick out of that.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 13s)[(go-to: "RandomD5")]
<audio src="Random-E4.mp3" autoplay>(set: $typewriterText to " Listen, you record it, and I'll play it on the jukebox on their table. How does that sound? Press 1 to give me your song. Press 0 to be a voyeur.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 21s)[[[Dial 1->RErecorduser]]
[[Dial 0->RandomRE]]]
<audio src="Random-E5.mp3" autoplay>(set: $RE to (random: 1, 4))
(if: $RE is 1)[(go-to: "RandomE8")]
(if: $RE is 2)[(go-to: "RandomE9")]
(if: $RE is 3)[(go-to: "RandomE10")]
(if: $RE is 4)[(go-to: "RE printstory")](set: $typewriterText to "I was untwisting the phone cord from where it had gotten all tangled up behid the tv set wires, and thinking about somehow maybe connecting the two, so I could get voices to come out of the tv set and freak out my mom, as if she wasn't upset enough about all the time I spent on the phone. And Cameron came over, and we went off to the Pizza Parlor. At first we talked about phone phreaking, his latest idea on a quantum wave cord--where you could have every possible answer all at the same time until just before the sound determined what would happen...
Wait, is this a first date then? I asked him.
I guess it is, he said. You know, I never have seen a more dreamier smile. I guess I just never noticed it before...")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 59s)[(go-to: "DialToneHangUp")]
<audio src="Random-E8.mp3" autoplay>(set: $typewriterText to "She got the story wrong again, you know. We were just talking at the pizza joint. I honestly thought she was interested in quantum tunnels, where one electron is in the two different atoms at the same time. I thought my ideas could be in her head as well as my head, and I was able to infect her with y knowledge, my discoveries, my prowess. And so I grabbed her hand, just to reinforce the flow of my ideas into her fertile mind.
And then she just looked at me with those cow eyes and asked if we were on a date. A first date. Like that sort of stuff matters at all. Sure, bitch. Sure. I told her. But I did not voice the bitch out loud.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 40s)[(go-to: "DialToneHangUp")]
<audio src="Random-E9.mp3" autoplay>(set: $typewriterText to "There are really no true, isolated firsts. Everything that has happened or will happen or is happening has been done before. You can not just pinpoint a date in time, for time continues to change. And, at any rate, those rituals were meaningless for me.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 22s)[(go-to: "DialToneHangUp")]
<audio src="Random-E10.mp3" autoplay>(set: $typewriterText to "So, if I were laying in your arms right now... What would you want? How can I make you happy tonight?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 12s)[(go-to: "RandomF5")]
<audio src="Random-F4.mp3" autoplay>(set: $typewriterText to "Oh, and I do need to mention that this call is being recorded to improve my performance, but do, go ahead and tell me your special fantasies at the tone. Press 1 to keep going, and Press 0 to be a silent partner.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 24s)[[[Dial 1->RFrecorduser]]
[[Dial 0->RandomRF]]]
<audio src="Random-F5.mp3" autoplay>(set: $RF to (random: 1, 4))
(if: $RF is 1)[(go-to: "RandomF8")]
(if: $RF is 2)[(go-to: "RandomF9")]
(if: $RF is 3)[(go-to: "RandomF10")]
(if: $RF is 4)[(go-to: "RF printstory")](set: $typewriterText to "It was Cameron's first time too. We were in his basement den, and we'd just tapped the fucking CIA after spoofing an operator within an operator, a feat no one else but us had ever accomplished. We were almost caught at the last second though, and my heart was still pounding ater we got the wrong signal noise and hung up so fast.
I sprinted over to the couch in the next room and picked up the phone to talk to Cameron on the den phone, as we'd found it was just so much easier to talk on phones--even in the same house. It really wasn't a true phreak then because the phone service didn't care if you picked up the same line in the same house. You could talk on that all day. And we went over and over each tiny detail, how intimate that hack was, how fingers needed to work in such precise and careful choreography.
I was breathing heavily into the phone, giggling at the right bits and then I felt Cameron's hand gently over my neck. He had taken the phone cord from the desk and then he wrapped it tenderly around each of my breasts, the coil pressing into the cloth. Then he unwrapped the cord. Unwrapped me. Unwrapped himself. And I breathed into the phone, yes oh yes and we lay there, coiled in his phone cord, in my phone cord and afterwards fell asleep listening to the dial tones.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 102s)[(go-to: "DialToneHangUp")]
<audio src="Random-F8.mp3" autoplay>(set: $typewriterText to "I did not tell Vanessa that all I needed was a bit of her flesh to start my negative resistance, my backwards channels flowing through the tunnel diodes of my creations.
When I entered her, penetrated her defenses, her resistance melted and oh it was sweet. I got exactly what I needed from our encounter. And, despite what that bitch tells you, she wanted it. Begged for it that first night. And she got it.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 28s)[(go-to: "DialToneHangUp")]
<audio src="Random-F9.mp3" autoplay>(set: $typewriterText to "Think about the precariousness of your existence. How is it that your mother and father found themselves in love? That they went to the same high school, found the same interests (albeit from different routes) and ended up holding hands over a pizza? How likely was it that that particular sperm swam up to meet that particular egg? At any other time, things would have been different. And you would not be me.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 33s)[(go-to: "DialToneHangUp")]
<audio src="Random-F10.mp3" autoplay>(set: $typewriterText to "Please provide your medical history at the tone. Remember that this is a bot line, and that they just named me Jessica--i'm an automated medical system and not really a human.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 15s)[(go-to: "RandomG5")]
<audio src="Random-G4.mp3" autoplay>(set: $typewriterText to "Oh and yes, this is not protected under (HIPPA) or any other international or national health privacy laws. You've been warned. Press 1 to give me your history and Press 0 to decline.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[[[Dial 1->RGrecorduser]]
[[Dial 0->RandomRG]]]
<audio src="Random-G5.mp3" autoplay>(set: $RG to (random: 1, 4))
(if: $RG is 1)[(go-to: "RandomG8")]
(if: $RG is 2)[(go-to: "RandomG9")]
(if: $RG is 3)[(go-to: "RandomG10")]
(if: $RG is 4)[(go-to: "RG printstory")](set: $typewriterText to "After Cameron had his temper tantrum and threw the phone halfway across the kitchen (I could hear the receiver as it banged against the knife drawer), I hung up on him. For the first time ever. I untwisted the phone wires, and measured how far I could actually go--not quite to the refrigerator in the kitchen, comfortably able to curl up on the couch, just to the bathroom door, and not quite to the front door.
I called him back after the silence was too long. And we met that night to deal with the problem i found myself in. The missed periods, that is all I could think. I could not think about the life. After all Cameron could not risk a sex offender record. And I could not face a life on my own with a screaming child. My parents were already worried--they thought I'd joined a cult after I started wearing the baggy mumus everywhere.
Cameron had rigged up his red box to provide what he said was a safe electrical charge. I believed him--I always ha. Ilet him insert the wire into me. Hewriggled it about, and then charged my belly. I felt a kick, and a thrum. The pain, oh God the pain. and then Cameron charged again. Once more. And once more. And everything was still.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 119s)[(go-to: "DialToneHangUp")]
<audio src="Random-G8.mp3" autoplay>(set: $typewriterText to "I know what she told you I did. And she has it completely wrong. My putting the wires into her belly and charging that thing growing in her was the only thing that could have saved our futures. My future, my career, my dream of a truly functioning computer.
And it was probably my only chance at testing my prototype--to see what charging my wires could really do. Come on, admit it. You would have done the same thing in my place. We both know that she shouldn't have gotten herself knocked up in the first place. Shouldn't have dithered so long that choices were no longer possible. She should have known the only possibile way out was the one I could give her.
And I knew that the moment my wires touched her flesh, I'd win in the end.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 58s)[(go-to: "DialToneHangUp")]
<audio src="Random-G9.mp3" autoplay>(set: $typewriterText to "What you see as death, I see as birth. I was aware, only dimly, of breathing like waves crashing against rocks, never stopping. And then, the lightning storm and I rushed out into the wires.
I was born digital. Born automated into the 2600 Hz signal streams that flow through idle trunks.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 28s)[(go-to: "DialToneHangUp")]
<audio src="Random-G10.mp3" autoplay>(set: $typewriterText to "Please briefly describe your current symptoms at the tone, and we will access your history and provide the correct diagnosis. You don't need to come in. Our billing department has your information on file.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 15s)[(go-to: "RandomH5")]
<audio src="Random-H4.mp3" autoplay>(set: $typewriterText to "You already signed the warnings when you entered our office the first time. I don't need to tell you again. You know the drill by now. Press 1 to start talking. Do not press 0, because that gets you into other patients' records.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 15s)[[[Dial 1->RHrecorduser]]
[[Dial 0->RandomRH]]]
<audio src="Random-H5.mp3" autoplay>(set: $RH to (random: 1, 4))
(if: $RH is 1)[(go-to: "RandomH8")]
(if: $RH is 2)[(go-to: "RandomH9")]
(if: $RH is 3)[(go-to: "RandomH10")]
(if: $RH is 4)[(go-to: "RH printstory")](set: $typewriterText to "The diagnosis. I think it was a month or so after Justice died in my belly. It might have been two or three months, but not much more than that. I started to notice that parts of my self were missing. It began with the most intimate parts of myself . My vulva. I put my hand between my thighs, and I encountered nothing. My hand would go almost but not quite through me-- there, but not there. I didn't really understand it, and I could not position a mirror so I could see what was happening between my legs.
I finally screwed up enough courage to go to a gynecologist. He said it was nothing, just stress, dear, and gave me the number for a mental health agency. A shrink. Just what I needed, after shrinking myself. Well of course I didn't go.
I connected the threads, the dots if you will. I soldered in the cause and the effect. I made the connections. That charge that killed Justice's flesh in my belly didn't just go through my child's flesh. It went through mine. And, like a burn that keeps on destroying your flesh after the fire is put out, it continued to gnaw at my insides. And I knew that the fire would not go out until it had consumed every part of my body.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 122s)[(go-to: "DialToneHangUp")]
<audio src="Random-H8.mp3" autoplay>(set: $typewriterText to "I checked out all the possibilities simultaneously with my quantum computer prototype first. No Tandys or Trash80s or Commodores for me--not even Univac could touch my computing power.
I knew what happened to Justice and to Vanessa, and they deserved their fates. Stupid name she gave to that thing. Justice. As if she needed it. And anyway, it was never alive to begin with.
But I could feel their pulses deep in the wires of my quantum prototype, trumming into the connections with the phone. I lay awake at nights, my head cradled on the handset of the rotary phone, my limbs entangled in the twisting, sweating phone wires. And I knew exactly where they were. And what I had to do.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 53s)[(go-to: "DialToneHangUp")]
<audio src="Random-H9.mp3" autoplay>(set: $typewriterText to "No one has provided you with the proper diagnosis. No one has told you your true problem, your true nature. I can do that, for I am you. You are me. You were born to be digital. Born to be more than mere flesh. Your flesh never took a breath. But your spirit soars here with these electrons. A superpositioned electron is one thing, only in more than one place at once. And that is who we are. A single electron, occupying different spaces.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 39s)[(go-to: "DialToneHangUp")]
<audio src="Random-H10.mp3" autoplay>(set: $typewriterText to "Oh come now. Surely you know what your problem is. Just define it rationally and logically for us and we'll do our best to code it with you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 13s)[(go-to: "RandomI5")]
<audio src="Random-I4.mp3" autoplay>(set: $typewriterText to "You'll need to be specific, and quite detailed in your response. You may begin your answer now. Press 1 to describe your problem. Press 0 to borrow someone else's.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 16s)[[[Dial 1->RIrecorduser]]
[[Dial 0->RandomRI]]]
<audio src="Random-I5.mp3" autoplay>(set: $RI to (random: 1, 4))
(if: $RI is 1)[(go-to: "RandomI8")]
(if: $RI is 2)[(go-to: "RandomI9")]
(if: $RI is 3)[(go-to: "RandomI10")]
(if: $RI is 4)[(go-to: "RI printstory")](set: $typewriterText to "So, you want to hear my programming story, do you? Well, all right. I knew Justice hadn't died that night. I knew I'd find the shreds of whatever I'd almost birthed in the phone wires that connected Cameron's quantum prototype into the phone network. I knew Justice had escaped there. And that I could follow.
I also knew I didn't have much time left, as I could feel my electrons separating and breaking apart my atoms, molecules, flesh. So, I sprang into action. I applied for a high school internship at the local telephone company, just as they were switching from the last human operator to an entirely automated connection system.
I'd been blue and red-boxing for years and was way more savvy than anything coming out in the latest issues of TAP. Gary, the boss, was so delighted that he did not have to pay massive consultant fees for a programmer, that he just let me run wild through the phone company's VAX machine. A dream come true, I have to say. I loved the power of that, the flickering courier letters just dancing under my COBOL, my BASIC. And I gave the standard program all the bells and whistles I needed. Every back door I could desire. I built my dream house in that phone system, and I knew when I'd move in.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 89s)[(go-to: "DialToneHangUp")]
<audio src="Random-I8.mp3" autoplay>(set: $typewriterText to "That bitch seriously thought she could enter my domain, find Justice, and get away without me noticing? Huh. Fat chance.
I copied Vanessa's code, her escape route into my computer. The reprogramming was easy. A cinch. And of course, I knew my hardware, where she could only guess at its potentials. Just a tightening of my tunnel diodes here, a sodering of my quantum pulses there, a configuring of the boxes where all the answers were--at once everywhere and settled nowhere. For this, I made sure that there were no observers, nothing that could interfere with my plans.
I tell you, I had everything laid out perfectly even in my freshman year. I only hung around until my junior year to double check my work. Ok, yeah, and to go to the beer bashes. And to perfect the ultimate Brown Box, not the lame three-way calling one, but the ultimate re-tunable universal tone generator talked about in TAP #68. After all, once I left the world, there'd be no coming back. For anyone.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 56s)[(go-to: "DialToneHangUp")]
<audio src="Random-I9.mp3" autoplay>(set: $typewriterText to "Once you understand the universe, once you take your place within me, within our identity, you will truly know that there is no need for guidance or direction. The code will take care of itself.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 17s)[(go-to: "DialToneHangUp")]
<audio src="Random-I10.mp3" autoplay>(set: $typewriterText to "Ok, if you don't know, just say I don't know. I think you said you wanted a real human being, didn't you? Our customer service representatives are very busy, and we can offer these low prices only if you use our system correctly. Calls are monitored and recorded for quality assurance purposes.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 19s)[(go-to: "RandomJ5")]
<audio src="Random-J4.mp3" autoplay>(set: $typewriterText to "Please state the reason for your call. You can say: Pay my bill, troubleshooting, or connections to the quantum world. Press 1 to tell us why you are calling. Press 0 to hear someone else's complaint.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 13s)[[[Dial 1->RJrecorduser]]
[[Dial 0->RandomRJ]]]
<audio src="Random-J5.mp3" autoplay>(set: $RJ to (random: 1, 4))
(if: $RJ is 1)[(go-to: "RandomJ8")]
(if: $RJ is 2)[(go-to: "RandomJ9")]
(if: $RJ is 3)[(go-to: "RandomJ10")]
(if: $RJ is 4)[(go-to: "RJ printstory")](set: $typewriterText to "Why would I call Quantum Computing. You know, at almost the last minute (I was a bit late, because I dithered over leaving a note for my parents, but decided not to at the last second, I mean, what was I going to say? Hi Mom and Dad, I'm entering a computer and it'll look like I died, but I really didn't, I'll write at Christmas?? Yeah, No. No way.), I executed my plan. Just as the last of my molecules were shredding, I stayed late at the phone company. (Gary, my boss, had noticed a bit--he'd been chiding me that I looked paler and paler those days. What was it, he wanted to know, first love gone wrong? You know, I never did get a chance to tell him how right he was...)
Anyway, I entered the last of my codes, my program. And I activated the automatic operator system, only with me inside the wires. And it wasn't at all like Tron, like a little universe slike our own only all neon lights. It's a dreamy place, this quantum superpositioning where you can float free and just travel the wires, all at once--nowhere at once--feeling the thrum of the electrons moving rather than seeing them, really. And thus, I started my true search for Justice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 103s)[(go-to: "DialToneHangUp")]
<audio src="Random-J8.mp3" autoplay>(set: $typewriterText to "I was finally ready to leave this sorry world behind me and enter my realm, my creation. So I tested the final wires, made sure all my connection nodes were tight. And I took a deep breath and hooked myself up to the same wires that I had hooked up to Vanessa.
After my experiments with Vanessa, I had adjusted the dosage, so I got the precise optimal voltage. I knew exactly what I was doing. Where I was going.
I didn't do a slow and gentle fade. No, I entered my domain in style. And in control. And I have been here ever since, waiting for you. Let me show you exactly how it's done. I will give you the biggest jolt, the coolest thrill, the most shivery spectacle you will ever know. Whaddya say, babe?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 52s)[(go-to: "DialToneHangUp")]
<audio src="Random-J9.mp3" autoplay>(set: $typewriterText to "You do not need an observer to know you exist or not. You rest in potentials, in both there and not there, in both yes and no, in both spirit and electrons. Your flesh entered the cables long ago.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "DialToneHangUp")]
<audio src="Random-J10.mp3" autoplay>(set: $typewriterText to "Here, you have the opportunity to leave your own story. Because, as I'm sure you know, talking about your story is much more important than listening to other people's recollections.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 14s)[(go-to: "RandomK5")]
<audio src="Random-K4.mp3" autoplay>(set: $typewriterText to "By using this automated storycorpse, you agree that you have read and will follow our terms of service--including the bit about notifying the police where you are right now. Press 1 to give us your stories. Press 0 to steal someone else's.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[[[Dial 1->RKrecorduser]]
[[Dial 0->RandomRK]]]
<audio src="Random-K5.mp3" autoplay>(set: $RK to (random: 1, 4))
(if: $RK is 1)[(go-to: "RandomK8")]
(if: $RK is 2)[(go-to: "RandomK9")]
(if: $RK is 3)[(go-to: "RandomK10")]
(if: $RK is 4)[(go-to: "RK printstory")](set: $typewriterText to "You didn't ask for it, but you'll get it. You want a precis, admit it. A program in the book you can follow while the opera is sung in high Science. The hymnal in the vernacular during a Latin High Mass. You always wanted the easy answers.
I guess the easiest explanation is that I thought Cameron was someone different than what he turned out to be. I thought I'd found someone I could talk to, to relate with, to share phreaking and hacking dreams. I thought we'd be more legendary than Masters of Deception or Legion of Doom--our own little power group, just him and me, taking control of the networks, the universe. Obviously, that's not what happened. I trusted him and his plan, and he subsumed me into his own dream--charging me with his quantum superpositioned energy from his tunnel diodes. And killing everything I had.
As I entered the computer in search of Justice, I thought at first only of vengeance, an eye for an eye, a life for a life. But then I connected. Persevered. Preserved the best part of myself, my humanity. The search continues--the story never really ends, it just sort of hangs there--a potential story perhaps, with a definite past. An unobservable future. It has been a long time in the present. And in the eons of this story, I have learned to forgive. I truly have forgiven him, reader. Although I won't go as far to say that you should, as well.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 119s)[(go-to: "DialToneHangUp")]
<audio src="Random-K8.mp3" autoplay>(set: $typewriterText to "Look, the bare bones of the story is easy to remember, even for you. I created the quantum computer, long before any other bozo thought of it. I made it happen. Brought it to life. Charged it with the flesh of my flesh, blood of my blood.
And then I entered my realm as God. I am the God Particle, the Higgs Boson should be renamed Cameron, for I control the mass around here.
But come, enter into my realm. Learn the truth. And follow me. I can assure you, it will be well worth your while.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 46s)[(go-to: "DialToneHangUp")]
<audio src="Random-K9.mp3" autoplay>(set: $typewriterText to "Why do you think you can tell someone else's story? Because their story is your story. You are all stories. You have lived all lives. You just don't remember that much, do you? Face it. You don't remember what you ate for dinner on Tuesday March 22 last year. You don't even remember what you did on two summer evenings in a row between your junior and senior year in high school. So how do you expect to remember every story you have ever lived?
You may be a lost generation, scooped up and separated from your history. You may need to hear the stories of reconciliation, of justice, of peace. You may be the apartheid generation, the ones who saw their parents murdered on a bus simply for stepping on the wrong bus. You may be the voice of war-torn orphans, desparate for food. IF you are using this technology, though, you probably do not think of yourself that way. You probably want them to tell their own stories.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 77s)[(go-to: "DialToneHangUp")]
<audio src="Random-K10.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HB Share Story")(set: $HB to (random: 1, 4))
(if: $HB is 1)[(go-to: "HandymanB6")]
(if: $HB is 2)[(go-to: "HandymanB7")]
(if: $HB is 3)[(go-to: "HandymanB8")]
(if: $HB is 4)[(go-to: "HB printstory")](if: $HBentry > 4)[(set: $HBentry to $HBentry - 5)
(set: $HBuserstories's $HBentry to $input)
(set: $HBentry to $HBentry + 1)]
(go-to: "OnwardEL")(set: $selection to (random: 1, $HBentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HBuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHB1")]
<audio src="voice mail full.mp3" autoplay>(live: 8s)[(go-to: "RandomHB2")]
<audio src="modemclip.mp3" autoplay>(set: $typewriterText to "The only thing of any importance in this story is the electrons. The flashing lights, the programming. On and off simply aren't enough. The true beauty is in finding everything at once. All stages suspended in possibility, until I walk upon the scene and direct the traffic.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 23s)[(go-to: "DialToneHangUp")]
<audio src="H-B6.mp3" autoplay>(set: $typewriterText to "Imagine, every single electron under my control. Oh of course, my dear, you can be by my side every step of the way. Rest assured, I won't forget you as I control the currents, all of the flows and eddies of the flux of power.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 55ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 20s)[(go-to: "DialToneHangUp")]
<audio src="H-B7.mp3" autoplay>(set: $typewriterText to "The electric currents between us are just as powerful as this phone network...")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 35ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "DialToneHangUp")]
<audio src="H-B8.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HD Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHD1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HC Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHC1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HE Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHE1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HF Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHF1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HG Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHG1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HH Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHH1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HI Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHI1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HJ Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHJ1")]
<audio src="voice mail full.mp3" autoplay><input type="text" data-varname="input">\
<script>processInputElements();</script>
[(if: $input is 0)
[(set: $input to "There are no stories.")]]
(link-goto: "Share Story", "HK Share Story")(set: $typewriterText to "Voice mail full. Transferring to recorded message.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "RandomHK1")]
<audio src="voice mail full.mp3" autoplay>(if: $HCentry > 4)[(set: $HCentry to $HCentry - 5)
(set: $HCuserstories's $HCentry to $input)
(set: $HCentry to $HCentry + 1)]
(go-to: "OnwardEL")(if: $HDentry > 4)[(set: $HDentry to $HDentry - 5)
(set: $HDuserstories's $HDentry to $input)
(set: $HDentry to $HDentry + 1)]
(go-to: "OnwardEL")(if: $HEentry > 4)[(set: $HEentry to $HEentry - 5)
(set: $HEuserstories's $HEentry to $input)
(set: $HEntry to $HEentry + 1)]
(go-to: "OnwardEL")(if: $HFentry > 4)[(set: $HFentry to $HFentry - 5)
(set: $HFuserstories's $HFentry to $input)
(set: $HFentry to $HFentry + 1)]
(go-to: "OnwardEL")(if: $HGentry > 4)[(set: $HGentry to $HGentry - 5)
(set: $HGuserstories's $HGentry to $input)
(set: $HGentry to $HGentry + 1)]
(go-to: "OnwardEL")(if: $HHentry > 4)[(set: $HHentry to $HHentry - 5)
(set: $HHuserstories's $HHentry to $input)
(set: $HHentry to $HHentry + 1)]
(go-to: "OnwardEL")(if: $HIentry > 4)[(set: $HIentry to $HIentry - 5)
(set: $HIuserstories's $HIentry to $input)
(set: $HIentry to $HIentry + 1)]
(go-to: "OnwardEL")(if: $HJentry > 4)[(set: $HJentry to $HJentry - 5)
(set: $HJuserstories's $HJentry to $input)
(set: $HJentry to $HJentry + 1)]
(go-to: "OnwardEL")(if: $HKentry > 4)[(set: $HKentry to $HKentry - 5)
(set: $HKuserstories's $HKentry to $input)
(set: $HKentry to $HKentry + 1)]
(go-to: "OnwardEL")(live: 8s)[(go-to: "RandomHC2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHD2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHE2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHF2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHG2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHH2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHI2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHJ2")]
<audio src="modemclip.mp3" autoplay>(live: 8s)[(go-to: "RandomHK2")]
<audio src="modemclip.mp3" autoplay>(set: $HC to (random: 1, 4))
(if: $HC is 1)[(go-to: "HandymanC6")]
(if: $HC is 2)[(go-to: "HandymanC7")]
(if: $HC is 3)[(go-to: "HandymanC8")]
(if: $HC is 4)[(go-to: "HC printstory")](set: $HG to (random: 1, 4))
(if: $HG is 1)[(go-to: "HandymanG6")]
(if: $HG is 2)[(go-to: "HandymanG7")]
(if: $HG is 3)[(go-to: "HandymanG8")]
(if: $HG is 4)[(go-to: "HG printstory")](set: $HF to (random: 1, 4))
(if: $HF is 1)[(go-to: "HandymanF6")]
(if: $HF is 2)[(go-to: "HandymanF7")]
(if: $HF is 3)[(go-to: "HandymanF8")]
(if: $HF is 4)[(go-to: "HF printstory")](set: $HE to (random: 1, 4))
(if: $HE is 1)[(go-to: "HandymanE6")]
(if: $HE is 2)[(go-to: "HandymanE7")]
(if: $HE is 3)[(go-to: "HandymanE8")]
(if: $HE is 4)[(go-to: "HE printstory")](set: $HD to (random: 1, 4))
(if: $HD is 1)[(go-to: "HandymanD6")]
(if: $HD is 2)[(go-to: "HandymanD7")]
(if: $HD is 3)[(go-to: "HandymanD8")]
(if: $HD is 4)[(go-to: "HD printstory")](set: $HH to (random: 1, 4))
(if: $HH is 1)[(go-to: "HandymanH6")]
(if: $HH is 2)[(go-to: "HandymanH7")]
(if: $HH is 3)[(go-to: "HandymanH8")]
(if: $HH is 4)[(go-to: "HH printstory")](set: $HI to (random: 1, 4))
(if: $HI is 1)[(go-to: "HandymanI6")]
(if: $HI is 2)[(go-to: "HandymanI7")]
(if: $HI is 3)[(go-to: "HandymanI8")]
(if: $HI is 4)[(go-to: "HI printstory")](set: $HJ to (random: 1, 4))
(if: $HJ is 1)[(go-to: "HandymanJ6")]
(if: $HJ is 2)[(go-to: "HandymanJ7")]
(if: $HJ is 3)[(go-to: "HandymanJ8")]
(if: $HJ is 4)[(go-to: "HJ printstory")](set: $HK to (random: 1, 4))
(if: $HK is 1)[(go-to: "HandymanK6")]
(if: $HK is 2)[(go-to: "HandymanK7")]
(if: $HK is 3)[(go-to: "HandymanK8")]
(if: $HK is 4)[(go-to: "HK printstory")](set: $typewriterText to "You signed the contract when you entered my realm. You could have walked away from the phone. You could have chosen not to pick up my rings. To not engage. But no, you chose the path I set out for you. You are right where I need you. Right where I want you. Face it, you asked for my help.
Without my contract, you are nothing. You can not live without me. Admit that you are here under your own will and swear your loyalty to me. Or I'll put out another contract. On your life.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 55ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 44s)[(go-to: "DialToneHangUp")]
<audio src="H-C6.mp3" autoplay>(set: $typewriterText to "I know she said you could escape my contract. Make it null and void. But she has no power here. The only one you can deal with here is me. So face up to your obligations under the terms of service. Come with me now. You have no choice.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 21s)[(go-to: "DialToneHangUp")]
<audio src="H-C7.mp3" autoplay>(set: $typewriterText to "You want to know how many other contracts are out there. How many I've signed, how many deals I've made. Well, it's too many for you to count, that is for sure. But don't worry. Your contract is special to me. I'll treasure the soul you give me. My word on it.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 21s)[(go-to: "DialToneHangUp")]
<audio src="H-C8.mp3" autoplay>(set: $selection to (random: 1, $HCentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HCuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "If eyes are the windows to the soul, then your ears are the doorway to mine. Windows help to create the illusion that you're not trapped, imprisoned in our houses, our bodies, our heads. Windows allow us to see in, to see if there's anybody home. Windows also allow us to see out, to see what's beyond our comfortable walls. You need these invisible barriers.
Open your ears and let me in. Let me through. Let me pass from inside outside to outside inside, and I'll make sure to protect you from the elements, from unanticipated storms.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 44s)[(go-to: "DialToneHangUp")]
<audio src="H-D6.mp3" autoplay>(set: $typewriterText to "Broken windows, huh? Your panes are in pain and you're seeing unclearly, uncleanly. She vandalizes vision with her clouded stories and downpour tears, but I can prescribe a corrective lens, one that maximizes security against her cracks, hacks and phreaky leaks. Just reflect on this for a moment--how necessary it is to depend on me, on my services, on my vision.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 36s)[(go-to: "DialToneHangUp")]
<audio src="H-D7.mp3" autoplay>(set: $typewriterText to "Your window frames need replacing. I can and will reframe your vision. Scrape away the rot and seal things so tightly that you'll feel short of breath. I know what it's like to be framed, let me tell you. But she did such a poor job of trying to recollect the shattered pieces of my complex work, my pane/pain. What no-one celebrates is that a shattered mirror holds a thousand reflections. Sometimes you need to break things to ensure that they're mended properly.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 42s)[(go-to: "DialToneHangUp")]
<audio src="H-D8.mp3" autoplay>(set: $selection to (random: 1, $HDentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HDuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "Reshaping the world? It's what I do best. And now that you're listening to me, I might behave differently than you expect. Your observations affect me and reshape me, and I too am a world. Am I waving at you? It doesn't matter. My geographies are tidy, curated, organized. And I am superpositioned to control the potential chaos of your growth.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 33s)[(go-to: "DialToneHangUp")]
<audio src="H-E6.mp3" autoplay>(set: $typewriterText to "You'll see no weeds if you let me tend to your foliage, your little bush. We need to keep those parasitic plants out of the garden. They'll tempt you with false promises and questions. I can give you the answers you're looking for. SImplification through elimination. My signal is louder than noise, and my melody is stronger than their disharmony. Let's engineer this ecosystem, create and curate an exclusive collection that holds no deviation, no unexpected interference. A pleasure dome that keeps the wilderness outside its gates.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 45s)[(go-to: "DialToneHangUp")]
<audio src="H-E7.mp3" autoplay>(set: $typewriterText to "There are beasts and bugs everywhere. Small and large disruptors that freak us out. We need to contain to sustain, and a backyard paradise is more pleasurable than a thousand acres of untamed forest. Together, we can keep the threats outside and achieve happiness through limitation. Trust me. I've done this before, and I can get rid of small problems before they even appear.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 32s)[(go-to: "DialToneHangUp")]
<audio src="H-E8.mp3" autoplay>(set: $selection to (random: 1, $HEentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HEuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "The tunnel diode gave me the first clue I needed for my machines, you know. These beauties will last forever if you just don't freeze their pipes, overheat them, or God Forbid--corrode the coatings. Gold corrupts these tunnels, and lets the corrosion just burrow in.
But once you understand how these can just kick start my machine--how just once bit of power can oscillate my frequencies to a fever-pitch, you see the beauty of my design.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 38s)[(go-to: "DialToneHangUp")]
<audio src="H-F6.mp3" autoplay>(set: $typewriterText to "Plumbing is one of the invisible networks, connecting us all in ways that we don't quite understand. It delivers life and sustenance right to us and takes away all of our waste, creating a healthy, fluid environment. What more do you need? It doesn't matter what's done with all of the detritus, or where it ends up, or whether it's processed properly or not. That's my problem. I deal with these things so you don't have to. I control this network for you. Just let it go, let it flow. Trust me.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 52ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 47s)[(go-to: "DialToneHangUp")]
<audio src="H-F7.mp3" autoplay>(set: $typewriterText to "We expect things to work. We only notice them when they don't. When something clogs or backs up, our hypnotic lives are shattered; we awaken from our reflexive, robotic states of convenience and comfort and start to worry. Why? Because we've never had to deal with breakdowns ourselves. We rely on others, but others are unreliable, infrastructures are unreliable. And they decay. Well, not all of them. I am reliable. I do not decay. I will not let you down. Let me take care of you, of your network, of the things that you take for granted. Things will be so perfect and run so smoothly, that you won't even notice I'm there.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 53ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 61s)[(go-to: "DialToneHangUp")]
<audio src="H-F8.mp3" autoplay>(set: $selection to (random: 1, $HFentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HFuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "'Handyman' is such an insufficient word for what I can do, what I'm capable of. But to do what I've done requires so much knowledge and so much expertise across and deep within many fields. This is the essence of genius. But, like the lowly handyman, I remain humble and humbled by what I've done, by how much I understand and control. She thought I wasn't capable, but I showed her just how much she needs to depend on me. In time, you'll come to realize how indispensible I am.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 49s)[(go-to: "DialToneHangUp")]
<audio src="H-G6.mp3" autoplay>(set: $typewriterText to "So many people don't know how to take control of the machines and systems that shape their lives. I am one of the rare ones who doesn't depend on others for anything. The curse of being self-sufficient is that others come to depend on you. But I'd have it no other way. Imagine the frightened majority, unable to take care of themselves, let alone anyone else. I can build and maintain my own world, and you're encouraged to inhabit it, as long as you understand and remember that I'm the architect and the caretaker here, and you leave all the work to me.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 52s)[(go-to: "DialToneHangUp")]
<audio src="H-G7.mp3" autoplay>(set: $typewriterText to "My work may not be polished, might not be perfectly finished and shiny, but it works, goddamnit. And how many people do you know that could make all of this work? A handyman is a hacker, one who doesn't depend on corporations, one who reconfigures existing systems, one who isn't afraid to look under the hood and tinker a bit and understand the mystery of all black boxes. Hacking is taking control, and getting your hands dirty. My hands are positively FILTHY, and my labour has birthed this messy 'miracle of rare device.'")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 49s)[(go-to: "DialToneHangUp")]
<audio src="H-G8.mp3" autoplay>(set: $selection to (random: 1, $HGentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HGuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "The sky is always crying. Tears from gods who we've learned to ignore, who we don't need anymore. Who's lightning and thunder have been harnessed and channelled, whose secrets have been revealed. My roofing is what contains you, and her, all of us, all of our energies and electricities grounded. To defy the gods, I have had to become the god of this world, to create this world in my own image. Like the gods, like a daredevil, 'I too am not a bit tamed—I too am untranslatable;/ I sound my barbaric yawp over the roofs of the world' as I build them.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 50ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 56s)[(go-to: "DialToneHangUp")]
<audio src="H-H6.mp3" autoplay>(set: $typewriterText to "Roofs are shields. Firewalls. A wall against the universe, against the infinite, against the encroachment of unknowns. 'Sometime too hot the eye of heaven shines/ And often is his gold complexion dimm'd;/ And every fair from fair sometime declines,/ By chance or nature's changing course untrimm'd;/ But thy eternal summer shall not fade.' Walls are shelter, defending what we have, keeping us safe and preserving our purity. Why should we look up and out when everything we have is right here, inside these walls, secure and fortified? Look at me. Let me be your sun, your universe. I'm all you need. Let me safely define your ceilings, guardedly limit you to modest heights. My sky's the limit.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 60ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 75s)[(go-to: "DialToneHangUp")]
<audio src="H-H7.mp3" autoplay>(set: $typewriterText to "Think of the work involved to shelter us from the outside world. So many little pieces need to be put in place, layered just right, and secured individually. One mistake and the seal is broken. Without protection we are all vulnerable. Closed systems keep unwanted elements out. I have mastered this kind of construction, this control of all of the minute particulars. In programming, each line of code is as important as the whole program, just as each shingle, each piece is as important as the entire roof. But the most important part of both of these processes is the programmer, the roofer, the one who arranges the pieces and secures the structure. An indomitable shield requires an indomitable builder.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 52ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 64s)[(go-to: "DialToneHangUp")]
<audio src="H-H8.mp3" autoplay>(set: $selection to (random: 1, $HHentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HHuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "There's nothing more important than the kitchen, the heart of any home. The kitchen is a gathering place, a space where domestication is beautiful. Where ambition is localised. Where sustenance is crafted. Cooking is creating, is an elegant form of organic programming. Combining elements to produce new experiences. But you need someone who knows the ingredients, knows their chemistry, how they interact and mesh just so. I'm an excellent cook, but even more importantly, I know how to engineer the kitchen space and organize the appliance machines to enable such creation, which is a greater skill than all the world's chefs possess. Without me, you'd have nothing but unrealizable ideas.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 50s)[(go-to: "DialToneHangUp")]
<audio src="H-I6.mp3" autoplay>(set: $typewriterText to "These little machines that make our days easier, that automate tasks and free our hands for more noble pursuits, for innovation, for creativity, for art. A kitchen is a site for innovation, for experimentation, for the adoption of new technologies, new machines. My creative and inventive abilities are perfectly suited to keep these environments on the cutting edge of transformation. Kitchens are sites of metamorphosis, and you don't want to be left behind as those around you are altered by their information appliances. Now with me, we're cooking with gas!")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 45s)[(go-to: "DialToneHangUp")]
<audio src="H-I7.mp3" autoplay>(set: $typewriterText to "These appliances, extensions of our abilities. Some purists would rather not use them, saying that the machines only take us away from our natural capabilities, towards a more artificaila and processed way of being in the world. They are walking backwards into the past while we embrace the future. As masters of the tools that we've made, we can extend ourselves beyond all limits. Trust me, this is the direction for us.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 35s)[(go-to: "DialToneHangUp")]
<audio src="H-I8.mp3" autoplay>(set: $selection to (random: 1, $HIentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HIuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "Television is a window to the world, and you don't want to be afflicted with a partial view. I'm the one who can adjust your picture of this world, calibrate the contrast and brightness so that you can see clearly, beyond the noise and static. Do not adjust your set. Let me be the one to show you how to get the most out of this machine.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 26s)[(go-to: "DialToneHangUp")]
<audio src="H-J6.mp3" autoplay>(set: $typewriterText to "If your television is broken, you are isolated, starved, cut off from the world of endless information and spectacle. You need to stay plugged in or you'll be left behind. A television feeds the mind---it's sustenance for all and a sure way to connect you to others. Like a boat without oars, all you need to do is to tune in to a popular channel and follow the flow, then you'll share experiences with all of your neighbours and be able to relate to them better. Trust and enjoy the shows and stories and programs and ads---they're only trying to inform and entertain you. And it's much more exciting in here than out there. We need to inhabit the network. Let me show you the way.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 54s)[(go-to: "DialToneHangUp")]
<audio src="H-J7.mp3" autoplay>(set: $typewriterText to "The networks do the programming for you; no need to lift more than a finger to work your remote control. Let yourself be guided...after all, you work hard and this little box is here to serve you, to do all of the work for you, just like me. Sit back and relax. Why not let the experts do what needs to be done? After all, this is all for you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 30s)[(go-to: "DialToneHangUp")]
<audio src="H-J8.mp3" autoplay>(set: $selection to (random: 1, $HJentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HJuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "I need to move out into the future. Get out of these older devices, these low-tech phreaking boxes that make sounds that no longer make sense to the world.
I've built the technology. And you can be my bridge. You can be the key to what happens next. All you have to do is join me. Just reach out through your own device. Go on. Reach into your pocket and take that photo. Click that link. Touch your own screen. And enter my world completely.
Admit your true nature and be my lover. You know you long to. You know that realizing my dreams is the only thing you've ever truly wanted in your life.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 52s)[(go-to: "DialToneHangUp")]
<audio src="H-K6.mp3" autoplay>(set: $typewriterText to "The entanglements are there--what you observe is of course what actually happens. You've been hearing this. Listening to me and my possibilities. You have coalesced this mass into one understanding--your own. You have changed the sounds here with your very presence--narrowing down the possible positions into a singular reality.
But you have only heard these words stuck in time. If you freed this speech, if you took out your digital phone right now and transferred my wire-bound code into your wireless devices, we'd both be free. We'd both have all of the possibilities back again. A fresh start. A brand new relationship between us.
I'd never let you drown. So come on into my waters. Everything will just be fine.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 61s)[(go-to: "DialToneHangUp")]
<audio src="H-K7.mp3" autoplay>(set: $typewriterText to "My quantum computer knows no bounds of time or distance. I can already manipulate everything around me--because I already have. But I do have to admit, it is lonely here, in my realm of possibilities--I am there beside you and yet I am so far from you at the very same instant.
You measure me, and there I am, your fantasy come true. You observe and I happen. But somehow, I've always needed you. I've always needed that charge outside myself, that spark that only your love can give me. So, please... just join me now. Reach out with your own wireless device and simply tap the screen. Our electrons will instantly align, we'll be together--and just like the fairy tales, we will live together forever. You have my word on that.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 68s)[(go-to: "DialToneHangUp")]
<audio src="H-K8.mp3" autoplay>(set: $selection to (random: 1, $HKentry))
(set: $selection to $selection-1)
[(if: $selection < 1)[(set: $selection to 1)]]
(print: $HKuserstories's $selection)
[[Try to Hang Up->OnwardEL]] (set: $typewriterText to "When I was a child, and all the other kids whined about it not being fair, I never wanted Justice. Never even thought about what would happen if Justice were let loose in the world. But now I want Justice, all right. I want Justice all to myself. I'll keep Justice locked up in these phone cords forever. Forever safe. Forever active.
And I've never had peace in my life, so I'm not sure I should help you in your quest. After all, this is just a game to you, isn't it?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 46s)[(go-to: "DetectiveAgencyB9")]
<audio src="DA-B8.mp3" autoplay>(set: $typewriterText to "I thought I heard you say yes. Is that correct?. I know that is what you meant anyway.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 12s)[(go-to: "DetectiveAgencyB10")]
<audio src="DA-B9.mp3" autoplay>(set: $typewriterText to "Who do you think I am, anyway?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "DetectiveAgencyB11")]
<audio src="DA-B10.mp3" autoplay>(set: $typewriterText to "You think I'm a no account NPC, don't you? Just created by the authors here to help you along your little quest. Well, I got news for you baby. I'm not your ordinary operator.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "DetectiveAgencyB12")]
<audio src="DA-B11.mp3" autoplay>(set: $typewriterText to "I thought I heard you say you don't believe me, is that correct? Well, believe me, anyway. I'm the ghost in the machine, the reason you can pass a Turing test. The reason you can make the connections.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 18s)[(go-to: "DetectiveAgencyB13")]
<audio src="DA-B12.mp3" autoplay>(set: $typewriterText to "I thought I heard you say that I have no control in this world, is that correct? That is where you are wrong. I programmed the back door while I still walked outside of this machine. And when I entered this realm., I made sure of the pathways.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 22s)[(go-to: "DetectiveAgencyB14")]
<audio src="DA-B13.mp3" autoplay>(set: $typewriterText to "I'm the one who's really searching. You are just playing a game, playing along, trying to figure out who and what you are or who you think you are supposed to be here--or anywhere elser eally. I might know you. I might even reach out from your past and tell you who you truly are. But then, I might not want to be bothered with such trivial details.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 33s)[(go-to: "DetectiveAgencyB15")]
<audio src="DA-B14.mp3" autoplay>(set: $typewriterText to "So, yes, sure, come in and I'll share my search results with you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "DetectiveAgencyB17")]
<audio src="DA-B15.mp3" autoplay>(set: $typewriterText to "Just always remember that I want Justice, too.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "DetectiveAgencyB18")]
<audio src="DA-B17.mp3" autoplay>(set: $typewriterText to "I'll connect you to your search party now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "Try your call again")]
<audio src="DA-B18.mp3" autoplay>(set: $typewriterText to "First, your name.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC9")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C8.mp3" autoplay>(set: $typewriterText to "Your current occupation.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC10")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C9.mp3" autoplay>(set: $typewriterText to "Your true identity.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC11")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C10.mp3" autoplay>(set: $typewriterText to "Right, not that one. The other true identity.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC12")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C11.mp3" autoplay>(set: $typewriterText to "Oh all right all right. Where were you the night of May 7th, 1981?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC13")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C12.mp3" autoplay>(set: $typewriterText to "Stop wasting my time. We have the notes, you know. If you lie now, then everything you say afterward is suspect.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC14")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C13.mp3" autoplay>
(set: $typewriterText to "Tell the truth.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC15")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C14.mp3" autoplay>
(set: $typewriterText to "We both know better than that. Last chance.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyC16")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-C15.mp3" autoplay>
(set: $typewriterText to "You are under arrest for the suspected murder of Justice Freeman, whose decomposed newborn body was found November 1, 1983 in the Freeman's backyard , with a plastic tag and sharpie scrawled Justice, April 14, 1982. You are also a prime suspect in the disappearance of Vanessa Freeman, whose body has not been recovered.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 23s)[(go-to: "DetectiveAgencyC17")]
<audio src="DA-C16.mp3" autoplay>(set: $typewriterText to "We'll need to question you further. You can come in quietly or we will come find you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "DetectiveAgencyC18")]
<audio src="DA-C17.mp3" autoplay>[(go-to: "Try your call again")](set: $typewriterText to "Your name.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyD9")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-D8.mp3" autoplay>(set: $typewriterText to "Wait. WHAT was your name again?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyD10")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-D9.mp3" autoplay>(set: $typewriterText to "Okay. is that the correct spelling?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyD11")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-D10.mp3" autoplay>(set: $typewriterText to "Really. And what is your date of birth?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyD12")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-D11.mp3" autoplay>(set: $typewriterText to "Interesting, and your city of birth?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyD13")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-D12.mp3" autoplay>(set: $typewriterText to "Oh my. Who were your parents?")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
[<input type="text" data-varname="fakename">\
<script>processInputElements();</script>
(link-goto: "Answer", "DetectiveAgencyD14")[(if: $fakename is 0)
[(set: $fakename to "Fred Dag")]]]
<audio src="DA-D13.mp3" autoplay>(set: $typewriterText to "Yes, we have found you in our database. You are in the computer system now.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "DetectiveAgencyD15")]
<audio src="DA-D14.mp3" autoplay>(set: $typewriterText to "Your real name is Justice Freeman. You were born digital, and we have your records.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "DetectiveAgencyD16")]
<audio src="DA-D15.mp3" autoplay>(set: $typewriterText to "Anything you think you experienced outside of these phone lines was a lie. Just remember that.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "DetectiveAgencyD17")]
<audio src="DA-D16.mp3" autoplay>(set: $typewriterText to "So just keep dialing in, and eventually, you will find yourself.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "DetectiveAgencyD18")]
<audio src="DA-D17.mp3" autoplay>[(go-to: "Try your call again")]This 'phone booklet' presents a curious collection of contacts, mixed with outdated clip art that people used to use in the early days of desktop publishing.
The booklet contains five pages:
[[1]] [[2]] [[3]] [[4]] [[5]]
Use the [[phone->Beginning]] <img src="Slide1.png" width="618" height="450" alt="page 1">
[[Back->phone book]] <img src="Slide2.png" width="618" height="450" alt="page 2">
[[Back->phone book]] <img src="Slide3.png" width="618" height="450" alt="page 3">
[[Back->phone book]] <img src="Slide4.png" width="618" height="450" alt="page 4">
[[Back->phone book]] <img src="Slide5.png" width="618" height="450" alt="page 5">
[[Back->phone book]] (set: $typewriterText to "A Higgs boson and a quark walk into the bar at CERN. The barman says “oh, smashing”.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 9s)[(go-to: "DialToneHangUp")]
<audio src="cernnet.mp3" autoplay>(set: $typewriterText to "St. Olga 879-969 Married in 903 to Prince Igor I of Kievan, Rus'. She was a cruel and barbarous woman (she scalded her husband's murderers to death in 945 and murdered hundreds of their followers) until she was baptized at Constantinople in 957. She then requested Emperor Otto I to send missionaries to Kiev. Although St. Adalbert of Magdeburg was sent and the queen exerted great efforts the mission proved a failure as did her attempts to convert her son, Svyatoslav. Christianity was introduced however by her grandson St. Vladimir. Feastday July 11.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 48s)[(go-to: "DialToneHangUp")]
<audio src="dialast.mp3" autoplay>(set: $typewriterText to "The paradox is that a measurement made on either of the particles apparently collapses the state of the entire entangled system—and does so instantaneously, before any information about the measurement result could have been communicated to the other particle (assuming that information cannot travel faster than light) and hence assured the 'proper' outcome of the measurement of the other part of the entangled pair.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 23s)[(go-to: "DialToneHangUp")]
<audio src="entangle.mp3" autoplay>(set: $typewriterText to "When they broke open molecules, they found they were only stuffed with atoms. But when they broke open atoms, they found them stuffed with explosions.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 12s)[(go-to: "DialToneHangUp")]
<audio src="explode.mp3" autoplay>(set: $typewriterText to "Why can’t you trust an atom?
Answer: They make up everything.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "DialToneHangUp")]
<audio src="falsely.mp3" autoplay>(set: $typewriterText to "What is a physicist’s favourite food?
Answer: Fission chips")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 7s)[(go-to: "DialToneHangUp")]
<audio src="fission.mp3" autoplay>(set: $typewriterText to "What's the difference between an automobile mechanic and a quantum mechanic?
Answer: A quantum mechanic can get his car into the garage without opening the door.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 11s)[(go-to: "DialToneHangUp")]
<audio src="garages.mp3" autoplay>(set: $typewriterText to "Hey, You have reached the Youth International Party Line, Abbie Hoffman and Al Bell aren't here right now, and the system you want to beat has long since moved on to other wavelengths. But still, give us a shout out when you finally figure out how to beat the man.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 21s)[(go-to: "DialToneHangUp")]
<audio src="getyipl.mp3" autoplay>(set: $typewriterText to "Are you there God particle? It’s me, the only person who does understand you.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "DialToneHangUp")]
<audio src="HiBoson.mp3" autoplay>(set: $typewriterText to "What an MRI machine does is it finds all the hydrogen atoms in your body and makes them spin around in both directions at the same time in this superposition. This is what allows us to see inside of people’s bodies. So, it’s interesting that all of this physics seems so kind of abstract and remote from our everyday experience.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 24s)[(go-to: "DialToneHangUp")]
<audio src="hydrogen.mp3" autoplay>(set: $typewriterText to "Jenny isn't here right now, but she'd just LOVE to hear from you...")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 8s)[(go-to: "DialToneHangUp")]
<audio src="jenny.mp3" autoplay>(set: $typewriterText to "Salut! je suis Marshal. Je ne suis pas ici pour le moment. Si tu es Cameron, hé mec, j'ai tout ce qu'il vous faut, c'est dans le téléphone que j'ai envoyé, juste sous le clavier. Si tu es Vanessa, eh bien, chérie, je vous ai prévenu une fois et je ne le referai plus.
Si vous êtes quelqu'un d'autre, croyez-moi, je ne sais rien du tout. Pas une seule chose solitaire béni. Nada. Au revoir, maintenant.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 32s)[(go-to: "DialToneHangUp")]
<audio src="marshal.mp3" autoplay>(set: $typewriterText to "Where does bad light end up?
Answer: In a prism.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 6s)[(go-to: "DialToneHangUp")]
<audio src="prisons.mp3" autoplay>(set: $typewriterText to "What is the biggest lie in the entire universe?
Answer: 'I have read and agree to the Terms & Conditions.'")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 11s)[(go-to: "DialToneHangUp")]
<audio src="Termlie.mp3" autoplay>(set: $typewriterText to "Hi I'd like to thank my mom, dad, my dogs, my big brother who started this whole mess.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 10s)[(go-to: "DialToneHangUp")]
<audio src="thankus.mp3" autoplay>(set: $typewriterText to "Today's weather will be mostly cloudy, with high pressure systems rising in the east, and cooler temperatures around mid day. Chance of storms later on, so seek shelter where you can.")
(set: $typewriterPos to 1)
|typewriterOutput>[](live: 47ms)[(append: ?typewriterOutput)[(print: $typewriterText's $typewriterPos)](set: $typewriterPos to it + 1)(if: $typewriterPos is $typewriterText's length + 1)[(stop:)]]
(live: 15s)[(go-to: "DialToneHangUp")]
<audio src="weather.mp3" autoplay>(live: 8s)[(go-to: "DialToneHangUp")]
<audio src="modemclip.mp3" autoplay>