Cardhouses Implemented, plus work on Bathhouse

More stuff for the protagonist to be bored with.  ;)

story.ni

@@ -6,6 +6,8 @@ Use DICT_WORD_SIZE of 35.
 Include Simple Multimedia Effects by Mathbrush.
 Include Basic Screen Effects by Emily Short.
 
+When play begins: now right alignment depth is 15.
+
 The block sleeping rule is not listed in the check sleeping rulebook.
 
 A person has an indexed text called a full name.  Understand the full name property as describing a person.
@@ -15,19 +17,19 @@ The player's gender is indexed text that varies.
 
 Understand the printed name property as describing a thing.
 
-A species is a kind of value.  A person has a species.  The species are vrash, vashael, kalla, vohntrai, izerah, veserus, myrskor, myrghon, swaivshon, tesam, esseri, chakocha, and undefined.
+A species is a kind of value.  A person has a species.  The species are vrash, vashael, kalla, vohntrai, izerah, veserus, myrskor, myrghon, swaivshon, tesam, esseri, chakocha, phoenix, and undefined.
 
 The list of random dragon species is always {vrash, vashael, kalla, vohntrai, izerah, veserus, myrskor, myrghon, swaivshon}.
 
 A city record is a kind of value.  The city records are defined by the Table of Cities.  The current city is a city record that varies.  The current city is initially Ethriel.
 
