#_Common
{$if ({$mode}==1)}

//////////////////////////////
//  ϐ
//////////////////////////////
$_Variable
{
	{$if ({$mode}==1)}
	{$_talkinterval=60}
	{$lasthour={$hour}}
	{$mikirecount=0}
	{$kasanaricount=0}
	{$mikirecountmax=4}
	{$kasanaricountmax=4}
	{$mikireflag=false}
	{$kasanariflag=false}
	{$mikiretalkedflag=false}
	{$kasanaritalkedflag=false}
}

$_Constant
{
//	{$loadsaori("substr.dll")}

  {$headmousemovecountmax=192}
  {$facemousemovecountmax=192}
  {$bustmousemovecountmax=192}
  {$etcmousemovecountmax=128}
}

//////////////////////////////
//  ԌnCxg
//////////////////////////////
// 
$_OnHourChange; {$if ({$hour}==0)}
	\0\s[0]It's 0B\n\n\w8%month%dayȁH\e
$_OnHourChange; {$if ({$hour}==3)}
	\0\s[0]It's 3B\n\n\w8\s[8]We really ought to get some sleepEEE\e
$_OnHourChange; {$if ({$hour}==5)}
	\0\s[80]It's 5B\w8\s[0]Looks like it's getting bright outsideB\e
$_OnHourChange; {$if ({$hour}==11)}
	\0\s[0]It's 11B\w8\1\s[80]I'm getting hungryEEEB\e
$_OnHourChange; {$if ({$hour}==12)}
	\0\s[80]It's 12B\w8\0\s[0]Lunchtime[B\e
