uses base.df
uses charfilt.df
uses charstats.df
uses road.df
uses charstatmods.df

// Both Santas, Alvis, TLB, Wrestler, Fencer, Debutante, L*nk

road{

0 value lnk-countdown

}

cyoa{ road{

: santajoins
	+cr ($ "HO HO HO! MERRY CHRISTMAS!" pbold $) +text
	team-count 3 > if then;
	4 recruitee .mechanical! 6 recruitee .attitude!
	recruitee .attitudeREV
	recruited
;

: evilsantajoins
	team-count 3 > if then;
	5 recruitee .strength! 0 recruitee .attitude!
	recruitee .attitudeREV
	recruited
;

cyoa-choice: santa-test-nice
	ricon
($ "Santa gives " .. thegroup .. " a present! It's a bunch of cans of corn, just what " .. gthey .. " always wanted!" $) cyoa-text! 2 300 tone
	5 LOOT_FOOD trunk.loot+
	santajoins
;
cyoa-choice: santa-test-naughty 
	ricon
	($ "You're still nicer than those awful zombies! 
	Santa gives " .. thegroup .. " some coal. " .. cname-He .. " crams it into the car's gas port." $) cyoa-text! 2 300 tone
	50 LOOT_GAS trunk.loot+
	santajoins
;
cyoa-choice: santa-test-pissoff
	ricon
	"Evil Santa" recruitee .name! 4 screcruit
	($ cname .. " snaps and verbally lays into Santa." .. "
	PISS OFF, SANTA. NICE ONE! YOU'RE A D**FUS. WAY TO GO! WAY TO SPREAD HOLIDAY CHEER! YOU D*NK!" pbold .. "
	Santa loses faith in humanity and and becomes " .. rname .. "!" $) cyoa-text! goodfx morale2-
	evilsantajoins	
;

cyoa: santa-test
	"MERRY CHRISTMAS" cyoa-title!
	someone choosechar
	char-gen to recruitee
	ricon
	3 screcruit
	"Santa" recruitee .name!
	4 recruitee .shooting! 0 recruitee .female! 6 recruitee .morale!
	($ Thegroup .. " is searching through a house for supplies when something comes down the chimney. It's Santa!!!
	" .. "HO HO HO! HAVE YOU BEEN NAUGHTY OR NICE?" pbold $) cyoa-text! 3 500 tone
		choice( "Nice" )choice: santa-test-nice
		choice( "Naughty" )choice: santa-test-naughty
		goofus-pass if
			goofus charchoice( ": PISS OFF" )choice: santa-test-pissoff
		then
;

cyoa-choice: TLB-recruit
	team-count 3 > if
		ricon
		($ "TOO MANY PEOPLE, HOW AM I SUPPOSED TO POSE OR OIL UP IN THE CAR?
		" pbold ..
		 rname .. " has a point here. The group has to move on without him." $) cyoa-text!
	then;
	($ cname .. " convinces " .. "THE LAST BODYBUILDER" pbold  .. " that there's no point being the best bodybuilder in the world if there's no one around to appreciate it.
	" .. "LET'S DO THIS! YEAH!!!" pbold $) cyoa-text! goodfx
		recruitee .attitudeREV recruitee .strengthREV recruitee .temperREV
		recruited
;

cyoa-choice: TLB-train
	"Getting Pumped with T*L*B" cyoa-title!
	ricon
	($ "THE LAST BODYBUILDER " pbold .. "gives " .. thegroup .. " some excellent tips on getting swolled up during the post-apocalypse.
	The advice is so good that a pump is felt immediately, no working out required." $) cyoa-text! goodfx
	' .strength++ foreach-team-char
;

cyoa: TLB-test
	"The Last Bodybuilder" cyoa-title!
	someone choosechar
	char-gen to recruitee
	ricon
	"T*L*B" recruitee .name!
	5 recruitee .morale! 6 recruitee .attitude!	1 recruitee .temperment! recruitee .tlbify
	STAT_STRENGTH recruitee .effstat print
	($ Thegroup .. " enters an abandoned gym. There, on a throne of old protein powder jars, sits a bronzed bodybuilder.
	" .. "I AM... " pbold .. "THE LAST BODYBUILDER! YEAH!!!" fbold .. "
	He FLEXES and GRUNTS, in a mournful manner." $) cyoa-text! 3 500 tone
		choice( "Recruit Him" )choice: TLB-recruit
		choice( "Ask for strength tips" )choice: TLB-train
;

cyoa-choice: alvis-recruit
	ricon
	team-count 3 > if
		($  rname .. " mumbles something. The group moves on without him." $) cyoa-text!
	then;
	($ rname  .. " somewhat clearly says " .. "LET'S ROCK!" pbold $) cyoa-text! goodfx
		recruitee .fitnessREV recruitee .strengthREV recruitee .temperREV
		recruited
;

cyoa: alvis-test
	"The King of Sing" cyoa-title!
	someone choosechar
	char-gen to recruitee
	ricon
	"Alvis" recruitee .name!
	3 recruitee .strength! 4 recruitee .morale! 6 recruitee .fitness!
	1 recruitee .temperment! 4 recruitee .shooting! recruitee .alvify
	($ Thegroup .. " is looting a city when they run into a man in a gold suit, with an incredible pompadour. He is practicing karate moves.
	He says something that you can't understand, due to a harmonious but unintelligible mumble." $) cyoa-text! 3 500 tone
		choice( "Recruit him" )choice: alvis-recruit
		choice( "Leave him be" )choice
;

cyoa-choice: debutante-recruit
	ricon
	team-count 3 > if
		($  rname .. " agrees to join, but then sees how incredibly crowded your vehicle is, with both people and various filth. " .. "WELL, I NEVER!" pbold $) cyoa-text!
	then;
	($ rname  .. " spins her umbrella around her hand with lightning speed, and then snaps it in a resting pose against her shoulder. She must have practiced that a lot." $) cyoa-text! goodfx
		recruitee .strengthREV recruitee .fitnessREV
		recruited
;

cyoa: debutante-test
	"High Society Fashion, Post-Society" cyoa-title!
	someone choosechar
	char-gen to recruitee
	ricon
	4 recruitee .morale! recruitee .debutantify
	($ Thegroup .. " opens the door to a tea shop and finds a very fancy dressed woman inside, casually comparing two boxes of tea.
	She puts the boxes down, turns half to you, and picks up her umbrella." $) cyoa-text! 3 500 tone
		choice( "Recruit her" )choice: debutante-recruit
		choice( "Leave her be" )choice
;

cyoa-choice: fencer-recruit
	ricon
	team-count 3 > if
		($  rname .. " is undaunted by your packed car and just barely squeezes in. She ends up ripping up the interior of the car really bad with her sword. 
		When asked if she can put her rapier in the trunk for a bit, she responds with " .. "NO DEAL, I QUIT!" pbold $) cyoa-text!
	then;
	($ rname  .. " points her sword to the sky and belts out " .. "NO ONE CAN STOP MY BLADE! HO HO HO!" pbold .. " It's briefly unsettling after she was talking so normally.
	She then slashes the air in a grand fashion while laughing for about 4 straight minutes." $) cyoa-text! goodfx
		recruitee .strengthREV recruitee .fitnessREV
		recruited
;

cyoa: fencer-test
	"Swashbuckler" cyoa-title!
	someone choosechar
	char-gen to recruitee
	ricon
	4 recruitee .morale! recruitee .fencify
	($ Thegroup .. " stumbles across someone's camp hidden behind an empty town. There's a woman dressed in medieval clothing like she's at a Renaissance Faire. She's sparring the air with a fencing foil.
	She stops slashing her sword eventually, but never puts her rapier down. When talking to her, she seems like a pretty normal person despite appearances." $) cyoa-text! 3 500 tone
		choice( "Recruit her" )choice: fencer-recruit
		choice( "Leave her be" )choice
;

cyoa-choice: wrestler-recruit
	ricon
	team-count 3 > if
		($ "I don't like disappointing fans, but you just have too many people." pbold .. "
		El Satan declines joining the party." $) cyoa-text!
	then;
	($ rname  .. " strikes his patented dramatic pose and then says " .. "Yeah, sure, I'll join you." pbold $) cyoa-text! goodfx
		recruitee .strengthREV recruitee .fitnessREV
		recruited
;

cyoa: wrestler-test
	"LET'S WRESTLE" cyoa-title!
	someone choosechar
	char-gen to recruitee
	ricon
	"El Satan" recruitee .name!
	5 recruitee .morale! recruitee .wrestify
	($ Thegroup .. " hears big crashing noises coming from a nearby house, and goes to investigate.
	In the middle of a sea of destroyed furniture and zombie gore is the world famous wrestler, " .. rname .. "!
	He is currently pile driving a zombie while yelling " .. "PILE DRIVER!" pbold .. " at the top of his lungs." $) cyoa-text! 3 500 tone
		choice( "Recruit him" )choice: wrestler-recruit
		choice( "Leave him be" )choice
;

cyoa-choice: lnk-recruit
	ricon
	team-count 3 > if
		($ "KYYYYYAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA!!!!" pbold .. "
		The group assumes this means that " .. rname .. " declines their invite." $) cyoa-text!
	then;
	($ rname  .. " picks up a stick and then holds it towards the sky awkwardly. From nowhere, a little tune plays." $) cyoa-text! goodfx
		recruitee .strengthREV recruitee .fitnessREV
	//	recruited 4 6 rnd to lnk-countdown
		recruited 1 to lnk-countdown
;

: lnkname 1 6 rnd case
	1 of "Lank" endof
	2 of "Lenk" endof
	3 of "Lonk" endof
	4 of "Lunk" endof
	5 of "Leyenk" endof
	6 of "L*nk" endof
endcase ;

cyoa: lnk-test
	"LNK" cyoa-title!
	someone choosechar
	char-gen to recruitee
	ricon
	lnkname recruitee .name!
	3 recruitee .morale! recruitee .lnkify
	($ Thegroup .. " investigates some loud crashing noises from a crafts store.
	There is a man dressed in green, smashing pottery with a gigantic sword. The sword clangs against the ground as it slams through each pot, but doesn't bend.
	After watching this go on for quite awhile, it's clear there is something deeply wrong with this person." $) cyoa-text! 3 500 tone
		choice( "Recruit him" )choice: lnk-recruit
		choice( "Leave him be" )choice
;

} }


