*comment Copyright 2015 by Mike Walter
*comment The Lost Heir 2: Forging a Kingdom
*comment Scene #1: intro.txt
*set stage 0
*hide_reuse
*comment STATS
*comment ---------------------------------------------------------------------------------------------
*comment spellbook, sword, bow, lute, lockpickset, holysymbol, rope, lantern
*comment backpack, flintandsteel, waterskin, thiefharness, sleepingroll
*comment gloves_archery, necklace_nature, gem_seeing, magic_shield, cloak_of_spiders,  feather_of_glibness, familyring
*comment class_squire:2, class_bard:2, class_monk:2, class_assassin:2, class_priest:2, class_thief:2, 
*comment class_wizard:1, class_druid:1, class_ranger:1, class_sage:1, class_cleric:1, class_thug:2, class_guard:2 
*comment Mount:  1-5 "horse" and 5 "warhorse", "mule", "horse" or 0, no mount.
*comment --------------------------------------------------------------------------------------------
*image lh2.jpg
Welcome to The Lost Heir 2: Forging a Kingdom.  It is strongly recommended that you play The Lost Heir 1:  The Fall of Daria before playing this game.
*label Start_loop
*if (choice_randomtest)
	*goto BeginPlaying
*choice
	#Begin playing [b]The Lost Heir 2: Forging a Kingdom[/b].
		*comment Current src tags: lh1, lh2, lh3, mobster, lastwizard, lifewizard, paradox, captain
		*goto BeginPlaying
	*allow_reuse #Check out [b]Life of a Space Force Captain[/b] by Mike Walter
		*image spaceforce.jpg
		[b]Life of a Space Force Captain[/b] by Mike Walter
		*line_break
		Have you ever wanted to be the captain of a faster-than-light starship? You will live a full life starting as a young child of the future.

		Play as human, various species of alien, or even a robot. With the help of your friends and your loyal, upgradable robo-pet, you will go to school to learn skills of your own choosing before taking a position as a lowly cadet.

		You’ll choose which department to join and rise within as the Solar System trembles in fear when a powerful foe threatens its very existence.

		"Life of a Space Force Captain" is a 335,000 word interactive novel by Mike Walter, where your choices control the story. It's entirely text-based—without graphics or sound effects—and fueled by the vast, unstoppable power of your imagination.

		Will you master the psionic arts or use technology to enhance yourself with cybernetics? Will you follow the rules or will you do whatever is necessary? The choice is yours in Life of a Space Force Captain!
		*line_break
		*link https://www.choiceofgames.com/user-contributed/life-of-a-space-force-captain/redirect.php?src=lh2
		*goto Start_loop
	*allow_reuse #Check out [b]The Last Wizard[/b] by Mike Walter
		*image lastwizard.jpg
		[b]The Last Wizard[/b] by Mike Walter
		*line_break
		It’s a regular Tuesday evening when you are pulled from the Earth and sent to a place where magic still exists. You are given a wizard's tower filled with arcane knowledge that you are expected to learn. Thrust into a war between two nations, it's up to you to save the kingdom where you now live.

		"The Last Wizard" is a 185,000 word interactive fantasy novel by Mike Walter, where your choices control the story. It's entirely text-based—without graphics or sound effects—and fueled by the vast, unstoppable power of your imagination.

		Your choices will influence who rules the land and what happens to the civilians living there. Will you find love or will you strive to return to the life you were forced to leave behind? Will you save the kingdom, or will you betray the people for your own personal gain? The choice is yours!
		*line_break
		*link https://www.choiceofgames.com/user-contributed/last-wizard/redirect.php?src=lh2
		*goto Start_loop
	*allow_reuse #Check out [b]Life of a Mobster[/b] by Mike Walter
		*image mobster.jpg
		[b]Life of a Mobster[/b] by Mike Walter
		*line_break
		Join the mob and rule the city! Will you become a celebrity mobster, or rule from the shadows?

		"Life of a Mobster" is a thrilling interactive novel where your choices control the story. The game is entirely text-based--without graphics or sound effects--and fueled by the vast, unstoppable power of your imagination.

		Will you betray the five families to win the heart of a good-looking FBI agent? Will you end up as a prisoner, a senator, or FBI director? The choice is yours.
		*line_break
		*link https://www.choiceofgames.com/user-contributed/life-of-a-mobster/redirect.php?src=lh2
		*goto Start_loop
	*allow_reuse #Check out [b]Paradox Factor[/b] by Mike Walter
		*image paradox.jpg
		[b]Paradox Factor[/b] by Mike Walter
		*line_break
		What would you change? Alter your past and future in this thought-provoking and edgy time travel game. Are you willing to live with the effects that your changes may cause?

		"Paradox Factor" is an interactive science-fiction novel by Mike Walter where your choices determine how the story proceeds. The game is entirely text-based—without graphics or sound effects—and fueled by the vast, unstoppable power of your imagination.

		Play as a man, woman, or non-binary person as you travel through time. Are you willing to live with the effects that your changes may cause?
		*line_break
		*link https://www.choiceofgames.com/user-contributed/paradox-factor/redirect.php?src=lh2
		*goto Start_loop
	*allow_reuse #Check out [b]Life of a Wizard[/b] by Mike Walter
		*image wizard.jpg
		[b]Life of a Wizard[/b] by Mike Walter
		*line_break
		Write an archmage's autobiography in this 80-year 130,000-word interactive fiction! Play good or evil, man or woman, as you bring peace to the kingdom or take over the world with your sorcery. Brew potions, raise the dead, summon mythical beasts, control men's minds, and blast away your enemies.

		"Life of a Wizard" is an epic interactive novel where you control the main character. In each chapter, your choices determine how the story proceeds.

		Will you find romance, get married, or have children? Will you become the arch-mage, grand bishop, nature-loving druid, hardened battle-mage or even an undead lich? The choice is yours!
		*line_break
		*link https://www.choiceofgames.com/user-contributed/life-of-a-wizard/redirect.php?src=lh2
		*goto Start_loop
	*allow_reuse #Follow and Support [b]Mike Walter and Lucid Games[/b]
		*image lucid.jpg
		Check out my website:
		*link https://lucidgames.ca

		Please stop by and give me a "Like" on Facebook:
		*link https://www.facebook.com/LucidsGames

		Join my mailing list for a link to a short, free game by signing up here. I only send email when new games are released:
		*link https://eepurl.com/dBPS-D

		Interested in offering even more support and taking a larger role in my game development? Consider joining my Patreon Page:
		*link https://www.patreon.com/LucidsGames
		*goto Start_loop

*label BeginPlaying
Would you like to turn on notifications?
*choice
	#Yes, show me the numbers.
		*set showstats true
		*goto BeginPlaying_2
	#No, hide the numbers.
		*set showstats false
		*goto BeginPlaying_2

*label BeginPlaying_2
Do you wish to play from a saved game or create a new character?  It is strongly recommended that you play The Lost Heir 1:  The Fall of Daria first.
*set name "None"
*choice
	*allow_reuse *if (not(choice_randomtest)) #Load a character from The Lost Heir 1:  The Fall of Daria
		*restore_game cancel=BeginPlaying_2
		*if (name="None")
			*goto BeginPlaying_2
		*else
			*goto AfterCreation
	#Create a new character.
		*goto CreateNewCharacter

*label CreateNewCharacter
You were 12 years old when Alexander Zusak, the High Chancellor of the Consortium of Planewalkers, killed your parents.
*choice
	#You were the prince of Daria.
		*set gender "male"
		*set princeprincess "prince"
		*set brothersister "brother"
		*set monk_veri "Verilus"
		*set mastermistress "master"
		*set priestpriestess "priest"
		*set mc_heshe "he"
		*set mc_hisher "his"
		*set mc_himher "him"
		*set mc_manwoman "man"
		*set kingqueen "king"
		*goto AfterGender
	#You were the princess of Daria.
		*set gender "female"
		*set princeprincess "princess"
		*set brothersister "sister"
		*set monk_veri "Verilia"
		*set mastermistress "mistress"
		*set priestpriestess "priestess"
		*set mc_heshe "she"
		*set mc_hisher "her"
		*set mc_himher "her"
		*set mc_manwoman "woman"
		*set kingqueen "queen"
		*goto AfterGender

