// ------------------------------------↓変数初期化部

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

// ------------------------------------↓変数初期化部


$_Variable
{
  {$talkinterval=1}
  {$lasthour={$hour}}
  {$lastelapsedhour=0}
  {$username="ユーザ"}
}

$_Constant
{
  {$lasthour={$hour}}
  {$lastelapsedhour=0}
  {$mikirecount=0}
  {$kasanaricount=0}
  {$mikirecountmax=4}
  {$kasanaricountmax=4}
  {$mikireflag=false}
  {$kasanariflag=false}
  {$mikiretalkedflag=false}
  {$kasanaritalkedflag=false}
  {$headmousemovecountmax=64}
  {$facemousemovecountmax=64}
  {$bustmousemovecountmax=64}
}

// ------------------------------------↑初期化

// ------------------------------------↓ランダムトークテンプレート

//時間----------------------------------------------------------------
$OnMinuteChange,{$if ({$lasthour}!={$hour})}
\0\s9{$hour} o'clock\n\w5{$_OnHourChange}{$lasthour={$hour}}

$_OnHourChange,{$if (0=={$hour})}
\0\s6The date is about to change~\nWouldn't it be nice to take a break?\e

$_OnHourChange,{$if (3=={$hour})}
\0\s3Have your daily routines been disrupted? \n\n\w5\1\s0It's too late now to say anything.\e

$_OnHourChange,{$if (5=={$hour})}
\0\s6You're an early riser. \n\n\w5\1\s0Maybe you just haven't been sleeping enough.\e

$_OnHourChange,{$if (12=={$hour})}
\_s\s0Excitingly watching\e

$_OnHourChange,{$if (13=={$hour})}
\0\s6I wonder what'll come out♪I wonder what'll come out♪\n\n\w5\1\s0たらりらっらっ、らたらりら♪\e

$_OnHourChange,{$if (15=={$hour})}
\0\s6Let's eat something. \n\n\w5\1\s0You'll get fat. \n\n\w5\0\s7I don't want to be told that by Muchan. \n\n\w5\1\s0This is a beer belly.\e

$_OnHourChange,{$if (18=={$hour})}
\0\s6It's time to sit in front of the TV and watch anime. \n\n\w5\1\s0 Sitting upright, of course.\e

$_OnHourChange,{$if (19=={$hour})}
\0\s6Anime has recently started airing at this time. \n\n\w5\1\s0 Sitting upright, of course.\e

$_OnHourChange,{$if ((21=={$hour}) && (5=={$dayofweek}))}
\0\s9It's time for Friday Road Show. \n\n\w5\1\s0Of course, I'll be sitting up straight.... \n\n\w5\0\s4Aren't you being a bit persistent?\e






//時間----------------------------------------------------------------
$OnMinuteChange,{$if ({$lastelapsedhour}!={$reference(0)})}
\0\s6It has been {$reference(0)} hours since launch.\n\w3{$_OnElapsedHourChange}{$lastelapsedhour={$reference(0)}}

$_OnElapsedHourChange,{$if (2=={$reference(0)})}
\1\s0...it looks like it's going to be a long day. \n\n\w5\0\s9Please don't say that.\e
{$hour_change_sub}

$_OnElapsedHourChange,{$if (5=={$reference(0)})}
\0\s9Are your eyes starting to get tired? \n\n\w5\1\s0 I don't know what to do.\e
{$hour_change_sub}

$_OnElapsedHourChange,{$if (20=={$reference(0)})}
\0\s6If you're using win9x, it's about time to fix it. \n\n\w5\1\s0 It might have already crashed. \0\s2 Huh?\e
{$hour_change_sub}

$_OnElapsedHourChange,{$if (50=={$reference(0)})}
\0\s3Is it a server?\n\n\w5\1\s0....\e
{$hour_change_sub}

$_OnElapsedHourChange
{$hour_change_sub}
\e
\e

