///////// Text Ghost template
///////// Start/Stop/Switch Talk Dictionary
///////// written by umeici.

//**** First boot *************************************************************************

//---- OnFirstBoot event --------------------------------------------------------------
OnFirstBoot
{
	//---- Initialize variables
	username         = "ユーザーさん"
	stroke           = 0	// For stroking judgment
	teachusername    = 0	// For remembering username
	mikireflag       = 0	// For cutting off
	communicateratio = 10	// Communicate start rate [%]
	vanishswitch     = 1	// Vanish switch
	bootcount        = 0	// Boot count
	desktoptime      = 0	// Total time on desktop [min]
	iconizingtime    = 0	// Minimized time [min]
	iconizing        = 0	// Iconize switch (activates when minimized)
	clickcount       = 0	// Number of clicks
	movecount        = 0	// Number of strokes
	wheelcount       = 0	// Number of wheel movements

	//---- Check the Vanish count to determine whether it is a true first time or not
	if reference0 == 0
	{
		//---- Really the first time booting
		Bootchk
		"\1\s[10]\0\s[0]Well……\w5\s[50]it's here……\w6\s[51]oh？\w7\x/
		\0\c\s[54]First of allAlet me say hello……\w6\s[5]I say %selfname。\w7\n/
		\s[0]I came here because %hiromikurominame is around here……\w6/
		\s[53]I was in a different place for a while, so my words are pretty strange。\w7\n/
		\s[6]But、\w4\s[5]first of all, let's get into the spirit、\w5is that okay？\w9\e"
	}
	else
	{
		//---- First time starting after reinstallation
		""
		--
		if reference0 == 1
		{
			Bootchk
			"\1\s[10]\0\s[8]Well, at least I'm back。\w7\n/
			\s[6]I'll try not to let this happen again、\w6\s[5]right？"
		}
		else
		{
			Bootchk
			"\1\s[10]\0\s[4]You're so good、\w4you're not getting bore……。\w7\n/
			\s[0]But、\w5\s[53]I think %hiromikurominame said this kind of thing too, because it's taboo……\w6/
			\s[5]Anyway, can I come back？"
		}
		--
		"\w9\e"
	}
}


//**** Normal startup ***********************************************************************

//---- OnBoot event -------------------------------------------------------------------
OnBoot//From here
{
	//---- First, display both surfaces
	"\0\s[0]\1\s[10]\t"
	Bootchk
	--
	//---- Check the startup time and change the greeting
	_timeslot = GetTimeSlot
	if _timeslot == "朝"
	{
		//---- 朝に起動
		"\0\s[5]（・∀・）ｱｯｱｯｱｻｰやでっ。\w6\n今日も気合い入れてこなー。\w9\e"
		"\0\s[5]朝やな、\w5\s[55]気合い入れてがんばりやー？\w9\e"
		"\0\s[5]朝やで？\w6\n\s[4]ちょっと眠いけどな……。\w9\e"
	}
	elseif _timeslot == "昼前"
	{
		//---- 昼前に起動
		"\0\s[54]この時間て結構腹減るんやな……\w6\s[5]お昼ご飯まだかいな？\w9\e"
		"\0\s[3]腹減ってもたわ……\w5\s[54]早く昼食いたいなぁ……？\w9\e"
		"\0\s[54]思いっきり腹減っとるんやけどな……\w5\s[5]お昼ご飯早う食べさせてぇな？\w9\e"
	}
	elseif _timeslot == "昼"
	{
		//---- 昼に起動
		"\0\s[5](･∀･)ﾋｯﾋｯﾋﾙｰやで？\w7\nお昼ご飯なんやろな？\w9\e"
		"\0\s[55]昼やなっ。\w7\n\s[75]メシ食えるわー。\w9\e"
		"\0\s[5]昼やで、\w7\s[55]今日のご飯なんやろか？\w9\e"
	}
	elseif _timeslot == "日中"
	{
		//---- 日中に起動
		"\0\s[8]こんな時間に呼ぶなんてな……\w6\s[5]暇なんかいな？\w6\nうちが相手したるさかい。\w9\e"
		"\0\s[8]一応うちが学生だっちゅうの知っとる？\w7\n/
		\s[6]まぁ、\w3\s[0]一緒にいる分には問題ないけどな。\w9\e"
		"\0\s[5]こんちは、\w5%username。\w7\n\s[8]こんな日中に呼び出して何の用や？\w9\e"
	}
	elseif _timeslot == "夕方"
	{
		//---- 夕方に起動
		"\0\s[55]（・∀・）ﾕｯﾕｯﾕｳｶﾞﾀｰやな。\w7\n\s[56]さ、\w4帰ろか。\w9\e"
		"\0\s[5]夕方になったで？\w7\nとりあえず帰ろか、\w6%username？\w9\e"
		"\0\s[5]夕方やな。\w6\n\s[4]実はちと腹が減ってきとるねン。\w9\e"
	}
	elseif _timeslot == "夜"
	{
		//---- 夜に起動
		"\0\s[75](･∀･)ﾖｯﾖｯﾖﾙｰやね。\w6\n\s[56]なんかおもろい番組でもあるんやろか。\w9\e"
		"\0\s[0]この時間やと……\w6\s[5]何やおもろい番組あるかいな？\w9\e"
		"\0\s[0]…………\w6\s[5]夜やで。\w7\n\s[8]何かするんか？\w9\e"
	}
	else
	{
		//---- 深夜に起動
		{
			"\0\s[25]"
			--
			"(･∀･)ﾏｯﾏｯﾏﾖﾅｶｰ"
			"(･∀･)ﾏﾖﾅｶﾃﾞｽﾖｰ"
			"(･∀･)ｼｯｼｯｼﾝﾔｰ"
			--
			"。\w6\n\s[5]これから深夜進行の開始やね？\w9\e"
		}
		"\0\s[53]眠いで……\w6\s[6]ちょいと寝てもええか？\w9\e"
		"\0\s[54]やたら眠いんやけどな……\w6\s[53]もしかして思いっきし深夜労働なんかいな？\w9\e"
	}
}