-[A current city is a kind of value.  The current cities are defined by the Table of Cities.  [Ethriel, Edge of Paradise, Kylon, Galrien, Nowhere, Norvsiik, Comptichrak, Myrhigh, Korltian, Akaveach, Whinge, Kantin, Rhaltin, Dartroveiln, Kravakaneke, Woodwall, Kreskechrak, Nerevehn, Asere, Mosdenechrak, Zyrine, Inrakaveach, Rhakanin, Suvkeyanin, Hiakoreska, Corvuseach, Hyvaline, Wyranine, Vishen, Ghost Farm, Mivsiik, Baunt, Fishergon's Retreat, Stone River, Sea's Bounty, Viviveyrm, Sovesviik, Xanasal, Raldrani, Moriskiik, Ediveyrm, Izaeyaranth, Polser, Mania, Ztornaranth, Borochrak, Iron Hills, Shraneyrm, Isoss, Shibanyet, Korjek, Sorjek, Wild Edge, Norickhum, Phoenix Sea, Theoma's Limit, Zyaket, Inevrae, Iyanti, Mundanity, Rodrimor, Onayraye, Uskadi, Skrend, Oriaryo, Tearvek, Irovek, Kyvsiveiln, Memory of Esseri, Memory of Tesam, and Memory of Chakocha.]  The current city is usually Ethriel.]
+[Ethriel, Edge of Paradise, Kylon, Galrien, Nowhere, Norvsiik, Comptichrak, Myrhigh, Korltian, Akaveach, Whinge, Kantin, Rhaltin, Dartroveiln, Kravakaneke, Woodwall, Kreskechrak, Nerevehn, Asere, Mosdenechrak, Zyrine, Inrakaveach, Rhakanin, Suvkeyanin, Hiakoreska, Corvuseach, Hyvaline, Wyranine, Vishen, Ghost Farm, Mivsiik, Baunt, Fishergon's Retreat, Stone River, Sea's Bounty, Viviveyrm, Sovesviik, Xanasal, Raldrani, Moriskiik, Ediveyrm, Izaeyaranth, Polser, Mania, Ztornaranth, Borochrak, Iron Hills, Shraneyrm, Isoss, Shibanyet, Korjek, Sorjek, Wild Edge, Norickhum, Phoenix Sea, Theoma's Limit, Zyaket, Inevrae, Iyanti, Mundanity, Rodrimor, Onayraye, Uskadi, Skrend, Oriaryo, Tearvek, Irovek, Kyvsiveiln, Memory of Esseri, Memory of Tesam, and Memory of Chakocha.]
 
-Amenities are a kind of value.  The amenities are bathhouses, theaters, cardhouses, master artists, brothels, and bowling alleys.
+Amenities are a kind of value.  The amenities are bathhouses, theatres, cardhouses, master artists, museums, brothels, and bowling alleys.
 
 Table of Cities
 City Record	Local Amenities	Special Amenity
-Ethriel	{bathhouses, theaters, cardhouses, master artists, bowling alleys}	"Archive of Lost Things"
+Ethriel	{bathhouses, theatres, cardhouses, master artists, bowling alleys}	"Archive of Lost Things"
 
 A home in Ethriel is a truth state that varies.  A home in Ethriel is usually true.
 
@@ -51,10 +53,22 @@ An alloace spectrum is a kind of value.  The alloace spectrums are allosexual, s
 Displaying sheet is an action applying to nothing.  Understand "sheet" as displaying sheet.  Instead of displaying sheet:
 	say "This command has not yet been implemented."
 
+A bathhouse is a kind of room.
+
 A person has a number called a securityNum.  The securityNum of a person is usually 7.
 A person has a number called an entertainNum.  The entertainNum of a person is usually 7.
 A person has a number called a flightyRel.  The flightyRel of a person is usually 1.
 A person has a number called a firmRel.  The firmRel of a person is usually 1.
+A person has a number called a Reserve.  The Reserve of a person is usually 1.
+A person has a number called a Libido.  The Libido of a person is usually -1.
+A person has a number called a maxGeomInterface.  The maxGeomInterface of a person is usually 12.
+A person has a number called a geomInterface.  The geomInterface of a person is usually 12.
+
+A person has a truth state called IsAGhost.  IsAGhost is usually false.
+
+A person has a number called fantasizeCooldown.  The fantasizeCooldown of a person is usually 0.
+A person has a number called theatreCooldown.  The theatreCooldown of a person is usually 0.
+A person has a number called cardhouseCooldown.  The cardhouseCooldown of a person is usually 0.
 
 DateDayKelkaith is a number that varies. DateDayKelkaith is usually 25.
 DateMonthKelkaith is a number that varies. DateMonthKelkaith is usually 3.
@@ -233,13 +247,13 @@ This is the turnpass rule:
 		If the entertainNum of the player > 8:
 			say "You feel your elation fading.";
 			now the entertainNum of the player is the entertainNum of the player - 1;
-		Otherwise if the entertainNum of the player > 6:
+		Otherwise if the entertainNum of the player > 7:
 			say "You're starting to feel a bit bored.";
 			now the entertainNum of the player is the entertainNum of the player - 1;
-		Otherwise if the entertainNum of the player > 4:
+		Otherwise if the entertainNum of the player > 5:
 			say "You feel like it's been far too long since you did something fun.";
 			now the entertainNum of the player is the entertainNum of the player - 1;
-		Otherwise if the entertainNum of the player > 2:
+		Otherwise if the entertainNum of the player > 3:
 			say "You're starting to feel depressed.";
 			now the entertainNum of the player is the entertainNum of the player - 1;
 		Otherwise if the entertainNum of the player > 0:
@@ -263,6 +277,9 @@ This is the turnpass rule:
 		If the entertainNum of the player > 0:
 			now the entertainNum of the player is the entertainNum of the player - 1;
 			say "So beset are you by anxiety that you're questioning the value of immortality.  Do you really want to feel this way forever?";
+	If the securityNum of the player > 0 and a random chance of 1 in 100 succeeds:
+		say "[daydreaming]";
+		Now the entertainNum of the player is the entertainNum of the player + 1;
 	If TimekeepingVar is 3:
 		Now DateDayKelkaith is DateDayKelkaith + 1;
 		Now DateDayTachamund is DateDayTachamund + 1;
@@ -285,11 +302,23 @@ This is the turnpass rule:
 		If DateDayKelkaith is 36:
 			Now DateDayKelkaith is 1;
 			Now DateMonthKelkaith is DateMonthKelkaith + 1;
+			now the geomInterface of the player is geomInterface of the player + 1;
 	If DateDayTachamund is 29:
 		Now DateDayTachamund is 1;
 		Now DateMonthTachamund is DateMonthTachamund + 1;
 	If DateMonthTachamund is 14:
 		Now DateMonthTachamund is 1;
+	If geomInterface of the player > maxGeomInterface of the player:
+		now geomInterface of the player is maxGeomInterface of the player;
+	If geomInterface of the player < 1:
+		If the IsAGhost of the player is false:
+			end the story saying "Unfortunately, these are final hours.  Did you expect this?  As your occulted geomantic interface splinters into small fragments, you become aware of an infinite blue void studded with stars.  As you fall away from Theoma, among your last thoughts before nepenthe sweeps you is that you have died of poorly controlled necromantic wasting.";
+	If the fantasizeCooldown of the player > 0:
+		now the fantasizeCooldown of the player is the fantasizeCooldown of the player - 1;
+	If the theatreCooldown of the player > 0:
+		now the theatreCooldown of the player is the theatreCooldown of the player - 1;
+	If the cardhouseCooldown of the player > 0:
+		now the cardhouseCooldown of the player is the cardhouseCooldown of the player - 1;
 
 This is the zombiesleep rule:
 	say "You can't help yourself any longer.  You wander off, semi-conscious, and find somewhere to fall asleep.";
@@ -322,8 +351,8 @@ When play begins:
 
 Table of Fancy Status
 left	central	right
-"[Current Time and Date]"	"[Location]"	""
+"[Current Time and Date]"	"[Location]"	"Pain: [Pain Indicator]"
-"Mood: [Boredom Indicator]"	"Confidence: [Security Indicator]"	""
+"Mood: [Boredom Indicator]"	"Confidence: [Security Indicator]"	"Hunger: [Hunger Indicator]"
 
 To say Boredom Indicator:
 	If entertainNum of the player > 8:
@@ -348,6 +377,48 @@ To say Security Indicator:
 		say "Anxious";
 	Otherwise:
 		say "Broken";
+		
+To say Pain Indicator:
+	Let PainCount be 0;
+	If entertainNum of the player < 3:
+		Now PainCount is PainCount + (3 - entertainNum of the player);
+	If securityNum of the player < 4:
+		Now PainCount is PainCount + 1;
+	If securityNum of the player < 2:
+		Now PainCount is PainCount + 1;
+	If securityNum of the player is 0:
+		Now PainCount is PainCount + 2;
+	If maxGeomInterface of the player > geomInterface of the player:
+		Now PainCount is PainCount + (maxGeomInterface of the player - geomInterface of the player);
+	If PainCount is 0:
+		say "None";
+	If PainCount is 1:
+		say "None?";
+	If PainCount is 2:
+		say "Mild Aching";
+	If PainCount is 3:
+		say "Aching";
+	If PainCount is 4:
+		say "Wearying";
+	If PainCount is 5:
+		say "Exhausting";
+	If PainCount is 6:
+		say "Grimacing";
+	If PainCount is 7:
+		say "Stabbing";
+	If PainCount is 8:
+		say "Great";
+	If PainCount is 9:
+		say "Tremendous";
+	If PainCount is 10:
+		say "Crippling";
+	If PainCount is 11:
+		say "Dying";
+	If PainCount > 11:
+		say "Undeath";
+
+To say Hunger Indicator:
+	say "Debug".
 
 Rule for constructing the status line:
 	fill status bar with Table of Fancy Status;
@@ -1032,6 +1103,10 @@ To decide which XP counter is the (S - a skill) counter tallying (P - a person):
 	say "[bold type]BUG:[roman type] I tried to find the [S] XP counter for [P], but I couldn't find it.";
 	decide on nothing.  [uh-oh]
 
+To decide which number is the (S - a skill) level of (P - a person):
+	let X be the S counter tallying P;
+	decide on the level of X.
+
 To give (N - a number) XP to (P - a person) in (S - a skill):
 	If the alloace spectrum of P is sex-repulsed asexual:
 		If S is sex appeal:
@@ -1373,6 +1448,12 @@ To decide which text is a randomly generated name:
 
 The list of non-travelgon jobs is always {merchantgon, servicegon, laborgon, wildgon, agrigon, craftsgon, unemployed}.
 
+To decide which number is the count/number of (needle - value of kind K) entries in (haystack - list of Ks):
+	let tally be 0;
+	repeat with candidate running through haystack:
+		if candidate is needle, now tally is tally + 1;
+	decide on tally.
+
 To procgen (NPC - a person):
 	now the description of NPC is a random item from the list of random NPC description templates;	now the species of NPC is a random item from the list of random dragon species;
 	If the species of NPC is kalla or the species of NPC is esseri or the species of NPC is vohntrai or the species of NPC is chakocha or the species of NPC is myrskor or the species of NPC is myrghon:
@@ -1393,6 +1474,28 @@ To procgen (NPC - a person):
 				break;
 	now the age of NPC is a random number between 100 and 1227;
 	now the printed name of NPC is a randomly generated name;
+	If the alloace spectrum of the player is sex-repulsed asexual:
+		now the alloace spectrum of NPC is sex-repulsed asexual;
+		now the libido of NPC is 0;
+	Otherwise:
+		now the alloace spectrum of NPC is allosexual;
+		let sex num one be the number of sex pest entries in the career history of the player;
+		let sex num two be the number of physical dissolutionist entries in the career history of the player;
+		let sex bias be sex num one + sex num two;
+		now sex bias is sex bias + 1;
+		let libido conf be 1;
+		let libido possibility be 1;
+		repeat with counter running from 1 to sex bias:
+			let libido possibility be a random number between 1 and 13;
+			if libido possibility > libido conf:
+				now libido conf is libido possibility;
+			if libido conf is 13:
+				break;
+		now libido conf is libido possibility;
+		now the libido of NPC is libido conf;
+	If a random chance of 1 in 200 succeeds:
+		now the alloace spectrum of NPC is sex-positive asexual;
+	now the reserve of NPC is a random number between 1 and 25;
 	[todo: randomize gender; requires an extension that implements more complicated gender]
 
 To decide which text is the epidermis of (spe - a species):
@@ -1416,7 +1519,7 @@ Definition: a person (called The Dude) is ambiguously-named:
 		if the printed name of candidate is the printed name of The Dude, decide yes;
 	decide no.
 
-When play begins:
+When You Are In Ethriel begins:
 	repeat with dude running through the people in Your Favorite Bathhouse in Ethriel:
 		if dude is the player, next;
 		procgen dude.
@@ -1453,6 +1556,11 @@ Theatre Secondlink	"theatres"	"[visiting a theatre in Ethriel]"
 Visiting an Ethriel Bathhouse	"visit bathhouse"	"[visiting a bathhouse in Ethriel]"
 Bathhouse Secondlink	"bathhouses"	"[visiting a bathhouse in Ethriel]"
 Relaxing in an Ethriel Bathhouse	"relax"	"[relaxing in a bathhouse in Ethriel]"
+Fantasizing at Home in Ethriel	"fantasize"	"[fantasizing in Ethriel]"
+Cardhouses Link	"cardhouses"	"[cardhouses in Ethriel]"
+
+To say cardhouses in Ethriel:
+	try visiting a cardhouse;
 
 To say seeking rest in Ethriel:
 	If the location is Your Sort-Of Home in Ethriel:
@@ -1473,11 +1581,16 @@ To say visiting a bathhouse in Ethriel:
 	Otherwise:
 		playerport to Your Favorite Bathhouse in Ethriel.
 		
-To say relaxing in a bathhouse in Ethriel:
+Relaxing is an action applying to nothing.  Understand "relax" as relaxing.
+
+Instead of relaxing when the player is in Your Favorite Bathhouse in Ethriel:
 	say "You find somewhere calm and comfortable, and just rest.  The land gods favor you with a basic spell of cleanliness.  The world is pure, good, and gentle.";
 	now securitynum of the player is securitynum of the player + 1;
 	follow the turnpass rule.
 
+To say relaxing in a bathhouse in Ethriel:
+	try relaxing;
+
 To say Location Command Block in Ethriel:
 	say "'[EthrielLink Seeking Entertainment in Ethriel]' will bring you to the entertainment options for your current city, '[EthrielLink Going Home in Ethriel]' will take you to your home, or to your room at a local inn if you haven't got a home in this town, 'seek work' will take you to the daywork options screen, 'seek cargo' will take you to a mercantile clearinghouse (also the destination for delivering cargo), or 'seek nature' to go hunting, gathering, or just relax in nature (doesn't work in some cities).  'Seek food' will give you the civilized restaurant and grocery options (if available).  You can also 'depart' to go to another city if your preparations are adequate."
 		
@@ -1512,7 +1625,7 @@ To say accessing the calendar in Ethriel:
 To say sleeping in Ethriel:
 	try sleeping;
 
-Your Favorite Bathhouse in Ethriel is a room.  "Ethriel is on the short, prestigious list of theomes renowned for its public bathhouses.  Most of the bathhouses in Theoma have separated sex-positive and sex-negative baths.  The hot water is delightful either way, but the vibe is very different.  [if the alloace spectrum of the player is sex-repulsed asexual]You, of course, are in the sex-negative side of the baths.  You're allowed to flirt here, but you'll never see anything more explicit than a kiss.[otherwise]You are in the sex-positive side of the baths.  Public displays of sexuality are acceptable but never compulsory here.[end if]
+Your Favorite Bathhouse in Ethriel is a room.  Your Favorite Bathhouse in Ethriel is a bathhouse.  "Ethriel is on the short, prestigious list of theomes renowned for its public bathhouses.  Most of the bathhouses in Theoma have separated sex-positive and sex-negative baths.  The hot water is delightful either way, but the vibe is very different.  [if the alloace spectrum of the player is sex-repulsed asexual]You, of course, are in the sex-negative side of the baths.  You're allowed to flirt here, but you'll never see anything more explicit than a kiss.[otherwise]You are in the sex-positive side of the baths.  Public displays of sexuality are acceptable but never compulsory here.[end if]
 
 Off to the side, you see a [if the alloace spectrum of the player is sex-repulsed asexual]vrash lounging with a small vrash who is almost certainly their child.[otherwise]trio of vrash groping each other.  One of them is out of the water with her tail raised over the pool, and another has his nose pushed forward to take advantage.[end if]  This kind of scene is pretty normal here.
 
@@ -1525,11 +1638,40 @@ There are 2 privately-named proper-named people in Your Favorite Bathhouse in Et
 
 Your Sort-Of Home in Ethriel is a room.  "This isn't really your home anymore, now that you've quit your job and resolved to go adventuring.  You'll be gone for years, so you imagine.  This traveling is going to be your new career.  Are you going to come back to Ethriel at the end of your journey?  If you're just going to move away, you should probably sell your home.  Otherwise, it'll sit here gathering dust in your absence.
 
-Local commands:  You have some books and bookgems in the home (potentially quite a lot if you've been an authorgon or philosophygon).  'Check library' will yield a list of notable titles.  If anyone is traveling with you and staying in your room as they do, you may 'talk to' them.
+Local commands:  You have some books and bookgems in the home (potentially quite a lot if you've been an authorgon or philosophygon).  'Check library' will yield a list of notable titles.  You can try to amuse yourself with the power of your mind alone using the '[EthrielLink fantasizing at home in Ethriel]' command, but it'll get old pretty quick.  If anyone is traveling with you and staying in your room as they do, you may 'talk to' them.
 
 Area Change commands:  [Location Command Block in Ethriel]
 Personal Commands:  [Personal Command Block in Ethriel]"
 
+Fantasizing is an action applying to nothing.  Understand "fantasize" as fantasizing.  Instead of fantasizing when current city is Ethriel and chargencondition is false:
+	If the entertainNum of the player is 10:
+		say "You feel way too good to waste time sitting around lost in thought.";
+	Otherwise:
+		try silently going home;
+		If the fantasizeCooldown of the player is 0:
+			say "[daydreaming]";
+			now entertainNum of the player is entertainNum of the player + 1;
+			now the fantasizeCooldown of the player is 56;
+			follow the turnpass rule;
+		Otherwise:
+			say "You've been doing that a lot lately.  Are you sure you want to?";
+			If player consents:
+				let fantasizechance be a random number between 1 and the fantasizeCooldown of the player;
+				If a random chance of 1 in fantasizechance succeeds:
+					say "[daydreaming]";
+					now entertainNum of the player is entertainNum of the player + 1;
+					now the fantasizeCooldown of the player is 56;
+				Otherwise:
+					say "You try to focus yourself on a fantasy about [a random item from the list of daydreams].  It works, kind of, you think about it...  you waste time...  it stings.  Ugh.  You're so bored.  Sitting around doing nothing like this is dreadful.";
+				now entertainNum of the player is entertainNum of the player - 1;
+				follow the turnpass rule;
+			Otherwise:
+				stop the action;
+
+To say fantasizing in Ethriel:
+	try fantasizing
+
+
 A check sleeping rule:
 	If the TirednessVar of the player is less than 3:
 		say "You're not sleepy.";
@@ -1586,6 +1728,11 @@ valence	subject
 "confusing"	{"phoenixes", "friendly bugs", "eating in a fancy restaurant where you don't recognize any of the food items", "dancing with a weird thing", "tracing a complicated knot", "cutting the world apart with your claws", "getting lost in an endless temple", "getting lost in a ruined city", "chasing something between several different worlds", "time travel", "playing an extremely complicated game", "a chaotic mishmash of images", "a friendly being whose shape changes constantly", "being too drunk to function", "performing in a play whose lines you don't know", "reciting a nonsensical poem", "doing math", "an otter the size of Theoma", "meditating in a land of endless fire", "contemplating a beautiful, shifting pattern", "dragons who can't say anything directly, but who can only speak in jokes, puns, and innuendo", "being a hive-mind", "being a thing made of lightning that cannot see or speak, yet interacts with the world nonetheless", "nothing you can remember", "trying to solve a shifting puzzle", "watching a poorly written play", "trying to assemble a complicated machine", "navigating a crowded space while blind", "struggling to wake up from a series of harmless dreamspaces", "studying a bizarre creature", "flipping through a book of illustrations drawn from moments in your life when you were baffled", "an endless stream of nonsensical text", "disjointed mathematical equations", "trying to solve a riddle featuring three scammergons and an honest merchantgon", "an impossible city where the direction of gravity changes from surface to surface", "getting lost in an infinite city", "running a citystate", "studying nonsensical equations that someone has assured you are key to creating entire worlds out of magic", "trying to write a story, but changing your mind every few sentences about what the story is about", "being threatened in comically implausible ways", "an infinite city", "an infinite maze", "a chaotically structured and electrified mesh that you can't touch without being jolted, but which you feel compelled to study intently", "talking to a fire", "being lectured by shadows", "exploring a pale forest inhabited by ghosts"}
 "bad"	{"bugs", "not having wings", "fleshy pink things"," demonic entities", "phoenixes", "scenes of tremendous violence", "ruined cities", "giant dragon-eating predators", "babbling nonsense every time you try to talk", "useless legs", "paralysis", "hurting a friend", "snoutless dragons", "toothy monstrosities", "meat moss", "fire", "drowning", "hearing voices", "being wounded", "burying a loved one", "a great calamity", "a vile deception from someone you trusted", "flooding", "a blizzard", "salad", "an otter the size of Theoma", "doing math", "burning in a land of endless fire", "being attacked by a mad ghost", "trying to interact with other dragons while having a stiff, emotionless face", "nothing you can remember", "fighting for your life", "watching a play designed to personally insult you", "falling", "yourself as a zombie", "exploring a landscape of candy where everything is half-eaten, sticky, and stinky with decay", "being ravenous in a world where all the food is rotten", "your teeth falling out", "repeatedly waking up from a nightmare only to discover it is still ongoing", "flipping through a book of illustrations drawn from unpleasant moments in your own life", "having to write a self-insulting sentence many times over with a pen that draws your own blood to convert it into ink", "running a citystate amidst disaster", "discovering a horrifying truth about reality that, thankfully, no longer makes sense after you wake up", "trying to create a world, but the dragons of your world are impossibly evil", "trying to create a world, but everything you attempt goes wrong", "exploring a pale forest inhabited by mad ghosts", "being a destitute wanderer dependent on handouts and hunting to get by"}
 
+To say daydreaming:
+	say "You find yourself thinking about [a random item from the list of daydreams].  The flight of fancy gets complicated and occupies your spare moments, entertaining you."
+
+The list of daydreams is always {"phoenixes", "talking with a friend", "a complex ever-expanding pattern", "talking with someone famous", "beautiful snowy weather", "a beautiful rainstorm", "a dramatic landscape of cliffs and vistas", "a forest", "going hunting", "eating your favorite foods", "a dream-like chaos of images", "a painting you really like", "a song you heard someone singing", "an instrumental piece apparently composed by your subconscious", "the city of Polser in Midwestern Kelkaith, largest city in the world", "the city of Zyrine in Central Tachamund, with its great flaming sigil in the sky above it", "the city of Mosdenechrak in Central Tachamund, where amazing food is nearly free", "Ethriel", "the former Marim League in the northern reaches of Tachamund", "the Three Memories in far-eastern Kelkaith, where the ancient ghosts of prior worlds have created a fantastically wealthy economy", "Baunt, a city in Midwestern Kelkaith that's said to have bathhouses as nice as those of Ethriel", "the winter sports league in Ztornaranth, on the western edge of midwestern Kelkaith", "the city of Suvkeyanin in Western Tachamund, the world's second largest city (after Polser)", "the city of Shibanyet in Northern Kanjamund, said to be the world's happiest city", "the city of Korjek in Northern Kanjamund, said to be the most tourist-oriented necromantic economy in the world", "Edge of Paradise, directly north of Ethriel on the edge of the world, said to have roads leading out of the world into small, wealthy demiplanes", "the philosopher kingdom of Isoss in far-western Kelkaith, Theoma's only monarchy", "the city of Theoma's Limit in the extreme south of Reytas, said to exist partially in the Firelands and to be perpetually covered in flames that repair dragons and objects rather than consuming them", "the city of Onayraye, the only city in the vast Ormerian interior, where vashael live wild and hunt", "the city of Rodrimor, on the southern coast of Ormeri, a city of cosmopolitan spice-farmers who grow an astonishing range of high-value crops for worldwide export", "the holy city of Ediveyrm, high in the mountains of the Serhin Range in Midwestern Kelkaith, where benevolent ghosts teach of religions from this world and the worlds preceding it", "a beautiful, shifting pattern", "a story you enjoyed", "writing a story", "snatches of a poem you remember so poorly that you suspect you're composing it anew", "a complex pattern of interlocking clockworks", "shopping with an unlimited budget", "sacred architecture", "fighting a mad ghost", "a landscape made of candy", "mentally creating a world", "getting into a snowball fight", "performing aerobatic tricks in the sky", "running a citystate", "trying to interact with other dragons while having a stiff, emotionless face", "a city catching fire", "watching a play designed to personally insult you", "watching a performance of your favorite play, with the actors ad-libbing replacements for some of the scenes", "designing a puzzle for other dragons to solve", "getting lost in an endless temple", "getting lost in a city", "innuendo", "being a shapeshifter", "the city-domes of Ethriel", "kalla fashion", "the process of thinking itself", "some theology you heard once", "crystals", "the city of Raldrani in Midwestern Kelkaith, famous for its glassworks", "the city of Xanasal in Midwestern Kelkaith, famous for the land god who lives there in a mountain-sized form", "the city of Phoenix Sea in the extreme south of Theoma, on the subcontinent known as The Embassy, which connects to a body of 'water' in the Firelands and has tons of phoenixes in residence", "being able to casually summon food the way land gods and ghosts can", "the things you'd do if you had the world-warping powers available to advanced necromancers", "one of the many times your school took you to a casino in youth, helping you to master probabillity control with geomancy", "some of the geomantic theory you invoke in your daily divinations"}.
+
 Your Room in an Ethriel Inn is a room.  "You've lived in Ethriel for years, but now you've no home here.  The inn charges nightly...  Your room is nice, but small.  It's just one of many.  You've got a blue-padded nest to sleep in and some art on the wall to appreciate, if you like a painting of a rare steak and some fruit.
 
 Local commands:  You can 'sleep' or 'read a book' here.  If you want to read a specific book or bookgem, 'read <title>' will focus on it.  If anyone is traveling with you and staying in your room as they do, you may 'talk to' them.
@@ -1593,29 +1740,151 @@ Local commands:  You can 'sleep' or 'read a book' here.  If you want to read a s
 Area Change commands:  [Location Command Block in Ethriel]
 Personal Commands:  [Personal Command Block in Ethriel]"
 
-Entertainment Options in Ethriel is a room.  "Ethriel has a lot of pilgrimgons visiting the Archive of Lost Things, which gives it a touristgon economy.  It has many options for entertainments.  Really, it's no wonder you lived here for so long.  There are [EthrielLink Theatre Secondlink], bowling alleys, [EthrielLink Bathhouse Secondlink], card houses, and the most famous museum in Theoma: The Archive of Lost Things.  You can also visit a master artgon to try to view recent paintings and potentially commission a new one, or a book shop to try to pick up a book or bookgem that might just be your new favorite.
+Entertainment Options in Ethriel is a room.  "Ethriel has a lot of pilgrimgons visiting the Archive of Lost Things, which gives it a touristgon economy.  It has many options for entertainments.  Really, it's no wonder you lived here for so long.  There are [EthrielLink Theatre Secondlink], bowling alleys, [EthrielLink Bathhouse Secondlink], [ethrielLink Cardhouses Link], and of course the most famous museum in Theoma: The Archive of Lost Things.  You can also visit a master artgon to try to view recent paintings and potentially commission a new one, or a book shop to try to pick up a book or bookgem that might just be your new favorite.
 
-Local commands:  The 'visit <type of venue> command will go to specific places.  '[EthrielLink Visiting an Ethriel Theatre]' to see a play, '[EthrielLink Visiting an Ethriel Bathhouse]' to visit a bathhouse, and so on.  'Visit a theatre' will also be recognized.  Of special note in this location is the 'visit museum' command, which will visit the Archive of Lost Things, the most notable landmark of Ethriel.
+Local commands:  The 'visit <type of venue> command will go to specific places.  '[EthrielLink Visiting an Ethriel Theatre]' to see a play, '[EthrielLink Visiting an Ethriel Bathhouse]' to visit a bathhouse, and so on.  'Visit a theatre' will also be recognized.  Of special note in this location is the 'visit museum' command, which would ordinarily visit a theatre, but in this location will visit the Archive of Lost Things, the most notable landmark of Ethriel.
 
 Area Change commands:  [Location Command Block in Ethriel]
 Personal Commands:  [Personal Command Block in Ethriel]"
 
-Understand "visit theatre" or "visit a theatre" as visiting a theatre.  Visiting a theatre is an action applying to nothing.  Instead of visiting a theatre in Entertainment Options in Ethriel:
+Understand "visit cardhouse" or "visit a cardhouse" or "visit card house" or "visit a card house" as visiting a cardhouse.  Visiting a cardhouse is an action applying to nothing.
-	sort the Table of Ethriel Plays in random order;
+
-	If there is a playyear of DateYear in the Table of Ethriel Plays:
+Instead of visiting a cardhouse while current city is Ethriel:
-		say "You attend [the play corresponding to a playyear of DateYear in the Table of Ethriel Plays].";
+	let card skill check be the mental games level of the player + 1;
+	If the cardhouseCooldown of the player is 0:
+		If a random chance of 1 in 10 succeeds:
+			say "You have a run of excellent luck at the cardhouse.  Nobody's playing for stakes — that just provokes geomantic cheating — but you still get that rush of turning up the right cards at the right times to make your clever strategies work out.  You're looking forward to your next session.  (Cardhouse cooldown reset!)";
+			now entertainNum of the player is entertainNum of the player + 2;
+			give 4 XP to the player in mental games;
+		Otherwise:
+			If a random chance of 1 in card skill check succeeds:
+				say "You get stomped at the cardhouse.  The more experienced players know the odds and they know the decks.  It doesn't matter which card game you play.  It's just not your day.  And it's petty, because you did still have fun, but it does hit your confidence to get nowhere like this.";
+				now entertainNum of the player is entertainNum of the player + 1;
+				now securityNum of the player is securityNum of the player - 1;
+				If the mental games level of the player > 9:
+					say "You're GOOD at these games, so it's worth it to meet players who can show you the floor like this.  The cardhouse isn't usually this hot.  There's some real legends stopping by today.  You're raring to get back into the scene.  (Cardhouse cooldown reset!)";
+					give 20 XP to the player in mental games;
+					give 4 XP to the player in carousing;
+					now entertainNum of the player is entertainNum of the player + 4;
+				Otherwise:
+					give 2 XP to the player in mental games;
+					now cardhouseCooldown of the player is 20;
+				If the mental games level of the player is 0:
+					say "This is kind of what you have to expect when you don't know how to play the games.  It'll take some tolerance for defeat to actually get good at cards.";
+			Otherwise if a random chance of card skill check in 150 succeeds:
+				say "You're the star of the cardhouse.  You know the decks, you know your strats, and your bets always land...  Well, so to speak.  You're not playing for stakes.  Geomantic manipulation of the odds is too easy for dragons to play for stakes.  Still, it's a ton of fun, and quite cheap.  Cardhouses don't charge that much and they have decks for dozens of games.";
+				now entertainNum of the player is entertainNum of the player + 2;
+				now securityNum of the player is securityNum of the player + 1;
+				now cardhouseCooldown of the player is 12;
+			Otherwise:
+				say "You play competent games with several decks at the cardhouse.  You win some, you lose some, and the hours pass quickly.  Since you're not here 'with' someone, you miss out on the personal connection with another dragon, but on the other hand nothing stops you from dropping in on whatever game is gathering.  Cardhouses are a good time.  They don't charge that much and they have decks for dozens of games.";
+				now entertainNum of the player is entertainNum of the player + 1;
+				now cardhouseCooldown of the player is 16;
+		follow the turnpass rule;
 	Otherwise:
-		choose row 1 in the Table of Ethriel Plays;
+		say "You feel like your last visit to the cardhouse was pretty recent.  Are you sure you want to go again already?";
-		say "You attend [play entry].";
+		if player consents:
-	say "You spend a few hours hanging out in cafes, picking up some snacks and chatting about the play you saw with others who attended the showing.  [if TimekeepingVar is 3]Ethriel is spectacular.  It's still alit and active all night long.[end if]";
+			if a random chance of card skill check in 40 succeeds:
-	Now the entertainNum of the player is the entertainNum of the player + 1;
+				If a random chance of 1 in 10 succeeds:
-	follow the turnpass rule;
+					say "You have a run of excellent luck at the cardhouse.  Nobody's playing for stakes — that just provokes geomantic cheating — but you still get that rush of turning up the right cards at the right times to make your clever strategies work out.  You're looking forward to your next session.  (Cardhouse cooldown reset!)";
+					now entertainNum of the player is entertainNum of the player + 2;
+					give 4 XP to the player in mental games;
+				Otherwise:
+					If a random chance of 1 in card skill check succeeds:
+						say "You get stomped at the cardhouse.  The more experienced players know the odds and they know the decks.  It doesn't matter which card game you play.  It's just not your day.  And it's petty, because you did still have fun, but it does hit your confidence to get nowhere like this.";
+						now entertainNum of the player is entertainNum of the player + 1;
+						now securityNum of the player is securityNum of the player - 1;
+						If the mental games level of the player > 9:
+							say "You're GOOD at these games, so it's worth it to meet players who can show you the floor like this.  The cardhouse isn't usually this hot.  There's some real legends stopping by today.  You're raring to get back into the scene.  (Cardhouse cooldown reset!)";
+							give 20 XP to the player in mental games;
+							give 4 XP to the player in carousing;
+							now entertainNum of the player is entertainNum of the player + 4;
+						Otherwise:
+							give 2 XP to the player in mental games;
+							now cardhouseCooldown of the player is 20;
+						If the mental games level of the player is 0:
+							say "This is kind of what you have to expect when you don't know how to play the games.  It'll take some tolerance for defeat to actually get good at cards.";
+					Otherwise if a random chance of card skill check in 150 succeeds:
+						say "You're the star of the cardhouse.  You know the decks, you know your strats, and your bets always land...  Well, so to speak.  You're not playing for stakes.  Geomantic manipulation of the odds is too easy for dragons to play for stakes.  Still, it's a ton of fun, and quite cheap.  Cardhouses don't charge that much and they have decks for dozens of games.";
+						now entertainNum of the player is entertainNum of the player + 2;
+						now securityNum of the player is securityNum of the player + 1;
+						now cardhouseCooldown of the player is 12;
+					Otherwise:
+						say "You play competent games with several decks at the cardhouse.  You win some, you lose some, and the hours pass quickly.  Since you're not here 'with' someone, you miss out on the personal connection with another dragon, but on the other hand nothing stops you from dropping in on whatever game is gathering.  Cardhouses are a good time.  They don't charge that much and they have decks for dozens of games.";
+						now entertainNum of the player is entertainNum of the player + 1;
+						now cardhouseCooldown of the player is 16;
+			Otherwise:
+				If a random chance of 1 in 10 succeeds:
+					say "You have a run of excellent luck at the cardhouse.  Nobody's playing for stakes — that just provokes geomantic cheating — but you still get that rush of turning up the right cards at the right times to make your clever strategies work out.  You're looking forward to your next session.  (Cardhouse cooldown reset!)";
+					now entertainNum of the player is entertainNum of the player + 2;
+					give 4 XP to the player in mental games;
+				Otherwise if a random chance of 1 in card skill check succeeds:
+					say "The regulars at the cardhouse step all over you.  You can't get anything right in the games you play.  The other gamergons make sympathetic noises at you, but it doesn't help.  You feel boredom with a tinge of despair as you push yourself through hopeless game after hopeless game.";
+					now cardhouseCooldown of the player is 28;
+					now securityNum of the player is securityNum of the player - 2;
+					now entertainNum of the player is entertainNum of the player - 2;
+					give 2 XP to the player in mental games;
+				Otherwise if a random chance of card skill check in 120 succeeds:
+					say "You do well.  Really well.  You pick familiar strategies in familiar games, and find your opponents falling into predictable, exploitable patterns.  The other gamergons acknowledge your skill graciously and you bask in a bit of praise.  Still, it's all a little too familiar.  It passes the hours tolerably well — and rather cheaply, given the cost structure at a cardhouse.";
+					now securityNum of the player is securityNum of the player + 1;
+					now entertainNum of the player is entertainNum of the player + 1;
+					give 6 XP to the player in mental games;
+					now cardhouseCooldown of the player is 16;
+				Otherwise:
+					say "You play competent games with several decks at the cardhouse.  You win some, and you lose some.  The hours pass a bit slowly.  You're not suffering per se, but maybe you need a more varied range of entertainments.";
+					give 4 XP to the player in mental games;
+					now cardhouseCooldown of the player is 16;
+			follow the turnpass rule;
+
+Understand "visit theatre" or "visit a theatre" as visiting a theatre.  Visiting a theatre is an action applying to nothing.
+
+Instead of visiting a theatre while current city is Ethriel:
+	If the theatreCooldown of the player is 0:
+		sort the Table of Ethriel Plays in random order;
+		If there is a playyear of DateYear in the Table of Ethriel Plays:
+			say "You attend [the play corresponding to a playyear of DateYear in the Table of Ethriel Plays]";
+		Otherwise:
+			choose row 1 in the Table of Ethriel Plays;
+			say "You attend [play entry]";
+		say "You spend a few hours hanging out in cafes, picking up some snacks and chatting about the play you saw with others who attended the showing.  [if TimekeepingVar is 3]Ethriel is spectacular.  It's still alit and active all night long.[end if]";
+		Now the entertainNum of the player is the entertainNum of the player + 2;
+		give 2 XP to the player in writing; 
+		follow the turnpass rule;
+		now the theatreCooldown of the player is 28;
+	Otherwise:
+		say "You've already attended the theatre this week.  Are you sure you want to go again?";
+		If player consents:
+			sort the Table of Ethriel Plays in random order;
+			If there is a playyear of DateYear in the Table of Ethriel Plays:
+				say "You attend [the play corresponding to a playyear of DateYear in the Table of Ethriel Plays]";
+			Otherwise:
+				choose row 1 in the Table of Ethriel Plays;
+				say "You attend [play entry]";
+			say "You spend a few hours hanging out in cafes, picking up some snacks and chatting about the play you saw with others who attended the showing.  [if TimekeepingVar is 3]Ethriel is spectacular.  It's still alit and active all night long.  [end if][theatre overuse]";
+			Now the entertainNum of the player is the entertainNum of the player + 2;
+			give 2 XP to the player in writing;
+			follow the turnpass rule;
+			now the theatreCooldown of the player is 28;
+
+To say theatre overuse:
+	If a random chance of 1 in 3 succeeds:
+		say "This time at least, packing your theatre visits has left you inspired.  You find yourself picking apart tropes and archetypes in conversation with others, and really getting into the details of [the playtitle corresponding to a playyear of DateYear in the Table of Ethriel Plays].";
+		now the entertainNum of the player is the entertainNum of the player + 1;
+		give 2 XP to the player in writing;
+	Otherwise if a random chance of 1 in 3 succeeds:
+		say "As much as you enjoy watching plays, spending too much time bumming around the theatres makes you feel like a non-person whose own story is uninteresting.  If you can't live an interesting life, maybe you could at least write one.";
+		Now the securityNum of the player is the securityNum of the player - 1;
+	Otherwise if a random chance of 2 in 3 succeeds:
+		say "Unfortunately, there are only so many plays going on in [current city].  Maybe you'd see something more exciting if you at least left to a different city.  Seeing plays here is a waste of your money.";
+		now the entertainNum of the player is the entertainNum of the player - 3;
+	Otherwise:
+		say "";
 
 Table of Ethriel Plays
-playyear	play
+playyear	playtitle	play
-1227	"Fear the Firelands.  It's a decent drama about an expedition to the firelands that separates a formerly loving couple who were on the expedition.  One of the two develops a god complex when exposed to the ever-burning lands, and refuses to return to Theoma!"
+1227	"Fear the Firelands"	"Fear the Firelands.  It's a decent drama about an expedition to the firelands that separates a formerly loving couple who were on the expedition.  One of the two develops a god complex when exposed to the ever-burning lands, and refuses to return to Theoma!"
-1227	"Nura's Abyss.  It's a fantastical adventure with wild sets and costumes, and a bunch of staged fights with fake blood and illusions.  It's one of the showiest plays in local theatres and a big hit, but expensive to perform.  You've seen it before, but it retains its imaginative character."
+1227	"Nura's Abyss"	"Nura's Abyss.  It's a fantastical adventure with wild sets and costumes, and a bunch of staged fights with fake blood and illusions.  It's one of the showiest plays in local theatres and a big hit, but expensive to perform.  You've seen it before, but it retains its imaginative character."
-1227	"Fiddling Lizards.  This romantic comedy romp features a failed polyamorous romance and several energetic musical numbers.  The actual story is tell-y and obvious, but the musical numbers make the whole performance worthwhile."
+1227	"Fiddling Lizards"	"Fiddling Lizards.  This romantic comedy romp features a failed polyamorous romance and several energetic musical numbers.  The actual story is tell-y and obvious, but the musical numbers make the whole performance worthwhile."
 
 Understand "visit bathhouse" or "visit a bathhouse" as visiting a bathhouse.  Visiting a bathhouse is an action applying to nothing.  Instead of visiting a bathhouse in Entertainment Options in Ethriel:
 	playerport to Your Favorite Bathhouse in Ethriel;
@@ -1663,12 +1932,41 @@ relax together link	"relax together" 	relax together rules
 Relax together rules is an object based rulebook.
 
 A relax together rule for a person (called The NPC):
-[	let This City be the current city;
-	choose the row with a city record column of This City in the Table of Cities;
-	let This Amenities List be the Local Amenities entry;
-	If bathhouses is listed in This Amenities List:]	
 	If bathhouses is listed in the Local Amenities of the current city:
-		say "'Hi! I'm [the NPC].'  This feature is not yet implemented.";
+		let active barrier be the reserve of the NPC;
+		If the NPC is in a bathhouse:
+			say "The NPC rests with you, but this feature is not yet fully implemented.";
+			now the flightyRel of the NPC is the flightyRel of the NPC + 6;
+			now the firmRel of the NPC is the firmRel of the NPC + 3;
+			If the flightyRel of the NPC > 12:
+				now the flightyRel of the NPC is 12;
+			If the firmRel of the NPC > 100:
+				now the firmRel of the NPC is 100;
+			follow the turnpass rule;
+		Otherwise if active barrier < flightyrel of the NPC or active barrier < firmrel of the NPC:
+			say "The NPC rests with you, but this feature is not yet fully implemented.";
+			now the flightyRel of the NPC is the flightyRel of the NPC + 6;
+			now the firmRel of the NPC is the firmRel of the NPC + 3;
+			If the flightyRel of the NPC > 12:
+				now the flightyRel of the NPC is 12;
+			If the firmRel of the NPC > 100:
+				now the firmRel of the NPC is 100;
+			follow the turnpass rule;
+		Otherwise:
+			let hotness be the sex appeal level of the player + a random number between 5 and 20;
+			let funness be the carousing level of the player + a random number between 5 and 20;
+			If hotness > active barrier or funness > active barrier:
+				say "The NPC rests with you, but this feature is not yet fully implemented.";
+				now the flightyRel of the NPC is the flightyRel of the NPC + 6;
+				now the firmRel of the NPC is the firmRel of the NPC + 3;
+				If the flightyRel of the NPC > 12:
+					now the flightyRel of the NPC is 12;
+				If the firmRel of the NPC > 100:
+					now the firmRel of the NPC is 100;
+				follow the turnpass rule;
+			Otherwise:
+				say "[the NPC] isn't interested in moving to the bathhouse with you.";
+		say "'Hi! I'm [the NPC].  My flightyRel is [flightyRel of the NPC] and my firmRel is [firmRel of the NPC].  My libido is [Libido of the NPC] and my reserve is [Reserve of the NPC].'";
 	Otherwise:
 		say "There are no bathhouses in this city.  How did you get this message?"