*label AfterGender
Your name is…
*temp suggested_name_1
*temp suggested_name_2
*temp suggested_name_3
*temp suggested_name_4
*temp suggested_name_5
*temp randomname 0
*temp randomcounter 0
*temp checkthisname "None"
*label StartOver
*set suggested_name_1 "None"
*set suggested_name_2 "None"
*set suggested_name_3 "None"
*set suggested_name_4 "None"
*set suggested_name_5 "None"
*if (gender="male")
	*set randomcounter 1
	*label MaleNameLoop
	*rand randomname 1 75
	*if (randomname=1)
		*set checkthisname "Aaron"
	*if (randomname=2)
		*set checkthisname "Abel"
	*if (randomname=3)
		*set checkthisname "Abraham"
	*if (randomname=4)
		*set checkthisname "Adam"
	*if (randomname=5)
		*set checkthisname "Aden"
	*if (randomname=6)
		*set checkthisname "Alan"
	*if (randomname=7)
		*set checkthisname "Alec"
	*if (randomname=8)
		*set checkthisname "Andrew"
	*if (randomname=9)
		*set checkthisname "Anthony"
	*if (randomname=10)
		*set checkthisname "Atticus"
	*if (randomname=11)
		*set checkthisname "Barry"
	*if (randomname=12)
		*set checkthisname "Bartholomew"
	*if (randomname=13)
		*set checkthisname "Benjamin"
	*if (randomname=14)
		*set checkthisname "Bernard"
	*if (randomname=15)
		*set checkthisname "Bill"
	*if (randomname=16)
		*set checkthisname "Blake"
	*if (randomname=17)
		*set checkthisname "Bradford"
	*if (randomname=18)
		*set checkthisname "Braxton"
	*if (randomname=19)
		*set checkthisname "Brayan"
	*if (randomname=20)
		*set checkthisname "Brevyn"
	*if (randomname=21)
		*set checkthisname "Byron"
	*if (randomname=22)
		*set checkthisname "Callum"
	*if (randomname=23)
		*set checkthisname "Castiel"
	*if (randomname=24)
		*set checkthisname "Ciaran"
	*if (randomname=25)
		*set checkthisname "Corbin"
	*if (randomname=26)
		*set checkthisname "Cornelius"
	*if (randomname=27)
		*set checkthisname "Craig"
	*if (randomname=28)
		*set checkthisname "Cyril"
	*if (randomname=29)
		*set checkthisname "Damon"
	*if (randomname=30)
		*set checkthisname "Dante"
	*if (randomname=31)
		*set checkthisname "Davion"
	*if (randomname=32)
		*set checkthisname "Dimitri"
	*if (randomname=33)
		*set checkthisname "Donovan"
	*if (randomname=34)
		*set checkthisname "Duncan"
	*if (randomname=35)
		*set checkthisname "Edison"
	*if (randomname=36)
		*set checkthisname "Elijah"
	*if (randomname=37)
		*set checkthisname "Finn"
	*if (randomname=38)
		*set checkthisname "Frederick"
	*if (randomname=39)
		*set checkthisname "Gareth"
	*if (randomname=40)
		*set checkthisname "Geoffrey"
	*if (randomname=41)
		*set checkthisname "Graeme"
	*if (randomname=42)
		*set checkthisname "Harrison"
	*if (randomname=43)
		*set checkthisname "Hubert"
	*if (randomname=44)
		*set checkthisname "Jacob"
	*if (randomname=45)
		*set checkthisname "Jaden"
	*if (randomname=46)
		*set checkthisname "Jaxon"
	*if (randomname=47)
		*set checkthisname "Jonathon"
	*if (randomname=48)
		*set checkthisname "Joshua"
	*if (randomname=49)
		*set checkthisname "Kendall"
	*if (randomname=50)
		*set checkthisname "Lucas"
	*if (randomname=51)
		*set checkthisname "Lysander"
	*if (randomname=52)
		*set checkthisname "Matthew"
	*if (randomname=53)
		*set checkthisname "Maximus"
	*if (randomname=54)
		*set checkthisname "Myles"
	*if (randomname=55)
		*set checkthisname "Noah"
	*if (randomname=56)
		*set checkthisname "Orlando"
	*if (randomname=57)
		*set checkthisname "Oscar"
	*if (randomname=58)
		*set checkthisname "Pascal"
	*if (randomname=59)
		*set checkthisname "Randal"
	*if (randomname=60)
		*set checkthisname "Raymond"
	*if (randomname=61)
		*set checkthisname "Roderick"
	*if (randomname=62)
		*set checkthisname "Rufus"
	*if (randomname=63)
		*set checkthisname "Russell"
	*if (randomname=64)
		*set checkthisname "Sebastian"
	*if (randomname=65)
		*set checkthisname "Shane"
	*if (randomname=66)
		*set checkthisname "Terrance"
	*if (randomname=67)
		*set checkthisname "Thaddeus"
	*if (randomname=68)
		*set checkthisname "Thomas"
	*if (randomname=69)
		*set checkthisname "Tiberius"
	*if (randomname=70)
		*set checkthisname "Victor"
	*if (randomname=71)
		*set checkthisname "Vincent"
	*if (randomname=72)
		*set checkthisname "Willard"
	*if (randomname=73)
		*set checkthisname "Zachariah"
	*if (randomname=74)
		*set checkthisname "Zander"
	*if (randomname=75)
		*set checkthisname "Zane"
	*if ((((checkthisname=suggested_name_1) or (checkthisname=suggested_name_2)) or ((checkthisname=suggested_name_3) or (checkthisname=suggested_name_4))) or (checkthisname=suggested_name_5))
		*goto MaleNameLoop
	*if (randomcounter=1)
		*set suggested_name_1 checkthisname
	*if (randomcounter=2)
		*set suggested_name_2 checkthisname
	*if (randomcounter=3)
		*set suggested_name_3 checkthisname
	*if (randomcounter=4)
		*set suggested_name_4 checkthisname
	*if (randomcounter=5)
		*set suggested_name_5 checkthisname
	*set randomcounter +1
	*if (randomcounter<=5)
		*goto MaleNameLoop
	*goto AccepttheName
*else
	*set randomcounter 1
	*label FemaleNameLoop
	*rand randomname 1 75
	*if (randomname=1)
		*set checkthisname "Abigail"
	*if (randomname=2)
		*set checkthisname "Acacia"
	*if (randomname=3)
		*set checkthisname "Adelaide"
	*if (randomname=4)
		*set checkthisname "Adrianna"
	*if (randomname=5)
		*set checkthisname "Alexia"
	*if (randomname=6)
		*set checkthisname "Alicia"
	*if (randomname=7)
		*set checkthisname "Allie"
	*if (randomname=8)
		*set checkthisname "Amber"
	*if (randomname=9)
		*set checkthisname "Amelia"
	*if (randomname=10)
		*set checkthisname "Amy"
	*if (randomname=11)
		*set checkthisname "Anastasia"
	*if (randomname=12)
		*set checkthisname "Angelica"
	*if (randomname=13)
		*set checkthisname "Annabel"
	*if (randomname=14)
		*set checkthisname "Arabella"
	*if (randomname=15)
		*set checkthisname "Arianna"
	*if (randomname=16)
		*set checkthisname "Ariel"
	*if (randomname=17)
		*set checkthisname "Ashley"
	*if (randomname=18)
		*set checkthisname "Aubrey"
	*if (randomname=19)
		*set checkthisname "Autumn"
	*if (randomname=20)
		*set checkthisname "Beatrice"
	*if (randomname=21)
		*set checkthisname "Bethany"
	*if (randomname=22)
		*set checkthisname "Braelyn"
	*if (randomname=23)
		*set checkthisname "Caitlyn"
	*if (randomname=24)
		*set checkthisname "Cecelia"
	*if (randomname=25)
		*set checkthisname "Chelsea"
	*if (randomname=26)
		*set checkthisname "Ciara"
	*if (randomname=27)
		*set checkthisname "Clarissa"
	*if (randomname=28)
		*set checkthisname "Corrine"
	*if (randomname=29)
		*set checkthisname "Delilah"
	*if (randomname=30)
		*set checkthisname "Desiree"
	*if (randomname=31)
		*set checkthisname "Eliza"
	*if (randomname=32)
		*set checkthisname "Emily"
	*if (randomname=33)
		*set checkthisname "Erica"
	*if (randomname=34)
		*set checkthisname "Evangeline"
	*if (randomname=35)
		*set checkthisname "Felicity"
	*if (randomname=36)
		*set checkthisname "Fiona"
	*if (randomname=37)
		*set checkthisname "Gabriella"
	*if (randomname=38)
		*set checkthisname "Gemma"
	*if (randomname=39)
		*set checkthisname "Genevieve"
	*if (randomname=40)
		*set checkthisname "Genny"
	*if (randomname=41)
		*set checkthisname "Gianna"
	*if (randomname=42)
		*set checkthisname "Gisselle"
	*if (randomname=43)
		*set checkthisname "Gretchen"
	*if (randomname=44)
		*set checkthisname "Gwendolyn"
	*if (randomname=45)
		*set checkthisname "Hazel"
	*if (randomname=46)
		*set checkthisname "Ingrid"
	*if (randomname=47)
		*set checkthisname "Irene"
	*if (randomname=48)
		*set checkthisname "Iris"
	*if (randomname=49)
		*set checkthisname "Isabel"
	*if (randomname=50)
		*set checkthisname "Jacinda"
	*if (randomname=51)
		*set checkthisname "Janelle"
	*if (randomname=52)
		*set checkthisname "Jasmine"
	*if (randomname=53)
		*set checkthisname "Jocelyn"
	*if (randomname=54)
		*set checkthisname "Julianna"
	*if (randomname=55)
		*set checkthisname "Kiera"
	*if (randomname=56)
		*set checkthisname "Kinsley"
	*if (randomname=57)
		*set checkthisname "Kylie"
	*if (randomname=58)
		*set checkthisname "Layla"
	*if (randomname=59)
		*set checkthisname "Lucinda"
	*if (randomname=60)
		*set checkthisname "Rayna"
	*if (randomname=61)
		*set checkthisname "Lynnette"
	*if (randomname=62)
		*set checkthisname "Magda"
	*if (randomname=63)
		*set checkthisname "Maeve"
	*if (randomname=64)
		*set checkthisname "Marissa"
	*if (randomname=65)
		*set checkthisname "Marjorie"
	*if (randomname=66)
		*set checkthisname "Mavis"
	*if (randomname=67)
		*set checkthisname "Meghan"
	*if (randomname=68)
		*set checkthisname "Minerva"
	*if (randomname=69)
		*set checkthisname "Nadia"
	*if (randomname=70)
		*set checkthisname "Priscilla"
	*if (randomname=71)
		*set checkthisname "Rayna"
	*if (randomname=72)
		*set checkthisname "Sabrina"
	*if (randomname=73)
		*set checkthisname "Tatiana"
	*if (randomname=74)
		*set checkthisname "Vanessa"
	*if (randomname=75)
		*set checkthisname "Zaria"
	*if ((((checkthisname=suggested_name_1) or (checkthisname=suggested_name_2)) or ((checkthisname=suggested_name_3) or (checkthisname=suggested_name_4))) or (checkthisname=suggested_name_5))
		*goto FemaleNameLoop
	*if (randomcounter=1)
		*set suggested_name_1 checkthisname
	*if (randomcounter=2)
		*set suggested_name_2 checkthisname
	*if (randomcounter=3)
		*set suggested_name_3 checkthisname
	*if (randomcounter=4)
		*set suggested_name_4 checkthisname
	*if (randomcounter=5)
		*set suggested_name_5 checkthisname
	*set randomcounter +1
	*if (randomcounter<=5)
		*goto FemaleNameLoop
	*goto AccepttheName