$_OnHourChange; {$if ({$hour}==23)}
	\0\s[0]It's 23B\n\n\w8It's flat-rate internet time[B\n\w8\e

// ȊO
$_OnHourChange
	\1\s[80]It's {$hour}B\e

$OnMinuteChange; {$if (({$lasthour}!={$hour}) && ({$minute}==0))} 
	{$_OnHourChange}{$lasthour={$hour}}

$OnMinuteChange; {$if ({$lastelapsedhour}!={$reference(0)})}
	{$_OnElapsedHourChange}{$lastelapsedhour={$reference(0)}}


//////////////////////////////
//  ؂ꁕdȂ
//////////////////////////////
// ؂ꕜA
$OnSecondChange; {$if (({$mikireflag}) && ({$reference(1)}==0))}
{$mikirecount=0}{$mikireflag=false}{$mikiretalkedflag=false}\0\s[0]PhewB\e

$OnSecondChange; {$if (({$kasanariflag}) && ({$reference(2)}==0))}
{$kasanaricount=0}{$kasanariflag=false}{$kasanaritalkedflag=false}

// ؂
$OnSecondChange; {$if (({$mikireflag}) && ({$mikiretalkedflag}==false))}
{$mikiretalkedflag=true}\0\s[4]Um[Acould I move somewhere with a bit more sunlight, pleaseEEEH\e

// dȂ
$OnSecondChange; {$if (({$kasanariflag}) && ({$kasanaritalkedflag}==false))}
{$kasanaritalkedflag=true}\0\b[-1]\e

$OnSecondChange
{
  {$mikirecount+={$reference(1)}}
  {$kasanaricount+={$reference(2)}}
  {$mikireflag={$if ({$mikirecountmax}<={$mikirecount})}}
  {$kasanariflag={$if ({$kasanaricountmax}<={$kasanaricount})}}
}


//////////////////////////////
//  ˂
//////////////////////////////
// ˂
$OnMouseDoubleClick; {$if (({$reference(3)}==0) && ({$reference(4)}==Head))}
	\0\s[8]OuchB\e
	\0\s[8]OuchB\w8\1\s[89]You know, pestering someone is a sign that you're interested in them, rightH\e
	\0\s[4]UghEEE\e

$OnMouseDoubleClick; {$if (({$reference(3)}==0) && ({$reference(4)}==Face))}
	\0\s[8]I said that hurtsEEEB\e
	\0\s[7]Don't poke my faceI\e

$OnMouseDoubleClick; {$if (({$reference(3)}==0) && ({$reference(4)}==Bust))}; nonoverlap;
	\0\s[2]A\w9\n\s[7]EEEI\n\n\w8\1\s[80]yȁB\0I\e
	\0\s[1]ނB\e
	\1\s[89]z}ɋlߕȂH\w8\0\s[7]ႤI\e
	\0\s[1]EEEǂĂ邩ȂB\n\n\w8\1\s[80]ςB\w8\0\s[9]̂EEEB\e
	\0\s[6]ƂłǂȂĂmȂH\e


$OnMouseDoubleClick; {$if (({$reference(3)}==0) && ({$reference(4)}==Toge))}; nonoverlap;
	\0\s[4]܂GȂłقȁB\e
	\0\s[3]{$0}̕{$choice("","댯","Ȃ","낵","NT")}{$choice("Cz","dg","Ј","")}EEEB\w8\1\s[80]EEEB\e
	\0\s[0]dg̋CzMM܂B\w8\1\s[80]EEEH\e
	\0\s[3]hH\w8\1\s[80]܂㓪ƂĂȁB\e
	\0\s[0]{$n}Ō@o̗\B\w8\1\s[80]Ȃ@oāEEEB\e
	\0\s[0]{$choice("","","J")}ȁH\w8\w8\1\s[80]֗ȃAeiȁ[B\e


//  
$OnMouseMove; {$if ({$headmousemovecountmax}<={$getmousemovecount(0,"Head")})}; sequential;
{$resetmousemovecount(0,"Head")}\0\s[9]You're not going to get anything out of doing that, you know[H\e
{$resetmousemovecount(0,"Head")}\0\s[6]Like I said, nothing's going to come of itB\e
{$resetmousemovecount(0,"Head")}\0\s[6]EEEEEEB\e
{$resetmousemovecount(0,"Head")}\0\s[6]EEEEEEB\w8\1\s[80]EEEEEEB\e
{$resetmousemovecount(0,"Head")}\1\s[80]You look pretty happy about itB\w8\0\s[0]You think soH\e
{$resetmousemovecount(0,"Head")}\0\s[0]HeheheB\e

$OnMouseMove; {$if ({$bustmousemovecountmax}<={$getmousemovecount(0,"Bust")})}; sequential;
{$resetmousemovecount(0,"Bust")}\0\s[8]́[EEEB\e
{$resetmousemovecount(0,"Bust")}\0\s[7]EEEނB\e
{$resetmousemovecount(0,"Bust")}\0\s[1]EEEǂĂ邩ȂB\e
{$resetmousemovecount(0,"Bust")}\0\s[3]EEEȂ񂩂ƓႤ\w8\1\s[80]EEEBB\e
{$resetmousemovecount(0,"Bust")}\0\s[7]߂āB\e
{$resetmousemovecount(0,"Bust")}\0\s[7]ȂɎɋ}̂ȁEEEH\w8\1\s[89]{点ƋŁ[H\e

$OnMouseMove; {$if ({$bustmousemovecountmax}<={$getmousemovecount(0,"Absolute")})}; sequential;
{$resetmousemovecount(0,"Absolute")}\0\s[1]EEEǂGĂ邩ȂB\e
{$resetmousemovecount(0,"Absolute")}\0\s[8]Ă΁EEEB\e
{$resetmousemovecount(0,"Absolute")}\0\s[3]ςȃV~EEEB\e
{$resetmousemovecount(0,"Absolute")}\1\s[89]ȂɂȂ񂩁H\w4Η̈Ă̂́B\w8\0\s[3]Η̈EEEH\e
{$resetmousemovecount(0,"Absolute")}\0\s[7][BɂĂB\e


// P
$OnMouseMove; {$if ({$bustmousemovecountmax}<={$getmousemovecount(1,"Bust")})}; sequential;
{$resetmousemovecount(1,"Bust")}\1\s[89]ǂGƂ˂EEEB\e
{$resetmousemovecount(1,"Bust")}\1\s[89]́[\n\w8\w8\w8ƂĂقH\e
{$resetmousemovecount(1,"Bust")}\1\s[89]ŁH\e
{$resetmousemovecount(1,"Bust")}\0\s[3]Ȃ́H\n\n\w8\1\s[80][͔̂邩ʔŁH\e
{$resetmousemovecount(1,"Bust")}\1\s[80]Cςނ܂ŐG点ƂႻ̂OB\0\s[8]EEEB\e
{$resetmousemovecount(1,"Bust")}\1\s[89]ȁEEE\e

$OnMouseDoubleClick; {$if (({$reference(3)}==1) && ({$reference(4)}==Bust))}; sequential;
	\1\s[80]H\e
	\1\s[89]ǂGƂ˂B\e
	\1\s[80]낢H\e
	\1\s[89]A^Dȁ[B\e
	\1\s[89]SOŁB\w8NƈāB\w8\0\s[7]NĒNI\e


$OnMouseDoubleClick; {$if ({$reference(3)}==1)}
{
	\1\s[80]HmmAwhat is it?H\n\n
	\![*]\q[Time to head home,kaere]\n
	\![*]\q[Never mind,sys_cancel]\n
}

// Pj[
$OnChoiceSelect; {$if ({$reference(0)}=="sys_cancel")}
	\1\s[80]I see[B\e
	\1\s[80]Hmm[B\e
	\1\s[80]What's upH\e

$OnChoiceSelect; {$if ({$reference(0)}=="kaere")}
	\1\s[80]I'm not really in the mood for that yetB\e
	\1\s[80]Oh, come on, what's the harmH\e
	\1\s[80]No wayB\w8\0\s[8]EEEB\e
{
	{$mode=0}
	\1\s[80]Well, I guess I'll head off nowA\w4see yaB\w8
	\0\s[0]OhArightB\w8See you later[\w8
	\1\s[-1]\b[-1]\c\w8\w8\w8
	\1\s[13]Good griefEEEfinally leftB\w8
	\0\s[8]\cWhere were you, anywayH
	\e
}


//////////////////////////////
//  j[
//////////////////////////////

// j[
$OnMouseDoubleClick; {$if ({$reference(3)}==0)}
	\0\s[0]HmmAdid you call meH\n\n{$menu}\e
	\0\s[0]HmmAwhat is itH\n\n{$menu}\e
	\0\s[0]What's upH\n\n{$menu}\e
	\0\s[0]Here's the menu[B\n\n{$menu}\e

// j[
$menu
{
	\![*]\q[Tell me something,manzai]\n
	\![*]\q[Chat frequency,talkinterval]\n
	\![*]\q[Introduce yourself,myself]\n
	\![*]\q[Options,option]\n
	\n
	\![*]\q[Never mind,cancel]\n
}

// ׂpx
$OnChoiceSelect; {$if ({$reference(0)}=="talkinterval")}
{
	\0\s[0]How chatty would you like me to beH\n\n
	\![*]\q[Quite chattyB,talk_level4]\n
	\![*]\q[Fairly chattyB,talk_level3]\n
	\![*]\q[AverageB,talk_level2]\n
	\![*]\q[Not very chatty[B,talk_level1]\n
	\![*]\q[Stay quietB,talk_level0]\n\n
	\![*]\q[Cancel,na-cancel]\e
}

$OnChoiceSelect; {$if ({$reference(0)}=="talk_level4")}
	{$_talkinterval=15}\1\s[80]Oقǂɂ邳A\w4B\w8\0\s[3]ĂmȂH\e
$OnChoiceSelect; {$if ({$reference(0)}=="talk_level3")}
	{$_talkinterval=30}\1\s[80]ȂĂ̂[ȁB\w8\0\s[0]܂KxĂƂȂH\e
$OnChoiceSelect; {$if ({$reference(0)}=="talk_level2")}
	{$_talkinterval=60}\0\s[0]ȂłʂԂƎvB\w8\1\s[80]ʂĂȂȂEEEB\e
$OnChoiceSelect; {$if ({$reference(0)}=="talk_level1")}
	{$_talkinterval=145}\1\s[80]WellA\w4things are just okay, I guessB\w8\0\s[0]YeahB\e
$OnChoiceSelect; {$if ({$reference(0)}=="talk_level0")}
	{$_talkinterval=0}\1\s[89] It's actually pretty tough, having to keep quiet like thisEEE\w8\0\s[3]Hmm[B\e

// S[XgԃR~jP[V
//$OnChoiceSelect; {$if ({$reference(0)}=="ghostcommunicate")}
//	{$_OnGhostCommunicateSend}

// LZ
$OnChoiceSelect; {$if ({$reference(0)}=="cancel")}
	\0\s[0]OhB\e
	\0\s[3]Huh[B\e
	\0\s[6]I seeB\e

// _g[N
$OnChoiceSelect; {$if ({$reference(0)}=="manzai")}
	{$_OnRandomTalk}


//  ȏЉ
$OnChoiceSelect; {$if ({$reference(0)}=="myself")}
{
	\0\s[0]HmmB\w4Which one do you want to know aboutH\n\n
	\![*]\q[Aira,self0]\n
	\![*]\q[Shizuka,self1]\n\n
	\![*]\q[Actually never mind,cancel]\n
	\e
}
$OnChoiceSelect; {$if ({$reference(0)}=="self0")}
{
	\1\s[80]I think what you see is what you getB\n\w8
	She's a kind, laid-back, and naturally ditzy big sister typeB\n\n\w8
	\0\s[9]EEEaren't you kind of insulting me thereH\n\n\w8
	\1\s[80]That's not the case at allH\n\w8
	\0\c\1\c
	\1\s[80]Come to think of it, I don't really see you cooking muchB\n\n\w8
	\0\s[8]EEEwell, it's not exactly my strong suitB\n\n\w8
	\1\s[89]Youre never going to find a husband at this rate, are youH\w8
	\0\s[6]That's not true at all[so thereB\w8
	\e
}
$OnChoiceSelect; {$if ({$reference(0)}=="self1")}
{
	\1\s[80] \w2΁B\w4Nice to meet youB\n\n\w8
	\0\s[0]These kanji are just phonetic stand-ins, you knowB\n\w4Like... "Kawahira-something-or-other"B\n\n\w8
	\1\s[80]Yeah[B\w8Sisca Ulu is my real nameB\n\n\w8
	\0\s[9]But contrary to the characters in your name, you're actually pretty loudB\w8
	\1\s[89]You've got some nerveEEEB\w8\w8\w8\w8
	\0\c\1\c
	\0\s[0]EEso does that mean you aren't JapaneseH\n\n\w8
	\1\s[80]NahA\w4I'm pretty sure I am JapaneseB\n\n\w8
	\0\s[3]Pretty sureA\w8huhEEEB\n\n\w8
	\1\s[89]Look who's Talking - you've got hair that color naturallyB\w8
	\0\s[0]HuhH\x
	\0\c\1\c
	\0\s[0]I've been meaning to ask - why do you speak in Kansai dialectH\n\n\w8
	\1\s[83]HuhH\w4UmEEE\n\n\w8
	\0\s[0]Did you live in Kansai when you were littleH\n\n\w8
	\1\s[80]YA\w4yeahA\w4something like that\w8
	\0\s[9]EEEhmmH\w8
	\e
}



// IvV
$OnChoiceSelect; {$if ({$reference(0)}=="option")}
	\0\s[0]Here are the options\n\n{$menu2}\e


// IvV
$menu2
{

	\![*]\q[PC Info,pcinfo]\n
	\![*]\q[Remember my name,teachname]\n
	\![*]\q[Back,back]\n
	\n
	\![*]\q[Never mind,cancel]\n
}

// ߂
$OnChoiceSelect; {$if ({$reference(0)}=="back")}
	\0\s[0]We're backB\n\n{$menu}\e

// obXybN
$OnChoiceSelect; {$if ({$reference(0)}=="pcinfo")}
{
	\0\s[0]Um[Athe information on this computer is\n\w8\w8
	{$os.name} {$os.version}\n\w8
	{$cpu.vendorname} {$cpu.name}Ait's running at {$cpu.clockcycle}Mhz\n\n\w8
	There's {$os.freememorysize}/{$os.phisicalmemorysize} bytes of free memoryB\n\n\w8
	The OS has been running for {$elapsedhouros} houres and {$elapsedminuteos} minutesB\n\n\w8
	\x
	\1\s[80]Well, thanks for being so thoroughB
	\e
}

// Oo
$OnChoiceSelect; {$if ({$reference(0)}=="teachname")}
	\0\s[0]So, tell me your nameB\![open,inputbox,teachname,-1]

$OnUserInput; {$if ({$reference(0)}=="teachname")}
{
	{$username={$reference(1)}}
	\0\s[0]Is u{$username}v correctH\n\n
	\![*]\q[That's right,name_complete]\n
	\![*]\q[I made a mistake,teachname]
	\e
}

$OnChoiceSelect; {$if ({$reference(0)}=="name_complete")}
{
	\0\s[0]HmmB\w4u{$username}v got itB\w8
	\1\s[80]YeahAnice to meet ya[B
	\e
}





//////////////////////////////
//  wbhCZX
//////////////////////////////
$OnHeadlinesenseBegin
	\0\s[0]Starting the process of retrieving the "sense" (meaning/nuance) from site {$reference(0)}B\e
$OnHeadlinesense.OnFind; {$if ({$reference(2)}==First)}
{
	\0\s[0]\b2 u{$reference(0)}v wbhCB\n\n
	\_q{$reference(3)}\_q\n
	\![*]\q[̃y[W,]\n
	\![*]\q[sĂ݂,{$reference(1)}]\n\n
	\![*]\q[I'm not going,na-cancel]
	\e
}
$OnHeadlinesense.OnFind; {$if ({$reference(2)}==Next)}
{
	\0\s[0]\b2 u{$reference(0)}v wbhC̑B\n\n
	\_q{$reference(3)}\_q\n
	\![*]\q[̃y[W,]\n
	\![*]\q[sĂ݂,{$reference(1)}]\n\n
	\![*]\q[I'm not going,na-cancel]
	\e
}
$OnHeadlinesense.OnFind; {$if ({$reference(2)}==First and Last)}
{
	\0\s[0]\b2 u{$reference(0)}v wbhCB\n\n
	\_q{$reference(3)}\_q\n
	\![*]\q[sĂ݂,{$reference(1)}]\n
	\![*]\q[I'm not going,na-cancel]
	\e
}
$OnHeadlinesense.OnFind; {$if ({$reference(2)}==Last)}
{
	\0\s[0]\b2 u{$reference(0)}v wbhC̑B\n\n
	\_q{$reference(3)}\_q\n
	\![*]\q[sĂ݂,{$reference(1)}]\n
	\![*]\q[I'm not going,na-cancel]
	\e
}
$OnHeadlinesenseFailure
	\0\s[8]EEElbgɌqĂH\e

$OnHeadlinesenseComplete; {$if ({$reference(0)}==no update)}
	\0\s[8]XVĖ݂B\e

//{܂LZ
$OnChoiceSelect; {$if ({$reference(0)}=="na-cancel")}
	\0\s[0]OhB\e
	\0\s[0]I seeB\e


//

//////////////////////////////
//  tqkhbv
//////////////////////////////
$OnURLDropping
	\0\s[0]_E[hˁB\e


//////////////////////////////
//  lbg[NXV
//////////////////////////////

$OnUpdateBegin
	\0\s[0]ꂶn߂ˁB\e
	\0\s[0]˂Ƃ킭XVJnB\e
	\1\s[80]˂Ƃ킭Jn[B\e

$OnUpdateReady
{
	\0\s[0]ƁA\w4{$temp={$reference(0)}}{$temp+=1}{$temp}XVĂ݂ˁB\w8
	\1\s[80]_E[hJnȁB
	\e
}
$OnUpdate.OnDownloadBegin
	\0\s[0]\_q{$reference(0)}\_q B\e

$OnUpdate.OnMD5CompareBegin
	\0\s[0]ǂǂ[A{ȁ[H\w8\e

$OnUpdate.OnMD5CompareComplete
	\0\s[0]AIbPB\w4\e
	\0\s[0]Aob`\w4\e
	\0\s[0]AJyL\w4\e
	\1\s[80]vB\w4\e
	\1\s[80][B\w4\e

$OnUpdate.OnMD5CompareFailure
	\0\s[3]AႤEEE\w4\e
	\0\s[2]jZmI\w4\e
	\1\s[83]ŁA\w4RB\w4\e
	\1\s[89]sǕi݂ȁEEEB\w4\e

$OnUpdateComplete; {$if ({$reference(0)}==none)}
	\0\s[0]nCA\w4Uł܂B\w4\1\s[89]܂艽EEEB\e
	\0\s[4]Vt@C͂܂łB\w4\1\s[80]܁A\w2䂱ƂȁB\e

$OnUpdateComplete
	\0\s[5]͂܂B\w8\1\s[80]JB\e
	\1\s[80]Ł[B\w8\0\s[0]͂ǁ[B\e

$OnUpdateFailure; {$if ({$reference(0)}==timeout)}
	\1\s[80]񂠁A\w4Ԑ؂ƁB\w8\0\s[4]sˁB\e

$OnUpdateFailure; {$if ({$reference(0)}==403)}
	\1\s[89]ANZXłЂB\w8\0\s[8]EEEguȁH\e

$OnUpdateFailure; {$if ({$reference(0)}==404)}
	\1\s[83]t@C点ŁB\w8\0\s[4]̂Ăꂿ̂ȁEEEB\e

$OnUpdateFailure
	\0\s[4]sႢ܂B\e



//////////////////////////////
//  [`FbN
//////////////////////////////
$OnBIFFBegin
	\0\s[0]Alright, I'll go check the mailboxB\e
	\0\s[0]Alright, I'll go check the mailboxB\w8\1\s[89]Even if there is anything, it'll just be some sketchy emails in EnglishB\e
$OnBIFFComplete; {$if ({$reference(0)}==0)}
	\0\s[3]It was emptyH\n\n\w8\1\s[80]Not even a single piece of junk mailEEEB\e
	1\s[89]Well, I suppose that's all you can expectB\w8\0\s[8]EEEB\e
$OnBIFFComplete
	\0\s[0]Hmm, let's seeA\n\nthere were about {$reference(0)} messages, I thinkH\e
OnBIFF2Complete
	\0\s[0]Hmm, let's seeA\n\nthere were about {$reference(0)} messages, I thinkH\e
$OnBIFFFailure
	\0\s[8]I couldn't go and check itEEEB\e



//////////////////////////////
//  v킹
//////////////////////////////
$OnSNTPBegin
	\0\s[0]ꂶAv킹ˁB\e
	\1\s[80]鎞v킹Jn[\w8\0\s[8]̂߂ɗL񂾂悱̋@\EEE\e

// ҂
$OnSNTPCompare; {$if ({$reference(3)}==0)}
{
	\0\s[0]F{$_SNTPStringA}\nF{$_SNTPStringB}\n\n\w8
	A\w8҂B\n\n\w8
	\1\s[80]QCcv̕ȂɐӋCȁB\w8
	\0\s[8]EEEB
	\e
}

// ܕȏジ
$OnSNTPCompare; {$if ({$reference(3)}>=300)}
{
	\0\s[0]F{$_SNTPStringA}\nF{$_SNTPStringB}\n\n\w8
	\s[2]A\w4\s[8]{$reference(3)}bYĂ邯ǁA\w4H\n\n
	\1\s[83]ۂǒq񂩁H̃`RpB\n\w4
	\0\![*]\q[,time-amend]\n\![*]\q[Ȃ,time-cancel]
	\e
}

// ܕ
$OnSNTPCompare
{
	\0\s[0]F{$_SNTPStringA}\nF{$_SNTPStringB}\n\n\w8
	\s[0]{$reference(3)}bYĂ邯ǁA\w8H\n\n
	\0\![*]\q[,time-amend]\n\![*]\q[Ȃ,time-cancel]
	\e
}
{
	\0\s[0]F{$_SNTPStringA}\nF{$_SNTPStringB}\n\n\w8
	\6\0\s[0]{$reference(3)}bĂ珟ɏCႢ܂B
	\1\s[80]񂩁H
	\e
}

//  
$OnChoiceSelect; {$if ({$reference(0)}==time-amend)}
	\6\0\s[0]nCA\w4CƁB\w8\1\s[80]Ł[B\e
$OnChoiceSelect; {$if ({$reference(0)}==time-cancel)}
	\0\s[8]PLH\e

$OnSNTPFailure
	\0\s[3]IȁEEEH\n\w8\1\s[80][ȂȁB\e


//[gi
$_SNTPStringA
{
{$getvalue({$reference(1)},0)}N
{$getvalue({$reference(1)},1)}
{$getvalue({$reference(1)},2)}
{$getvalue({$reference(1)},3)}
{$getvalue({$reference(1)},4)}
{$getvalue({$reference(1)},5)}b
}

//[Ji
$_SNTPStringB
{
{$getvalue({$reference(2)},0)}N
{$getvalue({$reference(2)},1)}
{$getvalue({$reference(2)},2)}
{$getvalue({$reference(2)},3)}
{$getvalue({$reference(2)},4)}
{$getvalue({$reference(2)},5)}b
}



//////////////////////////////
//  CXg[
//////////////////////////////
$OnInstallBegin
	\0\s[0]Alright, I'll go ahead and install itB\w8\e

$OnInstallComplete; {$if ({$reference(0)}==ghost)}
	\0\s[0]Ghost u{$reference(1)}v installed!\w8\1\s[80]NiceB\w8\e
$OnInstallComplete; {$if ({$reference(0)}==shell)}
	\0\s[0]Shell u{$reference(1)}v installed!\w8\1\s[80]NiceB\w8\e
$OnInstallComplete; {$if ({$reference(0)}==balloon)}
	\0\s[0]Balloon u{$reference(1)}v installed!\w8\1\s[80]NiceB\w8\e
$OnInstallComplete; {$if ({$reference(0)}==plugin)}
	\0\s[0]Plugin u{$reference(1)}v installed!Installation complete\w8\1\s[80]NiceB\w8\e

$OnInstallComplete
	\0\s[0]Not entirely sure what it is, but u{$reference(1)}v has been installed\w8\1\s[80]NiceB\w8\e

$OnInstallFailure
	\0\s[8]HuhEEE\w8did something go wrongH\w8\e

$OnInstallRefuse
{
	\0\s[3]Hmm[Athis file is actually for  {$reference(0)}B\n\n\w8
	\1\s[80]There's nothing we can do with itB\w8
	\0\s[5]Please pass it along to {$reference(0)} insteadB\w8
	\e
}


//////////////////////////////
//  T[tBXA
//////////////////////////////
$OnSurfaceRestore; {$if ({$reference(0)}==1)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==2)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==3)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==4)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==5)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==6)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==7)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==8)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(0)}==9)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(1)}==80)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(1)}==83)}
	\1\s[80]\0\s[0]\e
$OnSurfaceRestore; {$if ({$reference(1)}==89)}
	\1\s[80]\0\s[0]\e


//////////////////////////////
//  }Ci[Cxg
//////////////////////////////
$OnSSTPBreak
	\0\s[0]f܂B\e
$OnChoiceTimeout
	\0\s[8]EEE[B\e
	\1\s[80]Ԑ؂B\e
	\1\s[89]VJgB\e

//updates2.dau쐬
$OnUpdatedataCreating
	\1\s[80]قȁuupdates2.dauvŁB\w8\e

$OnUpdatedataCreated
	\1\s[80]قA\w4łB\w8\e

//ȁ[쐬
$OnNarCreating
	\1\s[80]قȁAuȁ[vŁB\e
$OnNarCreated
	\1\s[80]قA\w4傠B\n\w8\s[89]u{$reference(1)}vɋl߂񂾂ŁB\w8\0\s[0]낤܁[B\e

$OnSSTPBlacklisting
	\0\s[0]ubNXgɓ܂B\w8\e

//d
$OnNetworkHeavy
	\1\s[80]It feels strangely sluggish\w8\0\s[8]HmmAthe connection is laggingEEE\w8\e
	\0\s[4]Soooo slowEEE\w8\e



//////////////////////////////
//  NInCxg
//////////////////////////////
//  N
$OnBoot; {$if ((4<={$hour}) && ({$hour}<=6))}
{
	\1\s[80]\0\s[9][EEEB\n\n\w8
	\1\s[80]͂[EEEB\n\n\w8\w8\w8
	\0\s[6]EEEB\n\n\w8
	\1\s[89]QȐQȁ[B\w8
	\0\s[9]H
	\e
}
//  N
$OnBoot; {$if ((20<={$hour}) && ({$hour}<=22))}
{
	\1\s[80]\0\s[0]΂[B\n\n\w8
	\1\s[80]B
	\e
}

//  钆N
$OnBoot; {$if ((23<={$hour}) || ({$hour}<=3))}
{
	{$mode=0}
	\0\s[0]
	\1\s[89]΂ɃE`B\w4A[BقȂȁ[B\w8\s[-1]
	\0\s[8]H\w4ƁEEEH\n\n\w8
	\1\s[13]\cEEEACcƋAB\w8
	\0\s[0]AOYǂɂ́H
	\e
}
{
	\0\s[0]
	\1\s[89]₨A\w4Ȗ钆ɃIimRƖƂ́EEEB\n\n\w8
	\0\s[9]EEEB\n\n\w8
	\1\s[89]ԈႢ̈\w8
	\0\s[6]N܂B\w8
	\e
}


//  ʏN
$OnBoot
	\1\s[80]\0\s[5]Hello hello[\w8\1\s[80]Still as energetic as ever, I see[B\e
	\1\s[80]\0\s[5]\_sYoo-hoo[B\_s\e



//  I
$OnClose; {$if ((6<={$hour}) && ({$hour}<=8))}
{
	\0\s[0]B\w8ꂶ፡撣ĂˁB\w8
	\1\s[80]C[B\w9
	\-
}

}

//  钆I
$OnClose; {$if ((23<={$hour}) || ({$hour}<=5))}
{
	\1\s[80]A\w4IȁB\w8
	\0\s[0]ꂶႨ₷݂Ȃ\w9
	\-
}


//  ʏI
$OnClose
	\1\s[80]\0\s[0]OhAis it overH\n\w8WellAsee ya\1\s[80]See ya[B\w9\-
	\1\s[80]\0\s[0]MmB\n\w8Catch you later\1\s[80]See ya[B\w9\-
	\1\s[80]\0\s[0]OkayB\n\w8See you\1\s[80]Bye-cye[B\w9\-



//////////
//  ŏ
$OnWindowStateMinimize
	\0\s[0]\e


//  ŏ畜A
$OnWindowStateRestore
{
	\1\s[89]\0\s[3]PhewAfinally managed to get out[B\n\n\w8
	\1\s[89]That must've been roughA\w8being pressed so close together like thatEEE
	\0\s[3]Don't say weird things like thatEEEB\e
	\e
}
{
	\0\s[4]
	\1\s[89]If I were to describe what's happening inside in any detail, it would end up being, well... strictly for adults.
	\0\s[8]It won't beB
	\e
}
