///////// Text Ghost template
////////// Start/Stop/Switch Talk Dictionary
///////// copyright (C) 2002 umeici.

OnGhostLoad
{
	//---- Start Hanayu
	FUNCTIONLOAD("hanayu.dll")

	Timermode = 0		// Initialize timer processing mode
	LastTalk  = ""		// Initialize previous conversation

	//Initialize continuous touch count
	Stroked_the_head = 0
	Stroked_the_bust = 0
	Stroked_the_under = 0

}

起動共通スクリプト
{
	movement_status

}

//**** First startup *************************************************************************

//---- OnFirstBoot event --------------------------------------------------------------
OnFirstBoot
{
	//---- Initialize variables
	username         = "ご主人さま"
	stroke           = 0	// For stroking judgment
	teachusername    = 0	// For remembering username
	mikireflag       = 0	// For cutting off view
	communicateratio = 0	// Communication start rate [%]
	movement         = 0	// Fixed to bottom of screen

	起動共通スクリプト
	--
	//---- Check Vanish count and determine if it is a genuine first time
	if reference0 == 0
	{
		//---- Really first time startup
		favorite  = 0	// Initialize favorability
		"\1\s[10]\0\s[38]やっほー、はじめまして。\w8\n\n\s[0]あたしは、白うさぎの「%selfname」。\n\n\w8\w8\1\s[10]わたくしは、黒うさぎの「%keroname」です。\w8\w8\n\n\_sこれから、よろしくお願いします。\_s/
		\x\0\s[30]あのー、\w5\s[5]お名前、教えてください。\![open,inputbox,OnInputUsername,-1]\e"
	}
	else
	{
		//---- First time launch after reinstallation
		favorite = -10 * reference0	// Initialize favorability
		"\1\s[10]\0\s[6]\w3・\w3・\w3・\w3・\w3・\w3・\s[30]あれ？\w8\w8\n\s[3]また、ここ？\n\n\w8\w8\1\s[11]・・・帰りますか？\w8/
		\0\s[32]うーん、%reference0回も追い返されたしね\w1・\w1・\w1・\w9\s[5]でも、いっか。\x/
		\x\0\s[30]あのー、\s[0]改めてお名前、教えてください。\![open,inputbox,OnInputUsername,-1]\e"
	}
}


//**** Normal launch ***********************************************************************

//---- OnBoot event -------------------------------------------------------------------
OnBoot
{
	_tmp = 月出没時刻設定 // 月の出・入り時刻をもとめておく（都道府県が設定されていなければ何もされない）
	起動共通スクリプト
	--
	// Greeting process
	挨拶
}

//---- Function to roughly check morning/afternoon/night, etc.  -------------------------------------------
GetTimeSlot
{
	_m = month
	_h = hour
	
	if _m >= 5 && _m <= 9 { //Correction for long days
		if _h >= 5 && _h <= 10 {
			"朝"
		}
		elseif _h >= 11 && _h <= 13 {
			"昼"
		}
		elseif _h >= 14 && _h <= 17 {
			"日中"
		}
		elseif _h >= 18 && _h <= 22 {
			"夜"
		}
		else {
			"深夜"
		}
	}
	else {
		if _h >= 5 && _h <= 10 {
			"朝"
		}
		elseif _h >= 11 && _h <= 13 {
			"昼"
		}
		elseif _h >= 14 && _h <= 16 {
			"日中"
		}
		elseif _h >= 17 && _h <= 22 {
			"夜"
		}
		else {
			"深夜"
		}
	}
}


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

//---- OnClose event ------------------------------------------------------------------
OnClose
{
	"\1\s[10]Is it over？\n\n\w5\0"
	--
	_timeslot = GetTimeSlot
	if _timeslot == "朝"
	{
		//---- Ends in the morning
		"\s[48]Master。\w5\nUm、\w5could you please let me out？\w8\w8\1\s[12]It's so sudden。It's disgusting。"
		"\s[34]I want to go outside and play・・・\w5\n\s[41]I want to go out、\w5I want to go out、\w5I want to go out！\w8\w8\1\s[12]Calm down。"
	}
	elseif _timeslot == "昼" || _timeslot == "日中"
	{
		//---- End during the day/day
		"\s[40]Hey、%keroname。\w5\nWhy don't you bite that pillar？\w8\w8\1\s[12]You'll get in trouble again。"
		"\s[3]Are you going out、%username？\w5\n\s[32]That's niceー。Where are you going？\w8\w8\1\s[12]Oh dear。"
	}
	else
	{
		//---- End at night/midnight
		"\s[6]Shall we rest too？\w8\w8\1\s[12]Let's do that。\w5\nGoodnight。"
	}
	--
	"\w9\w9\-\e"
}


//**** Restoring from minimized state *****************************************************************

//---- OnWindowStateRestoreイベント -----------------------------------------------------
OnWindowStateRestore
{
	"\1\s[13]\0\s[52]It's a small corner・・・\w8\w8\1\s[13]But don't go crazy、%selfname。\e"
}



//---- シェルチェンジ開始 ---------------------------------------------------------------
OnShellChanging
{
	"\0\s[0]着替え中・・・\e"
}

//---- シェルチェンジ完了 ---------------------------------------------------------------
OnShellChanged
{
	"%(movement_status)\0\s[5]どうですか？%username？\e"
}