*label AccepttheName
*choice
	#${suggested_name_1}
		*set name suggested_name_1
		*goto ContinueAfterNaming
	#${suggested_name_2}
		*set name suggested_name_2
		*goto ContinueAfterNaming
	#${suggested_name_3}
		*set name suggested_name_3
		*goto ContinueAfterNaming
	#${suggested_name_4}
		*set name suggested_name_4
		*goto ContinueAfterNaming
	#${suggested_name_5}
		*set name suggested_name_5
		*goto ContinueAfterNaming
	*allow_reuse #None of these.
		Perhaps one of these?
		*goto StartOver
	#I'll choose my own.
		*input_text name
		*if (name="LastUpdate")
			This version is from May 15th, 2022.
		*goto ContinueAfterNaming

*label ContinueAfterNaming
Thuja, Alexander Zusak's lackey, hired a band of mercenaries to break into the palace while Selina, another lackey, poisoned the banquet.  You escaped with the aid of an unlikely ally.
*choice
	#Sir Grady, an old knight, saved you.
		*set fosterparent_name "Sir Grady"
		*set fosterparent_hisher "his"
		*set fosterparent_himher "him"
		*set fosterparent_heshe "he"
		*goto AfterFoster
	#Lady Emaline, an old secret assassin, saved you.
		*set fosterparent_name "Lady Emaline"
		*set fosterparent_hisher "her"
		*set fosterparent_himher "her"
		*set fosterparent_heshe "she"
		*goto AfterFoster
	#Amos, an old thief, saved you.
		*set fosterparent_name "Amos"
		*set fosterparent_hisher "his"
		*set fosterparent_himher "him"
		*set fosterparent_heshe "he"
		*goto AfterFoster
	#Sister Geri, an old monk, saved you.
		*set fosterparent_name "Sister Geri"
		*set fosterparent_hisher "her"
		*set fosterparent_himher "her"
		*set fosterparent_heshe "she"
		*goto AfterFoster

*label AfterFoster
*set fosterparent_relationship 70
Alexander Zusak stole an ancient Demonstone from the royal treasury that night.  Harmond, your tutor, incanted a spell which tore Zusak's runebag open and spilled some of his Demonstones onto the floor, including the stolen one.  You took these treasures with you when you fled the castle.  The kingdom of Daria was dissolved and four duchies were created in its place.

${fosterparent_name} took you to the small town of Elmvale where ${fosterparent_heshe} raised you as ${fosterparent_hisher} own.  You grew up and became…
*set archery 0
*set devices 0
*set magic 0
*set blades 0
*set stealth 0
*set unarmed 0
*set agility 20
*set charm 20
*set endurance 20
*set perception 20
*set strength 20
*set willpower 20
*set arcana 20
*set geography 20
*set history 20
*set nature 20
*set religion 20
*label Select_Class_loop
*choice
	*allow_reuse *selectable_if (fosterparent_name="Sir Grady") #A squire. (Needs Sir Grady to be foster parent)
		Squires are mounted warriors who aspire to become knights.  They each require a fully-fledged knight as a sponsor.  They wander across the land, righting wrongs and competing in tournaments.  Most of them are good people and follow the knightly code, but there are tales of evil knights who hide their true hearts.
		*choice
			#You became a squire.
				*goto Become_Squire
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Squire
		*set class_squire 2
		*set title "squire"
		*set strength +10
		*set blades +20
		*set strength +10
		*set blades +10
		*set agility +10
		*set endurance +10
		*set strength +10
		*set blades +20
		*set blades +10
		*set charm +10
		*set strength +10
		*set endurance +10
		*set gold +175
		*set blades +10
		*set unarmed +10
		*set archery +10
		*set religion +10
		*set unarmed +5
		*set charity 0
		*set charity_bonusgiven 0
		*set hammerspikes false
		*set spellbook false
		*set sword true
		*set dagger false
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope false
		*set lantern false
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse *selectable_if (fosterparent_name="Lady Emaline") #An assassin. (Needs Lady Emaline to be foster parent)
		Assassins work for the Guild of Assassins.  They are offered contracts to kill people for money.  The marks may be innocent or evil, it doesn't matter.  Through the use of stealth, poison, bow or blade, the assassin kills efficiently and invisibly.
		*choice
			#You became an assassin.
				*goto Become_Assassin
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Assassin
		*set class_assassin 2
		*set title "assassin"
		*set strength +10
		*set blades +20
		*set agility +10
		*set stealth +10
		*set agility +10
		*set endurance +10
		*set strength +10
		*set stealth +20
		*set stealth +10
		*set agility +10
		*set blades +10
		*set nature +10
		*set gold +140
		*set stealth +10
		*set blades +5
		*set nature +10
		*set unarmed +10
		*set archery +10
		*set stealth +10
		*set nature +5
		*set devices +5
		*set perception +10
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword false
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope true
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse *selectable_if (fosterparent_name="Amos") #A bard. (Needs Amos to be foster parent)
		Bards are great musicians who play instruments and sing songs for coin.  They have knowledge of obscure facts, and legendary bards have melodies that can influence reality itself.
		*choice
			#You became a bard.
				*goto Become_Bard
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Bard
		*set class_bard 2
		*set title "bard"
		*set charm +10
		*set agility +10
		*set blades +10
		*set charm +10
		*set perception +10
		*set blades +20
		*set blades +5
		*set archery +5
		*set charm +15
		*set arcana +15
		*set agility +15
		*set geography +15
		*set gold +190
		*set arcana +5
		*set history +5
		*set magic +5
		*set blades +10
		*set archery +10
		*set stealth +10
		*set unarmed +5
		*set devices +5
		*set geography +5
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword false
		*set dagger true
		*set bow false
		*set lute true
		*set lockpickset false
		*set holysymbol false
		*set rope true
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse *selectable_if (fosterparent_name="Sister Geri") #A monk. (Needs Sister Geri to be foster parent)
		Monks need no weapon to protect themselves, having turned their bodies into deadly instruments.  Some monks are religious, but others meditate upon nature itself.  Although most monks are simply homeless vagabonds, there are tales of monks who can perform inexplicable feats.
		*choice
			#You became a monk.
				*goto Become_Monk
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Monk
		*set class_monk 2
		*set title "monk"
		*set religion +10
		*set arcana +5
		*set agility +10
		*set unarmed +10
		*set agility +10
		*set endurance +10
		*set strength +10
		*set unarmed +20
		*set unarmed +20
		*set religion +20
		*set history +10
		*set perception +10
		*set gold +130
		*set unarmed +10
		*set religion +5
		*set agility +10
		*set blades +10
		*set archery +10
		*set stealth +10
		*set history +5
		*set religion +5
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword false
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope false
		*set lantern true
		*set thiefharness false
		*set holywater true
		*goto GiveHorse
	*allow_reuse #A thief.
		All professional thieves in Daria belong to the Thieves Guild.  Any thief who doesn't is soon killed.  They are masters of opening locked doors, finding traps and moving without being noticed.
		*choice
			#You became a thief.
				*goto Become_Thief
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Thief
		*set class_thief 2
		*set title "thief"
		*set devices +20
		*set agility +5
		*set agility +10
		*set stealth +10
		*set agility +10
		*set charm +10
		*set perception +10
		*set stealth +20
		*set devices +15
		*set stealth +15
		*set agility +15
		*set gold +190
		*set devices +10
		*set stealth +10
		*set blades +5
		*set blades +10
		*set archery +10
		*set stealth +15
		*set devices +5
		*set unarmed +5
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes true
		*set spellbook false
		*set sword false
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset true
		*set holysymbol false
		*set rope true
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse #A ${priestpriestess}.
		Good and evil, priests serve the Gods and Goddesses of the world.  Through their divine magic, they are able to heal the sick and have power over the undead.
		*choice
			#You became a ${priestpriestess}.
				*goto Become_Priest
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Priest
		*set class_priest 2
		*set title "priest"
		*set religion +10
		*set arcana +5
		*set perception +10
		*set blades +5
		*set history +10
		*set geography +10
		*set arcana +10
		*set religion +10
		*set blades +20
		*set magic +25
		*set religion +20
		*set history +10
		*set arcana +10
		*set gold +140
		*set religion +20
		*set unarmed +10
		*set archery +10
		*set stealth +10
		*set magic +15
		*set history +5
		*set geography +5
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword false
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol true
		*set rope false
		*set lantern true
		*set thiefharness false
		*set holywater true
		*goto PickDeity
	*allow_reuse #A cleric.
		Good and evil, clerics serve the Gods and Goddesses of the world.  Unlike scholarly priests who devote their lives to their divine magic, clerics also spend their time learning to use weapons in order to physically exert their deities' will upon the world.
		*choice
			#You became a cleric.
				*goto Become_Cleric
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Cleric
		*set class_priest 1
		*set class_cleric 1
		*set title "cleric"
		*set religion +10
		*set arcana +5
		*set strength +10
		*set agility +10
		*set endurance +10
		*set magic +20
		*set strength +10
		*set blades +20
		*set blades +5
		*set religion +20
		*set history +10
		*set arcana +10
		*set gold +140
		*set religion +10
		*set blades +20
		*set magic +10
		*set archery +10
		*set stealth +10
		*set unarmed +5
		*set history +5
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword true
		*set dagger false
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol true
		*set rope false
		*set lantern true
		*set thiefharness false
		*set holywater true
		*label PickDeity
		*choice
			*selectable_if (good>=50) #You follow a good deity.
				The embodiment of all that is good in the world.  Light, compassion, healing, justice, truth, kindness…the list could go on for hours.
				*set good +10
				*set god_good true
				*choice
					#You follow Lucien, a good and kind God.
						*set god_name "Lucien"
						*set god_goddess "God"
						*set god_hisher "His"
						*set god_himher "Him"
						*set god_heshe "He"
						*goto GiveHorse
					#You follow Auriel, a good and kind Goddess.
						*set god_name "Auriel"
						*set god_goddess "Goddess"
						*set god_hisher "Her"
						*set god_himher "Her"
						*set god_heshe "She"
						*goto GiveHorse
					#You follow a different God.
						*set god_goddess "God"
						*set god_hisher "His"
						*set god_himher "Him"
						*set god_heshe "He"
						*goto NameTheGod_Creation
					#You follow a different Goddess.
						*set god_goddess "Goddess"
						*set god_hisher "Her"
						*set god_himher "Her"
						*set god_heshe "She"
						*goto NameTheGod_Creation
				*label NameTheGod_Creation
				*input_text god_name
				*if ((god_name="None") or (god_name="the Unknown"))
					Every known deity has a name, or it wouldn't be known.  What is the name of your ${god_goddess}?
					*goto NameTheGod_Creation
				*goto GiveHorse
			*if (good<=50) #You follow an evil deity.
				The embodiment of all that is evil in the world.  Darkness, shadows, disease, corruption, deceit…the list could go on for hours.  In addition to these things, your deity encourages wealth, power and domination over other creatures: living and dead.
				*set good -10
				*set god_good false
				*choice
					#You follow Noct, an evil and cruel God.
						*set god_name "Noct"
						*set god_goddess "God"
						*set god_hisher "His"
						*set god_himher "Him"
						*set god_heshe "He"
						*goto GiveHorse
					#You follow Shadi, an evil and cruel Goddess.
						*set god_name "Shadi"
						*set god_goddess "Goddess"
						*set god_hisher "Her"
						*set god_himher "Her"
						*set god_heshe "She"
						*goto GiveHorse
					#You follow a different God.
						*set god_goddess "God"
						*set god_hisher "His"
						*set god_himher "Him"
						*set god_heshe "He"
						*goto NameTheGod_Creation
					#You follow a different Goddess.
						*set god_goddess "Goddess"
						*set god_hisher "Her"
						*set god_himher "Her"
						*set god_heshe "She"
						*goto NameTheGod_Creation
	*allow_reuse #A wizard.
		Wizards use arcane spells to warp reality.  Through incantations and mysterious gestures, they are able to perform many supernatural deeds.  The greatest wizards of the land train at the Academy of Wizards, although there are other ways to learn magic.  Many wizards share a supernatural bond with an animal familiar.
		*choice
			#You became a wizard.
				*goto Become_Wizard
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Wizard
		*set class_wizard 1
		*set title "wizard" 
		*set arcana +10
		*set magic +20
		*set arcana +10
		*set arcana +10
		*set history +10
		*set geography +10
		*set arcana +10
		*set religion +10
		*set magic +20
		*set arcana +15
		*set history +15
		*set geography +15
		*set gold +180
		*set arcana +10
		*set magic +20
		*set blades +10
		*set archery +10
		*set unarmed +5
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook true
		*set sword false
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope false
		*set lantern false
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse #A sage.
		Sages are scholars who learn how the world works by studying history, geography, mathematics and other academic disciplines.  They are often hired for their great intellectual abilities to serve as advisers.
		*choice
			#You became a sage.
				*goto Become_Sage
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Sage
		*set class_sage 1
		*set title "sage"
		*set arcana +10
		*set magic +20
		*set arcana +10
		*set arcana +10
		*set history +10
		*set geography +10
		*set arcana +10
		*set religion +10
		*set magic +20
		*set arcana +15
		*set history +15
		*set geography +15
		*set gold +180
		*set arcana +15
		*set history +15
		*set geography +15
		*set blades +10
		*set archery +10
		*set stealth +10
		*set unarmed +5
		*set devices +5
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword false
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope false
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse #A ranger.
		Rangers often begin life as hunters or nature guides.  They are expert trackers and amazing archers.  The most skilled rangers are often seen travelling with an animal at their side.
		*choice
			#You became a ranger.
				*goto Become_Ranger
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Ranger
		*set class_ranger 1
		*set title "ranger"
		*set archery +10
		*set agility +5
		*set perception +10
		*set nature +10
		*set agility +10
		*set endurance +10
		*set strength +10
		*set archery +20
		*set archery +15
		*set perception +10
		*set endurance +10
		*set nature +20
		*set geography +10
		*set gold +140
		*set archery +20
		*set stealth +10
		*set nature +20
		*set blades +10
		*set unarmed +10
		*set stealth +10
		*set geography +15
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword true
		*set dagger false
		*set bow true
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope true
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse #A druid.
		Druids devote their lives to balance and nature.  They understand the harmony of life itself, which allows them to perform great feats of magic, similar to wizards.  Druids are often seen with an animal companion who protects them from physical threats.
		*choice
			#You became a druid.
				*goto Become_Druid
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Druid
		*set class_druid 1
		*set title "druid"
		*set arcana +10
		*set magic +20
		*set perception +10
		*set nature +10
		*set history +10
		*set geography +10
		*set arcana +10
		*set religion +10
		*set stealth +20
		*set archery +15
		*set perception +10
		*set endurance +10
		*set nature +20
		*set geography +10
		*set gold +140
		*set nature +20
		*set magic +20
		*set blades +10
		*set unarmed +10
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword false
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope false
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse #A guard.
		Guards protect people from harm through the use of arms and armour.  Their ability to follow orders makes them excellent soldiers.
		*choice
			#You became a guard.
				*goto Become_Guard
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Guard
		*set class_guard 2
		*set title "guard"
		*set strength +10
		*set blades +20
		*set strength +10
		*set blades +10
		*set agility +10
		*set endurance +10
		*set strength +10
		*set blades +20
		*set endurance +20
		*set strength +10
		*set geography +10
		*set gold +150
		*set archery +10
		*set endurance +5
		*set archery +10
		*set strength +5
		*set unarmed +10
		*set archery +10
		*set perception +10
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes false
		*set spellbook false
		*set sword true
		*set dagger true
		*set bow true
		*set lute false
		*set lockpickset false
		*set holysymbol false
		*set rope false
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse
	*allow_reuse #A thug.
		Thugs are masters of intimidation.  They are hired goons who make people pay their debts and physically hurt people for money.
		*choice
			#You became a thug.
				*goto Become_Thug
			*allow_reuse #You became something else.
				You decided to become something else.
				*goto Select_Class_loop
		*label Become_Thug
		*set class_thug 2
		*set title "thug"
		*set strength +10
		*set blades +20
		*set strength +10
		*set stealth +10
		*set agility +10
		*set endurance +10
		*set strength +10
		*set stealth +20
		*set endurance +10
		*set strength +15
		*set gold +190
		*set unarmed +20
		*set blades +10
		*set strength +10
		*set devices +10
		*set archery +10
		*set charity 0
		*set charity_bonusgiven 0
		*set mount_level 0
		*set mount_type "None"
		*set mount_name "None"
		*set mount_desc "None"
		*set mount_value 0
		*set hammerspikes true
		*set spellbook false
		*set sword true
		*set dagger true
		*set bow false
		*set lute false
		*set lockpickset true
		*set holysymbol false
		*set rope false
		*set lantern true
		*set thiefharness false
		*set holywater false
		*goto GiveHorse