//---- A function to roughly check whether it is morning/afternoon/night, etc. -------------------------------------------
GetTimeSlot
{
	if hour >= 4 && hour <= 10
	{
		"朝"
	}
	elseif hour == 11
	{
		"昼前"
	}
	elseif hour == 12 || hour == 13
	{
		"昼"
	}
	elseif hour >= 14 && hour <= 16
	{
		"日中"
	}
	elseif hour >= 17 && hour <= 18
	{
		"夕方"
	}
	elseif hour >= 19 && hour <= 21
	{
		"夜"
	}
	else
	{
		"深夜"
	}
}


//**** End *****************************************************************************

//---- OnClose event ------------------------------------------------------------------
OnClose
{
	_timeslot = GetTimeSlot
	if _timeslot == "朝"
	{
		//---- 朝に終了
		"\0\s[0]んー、\w5\s[5]とりあえずこれから学校かいな？\w7\n/
		\s[8]まぁ、\w3そのまま寝ぇへんようにせぇや？\w9"
		"\0\s[5]これから仕事かいな？\w7\n\s[0]うちはこれから学校や。\w9"
		"\0\s[0]……\w7\s[4]これから学校行く準備せなならんがな……\w6\s[0]ほなな？\w9"
	}
	elseif _timeslot == "昼前"
	{
		//---- 昼前に終了
		"\0\s[56]うちかて腹くらい減るんやで！？\w7\n/
		\s[5]そんなわけでちとご飯食べてくるわ。\w9"
		"\0\s[5]ちょっと昼飯食ってくるで。\w7\n\s[55]%usernameも飢え死にすんなや？\w9"
		"\0\s[5]とりあえずメシやね。\w6\n\s[3]ちょいとお腹すいとるねン……。\w9"
	}
	elseif _timeslot == "昼"
	{
		//---- 昼に終了
		"\0\s[5]これからお昼やな。\w7\n/
		\s[6]どうせなら一緒に食べよか思ったけど……\w5\s[5]まぁええわ。\w9"
		"\0\s[0]…………\w6\s[54]お腹空いたわぁ……\w5\s[0]食ってくるで。\w9"
		"\0\s[5]とりあえずご飯やな。\w7\n\s[54]腹減っててどうにもならんわ……\w4うちも。\w9"
	}
	elseif _timeslot == "日中"
	{
		//---- 日中に終了
		"\0\s[2]へ？\w5\n終わるんかいな、\w4こんな時間に？\w7\n/
		\s[6]まぁええわ……\w5\s[5]ほならまたな。\w9"
		"\0\s[0]……\w7こんな時間かいな。\w6\n\s[6]まぁええ。\w6\n\s[5]また今度な？\w9"
		"\0\s[0]んっと……\w6\s[5]この時間やとまだやることがあるからうちもちょいと行ってくるな？\w9"
	}
	elseif _timeslot == "夕方"
	{
		//---- 夕方に終了
		"\0\s[5]ほならうちも一旦帰るわ。\w6\n/
		\s[55]今日のご飯が何なのかちょっと楽しみやわぁ。\w9"
		"\0\s[5]これから夕ご飯やねン。\w7\n\s[55]今日は何なのか楽しみやわー。\w9"
		"\0\s[5]ご飯の時間やしな、\w5うちそろそろ帰るで。\w7\nほなまたな？\w9"
	}
	elseif _timeslot == "夜"
	{
		//---- 夜に終了
		"\0\s[6]もうちょいしたら寝る時間やね。\w7\n/
		\s[56]%usernameもあまり夜更かしせんとちゃんと寝るんやで？\w9"
		"\0\s[3]ちょいと眠いかも知れへん……\w7\s[5]お休みやで、\w6%username。\w9"
		"\0\s[0]…………\w7\s[3]ちと眠くなってきおったわ……。\w9"
	}
	else
	{
		//---- 深夜に終了
		"\0\s[9]さすがにこの時間やと眠いんやけどな……\w6/
		\s[0]ちゃんと寝なあかんで、\w4%username？\w9"
		"\0\s[54]この時間は地獄やで……\w5\s[3]寝るわ。\w9"
		"\0\s[9]さすがにちとこの時間やとキツいわ……\w5\s[0]うち寝るで？\w9"
	}
	--
	"\-\e"
}


