plot 0
	name <TEMPLATE XRAND COMBAT>

	% A combat template for Extra-Random plots.

	% E1 is the scene for the current episode.
	% E2 is the character who will give the PC a mission.
	% E3 is the scene to be used in the next episode.
	% E4 is the computer
	% E5 is the bounty hunter
	Element1 <Grab 3>
	Element2 <Prefab>
	Element3 <Scene Town Target !Far 1>
	Element4 <Prefab>
	Element5 <Character Bounty Hunter Heroic !Far 1>

	% V2 = Combat Counter


	% On a cleanup request just delete this plot.
	cleanup <AdvancePlot 0>

	% If Persona E2 dies, load a new plot.
	start <ifPersona E2 else GoDelete>
	GoDelete <S= 101 1 AdvancePlot 0>

	% Combat check. If combat has been entered, V2=1.
	% Combat ends in victory if the number of active masters on
	% team two drops to zero, or ends in defeat is the number of
	% active masters on team one drops to zero. After combat, V2=3
	% if the player was victorious or V2=2 is the player lost.
	nu1 <if= T1 0 if= V2 1  V= 2 2  Reputation 6 -7>
	nu2 <if= T2 0 if= V2 1  V= 2 3  Reputation 6  1  XPV 100>

sub
	Persona 2

	% Fill in something for the rumor string, so the PC will know who
	% has a job to offer. !2 will add the name of the NPC, while !1
	% will add the name of the faction.
	rumor <>
	% eg., rumor <!2 might have a job for you.>

	% ********************
	% *** SCRIPT BLOCK ***
	% ********************
	% If you're feeling faint of heart, just skip this
	% and jump straight to the messages block below.
	% Here are the variables used in this conversation:
	%  V1 = Job offer counter, V1=1 is job offered, V1=-1 if job denied
	%  V2 = Message Randomizer
	%  V3 = Threat value of enemy mecha
	%  V4 = Reward offered to PC for the mission
	%  V5 = Recharge time if mission fails
	% At startup, first check to see whether the PC has already
	% completed the mission or not.

	greeting <NewChat if= P2 3 else GoCheckLoss  Say 1 CashPrize V4 Goto GoEndMission>
	GoCheckLoss <if= P2 2 else GoCheckMission ifG ComTime V5 else GoWaitRecharge P= 2 0 Say 2 AddChat 1 AddChat 2 AddChat 3>
	GoWaitRecharge <Say 3>
	GoCheckMission <if= V1 1 else GoFirstTime Say 4 AddChat 1 AddChat 2 AddChat 3>

	% Unlike most combat missions, the PC is guaranteed to be offered
	% this one, since it's personal.
	% Set V1, V3, V4 here.
	GoFirstTime <V= 1 1 V= 3 Threat S103 200  V= 4 Reward V3 150 Memo 11 Say 6 AddChat 4 AddChat 5>

	% Do everything here that has to be done. If some of the ExtraRandom
	% parameters need to be changed, do that here as well.
	GoEndMission <S= 101 1 S+ 102 1 N= 3 E3 AdvancePlot 0>

	% Combat being entered
	result1 <EndChat Say 5 SavePos P= 2 1 V= 5 ComTime V+ 5 86400 Dynamic 2 V3 .nu1 .nu2>
	.nu1 <if= T1 0 Return>
	.nu2 <if= T2 0 Salvage Return>
	% Combat being delayed
	result2 <NewChat Say 7>
	% How many points do the enemy have?
	result3 <NewChat Say 8 AddChat 1 AddChat 2>

	% Result 4 - may add Reputation command or whatnot
	result4 <NewChat Say 9 AddChat 1 AddChat 2 AddChat 3>

	% Result 5 - may add Reputation command or whatnot
	result5 <NewChat Say 10 AddChat 1 AddChat 2 AddChat 3>

	% 1 : Player has won the mission
	%    Should mention that next episode will happen in \ELEMENT 3
	Msg1 <>

	% 2 : Player lost mission previously, now time to try again
	Msg2 <>

	% 3 : Player has lost mission, must wait until tomorrow to try again
	Msg3 <>

	% 4 : Player has accepted mission, has returned from repair
	Msg4 <>

	% 5 : Combat is starting
	Msg5 <>

	% 6 : NPC explains what the PC should do in this mission, and why
	Msg6 <>

	% 7 : PC needs some time to get ready
	Msg7 <>

	% 8 : How many points? Use "\VAL V3 " for that
	Msg8 <>

	% 9 : Response to Prompt4
	Msg9 <>

	% 10 : Response to Prompt5
	Msg10 <>

	% 11 : Memo
	Msg11 <\ELEMENT 2 in \SCENE EScene 2 wants you to do something.>


	% 1 - 3 :  Standard combat entry options:
	%         Start Mission, Delay Mission, Mission Details
	Prompt1 <Let's start this mission.>
	Prompt2 <Give me some time to get ready.>
	Prompt3 <What will I be facing?>

	% 4 - 5 :  PC can have different reactions to Msg6 above
	Prompt4 <>
	Prompt5 <>


	Plot 1
		% The PC doesn't want to perform the mission himself...
		% must go and contact E5 about it.
		start <ifPersona E2 else GoDelete ifPersona E5 else GoDelete memo 101>
		GoDelete <S= 101 1 AdvancePlot 0>

		Msg101 <\ELEMENT 2 in \ELEMENT 1 asked you to contact \ELEMENT 5 in \SCENE EScene 5 to help investigate \NARRATIVE 2 .>
	sub
		Persona 2

		Persona 5

	end

end
inv
	NPC Journalist
	place <1 PASS ALLY>
	chardesc Heroic Lawful

	STC COMPUTER-1


end