*label GiveHorse
*set mount_level 3
*set mount_value 75
*set mount_type "horse"
*set mount_desc "a young timid riding"
*rand coinflip 1 2
*if (coinflip=1)
	*set mount_hisher "his"
	*set mount_heshe "he"
	*set mount_himher "him"
*if (coinflip=2)
	*set mount_hisher "her"
	*set mount_heshe "she"
	*set mount_himher "her"
*temp randommountname
*rand randommountname 1 28
*if (randommountname=1)
	*set mount_name "Angel"
*if (randommountname=2)
	*set mount_name "Apple Jack"
*if (randommountname=3)
	*set mount_name "Angel Eyes"
*if (randommountname=4)
	*set mount_name "Autumn"
*if (randommountname=5)
	*set mount_name "Babe"
*if (randommountname=6)
	*set mount_name "Basil"
*if (randommountname=7)
	*set mount_name "Blackie"
*if (randommountname=8)
	*set mount_name "Boots"
*if (randommountname=9)
	*set mount_name "Blossom"
*if (randommountname=10)
	*set mount_name "Breeze"
*if (randommountname=11)
	*set mount_name "Cactus"
*if (randommountname=12)
	*set mount_name "Checkers"
*if (randommountname=13)
	*set mount_name "Cinnamon"
*if (randommountname=14)
	*set mount_name "Firecracker"
*if (randommountname=15)
	*set mount_name "Felicity"
*if (randommountname=16)
	*set mount_name "Ginger"
*if (randommountname=17)
	*set mount_name "Hazel"
*if (randommountname=18)
	*set mount_name "Indigo"
*if (randommountname=19)
	*set mount_name "Jasper"
*if (randommountname=20)
	*set mount_name "Jewel"
*if (randommountname=21)
	*set mount_name "Lady"
*if (randommountname=22)
	*set mount_name "Lucky"
*if (randommountname=23)
	*set mount_name "Nutmeg"
*if (randommountname=24)
	*set mount_name "Patches"
*if (randommountname=25)
	*set mount_name "Pebbles"
*if (randommountname=26)
	*set mount_name "Rusty"
*if (randommountname=27)
	*set mount_name "Saffron"
*if (randommountname=28)
	*set mount_name "Tango"
*goto After_GiveHorse

*Label After_GiveHorse
You show particular adeptness with…
*set demonsummoner false
*choice
	#A bow and arrow.
		*set archery +30
		*set agility +15
		*set bow true
		*goto End_Specialization
	#Devices, including locks and traps.
		*set lockpickset true
		*set devices +30
		*set agility +10
		*goto End_Specialization
	#Magic.
		*set magic +30
		*set arcana +5
		*goto End_Specialization
	#Nature.
		*set nature +30
		*set geography +7
		*set perception +7
		*goto End_Specialization
	#Long blades.
		*set blades +30
		*set strength +5
		*set endurance +5
		*set sword true
		*goto End_Specialization
	#Short blades.
		*set dagger true
		*set blades +30
		*set agility +10
		*goto End_Specialization
	#Stealthy movement.
		*set stealth +30
		*set agility +15
		*goto End_Specialization
	#Fighting barehanded.
		*set unarmed +30
		*set strength +5
		*set agility +5
		*set endurance +5
		*goto End_Specialization
	#Arcane knowledge.
		*set arcana +30
		*set magic +5
		*goto End_Specialization
	#Geography.
		*set geography +30
		*set perception +15
		*goto End_Specialization
	#History.
		*set history +30
		*set perception +15
		*goto End_Specialization
	#Religion.
		*set history +30
		*set perception +15
		*goto End_Specialization
	#Being charming.
		*set charm +30
		*set perception +5
		*goto End_Specialization
	#Finding money.
		*set gold +300
		*goto End_Specialization
	#Demon summoning.
		*set demonsummoner true
		*set willpower +5
		*set arcana +10
		*set demonstone_zonch_known true
		*set demonstone_xiatta_known true
		*set demonstone_brahl_known true
		*set demonstone_daanda true
		*goto End_Specialization

