Plot 0
	name <PLOT: F2 Hooch Ripoff>

	% No, it's not a ripoff... call it a "homage".

	element1 <Character Bartender>
	element2 <Scene !Near 1>
	element3 <Character !Near 1 Sex:M Sociable Cheerful>
	element4 <Prefab>

	Init_Start <ifPersona E1 else GoDelete if= V1 0 else GoCheckE3 V= 1 ComTime V+ 1 86400 goto InitCheckE3>
	InitCheckE3 <ifNPCinPlay E3 else InitCheckFin print 10003 goto InitCheckFin>
	% Msg10003 <\ELEMENT 3 has left this area.>
	Msg10003 <\ELEMENT 3 はこのエリアを去った。>
	InitCheckFin <FreezeChar E3>
	start <ifPersona E1 else GoDelete if= V1 0 else GoCheckE3 V= 1 ComTime V+ 1 86400 FreezeChar E3>
	GoCheckE3 <if= SceneID E2 else GoCheckTime if= EScene 3 E2 else GoCheckTime AdvancePlot 1>
	GoCheckTime <if# SceneID 0 ifG 50 PCRep 6 else GoDelete ifG ComTime V1 Goto GoDelete>
	GoDelete <ifPersona E3 else GoE3Died MoveChar E3 E2 AdvancePlot 0>
	GoE3Died <MoveCHar E4 E2 AdvancePlot 0>