$hour_change_sub
\0\s9Health Caution.\1\s0For your health, take a 15-minute break every hour while playing.\e
\0\s9Health Caution.\1\s0Avoid playing when you are tired or sleep-deprived.\e
\0\s9Health Caution.\1\s0When playing, keep the room well-lit and away from the TV screen as much as possible.\e
\0\s9Health Caution.\n\n\1\s0On rare occasions, the device may be exposed to strong light or flash repeatedly.\w2.\w2.\w2.\w5etc. omitted. \n\n\w5\0\s6Peekaboo phenomenon? \n\n\w5\1\s0Peekaboo phenomenon.\e




//見切れ、重なり------------------------------------------------------

$OnSecondChange,{$if (({$mikireflag}) && ({$reference(1)}==0))}
{$mikirecount=0}{$mikireflag=false}{$mikiretalkedflag=false}\0\s6It's annoying when the content is cut off.\e
{$mikirecount=0}{$mikireflag=false}{$mikiretalkedflag=false}\0\s6Return to the screen. \n\n\w5\1\s0Return.\e

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

$OnSecondChange,{$if (({$mikireflag}) && ({$mikiretalkedflag}==false))}
{$mikiretalkedflag=true}\0\s9Something's wrong\w1.\w1.\w1..\w9\nIs it cut off?\n\n\w5\1\sIt's probably in the way. \n\n\w5\0\s3Ugh.\e
{$mikiretalkedflag=true}\0\s9Has part of the body disappeared? \n\n\w5\1\s0Image data outside the screen is a waste of resources, so it's deleted when displayed. \n\n\w5\0\s3Does that mean it's cut off...?\n\n\w5\1\s0You could say that.\e

$OnSecondChange,{$if (({$kasanariflag}) && ({$kasanaritalkedflag}==false))}
{$kasanaritalkedflag=true}\0\s5Muchan-san is so fluffy and comfortable.\n\w2\1\s0It's hot in the summer.\e
{$kasanaritalkedflag=true}{$temp={$matel}}\0\s9実はむっちゃんさんの肌はフカフカだったんですね。\n\n\w5\1\s0{$temp}の如し肌触りだろ。\n\n\w5\0\s3{$temp}はフカフカしてません。\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\s8It's not a wig. \n\n\w5\1\s0Are those giant pigtails her own hair?!\n\n\w5\0\s7\w1.\w1.\w1.\w1no good?!\e
\0\s9Nothing comes out even when you hit it. \n\n\w5\1\s0Huh? \nThe other day, when I hit it, {$m} fell out....\n\n\w5\0\s7.\w2.\w2..\n\n\w5\1\s0.\w2.\w2.\w2.\w2..

$OnMouseDoubleClick,{$if (({$reference(3)}==0) && ({$reference(4)}==Face))}
\0\s3Uh, please stop, my glasses will break. \n\n\w5\1\s0Don't worry,\w1They surprisingly don't break even when hit directly by a soccer ball. \n\n\w5\0\s3Ugh.\e
\0\s9They do have glass lenses, so could you please stop? \n\n\w5\1\s0Why don't you try a new pair? \nHow about something made by {$matel}? \n\n\w5\0\s3What kind of glasses are they.\w2.\w2..\e

$OnMouseDoubleClick,{$if (({$reference(3)}==0) && ({$reference(4)}==Bust))}
\0\s3楽しいですか？\n\n\w5\1\s0無いもん突いてもなぁ。\n\n\w5\0\s4\w1・\w1・\w1・。\e
\0\s9ふっ、この時のためにリボンを交換しておきました。\n\n\w5\1\s0何？\n・\w2・\w2・\w2こっ、これは{$matel}製リボン？！\e

$OnMouseMove,{$if ({$headmousemovecountmax}<={$getmousemovecount(0,"Head")})}
{$resetmousemovecount(0,"Head")}\0\s8It won't slip even if you rub it. \n\n\w5\1\s0...what?\e
{$resetmousemovecount(0,"Head")}\0\s6Haha.\e

