Plot 0
	name <The Leader's Bit>

	element1 <Grab 1>
	element2 <Character Leader !Near 1>

	cleanup <AdvancePlot 0>

	Init_Start <if= V1 0 N= 2 E2 V= 1 1>
	start <if= V1 0 N= 2 E2 V= 1 1>

	% Every half hour, check whether or not to announce the story.
	% HalfHour <if= d10 1 if= S1 0 ifG RReact E2 d120 else GoCheckNews S= 1 1 EMail 102>
	HalfHour <if= d10 1 if= S1 0 ifG RReact E2 d120 else GoCheckNews S= 1 1 SetNPC E2 EMail 102>
	GoCheckNews <if= d20 1 S= 1 -1 News d5>

	% News Announcements
	% Msg1 <\ELEMENT 2 , the mayor of \ELEMENT 1 , has offered a substantial reward for help in local kidnapping case.>
	Msg1 <\ELEMENT 1 の市長 \ELEMENT 2 が地元の誘拐事件解決を手伝った者に相当額の報酬を出すという。>
	% Msg2 <There's trouble in \ELEMENT 1 . The niece of town leader \ELEMENT 2 has disappeared. The guardians are searching for any leads.>
	Msg2 <\ELEMENT 1 で問題が起きた。町の指導者 \ELEMENT 2 の姪が誘拐された。Guardiansは手がかりを探している。>
	% Msg3 <\NARRATIVE 3 , the niece of \ELEMENT 1 mayor \ELEMENT 2 , has been kidnapped.>
	Msg3 <\ELEMENT 1 の市長 \ELEMENT 2 の姪 \NARRATIVE 3 が誘拐された。>
	% Msg4 <\ELEMENT 1 resident \NARRATIVE 3 has disappeared. She's the niece of town leader \ELEMENT 2 ; police expect to receive a ransom notice soon.>
	Msg4 <\ELEMENT 1 の住民 \NARRATIVE 3 が失踪した。彼女は町の指導者 \ELEMENT 2 の姪だ。警察は間もなく脅迫状が来ると予期している。>
	% Msg5 <The niece of civic leader \ELEMENT 2 has been kidnapped from her \ELEMENT 1 home.>
	Msg5 <市民の指導者 \ELEMENT 2 の姪が \ELEMENT 1 にある彼女の自宅から誘拐された。>
	% Msg102 <\ELEMENT 2 @ \NARRATIVE 1 :// I need your help immediately! Please see me in \SCENE N1 at once.>
	Msg102 <\ELEMENT 2 @ \NARRATIVE 1 :// すぐに%JSの手を借りたい！直ちに \SCENE N1 まで会いに来てくれ。>