*label End_Specialization
It wasn't until years later that you caught up with your friend from the palace, who was…
*set childhoodfriend_relationship 75
*set childhoodfriend_story 0
*set childhoodfriend_sleptwith false
*set childhoodfriend_lover false
*set childhoodfriend_dead false
*set childhoodfriend_injured false
*choice
	#A boy.
		*set childhoodfriend_hisher "his"
		*set childhoodfriend_himher "him"
		*set childhoodfriend_heshe "he"
		*goto AfterChildHeshe
	#A girl.
		*set childhoodfriend_hisher "her"
		*set childhoodfriend_himher "her"
		*set childhoodfriend_heshe "she"
		*goto AfterChildHeshe

*label AfterChildHeshe
$!{childhoodfriend_heshe} was…
*choice
	#A high-born noble.
		*set peterpetra_hisher childhoodfriend_hisher
		*set peterpetra_himher childhoodfriend_himher
		*set peterpetra_heshe childhoodfriend_heshe
		*set peterpetra_relationship 75
		*set peterpetra_story 0
		*set peterpetra_injured false
		*if (childhoodfriend_heshe="he")
			*set childhoodfriend_name "Peter"
			*set peterpetra_name "Peter"
			*goto AfterNobleCommoner
		*else
			*set childhoodfriend_name "Petra"
			*set peterpetra_name "Petra"
			*goto AfterNobleCommoner
	#A commoner.
		*set gillgale_hisher childhoodfriend_hisher
		*set gillgale_himher childhoodfriend_himher
		*set gillgale_heshe childhoodfriend_heshe
		*set gillgale_relationship 75
		*set gillgale_story 0
		*set gillgale_injured false
		*if (gillgale_heshe="he")
			*set childhoodfriend_name "Gill"
			*set gillgale_name "Gill"
			*goto AfterNobleCommoner
		*else
			*set childhoodfriend_name "Gale"
			*set gillgale_name "Gale"
			*goto AfterNobleCommoner

*label AfterNobleCommoner
Even at a young age, you found yourself…
*choice
	#Sexually attracted to women.
		*set likesboys false
		*set likesgirls true
		*goto AfterSexual
	#Sexually attracted to men.
		*set likesboys true
		*set likesgirls false
		*goto AfterSexual
	#Sexually attracted to both men and women.
		*set likesboys true
		*set likesgirls true
		*goto AfterSexual
	#Not sexually attracted to either.
		*set likesboys false
		*set likesgirls false
		*goto AfterSexual

*label AfterSexual
*if ((childhoodfriend_name="Peter") or (childhoodfriend_name="Petra"))
	${childhoodfriend_name} was a good friend for a ${princeprincess} to have, because ${childhoodfriend_heshe} also came from privilege.  Years later you met ${childhoodfriend_himher} again, learning that ${childhoodfriend_heshe} had become a holy warrior after the fall of Daria.
*if ((childhoodfriend_name="Gill") or (childhoodfriend_name="Gale"))
	${childhoodfriend_name} was a good friend for a ${princeprincess} to have, because ${childhoodfriend_heshe} kept you connected to the common people.  Years later you met ${childhoodfriend_himher} again, learning that ${childhoodfriend_heshe} had become a skilled thief after the fall of Daria.

You also made a friend in Elmvale…
*set karlkarla_relationship 75
*set karlkarla_story 0
*set karlkarla_injured false
*choice
	#A man who was an excellent archer and guide.
		*set karlkarla_name "Karl"
		*set karlkarla_hisher "his"
		*set karlkarla_heshe "he"
		*set karlkarla_himher "him"
		*goto AfterKarlKarla
	#A woman who was an excellent archer and guide.
		*set karlkarla_name "Karla"
		*set karlkarla_hisher "her"
		*set karlkarla_heshe "she"
		*set karlkarla_himher "her"
		*goto AfterKarlKarla

*Label AfterKarlKarla
The archer was a
*if (karlkarla_heshe="he")
	man
*if (karlkarla_heshe="she")
	woman
named ${karlkarla_name}.  $!{karlkarla_hisher} parents owned a store in Elmvale.  

You made another friend when you joined the Adventurers Guild.
*set theothea_relationship 70
*set theothea_story 0
*set theothea_injured false
*choice
	#A large muscle-bound man with a big warhammer.
		*set theothea_name "Theo"
		*set theothea_hisher "his"
		*set theothea_heshe "he"
		*set theothea_himher "him"
		*set theothea_manwoman "man"
		*set theothea_love_sondaughter "daughter"
		*set theothea_love "Yaldi"
		*set theothea_love_heshe "she"
		*set theothea_love_himher "her"
		*set theothea_love_hisher "her"
		*set theothea_foe "Dorgan"
		*goto AfterTheoThea
	#A large muscle-bound woman with a big warhammer.
		*set theothea_name "Thea"
		*set theothea_hisher "her"
		*set theothea_heshe "she"
		*set theothea_himher "her"
		*set theothea_manwoman "woman"
		*set theothea_love_sondaughter "son"
		*set theothea_love "Yalden"
		*set theothea_love_heshe "he"
		*set theothea_love_himher "him"
		*set theothea_love_hisher "his"
		*set theothea_foe "Dorga"
		*goto AfterTheoThea

*label AfterTheoThea
The strong brute was named ${theothea_name} and ${theothea_heshe} worked with you on your first job when you joined the Adventurers Guild.

The last member of your party was a Soulburner.
*set jacejess_relationship 60
*set jacejess_story 0
*set jacejess_injured false
*set jacejess_usedpowers 1
*choice
	#A man who joined you in Ludd.
		*set jacejess_name "Jace"
		*set jacejess_hisher "his"
		*set jacejess_heshe "he"
		*set jacejess_himher "him"
		*set jacejess_manwoman "man"
		*goto AfterJaceJess
	#A woman who joined you in Ludd.
		*set jacejess_name "Jess"
		*set jacejess_hisher "her"
		*set jacejess_heshe "she"
		*set jacejess_himher "her"
		*set jacejess_manwoman "woman"
		*goto AfterJaceJess

*label AfterJaceJess
A lot of people don't trust Soulburners because they feel that their magic is evil.
*if (demonsummoner)
	You also practised a controversial type of magic: demon summoning.
	*goto Chose_Demons_Earlier
*choice
	#You also practised a controversial type of magic: demon summoning.
		*label Chose_Demons_Earlier
		You were given a runebag from ${fosterparent_name} to carry the Demonstones that you stole from Zusak.
		*if (showstats)
			*line_break
			(Gained Runebag and Demonstones)
		*set demonsummoner true
		*set demonstone_xiatta true
		*set demonstone_xiatta_known true
		*set demonstone_xiatta_summoned true
		*set demonstone_zonch true
		*set demonstone_zonch_known true
		*set demonstone_zonch_summoned true
		*set demonstone_brahl true
		*set demonstone_brahl_known true
		*set demonstone_brahl_summoned false
		*set demonstone_tyborr false
		*set demonstone_tyborr_summoned false
		*set demonstone_daanda true
		*set demonstone_daanda_known true
		*set demonstone_daanda_summoned false
		*set willpower +15
		*goto AfterDemonstones
	#You followed ${fosterparent_name}'s wishes and never used the Demonstones.
		You were given a runebag from ${fosterparent_name} to carry the Demonstones that you stole from Zusak, although you never use them.  Before ${fosterparent_name} was killed, ${fosterparent_heshe} gave you a signet ring that had once belonged to your
		*if (gender="male")
			father, the king.
		*if (gender="female")
			mother, the queen.
		*if (showstats)
			*line_break
			(Gained Family Heirloom: Archery +${familyring_bonus}, Devices +${familyring_bonus}, Magic +${familyring_bonus}, Blades +${familyring_bonus}, Stealth +${familyring_bonus}, Unarmed +${familyring_bonus}, Arcana +${familyring_bonus}, Geography +${familyring_bonus}, History +${familyring_bonus}, Nature +${familyring_bonus}, Religion +${familyring_bonus}, Agility +${familyring_bonus}, Charm +${familyring_bonus}, Endurance +${familyring_bonus}, Perception +${familyring_bonus}, Strength +${familyring_bonus} and Willpower +${familyring_bonus})
		*set familyring true
		*set archery +familyring_bonus
		*set devices +familyring_bonus
		*set magic +familyring_bonus
		*set blades +familyring_bonus
		*set stealth +familyring_bonus
		*set unarmed +familyring_bonus
		*set arcana +familyring_bonus
		*set geography +familyring_bonus
		*set history +familyring_bonus
		*set nature +familyring_bonus
		*set religion +familyring_bonus
		*set agility +familyring_bonus
		*set charm +familyring_bonus
		*set endurance +familyring_bonus
		*set perception +familyring_bonus
		*set strength +familyring_bonus
		*set willpower +familyring_bonus
		*set demonsummoner false
		*set demonstone_xiatta false
		*set demonstone_xiatta_known false
		*set demonstone_xiatta_summoned false
		*set demonstone_zonch false
		*set demonstone_zonch_known false
		*set demonstone_zonch_summoned false
		*set demonstone_brahl false
		*set demonstone_brahl_known false
		*set demonstone_brahl_summoned false
		*set demonstone_tyborr false
		*set demonstone_tyborr_summoned false
		*set demonstone_daanda false
		*set demonstone_daanda_known false
		*set demonstone_daanda_summoned false
		*goto AfterDemonstones