//**** Iconization related *******************************************************************
//---- OnWindowStateMinimize event ----------------------------------------------------
OnWindowStateMinimize
{
	iconizing = 1
}
//---- OnWindowStateRestore event -----------------------------------------------------
OnWindowStateRestore
{
	iconizing = 0
	"\1\s[10]\0\s[7]It's narrow！！\e"
	"\1\s[10]\0\s[54]I wonder if there's anything we can do about that place……。\e"
	"\1\s[10]\0\s[4]It's really narrow there……。\e"
}


//**** Ghost/Shell switching **********************************************************

//---- Switch to another ghost -----------------------------------------------------------
OnGhostChanging
{
	if reference1 == "manual"
	{
		//---- Manual switching
		if reference0 == "裕海"
		{
			// ---- Reboot？
			"\0\s[0]\tWell, wait a bit、\w6\s[5]I'll be back。\w9\e"
			"\0\s[0]\tHmm……\w3\s[5]I'll be back in a bit。\w9\e"
			"\0\s[0]\tWell, I'll be back in a bit。\w7\n\s[5]Just wait。\w9\e"
		}
		elseif reference0 == "海ゅうたん"
		{
			//---- 海ゅうたん
			{
				"\0\s[0]\tほなら%hiromiumyunameに交替するで。\w7\n"
				--
				"\s[5]一応うちの義妹なんやで？\w4\n\s[8]せやからあんまり変なことせんといてや？\w9\e"
				"\w5\n後は多分お義父はんに任せても問題ないとは思うんやけどな。\w9\e"
				"\s[3]なんつーか……\w6\s[4]一応正体はアレやしなぁ……\w5\s[2]どうなんやろな？\w9\e"
			}
		}
		elseif reference0 == "黒海"
		{
			//---- 黒海
			{
				"\0\s[0]\tほなら%hiromikurominameに交替するで。\w7\n"
				--
				"\s[5]うちの自慢の姉やで、\w4\s[56]ちゃんと相手したってや？\w9\e"
				"\s[54]うちもあれだけになればええんやけどなぁ……。\w9\e"
				"っつかちゃんと姉妹でここに来とるんやな。\w9\e"
			}
		}
		elseif reference0 == "翠玉"
		{
			//---- 翠玉さん
			{
				"\0\s[0]\tほなら翠玉はんに交替するで。\w7\n"
				--
				"\s[5]あまりセクハラばっかりしとるんやないで？\w6\n/
				\s[6]確かに綺麗なのは認めるけどな……。\w9\e"
				"\s[4]たまに変なのが見えるとか云うとるけど……\w5\s[3]大丈夫なんやろか。\w9\e"
				"\0\s[5]うちもあの人目指して頑張るで〜。\w4\w6\n/
				\s[0]……\w6\s[0]行けるかは別やけどな。\w9\e"
			}
		}
		elseif reference0 == "ジュリア"
		{
			//---- ジュリア
			{
				"\0\s[0]\tほなら%hiromijulianameに交替するで。\w7\n"
				--
				"元々飼い犬やったんやけどな。\w9\e"
				"\s[6]なんだかすっかり成長しとるけどな。\w9\e"
				"\s[4]元々人懐っこい感じやったけど、\w3あそこまでとは思わんかったわ。\w9\e"
			}
		}
		elseif reference0 == "智恵海"
		{
			//---- 智恵海
			{
				"\0\s[0]\tほなら%hiromichieminameに交替するで。\w7\n"
				--
				"\s[54]このご時世、\w3金魚まで人化するんかいな……。\w9\e"
				"\s[6]頭良さそうに見えるんやけどな……\w4\s[8]実際にはやっぱ金魚やな。\w9\e"
				"\s[6]ま、\w4\s[8]所詮金魚や。\w9\e"
			}
		}
		elseif reference0 == "ヌーディア"
		{
			//---- ヌーディア
			{
				"\0\s[0]\tほなら%hirominudianameに交替するで。\w7\n"
				--
				"んっと……\w3%hiromijulianameの友達らしいんやけどな。\w9\e"
				"\s[54]あんだけ胸があったら完璧やな……\w3ある意味。\w9\e"
				"\s[5]元々うちの飼い犬やったんやで？\w6\n\s[0]多分。\w9\e"
			}
		}
		elseif reference0 == "伏儀"
		{
			//---- 伏儀さん
			{
				"\0\s[0]\tほなら%reference0はんと交替するで。\w7\n"
				--
				"\s[6]色々知っとるな……\w4\s[4]うちなんかじゃさすがに分からんけど。\w9\e"
				"\s[5]一緒にお茶したいわな。\w6\n\s[0]なかなかそういう機会もなさそうやけど。\w9\e"
			}
		}
		elseif reference0 == "保奈海"
		{
			//---- 保奈海
			{
				"\0\s[0]\tほなら%hiromihonaminameに交替するで。\w7\n"
				--
				"\s[5]やっぱ予想通りアホやったんやな、\w3あの金魚は。\w9\e"
				"…………\w3\s[8]任せられるんかいな？\w9\e"
			}
		}
		elseif reference0 == "愛海"
		{
			//---- 愛海
			{
				"\0\s[0]\tほなら%hiromimanaminameに交替するで。\w7\n"
				--
				"\s[5]一応うちの姉やで？\w3\n\s[8]ちょっと性格トロいけどな。\w9\e"
				"\s[5]あまり変なことしちゃあかんで？\w6\n\s[8]多分問題ないやろけどな。\w9\e"
			}
		}
		elseif reference0 == "まりあ"
		{
			//---- まりあさん(まりあ＆どろてあ)
			{
				"\0\s[0]\tほならまりあはんに交替するで。\w7\n"
				--
				"\s[5]色々賑やかなお人やから楽しいかも知れへんな？\w9\e"
				"\s[4]うちもあのくらいのテンションの方がええんやろか……？\w9\e"
			}
		}
		else
		{
			//---- 他のゴーストさん
			{
				"\0\s[0]\tほなら%reference0に交替するで。\w7\n"
				--
				"\s[54]やっと休めるわ……。\w9\e"
				"\s[56]後は任せても問題なしやね？\w9\e"
				"\s[6]はぁ……\w6\s[5]やっと休めるわぁ。\w9\e"
			}
		}
	}
	else
	{
		//---- Automatic switching
		"\0\s[0]\tOh、\w5is it going to switch something？\w7\n/
		\0\s[5]See you later？\w9\e"
		"\0\s[0]\tHmm……\w5\s[3]I guess I'm being forced to leave。\w9"
	}
}