sub
	Persona 2
	greeting <NewChat N= 2 E2 ifG S201 0 else GoCheckLoss Say 3 CashPrize S2 XPV 250 Reputation 6 1 History 15 EndStory>
	GoCheckLoss <ifG 0 S201 else GoCheckMission Say 2 EndStory>

	% if S1 = 2, PC has accepted misison.
	GoCheckMission <if= S1 2 else GoCheckEmail  Say 7>
	% if S1 = 1, PC has been emailed about the case.
	GoCheckEmail <if= S1 1 else GoCheckNews  Say 6  AddChat 1 AddChat 2 AddChat 3>
	% if S1 = -1, the case has been reported by the media.
	GoCheckNews <if= S1 -1 else GoNothing  Say 5  AddChat 1 AddChat 2 AddChat 3>

	% The PC may be offered this mission, as long as he is somewhat
	% well liked and not villainous.
	GoNothing <ifG React d23 else GoAway ifG PCRep 1 -d10 else GoAway  Say 4  AddChat 1 AddChat 2 AddChat 3>
	GoAway <Say 1>

	result1 <NewChat S= 2 15000 Say 8  Goto GoStart>
	result2 <NewChat S= 2 15000 Say 9 AddChat 4 AddChat 5>
	result3 <NewChat Reputation 5 d6 S= 2 15000 Say 10 AddChat 5>
	result4 <NewChat ifG dReward Threat PCRep 6 100 100 S2 else GoR4NoBetter S= 2 50000 Say 13 AddChat 5>
	GoR4NoBetter <ifG React d100 else GoR4Nothing  Say 12 AddChat 5>
	GoR4Nothing <Say 11 EndStory AddReact -d10>
	result5 <NewChat Say 14 Goto GoStart>

	GoStart <S= 101 1 S= 1 2>

	% Msg1 <Yes, what is it? I'm far too busy. I have an entire city to look after, you know.>
	Msg1 <はい、どうしました？私はとても忙しいのです。町全体の面倒を見ていますからね。>
	% Msg2 <All has been lost...>
	Msg2 <すべてを失ってしまいました…。>
	% Msg3 <Thank you for rescuing \NARRATIVE 3 ! Here is a small reward for your heroic deeds.>
	Msg3 <\NARRATIVE 3 を助けてくれてありがとう！こちらがあなたの英雄的な行為への報酬です。>
	% Msg4 <I need your help! My niece \NARRATIVE 3 has been kidnapped.>
	Msg4 <あなたの力が必要です！姪の \NARRATIVE 3 が誘拐されました。>
	% Msg5 <I suppose that you've heard the news. My niece \NARRATIVE 3 has been kidnapped. Any help or information leading to her safe return would be greatly appreciated.>
	Msg5 <ニュースを聞いていると思います。姪の \NARRATIVE 3 が誘拐されました。彼女が無事に帰るためのどんな協力や情報にも大いに感謝しましょう。>

	% Msg6 <Did you get my email!? My niece \NARRATIVE 3 has been kidnapped. Please find her for me!>
	Msg6 <私のメールを受け取りましたか！？姪の \NARRATIVE 3 が誘拐されました。姪を探してください！>
	% Msg7 <Please find \NARRATIVE 3 !>
	Msg7 <\NARRATIVE 3 を探してください！>
	% Msg8 <Thank you very much! I'm afraid that there aren't many clues to help you. Return \NARRATIVE 3 to us safely and I'll give you a reward of $ \VAL S2 .>
	Msg8 <ありがとうございます！残念ながらあなたの役に立つ手がかりはあまりありません。 \NARRATIVE 3 を無事に帰してくれれば $ \VAL S2 の報酬を出しましょう。>
	% Msg9 <I can offer a reward of \VAL S2 for her safe return. There aren't many clues to go on at the moment. Please help me!>
	Msg9 <姪を無事に帰してくれれば \VAL S2 の報酬を出しましょう。今のところ捜索の手がかりはあまりありません。どうか助けてください！>
	% Msg10 <No, I can't trust that! The guardians won't get involved until she's been missing at least a week... \NARRATIVE 3 could be dead by then! Won't you help?>
	Msg10 <いや、そうは思えません！姪が行方不明になって少なくとも一週間経つまではGuardiansは関わらないつもりです…。それまでには \NARRATIVE 3 は殺されてしまいます！助けてくれませんか？>

	% Msg11 <In that case I will find someone else to help me.>
	Msg11 <それなら私を助けてくれる誰か他の人を探しましょう。>
	% Msg12 <That's all I have to offer, I'm afraid. Please help me!>
	Msg12 <残念ながら、私が出せるのはそれだけです。どうか助けてください！>
	% Msg13 <Alright, I know that you are not used to working for so little money... I can offer you $ \VAL S2 . Will that be enough?>
	Msg13 <分かりました。あなたはそんなはした金では使われないのでしょうね…。 $ \VAL S2 出しましょう。それで十分ですか？>
	% Msg14 <That's good news! Please start looking for \PERSONA N3 right away.>
	Msg14 <それはいい知らせです！すぐに \PERSONA N3 の捜索を始めてください。>
	% Msg15 <You rescued the niece of \NARRATIVE 1 mayor \NARRATIVE 2 .>
	Msg15 <\NARRATIVE 1 の市長 \NARRATIVE 2 の姪を救出した。>

	% Prompt1 <I will help you.>
	Prompt1 <手を貸そう。>
	% Prompt2 <How much is the reward?>
	Prompt2 <報酬は如何ほど？>
	% Prompt3 <I'm sure she'll turn up by herself.>
	Prompt3 <彼女は自分で帰って来ると思う%JG。>
	% Prompt4 <That's not enough.>
	Prompt4 <それだけでは足りないな。>
	% Prompt5 <Okay, I'll do it.>
	Prompt5 <分かった。やってみよう。>

end