*label AfterDemonstones
*set runebag true
*set demonstone_kgirr true
*set demonstone_xiatta_used false
*set demonstone_zonch_used false
*set demonstone_brahl_used false
*set demonstone_tyborr_used false
*set demonstone_daanda_used false

You grew up to become:
*choice
	#A saintly ${mc_manwoman}.
		*set good 90
		*goto After_Alignment
	#A good ${mc_manwoman}.
		*set good 70
		*goto After_Alignment
	#A neutral ${mc_manwoman}.
		*set good 50
		*goto After_Alignment
	#A bad ${mc_manwoman}.
		*set good 30
		*goto After_Alignment
	#An evil ${mc_manwoman}.
		*set good 10
		*goto After_Alignment
		
*label After_Alignment
You and your companions raided a Som'reth stronghold and found an unregistered Demonstone.  You took it to Vernex in order to gain entrance to the Planewalkers' compound.  
*choice
	*if (((gillgale_hisher="his") and (likesboys)) or ((gillgale_hisher="her") and (likesgirls))) #You began dating ${gillgale_name}.
		*set gillgale_lover true
		*set childhoodfriend_lover true
		*set childhoodfriend_relationship +15
		*set gillgale_relationship +15
		*set lover_name gillgale_name
		*set lover_hisher gillgale_hisher
		*set lover_himher gillgale_himher
		*set lover_heshe gillgale_heshe
		*set lover_exists true
		*goto CheckVirgin
	*if (((peterpetra_hisher="his") and (likesboys)) or ((peterpetra_hisher="her") and (likesgirls))) #You began dating ${peterpetra_name}.
		*set peterpetra_lover true
		*set peterpetra_relationship +15
		*set childhoodfriend_lover true
		*set childhoodfriend_relationship +15
		*set lover_name peterpetra_name
		*set lover_hisher peterpetra_hisher
		*set lover_himher peterpetra_himher
		*set lover_heshe peterpetra_heshe
		*set lover_exists true
		*goto CheckVirgin
	*if (((karlkarla_hisher="his") and (likesboys)) or ((karlkarla_hisher="her") and (likesgirls))) #You began dating ${karlkarla_name}.
		*set karlkarla_lover true
		*set karlkarla_relationship +15
		*set lover_name karlkarla_name
		*set lover_hisher karlkarla_hisher
		*set lover_himher karlkarla_himher
		*set lover_heshe karlkarla_heshe
		*set lover_exists true
		*goto CheckVirgin
	*if (((theothea_hisher="his") and (likesboys)) or ((theothea_hisher="her") and (likesgirls))) #You began dating ${theothea_name}.
		*set theothea_lover true
		*set theothea_relationship +15
		*set lover_name theothea_name
		*set lover_hisher theothea_hisher
		*set lover_himher theothea_himher
		*set lover_heshe theothea_heshe
		*set lover_exists true
		*goto CheckVirgin
	*if (((jacejess_hisher="his") and (likesboys)) or ((jacejess_hisher="her") and (likesgirls))) #You began dating ${jacejess_name}.
		*set jacejess_lover true
		*set jacejess_relationship +15
		*set lover_name jacejess_name
		*set lover_hisher jacejess_hisher
		*set lover_himher jacejess_himher
		*set lover_heshe jacejess_heshe
		*set lover_exists true
		*goto CheckVirgin
	#You didn't date any of your companions.
		*set lover_exists false
		*set lover_name "None"
		*set virgin true
		*goto AfterDating

*label CheckVirgin
It was nice to travel with someone you liked romantically.
*choice
	#It made the nights more pleasant.
		*if (lover_name=jacejess_name)
			*set jacejess_sleptwith true
		*if (lover_name=theothea_name)
			*set theothea_sleptwith true
		*if (lover_name=gillgale_name)
			*set gillgale_sleptwith true
			*set childhoodfriend_sleptwith true
		*if (lover_name=peterpetra_name)
			*set peterpetra_sleptwith true
			*set childhoodfriend_sleptwith true
		*if (lover_name=karlkarla_name)
			*set karlkarla_sleptwith true
		*set virgin false
		*goto AfterDating
	#Although you didn't express your love physically.
		*set jacejess_sleptwith false
		*set theothea_sleptwith false
		*set gillgale_sleptwith false
		*set peterpetra_sleptwith false
		*set karlkarla_sleptwith false
		*set virgin true
		*goto AfterDating

*label AfterDating
The confrontation with your parents' murderer was a disaster and you were thrown into the dungeon.  Zusak intended to torture you in order to take back the Demonstone you had stolen from him all those years ago.

${fosterparent_name} was killed during your escape.  So was…
*if ((childhoodfriend_name="Gill") or (childhoodfriend_name="Gale"))
	*set gillgale_inparty true
	*set peterpetra_inparty false
*if ((childhoodfriend_name="Peter") or (childhoodfriend_name="Petra"))
	*set peterpetra_inparty true
	*set gillgale_inparty false
*set theothea_inparty true
*set karlkarla_inparty true
*set jacejess_inparty true	
*choice
	*if ((lover_name!=gillgale_name) and (gillgale_inparty)) #${gillgale_name}.
		*set gillgale_inparty false
		*set gillgale_dead true
		*set deadfriend_name gillgale_name
		*set deadfriend_hisher gillgale_hisher
		*set deadfriend_heshe gillgale_heshe
		*set deadfriend_himher gillgale_himher
		*goto AfterDeath
	*if ((lover_name!=peterpetra_name) and (peterpetra_inparty)) #${peterpetra_name}.
		*set peterpetra_inparty false
		*set peterpetra_dead true
		*set deadfriend_name peterpetra_name
		*set deadfriend_hisher peterpetra_hisher
		*set deadfriend_heshe peterpetra_heshe
		*set deadfriend_himher peterpetra_himher
		*goto AfterDeath
	*if (lover_name!=karlkarla_name) #${karlkarla_name}.
		*set karlkarla_dead true
		*set karlkarla_inparty false
		*set deadfriend_name karlkarla_name
		*set deadfriend_hisher karlkarla_hisher
		*set deadfriend_heshe karlkarla_heshe
		*set deadfriend_himher karlkarla_himher
		*goto AfterDeath
	*if (lover_name!=theothea_name) #${theothea_name}.
		*set theothea_dead true
		*set theothea_inparty false
		*set deadfriend_name theothea_name
		*set deadfriend_hisher theothea_hisher
		*set deadfriend_heshe theothea_heshe
		*set deadfriend_himher theothea_himher
		*goto AfterDeath
	*if (lover_name!=jacejess_name) #${jacejess_name}.
		*set jacejess_dead true
		*set jacejess_inparty false
		*set deadfriend_name jacejess_name
		*set deadfriend_hisher jacejess_hisher
		*set deadfriend_heshe jacejess_heshe
		*set deadfriend_himher jacejess_himher
		*goto AfterDeath

*label AfterDeath
Alexander Zusak's dual axe wielding mercenary, Thuja, was also killed and you escaped with…
*set friend1_injured false
*set friend1_exists true
*set friend2_exists false
*set friend2_name "None"
*choice
	*if (gillgale_inparty) #${gillgale_name}.
		*set friend1_name gillgale_name
		*set friend1_hisher gillgale_hisher
		*set friend1_heshe gillgale_heshe
		*set friend1_himher gillgale_himher
		*set friend1_lover gillgale_lover
		*goto AfterEscaped
	*if (peterpetra_inparty) #${peterpetra_name}.
		*set friend1_name peterpetra_name
		*set friend1_hisher peterpetra_hisher
		*set friend1_heshe peterpetra_heshe
		*set friend1_himher peterpetra_himher
		*set friend1_lover peterpetra_lover
		*goto AfterEscaped
	*if (karlkarla_inparty) #${karlkarla_name}.
		*set friend1_name karlkarla_name
		*set friend1_hisher karlkarla_hisher
		*set friend1_heshe karlkarla_heshe
		*set friend1_himher karlkarla_himher
		*set friend1_lover karlkarla_lover
		*goto AfterEscaped
	*if (theothea_inparty) #${theothea_name}.
		*set friend1_name theothea_name
		*set friend1_hisher theothea_hisher
		*set friend1_heshe theothea_heshe
		*set friend1_himher theothea_himher
		*set friend1_lover theothea_lover
		*goto AfterEscaped
	*if (jacejess_inparty) #${jacejess_name}.
		*set friend1_name jacejess_name
		*set friend1_hisher jacejess_hisher
		*set friend1_heshe jacejess_heshe
		*set friend1_himher jacejess_himher
		*set friend1_lover jacejess_lover
		*goto AfterEscaped

*label AfterEscaped
*if (((gillgale_inparty) or (peterpetra_inparty)) and ((gillgale_name!=friend1_name) and (peterpetra_name!=friend1_name)))
	*if (gillgale_inparty)
		*set gillgale_inparty false
		*set prisoner1_name gillgale_name
		*set prisoner1_hisher gillgale_hisher
		*set prisoner1_heshe gillgale_heshe
		*set prisoner1_himher gillgale_himher
		*set prisoner1_lover gillgale_lover
		*goto SecondPrisoner
	*else
		*set peterpetra_inparty false
		*set prisoner1_name peterpetra_name
		*set prisoner1_hisher peterpetra_hisher
		*set prisoner1_heshe peterpetra_heshe
		*set prisoner1_himher peterpetra_himher
		*set prisoner1_lover peterpetra_lover
		*goto SecondPrisoner
*if ((karlkarla_inparty) and (karlkarla_name!=friend1_name))
	*set karlkarla_inparty false
	*set prisoner1_name karlkarla_name
	*set prisoner1_hisher karlkarla_hisher
	*set prisoner1_heshe karlkarla_heshe
	*set prisoner1_himher karlkarla_himher
	*set prisoner1_lover karlkarla_lover
	*goto SecondPrisoner
*if ((theothea_inparty) and (theothea_name!=friend1_name))
	*set theothea_inparty false
	*set prisoner1_name theothea_name
	*set prisoner1_hisher theothea_hisher
	*set prisoner1_heshe theothea_heshe
	*set prisoner1_himher theothea_himher
	*set prisoner1_lover theothea_lover
	*goto SecondPrisoner