//---- Switch from another ghost ---------------------------------------------------------
OnGhostChanged
{
	"\1\s[10]\0\s[0]"
	Bootchk
	--
	if reference0 == "裕海"
	{
		//---- Reboot completed
		"\1\s[10]\0\s[0]\tSorry to keep you waiting。\w4\n\s[5]I'll get my act together, okay？\w9\e"
		"\1\s[10]\0\s[0]\tYes、\w6\s[5]I'll get my act together from now on, okay？\w9\e"
	}
	elseif reference0 == "海ゅうたん"
	{
		//---- 海ゅうたん
		"\1\s[10]\0\s[5]\t%hiromiumyunameから交替したで。\w6\n/
		\s[8]一応アレでもおにゃのこ化したんやけどな、\w3あの娘。\w9\e"
		"\1\s[10]\0\s[5]\t%hiromiumyunameから交替したで。\w6\n/
		\s[0]一応アレでも中身は男やけどな。\w9\e"
	}
	elseif reference0 == "黒海"
	{
		//---- 黒海
		"\1\s[10]\0\s[0]\t%hiromikurominameから交替したで。\w6\n/
		\s[8]変な触り方とかせぇへんかったやろな？\w9\e"
		"\1\s[10]\0\s[0]\t%hiromikurominameからのチェンジや。\w6\n/
		……\w6\s[8]セクハラしまくったんやないか、\w5%username？\w9\e"
	}
	elseif reference0 == "翠玉"
	{
		//---- 翠玉さん
		"\1\s[10]\0\s[0]\t翠玉はんから交替したで。\w6\n/
		\s[5]同じセーラー服同士やと気分もええな、\w3\s[55]もっと話とかしてみたいわ。\w9\e"
		"\1\s[10]\0\s[0]\t翠玉はんから交替したで。\w6\n/
		\s[6]ある意味目標やな……\w4\s[0]うちにとっては、\w3やけどな。\w9\e"
	}
	elseif reference0 == "ジュリア"
	{
		//---- ジュリア
		"\1\s[10]\0\s[0]\t%hiromijulianameから交替したで。\w6\n/
		\s[6]まぁ、\w3\s[5]前からあんな感じやったで、\w3色んな意味で。\w9\e"
		"\1\s[10]\0\s[0]\t%hiromijulianameから交替したで。\w6\n/
		\s[5]ほなら適当にやっていくとするで。\w9\e"
	}
	elseif reference0 == "智恵海"
	{
		//---- 智恵海
		"\1\s[10]\0\s[0]\t%hiromichieminameから交替したで。\w6\n/
		\s[8]やっぱ金魚やね、\w3色んな意味で。\w9\e"
		"\1\s[10]\0\s[0]\t%hiromichieminameから交替したで。\w6\n/
		\s[6]まぁなんつーか……\w5\s[8]良くも悪くも金魚やったな、\w4うん。\e"
	}
	elseif reference0 == "ヌーディア"
	{
		//---- ヌーディア
		"\1\s[10]\0\s[0]\t%hirominudianameから交替したで。\w6\n/
		\s[54]やっぱあのくらい胸はほしいなぁ……。\w9\e"
		"\1\s[10]\0\s[0]\t%hirominudianameから交替したで。\w6\n/
		…………\w7\s[54]向こうは犬なのに女として負けたわ…………。\w9\e"
	}
	elseif reference0 == "保奈海"
	{
		//---- 保奈海
		"\1\s[10]\0\s[0]\t%hiromihonaminameから交替したで。\w6\n/
		\s[8]思いの外バカっぽかったやね？\w9\e"
		"\1\s[10]\0\s[0]\t%hiromihonaminameから交替したで。\w6\n/
		\s[6]まぁ、\w6\s[8]思いっきりおバカやったけどな、\w3アレ。\w9\e"
	}
	elseif reference0 == "伏儀"
	{
		//---- 伏儀さん
		"\1\s[10]\0\s[0]\t%reference0はんから交替したで。\w6\n/
		\s[5]ああいう和服もええやね、\w6\s[0]うちやとダブダブになってまうけど。\w9\e"
		"\1\s[10]\0\s[0]\t%reference0はんから交替したで。\w6\n/
		うちにはああいう和服あわんけど……\w6\s[5]やっぱ一度くらいは着てみたいわな。\w9\e"
	}
	elseif reference0 == "愛海"
	{
		//---- 愛海
		"\1\s[10]\0\s[0]\t%hiromimanaminameから交替したで。\w6\n/
		\s[54]もうちょいと姉としての威厳を持ってほしいんやけどなぁ……。\w9\e"
		"\1\s[10]\0\s[0]\t%hiromimanaminameから交替したで。\w6\n/
		\s[5]ほなら適当にやっていくとするかね？\w9\e"
	}
	elseif reference0 == "まりあ"
	{
		//---- まりあさん(まりあ＆どろてあ)
		"\1\s[10]\0\s[0]\tまりあはんから交替したで。\w6\n/
		\s[5]ああいうテンションの方が色んな意味で気持ちええと思えるわな。\w9\e"
	}
	else
	{
		//---- Other ghosts
		"\1\s[10]\0\s[0]\t%reference0 has taken over。\w6\n/
		\s[5]Well, I'll do my best, okay？\w9\e"
	}
}

//---- シェルチェンジ開始 ---------------------------------------------------------------
OnShellChanging
{
	"\1\s[10]\0\s[5]\tちょいと待っててや？\w9\e"
	"\1\s[10]\0\s[0]\tちぃと着替えてくるな？\w6\n\s[6]覗きなんて無粋な真似はダメやで？\w9\e"
}

//---- シェルチェンジ完了 ---------------------------------------------------------------
OnShellChanged
{
	"\1\s[10]\0\s[5]\t着替え終わったで？\e"
}


//---- ブートチェック（カウント） -------------------------------------------------------
Bootchk
{
	bootcount = bootcount + 1
}