$OnMouseMove,{$if ({$facemousemovecountmax}<={$getmousemovecount(0,"Face")})}
{$resetmousemovecount(0,"Face")}\0\s3Oh,~there's oil on my glasses~.\nPlease stop, they're fogging up~.\e
{$resetmousemovecount(0,"Face")}\0\s9Unfortunately, these glasses won't come off.\n\n\w5\1\s0They're not a separate surface.\n\n\w5\0\s4That's realistic....\e

$OnMouseMove,{$if ({$bustmousemovecountmax}<={$getmousemovecount(0,"Bust")})}
{$resetmousemovecount(0,"Bust")}\0\s1ん・・・。\e
{$resetmousemovecount(0,"Bust")}\0\s7そんな事する人嫌いです。\e



// ------------------------------------↓Menu


$OnChoiceSelect,{$if ({$reference(0)}==talkinterval)}
\0\s0How long should we talk?\n\n\w5\q0[talkinterval_level2][Quiet]\q1[talkinterval_level1][Slightly]\q2[talkinterval_level0][Silent]\q3[cancel][I'll stop now]\e

$OnChoiceSelect,{$if ({$reference(0)}==talkinterval_level2)}
{$talkinterval=1}\0\s6I'll try my best to talk. \n\n\w5\1\s0I might run out of things to talk about and get bored. \n\n\w5\0\s3I'd hate that....\e
{$talkinterval=1}\1\s0I thought you weren't good at talking in cafes? \n\n\w5\0\s9I'll try my best. \n\n\w5\1\s0...you're pushing yourself too hard.\e

$OnChoiceSelect,{$if ({$reference(0)}==talkinterval_level1)}
{$talkinterval=3}\0\s6So, just do it.\n\n\w5\1\s0"Appropriate" = "Just right".\e
{$talkinterval=3}\1\s0That's the most awkward and troubling thing. \n\n\w5\0\s3Mucchan-san\w2.\w2.\w2..\e

$OnChoiceSelect,{$if ({$reference(0)}==talkinterval_level0)}
{$talkinterval=-1}\0\s4I see. \w9Are we noisy? \n\n\w5\1\s0That's good because it means you never run out of things to talk about. \n\n\w5\0\s9That's true.\e
{$talkinterval=-1}\1\s0We are noisy. \n\n\w5\0\s3Uh, I'll be quiet then.\e

$OnChoiceSelect,{$if ({$reference(0)}==ghostcommunicate)}
{$_OnGhostCommunicateSend}

$OnChoiceSelect,{$if ({$reference(0)}==cancel)}
\1\s1Don't call me for no reason!\n\n\w5\0\s9Give up....\e
\0\s9\_s....\e

$OnChoiceSelect,{$if ({$reference(0)}==forcedtalk)}
{$_OnTalkCore}

$OnChoiceSelect,{$if ({$reference(0)}=="teachname")}
\0\s6Yes, please tell me your name.\![open,inputbox,teachname,-1]

$OnUserInput,{$if ({$reference(0)}=="teachname")}
\0\s6{$username={$reference(1)}}Um, \w1your name is \w4"{$username}"\w4. \n\n\w5\1\s0 But what are you going to do with it? \n\n\w5\0\s9 Huh?\e

$OnMouseDoubleClick,{$if ({$reference(3)}==0)}
{
\0\s9Okay, what's up?\n\n\w5
\q[Say something,forcedtalk]\n
\q[Remember my name,teachname]\n
\q[Adjust speaking frequency,talkinterval]\n
\q[I'll stop,cancel]\n
\e
}

$OnMouseDoubleClick,{$if ({$reference(3)}==1)}
\1\s0Hmm.\e
\1\s0Slippery.\e
\1\s0Hard.\e
\1\s0Ahh.\e
\1\s0Give me.\e
\1\s0Here.\e
\1\s1Bring me {$me}.\e


// ------------------------------------↓ヘッドラインセンス


$OnHeadlinesenseBegin
\0\s9Site {$reference(0)} sense started.\e

$OnHeadlinesense.OnFind,{$if ({$reference(2)}==First)}
\0\s6\b2サイト {$reference(0)} どぞ〜。\n\n\w5{$reference(3)}\n\q0[][次のページへ]\q1[{$reference(1)}][行ってみる]\q2[cancel_h][行かない]\e

$OnHeadlinesense.OnFind,{$if ({$reference(2)}==Next)}
\0\s6\b2サイト {$reference(0)} 次のページです。\n\n\w5{$reference(3)}\n\q0[][次のページへ]\q1[{$reference(1)}][行ってみる]\q2[cancel_h][行かない]\e

$OnHeadlinesense.OnFind,{$if ({$reference(2)}==First and Last)}
\0\s6\b2サイト {$reference(0)} これだけですね。\n\n\w5{$reference(3)}\n\q0[{$reference(1)}][行ってみる]\q1[cancel_h][行かない]\e

$OnHeadlinesense.OnFind,{$if ({$reference(2)}==Last)}
\0\s6\b2サイト {$reference(0)} これで最後です。\n\n\w5{$reference(3)}\n\q0[{$reference(1)}][行ってみる]\q1[cancel_h][行かない]\e

$OnChoiceSelect,{$if ({$reference(0)}==cancel)}
\1\s1なんか面白い話でもあったか？\e

$OnHeadlinesenseFailure
\0\s2あれ？\n失敗したみたいです。\e

$OnHeadlinesenseComplete,{$if ({$reference(0)}==no update)}
\0\s9ん〜変わってないですね。\e


// ------------------------------------↓Ghost/ShellChanged


$OnGhostChanging
\1\s0\0\s6I'll hand this over to {$reference(0)}. \n\n\w5\1\s0I guess you're bored. \n\n\w5\0\s3Oh.\e
\1\s0It's time for a break. \n\n\w5\0\s6Well, see you later.\e

$OnGhostChanged
\1\s0\0\s6I've been replaced by {$reference(0)}. \n\n\w5\1\s0You'll get bored of this quickly, won't you?\n\n\w5\0\s3.\w5.\w5.\w5please stop\w5.\w5.\w5..\e
\0\s9\1\s0Hi! \n\n\w5\0\s9Thank you very much.\e

$OnShellChanging
\1\s0\0\s6{$reference(0)}に着替えます〜。\e
\1\s0ん、新しい服か？\n\n\w5\0\s6はい、{$reference(0)}と言うらしいです。\e

$OnShellChanged
\_s\s0心機一転！\e


// ------------------------------------↓Vanish


$OnVanishSelecting
\1\s0飽きられたらしいな。\n\n\w5\0\s3あう、そんな。\e

$OnVanishSelected
\0\s1うう、私達のこと忘れないで下さい。\n\n\w5\1\s0んじゃ。\e

$OnVanished
\1\s0{$reference(0)} has been deleted. \n\n\w5\0\s9We need to be careful too... \n\n\w5\1\s0Don't you have any interesting stories to share? \n\n\w5\0\s4Don't say it so lightly.\e
\1\s0Hey, do you know the saying, "tomorrow it could happen to me"? \n\n\w5\0\s3Please don't say things like that at a time like this.\e


// ------------------------------------↓Drop


$OnURLDropping
\0\s9何か判りませんが、ダウンロード中。\e
\1\s0ん、なんか来たぞ。\n\n\w5\0\s2え？\nえっと・・・。\e


// ------------------------------------↓ネットワーク更新


$OnUpdateBegin
\0\s6サーバに接続します。\n\n\w5\1\s0何が出るかな〜何が出るかな〜。\e
\1\s0さあ、バグ増やしの時間だ。\n\n\w5\0\s3減らしましょうよ・・・。\e

$OnUpdateReady
\0\s9更新ファイル数は{$temp={$reference(0)}}{$temp+=1}{$temp}個です。\e

$OnUpdate.OnDownloadBegin
\0\s9\_q{$reference(0)}\_q を受信中。\e

$OnUpdate.OnMD5CompareBegin
\0\s9\_q{$reference(0)}\_q のMD5を照合します。\e
\0\s9さあ、正常にダウンロードできたでしょうか。\e

$OnUpdate.OnMD5CompareComplete
\0\s6良かった。\n一致しました。\e
\1\s0だめ。失敗。\n\n\w5\0\s2合ってます。\n合ってますよ！\e

$OnUpdate.OnMD5CompareFailure
\0\s3合わないんですが・・・。\e
\1\s0だめ、失敗。\n\n\w5\0\s3ですね。\e

$OnUpdateComplete,{$if ({$reference(0)}==none)}
\0\s2あの、更新されてないみたいです。\n\n\w5\1\s0駄目人間が管理してるからな\e
\1\s0更新ファイル数は{$random(100000)}個です。\n\n\w5\0\s6嘘です。\n嘘ですから。\e

$OnUpdateComplete
\0\s6更新が終わりました。\e
\0\s9更新終了っと。\n\w5語彙が増えたか、会話パターンが増えたか・・\n\n\w5\1\s0もしくはバグが増えたか。\n\n\w5\0\s4いくら潰しても消えません。\e

$OnUpdateFailure
\0\s2あの、駄目みたいです。\n失敗しました。\e


// ------------------------------------↓メール


$OnBIFFBegin
\0\s9Start checking your email.\e

$OnBIFFComplete,{$if ({$reference(0)}==0)}
\0\s3Ummm\w1.\w1.\w1..\w10\n\n\w5\1\s0You weren't here. \nI miss you. \n\n\w5\0\s1Oh, well,\w5please don't be discouraged, {$usrname}.\e

$OnBIFFComplete
\0\s6Email check complete!\n\n\w5All {$reference(0)} messages, size {$reference(1)}.\e
\0\s6Email check complete!\nThere were several messages.\e

$OnBIFF2Complete
\0\s6Email check complete! \n\n\w5Total {$reference(0)} emails, size {$reference(1)}\nNew arrivals {$reference(3)}.\e
\0\s6Email check complete! \nIt seems like there are more.\e

$OnBIFFFailure
\0\s2Umm, it looks like it didn't work.\n It failed.\e


// ------------------------------------↓時計


$OnSNTPBegin
\0\s9\_q{$reference(0)}\_q\n\n\w5で時計のチェックをします。\e

$OnSNTPCompare,{$if ({$reference(3)}==0)}
\0\s2わ、ぴったり。\n\n\w5\1\s0スゴイ偶然だな。\e
\1\s0ぴったり24時間ずれてるぞ。\n\n\w5\0\s3・・・合ってますよ。\e

$OnSNTPCompare
\0\s6{$_SNTPStringA}\n\n\w5{$reference(3)}秒ずれてますね。\n直しときましょう。\n\n\w5\1\s0ついでに5分進めといたから。\n\n\w5\0\s9五分前行動？\n\n\w5\1\s0五分前行動。\e
\1\s0ぴったりだ。\n\n\w5\0\s9え？{$reference(3)}秒ずれてませんか？\n\n\w5\1\s0どうせまた、ずれるんだからいいだろ。\n\n\w5\0\s6そう言うわけにはいきません。\e

$OnSNTPFailure
\0\s2あの、駄目みたいです。\n失敗しました。\e

$_SNTPStringA
{
{$getvalue({$reference(1)},0)}年
{$getvalue({$reference(1)},1)}月
{$getvalue({$reference(1)},2)}日
{$getvalue({$reference(1)},3)}時
{$getvalue({$reference(1)},4)}分
{$getvalue({$reference(1)},5)}秒
}

// ------------------------------------↓install


$OnInstallBegin
\0\s6\1\s0\_sLet's install!!\e
\1\s0It seems I need to install something. \n\n\w5\0\s1Oh, okay, I'll start the installation.\e

$OnInstallComplete,{$if ({$reference(0)}==ghost)}
\0\s9Ghost {$reference(1)} installation completed.\e
\1\s0More rivals. \0\s3Yay.\e

$OnInstallComplete,{$if ({$reference(0)}==shell)}
\0\s9Shell {$reference(1)} installation completed.\e

$OnInstallComplete,{$if ({$reference(0)}==balloon)}
\0\s9Balloon {$reference(1)} installation completed.\e

$OnInstallComplete,{$if ({$reference(0)}==plugin)}
\0\s9Plugin {$reference(1)} installation completed.\e

$OnInstallFailure
\0\s2Umm, it looks like it didn't work.\n It failed.\e

$OnInstallRefuse
\0\s3Hmm, it looks like it's data for {$reference(0)}. \n\n\w5\1\s0You should at least check that. \n\n\w5\0\s2\w9Oh, \w1you see, \n\w1sometimes people make mistakes.\e
\1\s1This is data for {$reference(0)}. \n\n\w5\0\s6Please give this to the person directly.\e

// ------------------------------------↓surface restore


$OnSurfaceRestore,{$if ({$reference(0)}==3)}
\1\s0That face isn't popular, so people will get bored of it. \n\n\w5\0....please cheer me up more normally. \w7\s0\e
\1\s0Your face is weird. \n\n\w5\0That's terrible....\s0\e

$OnSurfaceRestore
\0\s0\e


// ------------------------------------↓その他マイナーイベント等


$OnWallpaperChange
\0\s9壁紙が変わりましたね。\n\n\w5\1\s0またマニアックな・・・。\n\n\w5\0\s4見もせずに言わないで下さい。\e

$OnSSTPBreak
\0\s9SSTPブレイク発生？\n\n\w5\1\s0らしいな。\e
\0\s9あ、う、あれ？\e

$OnChoiceTimeout
\0\s3They're not responding. \n\n\w5\1\s0I guess they're not even looking at it.\e
\1\s0They're ignoring me.\e

$OnUpdatedataCreating
\0\s9updates2.dau 作成開始♪\e

$OnUpdatedataCreated
\0\s9updates2.dau 作成終了♪\e

$OnSSTPBlacklisting
\0\s9{$reference(0)}をブラックリストに追加します。\n\n\w5\1\s0哀れな子羊よ。\e

$OnNetworkHeavy
\0\s3It's not responding... \n\n\w5\1\s0 Try using a better connection. \n\n\w5\0\s4 Maybe the problem is with the server.\e
\0\s3Hey~\w9 Also~\n\n\w5\1\s0 Try it when it's less busy.\e


// ------------------------------------↓boot/close/windowstate


$OnBoot
{
{$lasthour={$hour}}
{$lastelapsedhour=0}
{$_OnBoot}
}

$_OnBoot,{$if (({$hour}>=2) && ({$hour}<=6))}
\1\s0\0\s3・・・にゅる〜。\n\n\w5\1\s0早く目を覚ませよ。\n\n\w5\0\s4\w5・\w5・\w5・\w5まだ暗いですよぉ〜。\e

$_OnBoot,{$if (({$hour}>=7) && ({$hour}<=9))}
\0\s0\1\s0\0\s3・\w5・\w5・\w5にゅる〜。\n\n\w5\1\s0早く目を覚ませよ。\n日が昇ってるぞ。\n\n\w5\0\s4・\w5・\w5・\w5眠いです〜。\e
\0\s0\1\s0\_s\s0にゅる〜。\n\_s\0\s6今日も一日頑張りましょうね。\n\n\w5\1\s0何を？\n\n\w5\0\s9え？\nお仕事とかお勉強とか・\w5・\w5・\w5。\n\n\w5\1\s0こんなソフト起動して仕事とは、\nいいご身分だな。\n\n\w5\0\s2あわわっ。失礼ですよ。\e

$_OnBoot,{$if (({$hour}>=10) && ({$hour}<=16))}
\0\s5\1\s0\_sおこんにちにゅる〜。\e
\0\s5\1\s0\_sおこんにちにゅる〜。\n\_s\1\s0真っ昼間から暇だねぇ。\n\n\w5\0\s3むっちゃんさん・・・。\e

$_OnBoot,{$if ((({$hour}>=17) && ({$hour}<=23)) || (({$hour}>=0) && ({$hour}<=1)))}
\0\s5\1\s0\_sおこんばんにゅる〜。\e
\1\s0\0\s5おこんばんにゅる〜。\n\n\w5\1\s1さあ、これからが夜の始まりだ！\e


$OnClose,{$if (({$hour}>=4) && ({$hour}<=9))}
\1\s0\0\s5二度寝でもしましょうか。\n\n\w5\1\s0そうやって駄目人間になってくんだな。\w9\-

$OnClose,{$if (({$hour}>=10) && ({$hour}<=16))}
\0\s5\1\s0\_sでわでわ。\-
\0\s0\1\s0終わりだと。\n\n\w5\0\s9さっき{$me_okasi}を見つけたんです。\nおやつに食べましょう。\n\n\w5\1\s0を、じゃ、ちゃっちゃと終わらして食うか。\n\n\w5\0\s6では、失礼します。\w9\-

$OnClose,{$if (({$hour}>=17) && ({$hour}<=21))}
\0\s0\1\s0\0\s6終わりだそうです。\n\n\w5\1\s0自分らよりテレビの方が良いのか。\n\n\w5\0\s4そうとは限らないじゃないですか。\w9\s5\nそれでは失礼します。\w9\-

$OnClose,{$if ((({$hour}>=22) && ({$hour}<=23)) || (({$hour}>=0) && ({$hour}<=3)))}
\0\s0\1\s0ん〜じゃ〜、ま。\n\n\w5\0\s5おやすみなさ〜い。\w9\-


$OnFirstBoot
{
\1\s0\0\s6初めまして〜。\nカフェと言います。\nまだまだ新参者ですがよろしくお願いしますね。\n\n
\1\s0むっちゃんさまでおじゃる。\n\n
\_s\s9・\w5・\w5・\w5\n\_s
\0\s3初対面の方に変なキャラクターで迫らないで下さい。\n\n
\1\s0\nちっ。\n
\0\s6とりあえず、よろしくお願いします。\e
}

$OnWindowStateMinimize
\0\s0\e

$OnWindowStateRestore
\1\s0\0\s0It's cramped over there.\n\n\w5\1\s0It's not much different here.\e


// ------------------------------------↑生イベントハンドラ
// ------------------------------------↓GET String

$homeurl
http://mikura.tripod.co.jp/ghost/

$readmebuttoncaption
Read me

$sakura.recommendbuttoncaption
java(&R)
Java (&R)
Personal bookmarks (&R)

$sakura.portalbuttoncaption
Portal (&P)
Portal-like (&P)
Source (&P)

$kero.recommendbuttoncaption
Research site (&R)
Inedible (&R)

$sakura.recommendsites
サン・マイクロシステムズ
http://www.sun.co.jp/
java.sun.com
http://www.java.sun.com/
The Java Tutorial
http://www.javasoft.com/docs/books/tutorial/
Java(tm) House Mailing List Homepage
http://java-house.etl.go.jp/ml/
風林火山 Online
http://www.wffm.org/
Javaco Project Site
http://javaco.org/
Everyone never know Java behavior
http://park.ruru.ne.jp/ando/work/who/


$sakura.portalsites
さくらみかげ
http://futaba.mafumafu.com/
美坂
http://futaba.nanika.org/misaka/

CheAp sWEeTs(自宅)
http://www.teela.jp/~CheAp_sWEeTs/



$kero.recommendsites
google
http://www.google.com/
infoseek
http://www.infoseek.co.jp/
goo
http://www.goo.ne.jp/
Yahoo! JAPAN
http://www.yahoo.co.jp/
Lycos Japan
http://www.lycos.co.jp/
Excite
http://www.excite.co.jp/
フレッシュアイ
http://www.toshiba.co.jp/toshiba/fresheye_j.htm
BIGLOBEサーチ
http://search.biglobe.ne.jp/




$vanishbuttonvisible
1

$updatebuttoncaption
Network Update (&U)
Looks like a network update (&U)

$vanishbuttoncaption
Delete (&F)

// ------------------------------------↑GET String