*else
	*comment Must be JaceJess
	*set jacejess_inparty false
	*set prisoner1_name jacejess_name
	*set prisoner1_hisher jacejess_hisher
	*set prisoner1_heshe jacejess_heshe
	*set prisoner1_himher jacejess_himher
	*set prisoner1_lover jacejess_lover
	*goto SecondPrisoner

*label SecondPrisoner
*if ((karlkarla_inparty) and (karlkarla_name!=friend1_name))
	*set karlkarla_inparty false
	*set prisoner2_name karlkarla_name
	*set prisoner2_hisher karlkarla_hisher
	*set prisoner2_heshe karlkarla_heshe
	*set prisoner2_himher karlkarla_himher
	*set prisoner2_lover karlkarla_lover
	*goto AfterPrisoner
*if ((theothea_inparty) and (theothea_name!=friend1_name))
	*set theothea_inparty false
	*set prisoner2_name theothea_name
	*set prisoner2_hisher theothea_hisher
	*set prisoner2_heshe theothea_heshe
	*set prisoner2_himher theothea_himher
	*set prisoner2_lover theothea_lover
	*goto AfterPrisoner
*else
	*comment Must be Jace/Jess
	*set jacejess_inparty false
	*set prisoner2_name jacejess_name
	*set prisoner2_hisher jacejess_hisher
	*set prisoner2_heshe jacejess_heshe
	*set prisoner2_himher jacejess_himher
	*set prisoner2_lover jacejess_lover
	*goto AfterPrisoner

*label AfterPrisoner
Unfortunately, ${prisoner1_name} and ${prisoner2_name} were captured and taken away to Selina's dungeons in Brightwater.  You knew that they would be heavily guarded, so you and ${friend1_name} decided to lay low until Selina let down her guard.  Together, you went to…
*label ChooseLocation
*choice
	#The Norgan Mountains in the far north.
		*set questdetails "the Norgan Mountains"
		And so you left Vernex to seek refuge in the Norgan Mountains.
		*goto AfterCreation
	#The old capital city of Tornassa to the south of Vernex.
		*set questdetails "the city of Tornassa"
		And so you left Vernex to seek refuge in the grand city of Tornassa.
		*goto AfterCreation
	#The Academy of Wizards in the east.
		*set questdetails "the Academy of Wizards"
		And so you left Vernex to seek refuge at the Academy of Wizards.
		*goto AfterCreation
	#The wilderness in the west.
		*set questdetails "the wilderness"
		And so you left Vernex to seek refuge in the wilderness.
		*goto AfterCreation

*label AfterCreation
*gosub Finish_Setting_Up_Characters
*goto Summary

*label Summary
*choice
	#Please give me a summary of the story so far.
		Your name is ${name} and you were 12 years old when Alexander Zusak, the high-chancellor of the Consortium of Planewalkers, killed your parents.
		
		Thuja, his lackey, hired a band of mercenaries to break into the palace while Selina, another lackey, poisoned the banquet.  You barely escaped with the aid of
		*if (fosterparent_name="Sir Grady")
			Sir Grady, a retired old knight.
		*if (fosterparent_name="Amos")
			Amos, an old thief and escaped prisoner.
		*if (fosterparent_name="Lady Emaline")
			Lady Emaline, an old woman who used to be the royal assassin.
		*if (fosterparent_name="Sister Geri")
			Sister Geri, an old lady monk.
		
		Alexander Zusak stole an ancient Demonstone from the royal treasury that same night.  Harmond, your tutor, incanted a spell which tore Zusak's runebag open and spilled some of his Demonstones onto the floor, including the stolen one.  You took these treasures with you when you fled the castle.  The kingdom of Daria was dissolved and four duchies were created in its place.
		
		${fosterparent_name} took you to the small town of Elmvale where ${fosterparent_heshe} raised you as ${fosterparent_hisher} own.  You worked with ${theothea_name}, a mountain-${theothea_manwoman} from the Norgan Mountains, where you utilized your
		*if (title="priest")
			priestly
		*if (title!="priest")
			${title}
		talents.
		*if (god_name!="None")
			
			You grew in your faith of ${god_name},
			*if (god_good)
				the embodiment of light, compassion, healing, justice, truth, kindness and all that is good in the world.
			*if (god_good=false)
				the embodiment of darkness, shadows, disease, corruption, deceit and all that is evil in the world.
		
		Later, you joined up with ${jacejess_name}, a Soulburner, ${karlkarla_name}, an archer, and ${childhoodfriend_name}, your childhood friend who had become
		*if ((childhoodfriend_name="Peter") or (childhoodfriend_name="Petra"))
			a holy warrior.
		*if ((childhoodfriend_name="Gill") or (childhoodfriend_name="Gale"))
			a skilled thief.
		Together, you raided a Som'reth stronghold and found an unregistered Demonstone.
		*if (lover_exists)
			You found love in the arms of ${lover_name}, spending an enjoyable winter in Elmvale together.
		
		You took the stone to Vernex in order to gain entrance to the Consortium of Planewalkers' compound.  The confrontation with Alexander Zusak was a disaster and you were thrown in the dungeon.  Zusak intended to torture you in order to take back the Demonstone you had stolen from him all those years ago.
		
		${fosterparent_name} 
		*if (deadfriend_name!="None")
			and ${deadfriend_name} were
		*if (deadfriend_name="None")
			was
		killed during your escape, but helped you to kill Thuja.  ${prisoner1_name} and ${prisoner2_name} were captured and taken to Selina's dungeon in Brightwater.
		
		You escaped with
		*if (friend2_exists)
			${friend1_name} and ${friend2_name}.  ${friend2_name} traveled to Brightwater to prepare for your return.  You left Vernex with ${friend1_name}
		*if (friend2_exists=false)
			${friend1_name}
		and are traveling to ${questdetails} in order to hide from Zusak while you wait for Selina to let down her guard so you can rescue your friends.
		*page_break Play The Lost Heir 2: Forging a Kingdom
		*goto EndIntro
	#Continue the story without a summary.
		*goto EndIntro
*label EndIntro
*goto_scene exile

*label Finish_Setting_Up_Characters
*set runebag true
*set backpack true
*set sleepingroll true
*set waterskin true
*set flintandsteel true
*if (gender="male")
	*set princeprincess "prince"
	*set brothersister "brother"
	*set monk_veri "Verilus"
	*set mastermistress "master"
	*set priestpriestess "priest"
	*set mc_heshe "he"
	*set mc_hisher "his"
	*set mc_himher "him"
	*set mc_manwoman "man"
	*set kingqueen "king"
*if (gender="female")
	*set princeprincess "princess"
	*set brothersister "sister"
	*set monk_veri "Verilia"
	*set mastermistress "mistress"
	*set priestpriestess "priestess"
	*set mc_heshe "she"
	*set mc_hisher "her"
	*set mc_himher "her"
	*set mc_manwoman "woman"
	*set kingqueen "queen"
*if (childhoodfriend_name="Peter")
	*set peterpetra_name "Peter"
	*set peterpetra_hisher "his"
	*set peterpetra_himher "him"
	*set peterpetra_heshe "he"
*if (childhoodfriend_name="Gill")
	*set gillgale_name "Gill"
	*set gillgale_hisher "his"
	*set gillgale_himher "him"
	*set gillgale_heshe "he"
*if (childhoodfriend_name="Petra")
	*set peterpetra_name "Petra"
	*set peterpetra_hisher "her"
	*set peterpetra_himher "her"
	*set peterpetra_heshe "she"
*if (childhoodfriend_name="Gale")
	*set gillgale_name "Gale"
	*set gillgale_hisher "her"
	*set gillgale_himher "her"
	*set gillgale_heshe "she"
*if ((childhoodfriend_name="Gill") or (childhoodfriend_name="Gale"))
	*set peterpetra_inparty false
	*set gillgale_lover childhoodfriend_lover
	*set gillgale_relationship childhoodfriend_relationship
	*set gillgale_sleptwith childhoodfriend_sleptwith
	*set gillgale_injured childhoodfriend_injured
	*set gillgale_dead childhoodfriend_dead
	*set gillgale_story childhoodfriend_story
*if ((childhoodfriend_name="Peter") or (childhoodfriend_name="Petra"))
	*set gillgale_inparty false
	*set peterpetra_lover childhoodfriend_lover
	*set peterpetra_relationship childhoodfriend_relationship
	*set peterpetra_sleptwith childhoodfriend_sleptwith
	*set peterpetra_injured childhoodfriend_injured
	*set peterpetra_dead childhoodfriend_dead
	*set peterpetra_story childhoodfriend_story
*if (lover_exists)
	*if ((lover_name="Peter") or (lover_name="Petra"))
		*set lover_name peterpetra_name
		*set lover_hisher peterpetra_hisher
		*set lover_himher peterpetra_himher
		*set lover_heshe peterpetra_heshe
		*set peterpetra_lover true
	*if ((lover_name="Gill") or (lover_name="Gale"))
		*set lover_name gillgale_name
		*set lover_hisher gillgale_hisher
		*set lover_himher gillgale_himher
		*set lover_heshe gillgale_heshe
		*set gillgale_lover true
	*if ((lover_name="Theo") or (lover_name="Thea"))
		*set lover_name theothea_name
		*set lover_hisher theothea_hisher
		*set lover_himher theothea_himher
		*set lover_heshe theothea_heshe
		*set theothea_lover true
	*if ((lover_name="Karl") or (lover_name="Karla"))
		*set lover_name karlkarla_name
		*set lover_hisher karlkarla_hisher
		*set lover_himher karlkarla_himher
		*set lover_heshe karlkarla_heshe
		*set karlkarla_lover true
	*if ((lover_name="Jace") or (lover_name="Jess"))
		*set lover_name jacejess_name
		*set lover_hisher jacejess_hisher
		*set lover_himher jacejess_himher
		*set lover_heshe jacejess_heshe
		*set jacejess_lover true
*if (prisoner1_name=gillgale_name)
	*set prisoner1_hisher gillgale_hisher
	*set prisoner1_heshe gillgale_heshe
	*set prisoner1_himher gillgale_himher
	*set prisoner1_lover gillgale_lover
	*set prisoner1_relationship gillgale_relationship