sub
	Persona 1
	% rumor <!1 has a whisky still outside of town.>
	rumor <!1 は町外れにウヰスキー蒸留器を持っている>
	greeting <NewChat if= P1 0 else GoRealStart Say 8 AdvancePlot 0>
	GoRealStart <ifG P1 0 else GoFalseStart ifPersona E3 else GoE3Died if= EScene 3 E2 else GoNoRescue Say 2 XPV 150 AdvancePlot 0>
	GoNoRescue <Say 1 AddChat 1>
	GoFalseStart <SayAnything>
	GoE3Died <Say 4 AdvancePlot 0>
	% The PC will be offered the mission only if he _isn't_ renowned.
	result1 <NewChat ifG PCRep 6 15 else GoR1NoRep Say 7>
	GoR1NoRep <Say 3 AddChat 2 AddChat 3>
	result2 <NewChat Say 6>
	result3 <EndChat Say 5 SavePos LoadD .dname PassVar 1 E2 PassVar 2 E3 DynaNPC E3 2>
	.dname <SCENE_F2Hooch.txt>
	% Msg1 <I gave \ELEMENT 3 $50 to go refuel my whisky still in the woods outside town, but he hasn't returned yet. I hope nothing bad has happened to him... or to my whisky.>
	Msg1 <%JFは \ELEMENT 3 に $50 をあげて町外れの森へウヰスキー蒸留器の燃料を補給しに行かせたけれど、彼はまだ帰ってこない%JG。 彼が無事だといいんだが…それと%JFのウィスキーも。>
	% Msg2 <Thanks for returning \ELEMENT 3 .>
	Msg2 <\ELEMENT 3 を連れ帰ってくれてありがとう。>
	% Msg3 <Could you? I'd offer a reward for doing so, but I already gave the $50 to him. Eh, I'm sure he'll be alright, he's just being lazy as usual.>
	Msg3 <%JSが？ %JFはそれに報酬を出すべきだろうけど、もう彼に $50 をあげてしまったからね。 まあ、彼は無事だと思う%JG。いつも通りただ油を売っているだけだろう。>
	% Msg4 <So he died while delivering firewood to my whisky still... Well, I'm sure that's the way he would have wanted to go. Let's toast his memory.>
	Msg4 <では彼は薪をウヰスキー蒸留器に運んでいる間に死んでしまったのか…。 まあ彼も本望だったと思う%JG。 さあ、彼の思い出に乾杯しようか。>
	% Msg5 <Off you go, then.>
	Msg5 <それなら、行ってくれ。>
	% Msg6 <I'm sure he'll turn up. He probably just sampled a bit of the merchandise, and is sleeping it off on the cabin floor.>
	Msg6 <彼はそのうち帰ってくると思う%JG。 彼はたぶん商品をちょっと味見したあと、小屋の床で眠って酔いを覚ましているだけだろうよ。>
	% Msg7 <Nah, it's not worth concerning yourself over. He's done this before, he'll be back by morning.>
	Msg7 <いや、%JSの手をわずらわせるほどのことでもない%JG。 以前にもこんな事はあったからね。朝までには帰ってくるだろうよ。>
	% Msg8 <My whisky still is running fine... stop by for a drink!>
	Msg8 <%JFのウヰスキー蒸留器は好調だよ…。 飲んでいってくれ！>
	% Prompt1 <I'll go check up on him.>
	Prompt1 <ちょっと彼の事を見てきます。>
	% Prompt2 <On second thought, I'll just stay here.>
	Prompt2 <やっぱり、ここにいよう。>
	% Prompt3 <No matter, I better go check.>
	Prompt3 <大丈夫、%JFが見に行こう。>

	Persona 3
	% V2 = Get heroism point.
	greeting <NewChat if= P1 0 else GoRealStart Say 8 AdvancePlot 0>
	GoRealStart <if= L3 1 else GoFirstTime Say 1>
	GoFirstTime <Say 3 AddChat 1 AddChat 2>
	result1 <NewChat Say 4 if= V2 0 else GoRescue V= 2 1 Reputation 1 1 Goto GoRescue>
	result2 <NewChat AddReact -d10 Say 5 AddChat 3 AddChat 4 Reputation 1 -1 Reputation 2 -2>
	result3 <NewChat Say 6 CashPrize 25 Goto GoRescue>
	result4 <NewChat Say 7 Reputation 1 -5>
	GoRescue <L= 3 1 TORD 2 FOL PCUID>
	% Msg1 <Get me out of here!>
	Msg1 <%JFを連れ出してくれ！>
	% Msg3 <Help! I came here to reload the still, but the woods out there are full of monsters! It's not safe for me to go out there alone... Can you get me out of here?>
	Msg3 <助けて！ %JFは蒸留器に燃料を補給しに来たんだけど、森には怪物がうようよしている%JG！ %JF独りで森を抜けるのは危険だよ…。 ここから連れ出してくれるかい？>
	% Msg4 <Thanks! You're a lifesaver!>
	Msg4 <ありがとう！%JSは命の恩人だよ！>
	% Msg5 <Argh... Look, I was given $50 to come out here and refuel the still. I can afford to give you half. How about $25 for saving me?>
	Msg5 <う…。 ほら、%JFは蒸留器に燃料を補給しに行くのに $50 をもらった%JG。 半分なら出せるよ。 $25 で助けてくれないか？>
	% Msg6 <Great. Here's the money... Now let's get out of here!>
	Msg6 <よかった。これがそのお金だよ…。さあ、ここを出よう！>
	% Msg7 <Fine. I'll just wait here until someone else comes along.>
	Msg7 <もう結構。 他に誰か来るまでここで待っていよう。>
	% Msg8 <Man, I could use a good drink right about now...>
	Msg8 <やあ、これでうまい酒が飲めるよ…。>
	% Prompt1 <That's what I'm here for.>
	Prompt1 <%JFはそのために来た%JG。>
	% Prompt2 <Yes, I can, for a price...>
	Prompt2 <いいよ、金を出すならね…。>
	% Prompt3 <Alright, it's a deal.>
	Prompt3 <よし、それで手を打とう。>
	% Prompt4 <Sorry, it's not enough.>
	Prompt4 <悪いけど足りないな…。>

	Plot 1
		% Rescue has proceeded successfully.
		Init_Start <if= V1 0 else GoCheckTime V= 1 ComTime V+ 1 86400>
		start <if= V1 0 else GoCheckTime V= 1 ComTime V+ 1 86400>
		GoCheckTime <ifG ComTime V1 AdvancePlot 0>
	sub
		Persona 1
		% greeting <NewChat if= V1 0 else GoBeenBefore V= 1 1 Say 1 XPV 250>
		% GoBeenBefore <SayAnything>
		greeting <NewChat if= P9 0 else GoBeenBefore P= 9 1 goto GoThanks>
		GoBeenBefore <if= P9 2 else GoSayAnything P= 9 3 goto GoThanks>
		GoThanks <Say 1 XPV 250 goto GoFinCheck>
		GoSayAnything <SayAnything goto GoFinCheck>
		GoFinCheck <if= P9 3 AdvancePlot 0>
		% Msg1 <Thanks for returning \ELEMENT 3 . You're one of the good ones.>
		Msg1 <\ELEMENT 3 を連れ帰ってくれてありがとう。%JSはいい人だね。>

		Persona 3
		% greeting <NewChat Say 1 AddReact d5 AdvancePlot 0>
		greeting <NewChat if= P9 0 else GoBeenBefore P= 9 2 goto GoThanks>
		GoBeenBefore <if= P9 1 else GoSayAnything P= 9 3 goto GoThanks>
		GoThanks <Say 1 AddReact d5 goto GoFinCheck>
		GoSayAnything <SayAnything goto GoFinCheck>
		GoFinCheck <if= P9 3 AdvancePlot 0>
		% Msg1 <Thanks for your help getting me out of that swamp.>
		Msg1 <あの沼から%JFを連れ帰ってくれてありがとう。>

	end

end
inv
	NPC Citizen
	chardesc Male

end

