Plot 0
	name <Tokto Cursed Island>

	% E1 is the shaman
	element1 <Character>
	stat 1 6001

	% E2 is the chieftan
	element2 <Character>
	stat 2 6002

	% E3 is the professor who will ask the PC to search for his colleague.
	element3 <Character>
	stat 3 1605

	% E4 is the data slate, E5 is the diary
	element4 <Prefab>
	element5 <Prefab>

	% E6 is the missing explorer
	element6 <Prefab>

	% E8 = PC has accepted mission from E3.

	% V1 = Initialization Counter
	% V2 = Have seduced E1, or as I like to say,
	%       "someone squeezed the shaman!"
	% V3 = Have been told by E2 about the sacrifice

	Init_Start <if= V1 0 V= 1 1 MoveKeyItem E5 61 FreezeChar E6>
	start <if= V1 0 V= 1 1 MoveKeyItem E5 61 FreezeChar E6>
	LOCAL1 <if= SceneID 60 AdvancePlot 1>

sub
	Persona 1
	% rumor <!1 is the village shaman.>
	rumor <!1 は村の祈祷師だ>
	greeting <NewChat if= P2 1 else GoNoSqueeze Say 1>
	GoNoSqueeze <ifG React 20 else GoNoFriend Say 2 AddChat 1 AddChat 2 if= E8 1 AddChat 7>
	GoNoFriend <Say 3 AddChat 1 ifG P3 0 else GoCheckE6 AddChat 2 Goto GoCheckE6>
	GoCheckE6 <if= E8 1 AddChat 7>
	result1 <NewChat Say 4 AddChat 3 AddCHat 4>
	result2 <NewChat Say 5 AddChat 4 ifG TruePCSkillVal 27 0 AddChat 5>
	result3 <NewChat Say 6>
	result4 <NewChat Say 7>
	result5 <NewChat Say 8 ifG TruePCSkillVal 27 4 ifNPCSexy E1 AddChat 6>
	% result6 <EndChat Say 9 AddReact SkillRoll 27 P= 2 1 Trigger LOCAL 2>
	result6 <EndChat Say 9 AddReact SkRoll 27 P= 2 1 Trigger LOCAL 2>
	result7 <NewChat Say 10>
	% Msg1 <How could I allow that to happen? I have been shamed... I am no longer worthy to be a sacrifice to Ladon...>
	Msg1 <どうして%JFはあんなことをしてしまったのだろう？%JFは穢れてしまった…。%JFはもう Ladon の生け贄になれない…。>
	% Msg2 <You should leave here, stranger... the people of this island hear the voice of Ladon, the mountain-mother, but we are not enough to feed her hunger. I fear I am the only one of true virtue left. I must give myself to the volcano soon.>
	Msg2 <ここから立ち去るがいい、よそ者よ…この島の人間は山の神 Ladon の声を聞くことができるが、その飢えを満たすことはできない。残った純潔の者は%JF一人だけだ。もうすぐ%JFは自らを火口に捧げなければならない。>
	% Msg3 <You are not one of us. Only the people of the island hear the voice of Ladon, the mountain-mother. You should leave here before her spirit punishes you.>
	Msg3 <%JSは%JFたちの仲間ではない。この島の人間だけが山の神 Ladon の声を聞くことができる。その怒りが%JSを罰する前にここから立ち去るがいい。>
	% Msg4 <Ladon is the spirit of the mountain and the protector of our land. She speaks to us in whispers. She has been the protector for a long time... She defeated the tyrant from the north. We in turn must feed her. That is our duty, as her children.>
	Msg4 <Ladon は山の神であり、%JFたちの島を守る母である。母は我々にささやきかける。母は長い間守り神を務めてきた…。母は北方からの侵略者を退けてくれた。今度は%JFたちが母の飢えを満たす番だ。それが Ladon の子たる%JFたちの義務である。>
	% Msg5 <The mountain-mother was injured a long time ago, protecting us from the tyrant of the north. Only blood can heal her wounds. I am the only young person left in the village. So, I must give myself to her...>
	Msg5 <山の神はずっと昔、北方の侵略者から我々を守ろうとして怪我をした。その傷を癒せるのは血だけだ。%JFは村で最後に残った若者なので、自らを Ladon に捧げなければならない…。>
	% Msg6 <Ladon eats the spirits of the pure. Only blood can heal her wounds. When it is our time, she calls us to the volcano. I have seen all of my friends consumed by the mother... When it is my time, I will go as well.>
	Msg6 <母 Ladon は純潔の者の魂を食する。母の傷を癒せるのは血だけだ。その時が来ると、母は%JFたちを火山に呼ぶ。%JFは友だち皆が母に召されるのを見てきた…。%JFの番が来たら、%JFも行かねばならない。>
	% Msg7 <You cannot understand. Ladon only speaks to the people of the island... if ever you heard her voice, you would know for certain that what I speak is the truth.>
	Msg7 <%JSには理解できまい。Ladon は島の人間にしか話しかけないから…もし%JSがその声を聞けるなら、%JSは%JFの言っていることが本当だと確信するだろうけど。>
	% Msg8 <It's sad, I know, but we must do as Ladon says... All my friends have already given themselves. Soon it will be my time.>
	Msg8 <悲しいことだけど、%JFたちは Ladon の言う通りにしなければならない…。%JFの友だち皆はすでに自らを捧げた。もうすぐ%JFの番だ。>
	% Msg9 <Oh, I don't know... Well, I guess there's no harm in it... Alright, let's go!>
	Msg9 <え、何…？でも、苦しいことではないような…。分かった、やってみよう！>
	% Msg10 <\ELEMENT 6 was an outsider, but heard the voice of Ladon... \SPR E6 is gone now. No-one in the village knows where.>
	Msg10 <\ELEMENT 6 はよそ者だったが、Ladon の声を聞くことができた…。 \SPR E6 はもういない。どこへ行ったのか村で知る者はない。>
	% Prompt1 <What is this "Ladon" thing?>
	Prompt1 <その"Ladon"とは何？>
	% Prompt2 <Why must you sacrifice yourself?>
	Prompt2 <なぜ%JSが自らを捧げなければならない？>
	% Prompt3 <What does Ladon eat?>
	Prompt3 <Ladon は何を食べる？>
	% Prompt4 <Do you really believe all that stuff?>
	Prompt4 <本当にそんなものを信じているのか？>
	% Prompt5 <You're too young to die that way.>
	Prompt5 <%JSはそんな風に死ぬには若すぎる。>
	% Prompt6 <Come on, let's have some fun before then!>
	Prompt6 <さあ、その前に楽しいことをしよう！>
	% Prompt7 <I'm looking for \ELEMENT 6 .>
	Prompt7 <\ELEMENT 6 を探している。>

	Persona 2
	% rumor <!2 is the village leader.>
	rumor <!2 は村の長だ>
	greeting <NewChat if= P2 1 else GoNoSqueeze EndChat Say 1 Trigger LOCAL 1 AdvancePlot 1>
	GoNoSqueeze <Say 2 P= 3 1 AddChat 1 AddChat 2 if= E8 1 AddChat 3>
	result1 <NewChat Say 3 AddChat 2 if= E8 1 AddChat 3>
	result2 <NewChat Say 4 AddChat 4 V= 2 PCEgo V+ 2 PCRep 1 ifG V2 20 AddChat 5>
	result3 <NewChat Say 5 AddChat 6>
	result4 <NewChat Say 6 AddChat 1 if= E8 1 AddChat 3>
	result5 <NewChat Say 8 AddChat 7 AddChat 8 AddChat 9>
	result6 <NewChat Say 7 AddChat 1 AddChat 2>
	result7 <NewChat Say 9 AddChat 10 AddChat 11 if= V3 0 V= 3 1 Reputation 4 -d10>
	result8 <NewChat Say 10 AddChat 10 AddChat 11 if= V3 0 V= 3 1 Reputation 3 -d10>
	result9 <NewChat Say 11 AddChat 10 AddChat 11>
	result10 <NewChat Say 12 AddChat 12 AddChat 11>
	result11 <NewChat Say 13>
	result12 <EndChat Say 14 Trigger LOCAL 1 AdvancePlot 1>
	% Msg1 <HOW COULD YOU DO THAT TO MY CHILD!? Our family has been shamed! There is only one way to redeem \ELEMENT 1 ... TO THE VOLCANO WITH YOU!!!>
	Msg1 <%JFの子に何ということをしてくれた！？ よくも我が一族を辱めてくれたな！ \ELEMENT 1 の名誉を回復する方法がひとつだけある…それは%JSを火口に投げ込むことだ！！！>
	% Msg2 <These are dark times for our island. Ladon, the mountain-mother, has grown even more hungry as of late. Now, my only child \ELEMENT 1 has been called to sacrifice \PPR E1 self.>
	Msg2 <我々の島には暗黒の時代があった。山の神 Ladon は最近になって前よりずっとひどく飢えているようになった。そこで、%JFの唯一の子 \ELEMENT 1 が自らを捧げるように命じられた。>
	% Msg3 <Ladon is the mountain-mother, the guardian spirit of our people. We hear her voice and cannot refuse to answer. Many years ago she saved us from the tyrant of the north... To deny her sacrifice would sentence the entire village to death.>
	Msg3 <Ladon は山の神であり、我々人間の守り神である。我々はその声を聞くことができ、答えざるを得ない。山の母ははるか昔北方の侵略者から我々を守ってくれた…。母への生け贄を拒むことは村全体を死に至らしめることになるだろう。>
	% Msg4 <No, all the other villages of proper age and virtue true have already been sacrificed... Such is the enormous hunger of the mountain-mother.>
	Msg4 <いや、他の適齢で純潔の村人は皆すでに捧げられてしまった…。山の神はそれほどにひどく飢えているのだ。>
	% Msg5 <\ELEMENT 6 ? An outsider by that name was in this village some moons ago... \SPR E6 left as quietly as \SPR E6 came. I couldn't say what became of \OPR E6 .>
	Msg5 <\ELEMENT 6 ？その名前のよそ者が数ヶ月前この村にいた…。 \SPR E6 はひっそりとやって来て同じようにひっそりと去っていった。 \OPR E6 がどうなったかは知らない。>
	% Msg6 <That may be best, this talk of sacrifice is depressing.>
	Msg6 <それが一番かもしれない。生贄の話は暗くなる。>
	% Msg7 <In that case, you may ask.>
	Msg7 <それなら、聞いてくれ。>
	% Msg8 <Not just anyone can do that. To be a sacrifice to Ladon, you must be of pure virtue. I must ask... you are, I hope, of bodily innocence?>
	Msg8 <誰でも生贄になれるわけではない。Ladon の生贄になるには、純潔でなければならない。教えてくれ…%JSは純潔か？>
	% Msg9 <Hmm... No, not really, I guess. Look, if you're going to be tossed into a volcano, this isn't exactly the kind of decision you can change your mind about later. Are you really certain that you want to do this?>
	Msg9 <ふむ…。いや、本当はそうでもない。さあ、もし火口に投げ込まれようというのなら、それは決して後戻りのきくような決断ではない。本当に生贄になりたいか？>
	% Msg10 <I guess that answers my question then. You would be perfect for the sacrifice, in place of \ELEMENT 1 ... the only question is, are you absolutely certain that you're willing to be tossed into a volcano?>
	Msg10 <では、それが%JFの質問に対する答か。%JSは \ELEMENT 1 の代わりの生贄に最適だ…最後の質問をしよう。%JSは本当に火口へ投げ込まれたいか？>
	% Msg11 <Good enough. We're ready to carry out the ceremony right away. I need you to think very carefully about this... are you certain that you're willing to be sacrificed to the volcano?>
	Msg11 <よろしい。今すぐにでも儀式を行う準備は整っている。次のことをとても慎重に考えてくれ…火口に捧げられたいか？>
	% Msg12 <I mean, are you really really certain?>
	Msg12 <つまり、本当の本当にそう思っている？>
	% Msg13 <Don't get my hopes up like that.>
	Msg13 <あんなことを言って%JFに希望を持たせないでくれ。>
	% Msg14 <That's exactly what I wanted to hear! Let's get moving!>
	Msg14 <それこそまさに%JFが聞きたかった言葉だ！さあ出発しよう！>
	% Prompt1 <Why do you have to sacrifice anybody?>
	Prompt1 <なぜ誰かを生贄にしなければならない？>
	% Prompt2 <Isn't there anyone else that can go?>
	Prompt2 <他に生贄になれる人間はいる？>
	% Prompt3 <Know where I can find \ELEMENT 6 ?>
	Prompt3 <\ELEMENT 6 の居場所を知ってる？>
	% Prompt4 <Let's talk about something else.>
	Prompt4 <他の話をしよう。>
	% Prompt5 <Maybe you could sacrifice me!>
	Prompt5 <%JFが生贄になれるかもしれない！>
	% Prompt6 <I've got something else to ask you.>
	Prompt6 <他にも%JSに聞くことがある。>
	% Prompt7 <Does it really matter?>
	Prompt7 <それが本当に重要なのか？>
	% Prompt8 <I don't even know what you're talking about.>
	Prompt8 <何のことを言っているのかさえ分からない。>
	% Prompt9 <Of course I am!>
	Prompt9 <もちろん！>
	% Prompt10 <I'm certain.>
	Prompt10 <そう思っている。>
	% Prompt11 <No, I don't want to.>
	Prompt11 <いや、結構だ。>
	% Prompt12 <I'm really really certain.>
	Prompt12 <本当の本当に、そう思っている。>

	Persona 3
	% rumor <!3 needs to hire an explorer for a dangerous mission.>
	rumor <!3 は危険な仕事を頼むために探検家を雇いたがっている>
	greeting <NewChat if= E8 1 else GoFirstTime Say 1>
	GoFirstTime <ifG PCRep 6 50 else GoCheckFriend Say 3 AddChat 1 AddChat 2>
	GoCheckFriend <ifG React 40 else GoNoChance Say 4 AddChat 1 AddChat 2>
	GoNoChance <Say 2>
	result1 <NewChat Say 6 AddChat 3 AddChat 4>
	result2 <NewChat Say 5>
	result3 <NewChat Say 7 Memo 8 GiveKeyItem E4 E= 8 1>
	result4 <NewChat Say 9>
	% Msg1 <You should go to Tokto Island and search for \ELEMENT 6 .>
	Msg1 <Tokto 島へ行って \ELEMENT 6 を捜して来てください。>
	% Msg2 <I haven't heard from \ELEMENT 6 in a long time. I hope nothing has gone wrong during the expedition.>
	Msg2 <長い間 \ELEMENT 6 から連絡がありません。遠出している間に何か悪いことが起きていなければいいのですが。>
	% Msg3 <You might be able to help me. I require the services of a cavalier to search for a colleague who went missing in the east sea.>
	Msg3 <私に手を貸してください。東の海で消息を絶った仲間を捜してくれる騎士の仕事をやってもらわなければなりません。>
	% Msg4 <I need the services of a cavalier, and was wondering if you'd be interested. One of my assistants has gone missing. I need someone to go search for \OPR E6 .>
	Msg4 <私は騎士の仕事をやってもらう必要があります。あなたなら引き受けてくれるのではないかと思いました。私の助手が行方不明になってしまったのです。 \OPR E6 を捜しに行ってくれる人物が必要です。>
	% Msg5 <That's too bad. I'll just have to keep hoping that everything is alright...>
	Msg5 <残念です。 \SPR E6 の身に何事もないことを祈り続けるだけです…。>
	% Msg6 <\ELEMENT 6 was doing research on a primitive tribe. The last emails I received from \OPR E6 were disturbing... \SPR E6 discovered something bad, possibly something that drove \OPR E6 insane. The last communication I received was in June.>
	Msg6 <\ELEMENT 6 は原始的な部族を研究していました。 \OPR E6 からの最後のメールを読んで不安を覚えました…。 \SPR E6 は何か良くない物を発見したようです。それが \OPR E6 を狂気に駆り立てたのかもしれません。最後に連絡があったのは６月です。>
	% Msg7 <Very good. \ELEMENT 6 was last seen on Tokto, an island several hundred kilometers south of here. Here is a dataslate containing the last emails \SPR E6 sent... it may be some help. If you can discover what happened to \OPR E6 I'll reward you.>
	Msg7 <ありがとう。 \ELEMENT 6 が消息を絶ったのは数百km 南にある島 Tokto です。これが \SPR E6 の最後のメールが入っているデータスレートです…何かの助けになるかもしれません。 \OPR E6 に何があったのかを明らかにしてくれたら報酬を出しましょう。>
	% Msg8 <\ELEMENT 3 in \SCENE EScene 3 asked you to go to Tokto Island and investigate the disappearance of \ELEMENT 6 .>
	Msg8 <\SCENE EScene 3 の \ELEMENT 3 に Tokto 島へ行って \ELEMENT 6 の失踪を調べてくれと頼まれた。>
	% Msg9 <I must find someone... these mysteries must be answered.>
	Msg9 <では他の人を探さなければなりませんね…。この謎は解き明かされなければいけません。>
	% Prompt1 <Give me some more information.>
	Prompt1 <もっと詳しい情報を教えてくれ。>
	% Prompt2 <Sorry, I can't help you.>
	Prompt2 <申し訳ないが、協力できない%JG。>
	% Prompt3 <Alright, I'll go search for \OPR E6 .>
	Prompt3 <よし、%JFが \OPR E6 を捜しに行こう。>
	% Prompt4 <Scary. I don't think I can help.>
	Prompt4 <申し訳ないが、協力できない%JG。>

	Plot 1
	% The second part of the plot... activates when the PC is
	% tossed into Ladon.

	Init_Start <if= E8 1 else GoDelete ifNPCOK E3 else GoDelete Memo 1>
	start <if= E8 1 else GoDelete ifNPCOK E3 else GoDelete Memo 1>
	GoDelete <DeleteChar E6 AdvancePlot 0>
	% Msg1 <\ELEMENT 3 in \SCENE EScene 3 asked you to go to Tokto Island and investigate the disappearance of \ELEMENT 6 .>
	Msg1 <\SCENE EScene 3 の \ELEMENT 3 に Tokto 島へ行って \ELEMENT 6 の失踪を調べてくれと頼まれた。>

	sub

	Persona 3
	greeting <NewChat Say 1 AdvancePlot 0 CashPrize 100000 ifKeyItem E5 AddChat 1>
	result1 <NewChat Say 2 XPV 250 DeleteKeyItem E5 PCAlly E3 DeleteChar E6>
	% Msg1 <So \ELEMENT 6 perished on the island, the victim of a monster that was apparently controling the villagers through some kind of mind control. It will take years before we can fully understand what happened on Tokto. Thank you for your help.>
	Msg1 <それでは \ELEMENT 6 は Tokto 島で、村人をマインドコントロールのようなもので操っていたと思われる怪物の犠牲となり、非業の死を遂げたのですね。 Tokto で何があったのかを完全に理解するまでにはあと何年かかかるでしょう。ご協力感謝します。>
	% Msg2 <The last records of \ELEMENT 6 ... This should be very helpful to our investigation. Thank you again.>
	Msg2 <\ELEMENT 6 が残した最後の記録ですか…。これは大いに我々の調査の役に立つでしょう。ありがとうございます。>
	% Prompt1 <I found this diary as well.>
	Prompt1 <この日記も見つけた%JG。>

	end

end
inv
	Treasure 50
	name <Data Slate>
	name_I18N <データスレート>
	place <3>
	use <Print 1 MoreText .txt>
	.txt <TS_TEXT_Ladon1.txt>
	% Msg1 <You read the messages on the data slate.>
	Msg1 <データスレートのメッセージを読んだ。>

	Treasure 10
	name <Tattered Diary>
	name_I18N <ぼろぼろの日記>
	use <Print 1 MoreText .txt>
	.txt <TS_TEXT_Ladon2.txt>
	% Msg1 <You read the diary.>
	Msg1 <この日記を読んだ。>
	home <Final Rest>

	NPC Professor
end