*if (prisoner1_name=peterpetra_name)
	*set prisoner1_hisher peterpetra_hisher
	*set prisoner1_heshe peterpetra_heshe
	*set prisoner1_himher peterpetra_himher
	*set prisoner1_lover peterpetra_lover
	*set prisoner1_relationship peterpetra_relationship
*if (prisoner1_name=karlkarla_name)
	*set prisoner1_hisher karlkarla_hisher
	*set prisoner1_heshe karlkarla_heshe
	*set prisoner1_himher karlkarla_himher
	*set prisoner1_lover karlkarla_lover
	*set prisoner1_relationship karlkarla_relationship
*if (prisoner1_name=theothea_name)
	*set prisoner1_hisher theothea_hisher
	*set prisoner1_heshe theothea_heshe
	*set prisoner1_himher theothea_himher
	*set prisoner1_lover theothea_lover
	*set prisoner1_relationship theothea_relationship
*if (prisoner1_name=jacejess_name)
	*set prisoner1_hisher jacejess_hisher
	*set prisoner1_heshe jacejess_heshe
	*set prisoner1_himher jacejess_himher
	*set prisoner1_lover jacejess_lover
	*set prisoner1_relationship jacejess_relationship
*if (prisoner2_name=gillgale_name)
	*set prisoner2_hisher gillgale_hisher
	*set prisoner2_heshe gillgale_heshe
	*set prisoner2_himher gillgale_himher
	*set prisoner2_lover gillgale_lover
*if (prisoner2_name=peterpetra_name)
	*set prisoner2_hisher peterpetra_hisher
	*set prisoner2_heshe peterpetra_heshe
	*set prisoner2_himher peterpetra_himher
	*set prisoner2_lover peterpetra_lover
*if (prisoner2_name=karlkarla_name)
	*set prisoner2_hisher karlkarla_hisher
	*set prisoner2_heshe karlkarla_heshe
	*set prisoner2_himher karlkarla_himher
	*set prisoner2_lover karlkarla_lover
*if (prisoner2_name=theothea_name)
	*set prisoner2_hisher theothea_hisher
	*set prisoner2_heshe theothea_heshe
	*set prisoner2_himher theothea_himher
	*set prisoner2_lover theothea_lover
*if (prisoner2_name=jacejess_name)
	*set prisoner2_hisher jacejess_hisher
	*set prisoner2_heshe jacejess_heshe
	*set prisoner2_himher jacejess_himher
	*set prisoner2_lover jacejess_lover
*set theothea_inparty false
*set gillgale_inparty false
*set peterpetra_inparty false
*set karlkarla_inparty false
*set jacejess_inparty false
*if (friend1_name=peterpetra_name)
	*set friend1_hisher peterpetra_hisher
	*set friend1_heshe peterpetra_heshe
	*set friend1_himher peterpetra_himher
	*set friend1_lover peterpetra_lover
	*set friend1_sleptwith peterpetra_sleptwith
	*set peterpetra_inparty true
	*goto Friend1_Loaded
*if (friend1_name=gillgale_name)
	*set friend1_hisher gillgale_hisher
	*set friend1_heshe gillgale_heshe
	*set friend1_himher gillgale_himher
	*set friend1_lover gillgale_lover
	*set friend1_sleptwith gillgale_sleptwith
	*set gillgale_inparty true
	*goto Friend1_Loaded
*if (friend1_name=karlkarla_name)
	*set friend1_hisher karlkarla_hisher
	*set friend1_heshe karlkarla_heshe
	*set friend1_himher karlkarla_himher
	*set friend1_lover karlkarla_lover
	*set friend1_sleptwith karlkarla_sleptwith
	*set karlkarla_inparty true
	*goto Friend1_Loaded
*if (friend1_name=theothea_name)
	*set friend1_hisher theothea_hisher
	*set friend1_heshe theothea_heshe
	*set friend1_himher theothea_himher
	*set friend1_lover theothea_lover
	*set friend1_sleptwith theothea_sleptwith
	*set theothea_inparty true
	*goto Friend1_Loaded
*if (friend1_name=jacejess_name)
	*set friend1_hisher jacejess_hisher
	*set friend1_heshe jacejess_heshe
	*set friend1_himher jacejess_himher
	*set friend1_lover jacejess_lover
	*set friend1_sleptwith jacejess_sleptwith
	*set jacejess_inparty true
	*goto Friend1_Loaded
*label Friend1_Loaded
*if (deadfriend_name!="None")
	*comment Someone died, clear friend2
	*set friend2_exists false
	*goto Friend2_Loaded
*set friend2_exists true
*if (friend2_name=peterpetra_name)
	*set friend2_hisher peterpetra_hisher
	*set friend2_heshe peterpetra_heshe
	*set friend2_himher peterpetra_himher
	*set friend2_lover peterpetra_lover
	*set friend2_sleptwith peterpetra_sleptwith
	*set peterpetra_inparty true
	*goto Friend2_Loaded
*if (friend2_name=gillgale_name)
	*set friend2_hisher gillgale_hisher
	*set friend2_heshe gillgale_heshe
	*set friend2_himher gillgale_himher
	*set friend2_lover gillgale_lover
	*set friend2_sleptwith gillgale_sleptwith
	*set gillgale_inparty true
	*goto Friend2_Loaded
*if (friend2_name=karlkarla_name)
	*set friend2_hisher karlkarla_hisher
	*set friend2_heshe karlkarla_heshe
	*set friend2_himher karlkarla_himher
	*set friend2_lover karlkarla_lover
	*set friend2_sleptwith karlkarla_sleptwith
	*set karlkarla_inparty true
	*goto Friend2_Loaded
*if (friend2_name=theothea_name)
	*set friend2_hisher theothea_hisher
	*set friend2_heshe theothea_heshe
	*set friend2_himher theothea_himher
	*set friend2_lover theothea_lover
	*set friend2_sleptwith theothea_sleptwith
	*set theothea_inparty true
	*goto Friend2_Loaded
*if (friend2_name=jacejess_name)
	*set friend2_hisher jacejess_hisher
	*set friend2_heshe jacejess_heshe
	*set friend2_himher jacejess_himher
	*set friend2_lover jacejess_lover
	*set friend2_sleptwith jacejess_sleptwith
	*set jacejess_inparty true
	*goto Friend2_Loaded
*label Friend2_Loaded
*if (deadfriend_name=gillgale_name)
	*set deadfriend_name gillgale_name
	*set deadfriend_hisher gillgale_hisher
	*set deadfriend_heshe gillgale_heshe
	*set deadfriend_himher gillgale_himher
	*set gillgale_dead true
*if (deadfriend_name=peterpetra_name)
	*set deadfriend_name peterpetra_name
	*set deadfriend_hisher peterpetra_hisher
	*set deadfriend_heshe peterpetra_heshe
	*set deadfriend_himher peterpetra_himher
	*set peterpetra_dead true
*if (deadfriend_name=karlkarla_name)
	*set deadfriend_name karlkarla_name
	*set deadfriend_hisher karlkarla_hisher
	*set deadfriend_heshe karlkarla_heshe
	*set deadfriend_himher karlkarla_himher
	*set karlkarla_dead true
*if (deadfriend_name=theothea_name)
	*set deadfriend_name theothea_name
	*set deadfriend_hisher theothea_hisher
	*set deadfriend_heshe theothea_heshe
	*set deadfriend_himher theothea_himher
	*set theothea_dead true
*if (deadfriend_name=jacejess_name)
	*set deadfriend_name jacejess_name
	*set deadfriend_hisher jacejess_hisher
	*set deadfriend_heshe jacejess_heshe
	*set deadfriend_himher jacejess_himher
	*set jacejess_dead true
*if (god_goddess="God")
	*set god_hisher "His"
	*set god_himher "Him"
	*set god_heshe "He"
*if (god_goddess="Goddess")
	*set god_hisher "Her"
	*set god_himher "Her"
	*set god_heshe "She"
*set friend3_exists true
*set friend4_exists true
*set friend3_name prisoner1_name
*set friend4_name prisoner2_name
*comment Fixing a potential error of multiple lovers.
*set theothea_lover false
*set karlkarla_lover false
*set jacejess_lover false
*set gillgale_lover false
*set peterpetra_lover false
*if (lover_exists)
	*if (lover_name=theothea_name)
		*set theothea_lover true
	*if (lover_name=karlkarla_name)
		*set karlkarla_lover true
	*if (lover_name=jacejess_name)
		*set jacejess_lover true
	*if (lover_name=gillgale_name)
		*set gillgale_lover true
	*if (lover_name=peterpetra_name)
		*set peterpetra_lover true
	*goto After_MultipleLover_BugFix
*else
	*set lover_name "None"
	*goto After_MultipleLover_BugFix
*label After_MultipleLover_BugFix
*set friend3_name prisoner1_name
*set friend3_hisher prisoner1_hisher
*set friend3_heshe prisoner1_heshe
*set friend3_himher prisoner1_himher
*set friend3_lover prisoner1_lover
*set friend4_name prisoner2_name
*set friend4_hisher prisoner2_hisher
*set friend4_heshe prisoner2_heshe
*set friend4_himher prisoner2_himher
*set friend4_lover prisoner2_lover
*set stage 1
*set prisonchild_hisher mc_hisher
*set prisonchild_heshe mc_heshe
*set prisonchild_himher mc_himher
*if (mc_hisher="his")
	*set prisonchild_boygirl "boy"
*if (mc_hisher="her")
	*set prisonchild_boygirl "girl"
*rand coinflip 1 2
*if (coinflip=1)
	*set tattooist_name "Sophie"
	*set tattooist_hisher "her"
	*set tattooist_heshe "she"
	*set tattooist_himher "her"
	*set tattooist_manwoman "woman"
*if (coinflip=2)
	*set tattooist_name "Sophus"
	*set tattooist_hisher "his"
	*set tattooist_heshe "he"
	*set tattooist_himher "him"
	*set tattooist_manwoman "man"
*return
