#-----------------------------------------------------------------------------
# uؘavCxgpȈՃXNvg
#  (Kawari Easy Event Programmed Script)
#@@CxgvO
#
#  Phase 3.99 (2002/2/28)
#
# O  FuؘavPhase 7.3.1 yяʌ݊łgpB
#         uBvMATERIA period 465 yяʌ݊\tggpB
#
# gF̎t@CƁÁuGhost-KEEPS.txtvuDict-KEEPSs.txtv
# @@@@uDict-KEEPS_URL.txtvukawari.inivɓo^BuGhost-KEEPS.txtv
# @@@@̃XNvgKv
# @@@@ďւB
#
# ҁF܁ ( akira-k@blue.interq.or.jp )
# @@@@@@@@@@@ @( http://www.interq.or.jp/blue/akira-k/keeps/ )
#
# l  FpubNhCƂĎRɉρAĔzzB
# @@@@ρAĔzz̍ہA҂ɘA̕KvȂB
#
# Secial Thanks F
#  Main Application uBv: Քni & LH
#  @@@@@@@@@@@@@@@@@@@@@ ( http://futaba.mikage.to/ )
#  Main Application urrov: DOIchan!
#  @@@@@@@@@@@@@@@@@( http://doichan.netbank.co.jp/ssp/ )
#  SHIORI Module uؘav : Meister
#  @@@@@@@@@@@@@@@@@@( http://meister-d-i.hoops.ne.jp/ )
#  uؘav (Phase 7.3.1) : Ɓ[
#  @@@@@@@@@@@@@@@@@@@( http://users.goo.ne.jp/shobu/ )
#  Script EditeruԂĂv : pipe().vqf
#  @@@@@ ( http://www.geocities.co.jp/SiliconValley-Cupertino/4430/ )
#  Script EditeruKEEPS-Editerv : Mizki_F
#  @@@@@@@@@@@@@@@@ ( http://www02.so-net.ne.jp/~mff_hp/ )
#  AppricationuUDSensorvF
#  @@@@@@@@@@@@ ( http://www2.airnet.ne.jp/~sirataki/nanika/ )
#  Shellu``Zweiv(for private test) F s򐬖
#@@@@@@@@@@@@@@@@@@@( http://www.din.or.jp/~sentence/ )
#
#  Debug Support : ݂ЂƂA߂AqR~AA-01AyouAbossA
#                   ͂݁AtovetaAMizki_F AteataAGAЂŁA
#                  ߂ĂƁA]F A݂Ⴀ AKaz@KpA
#                  ^ixgqR & N
#  Programming Idea & Support : nakajisoAuAUMeisterAskyAA
#                               T & AN
#                                                         (sEh̗)
#-----------------------------------------------------------------------------
#Phase 3.70  3.90 ̕ύX_
#uTalkNoMailvĂяoȂ̂CB
#ؘa̖߁usizevǉɔA[`CEǁB
###{uCallChackTalkvuCallChackTalk2vTu[`ǉB
#NeBJ[hǉB(VONbNEVFύXES[XgύX
#@cc֌WECXg[Elbg[NXVEIȊÕCxg)
###ufeezevϐɋ@\ǉB
###{uTalkCountDownv[`ǉB
#oߎ(S[XgN)̌vZ[`ύXB
###{uCallMinCalcvTu[`ǉB
#uCallSavevudatasaveparamvɓo^ꂽGgZ[ulɏCB
###{udatasaveparamvϐǉB
#ŏĂԂv@\ǉB
###{uMinimamTimevϐǉB
#-----------------------------------------------------------------------------
#Phase 3.90  3.99 ̕ύX_
#uBvMATERIA Phase 360 ȍ~ɒǉꂽVdlLq𓱓B
##PʁEbPʏɁucantalkfalse (Reference3 = 0)vƏȂ
#@@悤ɕύXB
#uvCxgŋȖ(Wtitle)Ɂu - v܂܂ꍇAu - v\
#@ȂAyсu\v܂ނƐɕ\ȂCB
#uԑєv𐔒lr^ɏCB
#NeBJ[hVONbN[hɕύXB
#lbg[NXVuOnUpdateReadyvg[NIɈꎞZ[ulɏCB
#uTCgXg擾v[`Ŗ\NȂ悤ɏCB
##|uTalkCountDownv[`폜B
#|CXg[G[f[^udatainsterrorv폜
#uT[tFCXAvCxg̃ASYCB
#{uInput Box ́vCxgǉB
#{uI[i[h[j[vCxgǉB
#-----------------------------------------------------------------------------
#f[^
#-----------------------------------------------------------------------------
##Lf[^
ctrlword : "\ \\\"\!\#\$\%\&\'\(\)\*\+\,\-\.\/\:\;\<\=\>\?\@\[\]\^\_\`\{\|\}\~\\\\\@\A\B\C\D\E\F\G\H\I\J\K\L\M\N\O\P\Q\R\S\T\U\V\W\Z\\\]\^\_\`\a\b\c\d\e\f\g\h\i\j\k\l\m\n\o\p\q\r\s\t\u\v\w\x\y\z\{\|\}\~\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"

##lbg[NXVG[
dataupdateerror : timeout , md5 , 404 , 403

##[`FbNG[
dataBIFFerror : timeout , kick , defect

##CXg[ꂽIuWFNgʂ鎯ʎq(ʎq̓o^ɒ)
datainst : calender , skin , shell , ghost , plugin , balloon

##lbg[NXVɈꎞZ[uϐ
databackupparam : silence , interval , sw.mikire , sw.kasanari , FlagMode , username , TimeWork , DislpayDpp , DisplayWidth , DisplayHeight , AppliName , AppliMaker , AppliVersion , AppliCopyright , AppliURL , AppliFile

#IɃZ[uϐ
datasaveparam : silence , interval , sw.mikire , sw.kasanari , FlagMode , username

#-----------------------------------------------------------------------------
#Z[up[^(uDict-KEEPSs.txtvŒ`B)
#-----------------------------------------------------------------------------
##g[N (0F ^ 1Fg[NȂ ^ 2F؂AdȂłȂB)
#silence : 0

##g[Npx (bPʁFۂɂ́{PbꂽԂo߂ƃg[NB)
#interval : 56

##؂ꔽ (0FL ^ 1F)
#sw.mikire : 0

##dȂ蔽 (0FL ^ 1F)
#sw.kasanari : 0

##LN^[[h (e͔C)
#FlagMode : $(NULL)

##[U[ (e͔C)
#username : "[U["

#-----------------------------------------------------------------------------
#Œp[^ (uGhost-KEEPS.txtvŒ`B)
#-----------------------------------------------------------------------------
##Nԓe(0Fnr ^ 1FS[Xg ^ FN͕ύXȂB)
#parawork : 1

##TCgXg(0FSXg\ ^ 1`F̌̃Xg\)
#randlist.sakura : 0
#randlist.kero : 0
#randlist.portal : 0

#-----------------------------------------------------------------------------
#\pp[^
#-----------------------------------------------------------------------------
##N(PʁF)
TimeWork : 0

##ԍ킹ArmsoT[o擾
TimeSNTP : f[^擾

##ԍ킹Ânřݎ
TimeLOCAL : f[^擾

##CXg[ACXg[IuWFNg
InstallName  : `
InstallName1 : `

##fBXvC̐F[x(PʁFBit)
DislpayDpp : 0

##fBXvC̕(PʁFBit)
DisplayWidth : 0

##fBXvC̍(PʁFBit)
DisplayHeight : 0

##݂̃CS[Xg̃T[tFCXԍ
SakuraFace : 0

##݂̃TuS[Xg̃T[tFCXԍ
KeroFace : 10

##J_[̃ACR^Cv
IconType : `

##ғ̃AvP[V
AppliName : NoData
##ғ̃AvP[V̐
AppliMaker : NoData
##ғ̃AvP[Ṽo[W
AppliVersion : NoData
##ғ̃AvP[V̒쌠
AppliCopyright : NoData
##ғ̃AvP[VɊւtqk
AppliURL : NoData
##AvP[VɂJt@C
AppliFile : NoData

##ŏĂ()
MinimamTime : 0

#-----------------------------------------------------------------------------
#gpϐ
#-----------------------------------------------------------------------------
##ԑсF${HourZone}ōXV(Earlymornig/Morning/Day/Evening/Night/Midnight)
timezone : Day

##g[NpJE^
cnttalk : 0

##؂pJE^
cntmikire : 55

##؂ptO(1Fu؂ꂽvg[NĂ)
flagmikire : 0

##dȂpJE^
cntkasanari : 0

##ԃJE^(P)
cntwork : 0

##Nԏŏ̎w肵Ԃ͂Ȃ悤ɂ邽߂̃JE^B(P)
flagmin : 1

##wbhCZT[tqk
flagurl : 0

##fBXvCTCỸg[NNɍsȂȂ悤ɂ邽߂̃tO
flagdisplay : 0

##ŏꂽƂ̎
minimambegin : 0

##I[i[h[j[
ownerDM : Nothing

#-----------------------------------------------------------------------------
#Ɨpϐ
#-----------------------------------------------------------------------------
##ėp
temp  : 0
temp1 : 0
temp2 : 0
temp3 : 0
temp4 : 0
answer  : NoAnswer
answer1 : NoAnswer
answer2 : NoAnswer
answer3 : NoAnswer
param0 : NoData
param1 : NoData
param2 : NoData
paramT1 : NoEntry
paramT2 : NoEntry

#蒆~tO (2F蒆~)

freeze : 0

##G蔽ptO()
pointpat : 0

##G蔽ptO(r)
flagpat : 0

##G蔽ptO()
limitpat : 0

##G蔽ptO(r)
halfpat : 0

##G蔽pJE^
cntpat : 0

##G蔽LZpJE^
cntcancel : 0

##zC[ptO()
pointroll : 0

##zC[ptO()
limitroll : 0

##zC[ptO(r)
halfroll : 0

##zC[pJE^
cntroll : 0

#-----------------------------------------------------------------------------
#JE^֌Wϐ\(fobOpECOMMUNCATEgp)
#-----------------------------------------------------------------------------

[ "para" ] : \_q\0t[YF${freeze}F${silence}\ng[NF${cnttalk}^${interval}\n؂F${sw.mikire}F${cntmikire}^60F${flagmikire}\ndȂF${sw.kasanari}F${cntkasanari}^60\e

[ "appli" ] : \_q\0ғ̃AvP[V\nOF${AppliName}\nF${AppliMaker}\no[WF${AppliVersion}\n쌠F${AppliCopyright}\n֘AtqkF${AppliURL}\e

#-----------------------------------------------------------------------------
#ʃTu[`
#-----------------------------------------------------------------------------
##JE^Zbg

countzero : $(set freeze 0 ; set cnttalk 0 ; set cntpat 0 ; set flagpat 0 ; set cntcancel 0)

#-------------------------------------
##JE^t[Y

countfreeze : $(set freeze 2 ; set cnttalk 0 ; set cntpat 0 ; set flagpat 0)

#-------------------------------------
##VONbNI[

countcritical : $(set freeze 3 ; set cnttalk 0 ; set cntpat 0 ; set flagpat 0)

#-------------------------------------
##Z[u

CallSave : $(eval "$(save Dict-KEEPSs.txt "$(foreach temp datasaveparam ${temp}" " ) ")" )

CallSave2 : $(eval "$(save Dict-KEEPSs.txt "$(foreach temp databackupparam ${temp}" " ) ")" )

#-------------------------------------
##ԑє (HourZone)
#̓p[^
# (Ȃ)
#߂p[^
# timezone : Earlymornig / Morning / Day / Evening / Night / Midnight
#ϐ
# temp : ݂́uv
#-----------------

HourZone : $(set temp $(date %k))$(set timezone $(if $([ ${temp} -lt 5 ]) "Midnight" $(if $([ ${temp} -lt 7 ]) "Earlymorning" $(if $([ ${temp} -lt 10 ]) "Morning" $(if $([ ${temp} -lt 17 ]) "Day" $(if $([ ${temp} -lt 19 ]) "Evening" $(if $([ ${temp} -lt 23 ]) "Night" "Midnight")))))))
#-------------------------------------
##v킹p\ (TimeDisplay)
#̓p[^
# param0 :ԓϐ
# param1 : 
#߂p[^
# ${param0} : ϊ
#ϐ
# temp   : ԓ
# temp.* : split߂ŕꂽf[^
#-----------------

TimeDisplay : $(split temp ${param1} "," ; set ${param0} ${temp.1}"N"${temp.2}""${temp.3}" "${temp.4}""${temp.5}""${temp.6}"b")
#-------------------------------------
##f[^o (CallGetWords)
#̓p[^
# param1 : p[^
#߂p[^
# answer : ϊp[^
#@@@@@${ctrlword}ɂL͍폜Ap͑SĔp
#ϐ
# temp1 : ʒu
# temp2 : rpɎoP
#f[^ϐ
# ctrlword : Lf[^
#-----------------

CallGetWords :$(clear answer ; set temp1 0 ; loop $(expr length ${param1}) $(inc temp1 ; set temp2 $(expr substr ${param1} ${temp1} 1) ; if $([ $(NULL) == $(expr find ${ctrlword} \${temp2}) ]) $(if $(pirocall "#."${temp2}) $(set answer ${answer}$(pirocall "#."${temp2}))  $(set answer ${answer}${temp2}))))
#-------------------------------------
##LN^[g[N (CallTalk)(CallTalk2)
#̓p[^
# FlagMode : g[N[h
# paramT1 : g[NGg
# paramT2 : g[NGg(CallTalk2̂)
#߂p[^
# (Ȃ)
#ϐ
# temp : Gg쐬
#-----------------

CallTalk : $(set system.communicate "stop" ; if $(size ${FlagMode}"."${paramT1}) $(entry ${FlagMode}"."${paramT1})  $(entry ${paramT1}))

CallTalk2 : $(set system.communicate "stop" ; set temp ${paramT1}${paramT2} ; if $(size ${FlagMode}"."${temp}) $(entry ${FlagMode}"."${temp}) $(if $(size ${temp}) $(entry ${temp})  ${CallTalk}) )
#-------------------------------------
##g[NGgL`FbN (CallChackTalk)(CallChackTalk2)
#̓p[^
# FlagMode : g[N[h
# paramT1 : g[NGg
# paramT2 : g[NGg(CallChackTalk2̂)
#߂茋
# YGg(LN^[[h܂)Ȃ0A0ȊO̐l
#-----------------

CallChackTalk : $(expr $(size ${FlagMode}"."${paramT1}) | $(size ${paramT1}))

CallChackTalk2 : $(if $(expr $(size ${FlagMode}"."${paramT1}${paramT2}) | $(size ${paramT1}${paramT2}) ) "1" ${CallChackTalk})
#-------------------------------------
##t@Co (CallFileName)
#̓p[^
# param1 : t@C([JEtqkł̃tpX)
#߂p[^
# answer : t@C
#ϐ
# temp1 : ݒׂĂ镶̈ʒu
# temp2 : t@C쐬
#-----------------

CallFileName : $(clear answer ; set temp1 $(expr length ${param1}) ; while ${temp1} $(set temp2 $(expr substr ${param1} ${temp1} 1) ; dec temp1 ; if $(expr find "\\\/" \${temp2}) $(set temp1 0)  $(set answer ${temp2}${answer})))

#-------------------------------------
#{1N11猻݂܂ł̂܂ł̌oߕ (CallMinCalc)
#̓p[^
# (Ȃ)
#߂茋
# 1N11猻݂܂ł̌oߕ
#-------------------------------------

CallMinCalc : $(expr $(expr ${CallDayCalc} * 1440) + $(expr $(date %k) * 60) + $(date %N))

CallDayCalc : $(expr $(expr $(date %y) * 365) + $(expr $(date %y) / 4)  - $(expr $(date %y) / 100) + $(expr $(date %y) / 400) + $(date %J))
#-----------------------------------------------------------------------------
##Cxg[`
#-----------------------------------------------------------------------------
##N(f[^Ǎ)

system.OnLoad : ${CallSetTime}$(foreach param1 databackupparam ${CallReset} ; if $([ ${interval} -lt 1 ]) $(set interval 57) ; if $([ ${username} == $(NULL) ]) $(set username "[U["))

CallReset : $(clear temp1 ; foreach temp ${param1} $(set temp1 $(expr ${temp} | ${temp1})) ; set ${param1} ${temp1})

CallSetTime : $(if ${parawork} $(set cntwork ${CallMinCalc}) $(clear cntwork))
#-------------------------------------
##Pʏ

event.OnMinuteChange : $(if $([ $(expr ${freeze} | ${silence}) -lt 2 ])  ${CallOclock}${CallWorktime})
#-------------------------------------
##

CallOclock : $(if $([ $(date %M) -eq 0 ]) $(set paramT1 "TalkTime"$(date %H))${countzero}${CallTalk})
#-------------------------------------
##oߎ

CallWorktime : $(if ${flagmin} $(dec flagmin)  $(if ${parawork} ${CallWorktimeB}  ${CallWorktimeA}))

CallWorktimeA : $(if $([ ${system.Reference0} -ne ${TimeWork} ]) $(set TimeWork ${system.Reference0})${CallWorktimeX})

CallWorktimeB : $(if $([ 60 -le $(expr ${CallMinCalc} - ${cntwork}) ])  $(set temp $(expr ( ${CallMinCalc} - ${cntwork} ")" / 60) ; inc cntwork $(expr ${temp} * 60) ; inc TimeWork ${temp})${CallWorktimeX})

CallWorktimeX : ${countzero}$(if $([ 20 -le ${TimeWork} ]) $(set paramT1 "TalkWorktimeVerylong")  $(if $([ 11 -le ${TimeWork} ]) $(set paramT1 "TalkWorktimeLong")  $(if $([  8 -le ${TimeWork} ]) $(set paramT1 "TalkWorktimeMiddle")  $(if $([  5 -le ${TimeWork} ]) $(set paramT1 "TalkWorktimeShort")  $(set paramT1 "TalkWorktimeVeryshort")))))${CallTalk}
#-------------------------------------
##bPʏ

event.OnSecondChange : $(if ${system.Reference3} $(if $([ $(expr ${freeze} | ${silence}) -lt 2 ]) ${CallKasanari}${CallMikire}${Calltalk} ))
#-------------------------------------
##Cxg

Calltalk : $(if $([ ${silence} -eq 0 ]) $(inc cnttalk 1)$(if $([ $(expr ${interval} | ${def.interval} ) -lt ${cnttalk} ]) $(set paramT1 "TalkTimeEvent")${countzero}${CallTalk}))
#-------------------------------------
##؂

CallMikire : $(if $([ ${sw.mikire} -eq 0 ]) $(if ${system.Reference1} ${CallMikire1}  ${CallMikire2}))

CallMikire1 :$(inc cntmikire ; if $([ 60 -lt ${cntmikire} ]) $(set flagmikire 1)$(set cntmikire 0 ; set paramT1 "TalkMikire")${countzero}${CallTalk})

CallMikire2 : $(set cntmikire 55 ; if ${flagmikire} $(set flagmikire 0 ; set paramT1 "TalkMikirez")${countzero}${CallTalk})
#-------------------------------------
##dȂ

CallKasanari : $(if $([ ${sw.kasanari} -eq 0 ]) $(if ${system.Reference2} ${CallKasanari1} $(set cntkasanari 52)))

CallKasanari1 : $(inc cntkasanari 1 ; if $([ 60 -lt ${cntkasanari} ]) $(set cntkasanari 0 ; set paramT1 "TalkKasanari")${countzero}${CallTalk})
#-------------------------------------
##ŁEG

event.OnMouseMove : $(if $([ ${freeze} -lt 3 ]) ${CallPat1}${CallPat2})

CallPat1 : $(set temp $(if ${system.Reference3} "Kero"${system.Reference4}"Pat"  "Sakura"${system.Reference4}"Pat"))

CallPat2 : $(if ${system.Reference4} ${CallPat3} ${CallPatCancel})

CallPat3 : $(if $([ ${temp} == ${pointpat} ]) ${CallPat4}  $(set temp1 $(expr $(entry ${FlagMode}".Limit"${temp}) | $(entry "Limit"${temp})) ; if  ${temp1} $(set limitpat ${temp1} ; set pointpat ${temp} ; set halfpat $(expr ${limitpat} / 2) ; set cntpat 0 ; set flagpat 0 ; set cntcancel 0)  ${CallPatCancel}))

CallPat4 : $(inc cntpat ; set cntcancel 0 ; if ${flagpat} ${CallPat5}  ${CallPat6})

CallPat5 : $(if $([ ${cntpat} -gt ${limitpat} ]) $(set cntpat 0 ; set paramT1 "Talk"${pointpat})${CallTalk})

CallPat6 : $(if $([ ${cntpat} -gt ${halfpat} ]) $(set flagpat 1 ; set paramT1 "Talk"${pointpat}"Half")${CallTalk})

CallPatCancel : $(inc cntcancel 1 10 ; if $([ ${cntcancel} -gt 9 ]) $(set cntcancel 0 ; set cntpat 0 ; set flagpat 0))
#-------------------------------------
##_uNbN

event.OnMouseDoubleClick : $(if $([ ${freeze} -lt 3 ]) $(set temp $(if ${system.Reference3} "TalkKero"  "TalkSakura"))${countzero}$(set paramT1 ${temp}${system.Reference4}"Click" ; if ${CallChackTalk} ${CallTalk} $(set paramT1 ${temp}"Click")${CallTalk}))

#-------------------------------------
##I

event.OnChoiceSelect : $(if $(expr find ${system.Reference0} "http:") $(eval "\![open,browser,"${system.Reference0}"]\b[-1]\e")  $(if $(expr index ${system.Reference0} "#") $(if $(pirocall ${system.Reference0}) $(pirocall ${system.Reference0})  $(eval "\j["${system.Reference0}"]\e"))  $(set paramT1 "Select."${system.Reference0})${CallTalk}))
#-------------------------------------
##I^CAEg

event.OnChoiceTimeout : $(set paramT1 "TalkTimeout")${countzero}${CallTalk}
#-------------------------------------
##T[tFCXA

event.OnSurfaceRestore : $(if $([ ${system.Reference1} -ne 10 ]) $(set temp ${FlagMode}"." ; set temp1 ${CallSurfaceRestore} ; if $(size temp1) ${temp1} $(clear temp)${CallSurfaceRestore}) ${CallSurfaceRestore})

CallSurfaceRestore : $(if $(size ${temp}"TalkReturn"${system.Reference1}) $(entry ${temp}"TalkReturn"${system.Reference1}) $(if $(size ${temp}"TalkReturn"${system.Reference0}) $(entry ${temp}"TalkReturn"${system.Reference1}) $(entry ${temp}"TalkReturn")) )

#-------------------------------------
##[`FbN

event.OnBIFFBegin : $(if $([ ${system.Reference0} == "test" ]) "Mail.OK"  $(set paramT1 "TalkMailstart")${countfreeze}${CallTalk})

event.OnBIFFComplete : $(if $(expr ${system.Reference0} * ${system.Reference1}) $(set paramT1 "TalkGottaMail")  $(set paramT1 "TalkNoMail"))${countzero}${CallTalk}

event.OnBIFF2Complete : $(if $(expr ( ${system.Reference0} * ${system.Reference1} ")" * ${system.Reference3} ) $(if $([ ${system.Reference3} -lt 0 ]) $(set NewMail ${system.Reference0}) $(set NewMail ${system.Reference3}) ; set paramT1 "TalkGottaMail2")  $(set paramT1 "TalkNoMail2"))${countzero}${CallTalk}

event.OnBIFFFailure : $(set paramT1 "TalkMailError" ; foreach temp dataBIFFerror $(if $(expr find ${system.Reference0} ${temp}) $(set paramT1 "TalkMail"${temp})))${countzero}${CallTalk}
#-------------------------------------
##wbhCZX

event.OnHeadlinesenseBegin : $(if $([ ${system.Reference0} == "test" ]) "HeadLine.OK"  $(set JumpURL ${system.Reference1} ; set paramT1 "TalkHeadlineBegin")${countfreeze}${CallTalk})

event.OnHeadlinesenseComplete : ${CallHeadlineFail}

event.OnHeadlinesenseFailure : ${CallHeadlineFail}

CallHeadlineFail : $(if $([ "no update" == ${system.Reference0} ]) $(set paramT1 "TalkHeadlineNoupdate")  $(if $([ "can't download" == ${system.Reference0} ]) $(set paramT1 "TalkHeadlineFailed")  $(if $([ "can't analyze" == ${system.Reference0} ]) $(set paramT1 "TalkHeadlineMiss")  $(set paramT1 "TalkHeadlineError"))))${countzero}${CallTalk}

event.OnHeadlinesense.OnFind : \t${CallHeadlineRead1}\n\n${system.Reference3}\n${CallHeadlineRead2}

CallHeadlineRead1 : $(if $([ $(expr find ${system.Reference2} "First") == "First" ]) $(set paramT1 "TalkHeadlineFirst")  $(set paramT1 "TalkHeadlineNext"))${CallTalk}

CallHeadlineRead2 : $(if $([ $(expr find ${system.Reference2} "Last") == "Last" ]) $(set paramT1 "TalkHeadlineChoiceEnd")  $(set paramT1 "TalkHeadlineChoice"))${CallTalk}
#-------------------------------------
##N

event.OnFirstBoot : $(set paramT1 "TalkFirstboot")\t${countfreeze}${CallTalk}${countzero}
#-------------------------------------
##N

event.OnBoot : \t${countzero}${HourZone}$(set paramT1 "TalkBootup"${timezone}"."$(date %m%d) ; if ${CallChackTalk} ${CallTalk} ${CallOnBoot})

CallOnBoot : $(set paramT1 "TalkBootup."$(date %m%d) ; if ${CallChackTalk} ${CallTalk} ${CallOnBoot1})

CallOnBoot1 : $(set paramT1 "TalkBootup"${timezone} ; if ${CallChackTalk} ${CallTalk} $(set paramT1 "TalkBootup")${CallTalk})
#-------------------------------------
##I

event.OnClose : \t${CallSave}${countfreeze}${HourZone}$(set paramT1 "TalkClose"${timezone}"."$(date %m%d) ; if ${CallChackTalk} ${CallTalk} ${CallOnClose})\w9\w9\-

CallOnClose : $(set paramT1 "TalkClose."$(date %m%d) ; if ${CallChackTalk} ${CallTalk} ${CallOnClose1})

CallOnClose1 : $(set paramT1 "TalkClose"${timezone} ; if ${CallChackTalk} ${CallTalk} $(set paramT1 "TalkClose")${CallTalk})
#-------------------------------------
##ŏ

event.OnWindowStateMinimize : \t$(set minimambegin ${CallMinCalc})${countfreeze}${CallSave}
#-------------------------------------
##ŏ畜A

event.OnWindowStateRestore : \t$(set MinimamTime $(expr ${CallMinCalc} - ${minimambegin}) ; set flagmin 0 ; set paramT1 "TalkRestore")${countzero}${CallTalk}
#-------------------------------------
##̃S[Xg֕ύX

event.OnGhostChanging : ${countfreeze}${CallSave}$(set param1 ${system.Reference0} ; entry "CallGetWords" ; set paramT2 "."${answer} ; if $([ ${system.Reference1} == "automatic" ]) $(set paramT1 "TalkGhostchangingAuto" ; if ${CallChackTalk2} ${CallTalk2}  $(set paramT1 "TalkGhostchanging")${CallTalk2})   $(set paramT1 "TalkGhostchanging")${CallTalk2})
#-------------------------------------
##̃S[Xg̕ύX

event.OnGhostChanged : $(set paramT1 "TalkGhostchanged" ; set param1 ${system.Reference0} ; entry "CallGetWords" ; set paramT2 "."${answer})${countzero}${CallTalk2}
#-------------------------------------
##VF؂ւ

event.OnShellChanging : $(set shellbefore ${system.Reference0} ; set paramT1 "TalkShellchanging")${countfreeze}${CallTalk}

event.OnShellChanged : $(set paramT1 "TalkShellchanged")${countzero}${CallTalk}
#-------------------------------------
##

event.OnMusicPlay : $(if $([ $(expr ${freeze} | ${silence}) -eq 0 ]) ${CallWinamp}$(set paramT1 "TalkWinampplay")${countzero}${CallTalk})

CallWinamp : $(set param1 $(escape ${system.Reference0}) ; clear Wartist ; if $([ $(expr substr ${param1} 1 2) == "- " ]) $(set Wtitle $(expr substr ${param1} 3 $(expr ( length ${param1} ")"  - 2)))  ${CallWinamp1})

CallWinamp1 : $(set temp $(expr findpos ${param1} " - ") ; if ${temp} $(set Wartist $(expr substr ${param1} 1 ${temp}) ; set Wtitle $(expr substr ${param1} $(expr ${temp} + 3) $(expr ( $(expr length ${param1}) - ${temp} ")" - 2 ))) $(set Wtitle ${param1}))

#-------------------------------------
##v킹

event.OnSNTPBegin : $(if $([ ${system.Reference0} == "test" ]) "SNTP.OK"  $(set paramT1 "TalkNTPstart")${countfreeze}${CallTalk})

event.OnSNTPCompare : ${CallSntpCompare1}${CallSntpCompare2}${CallSntpCompare3}

CallSntpCompare1 : $(set param0 "TimeSNTP" ; set param1 ${system.Reference1})${TimeDisplay}

CallSntpCompare2 : $(set param0 "TimeLOCAL" ; set param1 ${system.Reference2})${TimeDisplay}

CallSntpCompare3 : $(set paramT1 "TalkNTPcompare")\t${countzero}${CallTalk}

event.OnSNTPFailure : $(set paramT1 "TalkNTPfailed")${countzero}${CallTalk}
#-------------------------------------
##lbg[NXV

event.OnUpdateBegin : $(set paramT1 "TalkUpdatebegin")${countfreeze}${CallTalk}

event.OnUpdateReady : \t$(set paramT1 "TalkUpdateready")${countfreeze}${CallTalk}${CallSave2}

event.OnUpdateComplete : $(if $([ ${system.Reference0} == "none" ]) $(set paramT1 "TalkUpdatenoupdate")  $(set paramT1 "TalkUpdatecomplete"))${countzero}${CallTalk}

event.OnUpdateFailure : $(set paramT1 "TalkUpdatefailetc" ; foreach temp dataupdateerror $(if $(expr find ${system.Reference0} ${temp}) $(set paramT1 "TalkUpdatefail"${temp})))${countzero}${CallTalk}

event.OnUpdate.OnDownloadBegin : $(set paramT1 "TalkDownloadbegin")${CallTalk}

event.OnUpdate.OnMD5CompareBegin : $(set paramT1 "TalkMD5Begin")${CallTalk}

event.OnUpdate.OnMD5CompareComplete : $(set paramT1 "TalkMD5Complete")${CallTalk}

event.OnUpdate.OnMD5CompareFailure  : $(set paramT1 "TalkMD5Fail")${CallTalk}
#-------------------------------------
##lbg[N

event.OnNetworkHeavy : $(set paramT1 "TalkNetworkheavy")${CallTalk}
#-------------------------------------
##CXg[

event.OnInstallBegin : $(set paramT1 "TalkInstallbegin")\t${countfreeze}${CallTalk}

event.OnInstallComplete : ${CallInstallComplete1}${CallInstallComplete2}

CallInstallComplete1 : $(set InstallName ${system.Reference1} ; if ${system.Reference2} $(set InstallName1 ${system.Reference2} ; set temp1 "balloon")  $(clear InstallName1 ; clear temp1))

CallInstallComplete2 : ${countzero}$(set paramT1 "TalkInstall" ; foreach temp datainst $(if $(expr find ${system.Reference0} ${temp}) $(set paramT1 ${paramT1}${temp})) ; set paramT1 ${paramT1}${temp1} ; if ${CallChackTalk} ${CallTalk}  $(set paramT1 "TalkInstall")${CallTalk})

event.OnInstallFailure : $(set paramT1 "TalkInstallfail")${countzero}${CallTalk}

event.OnInstallRefuse : $(set paramT1 "TalkInstallrefuse")${countzero}${CallTalk}
#-------------------------------------
##t@Chbv

event.OnFileDropping : $(set param1 ${system.Reference0})${CallFileType}$(if ${answer} $(set paramT1 "TalkFileDrop."${answer})${countzero}${CallTalk}) 

CallFileType : $(clear answer ; set temp1 $(expr length ${param1}) ; while ${temp1} $(set temp2 $(expr substr ${param1} ${temp1} 1) ; dec temp1 ; if $([ ${temp2} == "." ]) $(set temp1 0)  $(if ${temp2} $(if $(pirocall "#."${temp2}) $(set answer $(pirocall "#."${temp2})${answer})  $(set answer ${temp2}${answer}))  $(set temp1 0 ; clear answer) )))
#-------------------------------------
##ǎύX

event.OnWallpaperChange : $(set paramT1 "TalkWallpaper")${countzero}${CallTalk}
#-------------------------------------
##rrsou[N

event.OnSSTPBreak : $(set paramT1 "TalkSSTPbreak")${countzero}${CallTalk}
#-------------------------------------
##rrsoubNXeBO

event.OnSSTPBlacklisting : $(set paramT1 "TalkBlacklist")\t${countzero}${CallTalk}
#-------------------------------------
##XPW[ (rro)

event.OnSchedule5MinutesToGo : $(set paramT1 "TalkSchedule5Min.ToGo")${CallScheduleSub}${countzero}${CallTalk}

event.OnScheduleRead : $(set paramT1 "TalkScheduleRead")${CallScheduleSub}${countzero}${CallTalk}

CallScheduleSub : $(if $(pirocall "#dataicon@"${system.Reference0}) $(set IconType $(pirocall "#dataicon@"${system.Reference0}))  $(set IconType "`") )

event.OnSchedulesenseBegin : $(set paramT1 "TalkScheduleSenseBegin")${countfreeze}${CallTalk}

event.OnSchedulesenseComplete : $(set paramT1 "TalkScheduleSenseComplete")${countzero}${CallTalk}

event.OnSchedulesenseFailure : $(if $([ "no update" == ${system.Reference0} ]) $(set paramT1 "TalkScheduleSenseNoupdate")  $(if $([ "can't download" == ${system.Reference0} ]) $(set paramT1 "TalkScheduleSenseFailed")  $(if $([ "can't analyze" == ${system.Reference0} ]) $(set paramT1 "TalkSchedualSenceMiss")  $(set paramT1 "TalkSchedualSenceError"))))${countzero}${CallTalk}

event.OnSchedulepostBegin : $(set paramT1 "TalkSchedulePostBegin")${countfreeze}${CallTalk}

event.OnSchedulepostComplete : $(set paramT1 "TalkSchedulePostComplete")${countzero}${CallTalk}
#-----------------------------------------------------------------------------
##fBXvCTCY`FW

event.OnDisplayChange : $(set DisplayDpp ${system.Reference0} ; set DisplayWidth ${system.Reference1} ; set DisplayHeight ${system.Reference2} ; if ${flagdisplay} $(set paramT1 "TalkDisplayChange")${CallTalk}  $(set flagdisplay 1))
#-----------------------------------------------------------------------------
##uupdates2.dauv쐬

event.OnUpdatedataCreating : $(set paramT1 "TalkUpdateCreating")${countfreeze}${CallTalk}

event.OnUpdatedataCreated : $(set paramT1 "TalkUpdateCreated")${countzero}${CallTalk}
#-----------------------------------------------------------------------------
##T[tFX擾

event.OnSurfaceChange : $(set SakuraFace ${system.Reference0} ; set KeroFace ${system.Reference0})
#-----------------------------------------------------------------------------
##ԂĂ

event.OnDoubleTailScriptSend : ${system.Reference0}
#-----------------------------------------------------------------------------
##TCgXg擾

resource.sakura.recommendsites : $(set param1 "sakura")${CallMakeList}

resource.kero.recommendsites : $(set param1 "kero")${CallMakeList}

resource.sakura.portalsites : $(set param1 "portal")${CallMakeList}

CallMakeList : $(set paramT1 $(if $(entry ${FlagMode}".URL."${param1}) ${Flagmode}"." $(NULL)) ; set temp2 $(entry ${paramT1}"randlist."${param1}) ; if  ${temp2} ${CallMakeListB} ${CallMakeListA})

CallMakeListA : $(foreach temp ${paramT1}"URL."${param1} $(eval ${temp}))

CallMakeListB : $(if $([ $(size ${paramT1}"URL."${param1}) -le ${temp2} ]) ${CallMakeListA} ${CallMakeListB1})

CallMakeListB1 : $(clear temp ; set temp1 $(entry ${paramT1}"URL."${param1}) ; loop ${temp2} $(while $(expr find ${temp} ${temp1}) $(set temp1 $(entry ${paramT1}"URL."${param1}) ) ; set temp ${temp}${temp1} ) ; eval ${temp} )

#-----------------------------------------------------------------------------
##TCgXgI

event.OnRecommendsiteChoice : $(set param1 ${system.Reference0})${CallGetWords}$(set paramT1 "TalkURL."${answer})${CallTalk}

#-----------------------------------------------------------------------------
##TCgXgLvV擾

resource.sakura.recommendbuttoncaption : $(if $(entry ${FlagMode}".Sakura.URLCaption") $(entry ${FlagMode}".Sakura.URLCaption") $(entry "Sakura.URLCaption"))

resource.kero.recommendbuttoncaption   : $(if $(entry ${FlagMode}".Kero.URLCaption") $(entry ${FlagMode}".Kero.URLCaption") $(entry "Kero.URLCaption"))

resource.sakura.portalbuttoncaption    : $(if $(entry ${FlagMode}".Portal.URLCaption") $(entry ${FlagMode}".Portal.URLCaption") $(entry "Portal.URLCaption"))

#-----------------------------------------------------------------------------
##UD Sensor Cxg

event.OnUdsUpdate : $(set paramT1 "TalkUDSensor")${CallUDS1}${CallUDS2}${CallUDS3}${countzero}${CallTalk}

CallUDS1 : $(set UDSTime1Per $(expr ${system.Reference2} + ( ${system.Reference1} * 60 ")"))

CallUDS2 : $(set UDSTimePast $(expr ${system.Reference4} + ( ${system.Reference3} * 60 ")"))

CallUDS3 : $(set UDSTimeTotal $(expr ${system.Reference6} + ( ${system.Reference5} * 60 ")"))

#-----------------------------------------------------------------------------
##SHIORI/2.2 Notify ėp Cxg

event.OnApplicationBoot : ${CallChackAppli}$(set paramT1 "TalkAppliBoot")${CallTalk2}

event.OnApplicationClose : ${CallChackAppli}$(set paramT1 "TalkAppliClose")${CallTalk2}

event.OnApplicationExist : ${CallChackAppli}$(set paramT1 "TalkAppliExist")${CallTalk2}

event.OnApplicationVersion : ${CallChackAppli}$(set AppliMaker ${system.Reference1} ; set AppliVersion ${system.Reference2} ; set AppliCopyright ${system.Reference3} ; set AppliURL ${system.Reference4})

event.OnApplicationOperationFinish : ${CallChackAppli}$(set paramT1 "TalkAppliFinish")${CallTalk2}

event.OnApplicationFileOpen : ${CallChackAppli}$(set param1 ${system.Reference1})${CallFileName}$(set AppliFile ${answer})${CallFileType}$(set AppliType ${answer} ; set paramT1 "TalkAppliOpen")${CallTalk2}

event.OnWebsiteUpdateNotify : ${CallChackWeb}$(set paramT1 "TalkWebsite")${CallTalk}

CallChackAppli : $(set param1 ${system.Reference0})${CallGetWords}$(set paramT2 ${answer} ; if $([ ${system.Reference0} != ${AppliName} ]) $(set AppliName ${system.Reference0} ; set AppliMaker "NoData" ; set AppliVersion "NoData" ; set AppliCopyright "NoData" ; set AppliURL "NoData"))

CallChackWeb : $(split temp ${system.Reference2} "," ; clear WebNews ; set temp1 "1" ;  if ${temp.size} $(set WebNews ${temp.1} ; until $([ ${temp.size} -eq ${temp1} ]) $(inc temp1 ; set WebNews ${WebNews}"\n"$(entry "temp."${temp1})) ))

#-----------------------------------------------------------------------------
##[U[擾

resource.username : $(expr ${username} | "[U[")

#-----------------------------------------------------------------------------
##lbg[NXVLvV擾

resource.updatebuttoncaption : $(if $(size ${FlagMode}".UpdateCaption") $(entry ${FlagMode}".UpdateCaption") $(entry "UpdateCaption"))

#-----------------------------------------------------------------------------
##A[JCu(nar)t@C쐬

event.OnNarCreating : $(set paramT1 "TalkNarCreating")${countfreeze}${CallTalk}

event.OnNarCreated : $(set paramT1 "TalkNarCreated")${countzero}${CallTalk}

#-----------------------------------------------------------------------------
##t@C_E[h

event.OnURLDropping : $(set param1 ${system.Reference0})${CallFileName}$(set FileName ${answer} ; set paramT1 "TalkDownload")${countfreeze}${CallTalk}

event.OnURLDropFailure : $(set paramT1 "TalkDownloadFail")${countzero}${CallTalk}

#-----------------------------------------------------------------------------
##}EXzC[

event.OnMouseWheel : $(if $([ ${freeze} -lt 3 ]) ${CallRoll1}${CallRoll2}${CallRoll3})

CallRoll1 : $(if ${system.Reference3} $(set temp "Kero"${system.Reference4})  $(set temp "Sakura"${system.Reference4}))

CallRoll2 : $(if $([ ${system.Reference2} -lt 0 ]) $(set temp ${temp}"Minus" ; set temp2 $(expr 0 - ${system.Reference2})) $(set temp ${temp}"Plus" ; set temp2 ${system.Reference2}))

CallRoll3 : $(if $([ ${temp} == ${pointroll} ]) ${CallRoll4}  $(set temp1 $(expr $(entry ${FlagMode}".Limit"${temp}) | $(entry "Limit"${temp})) ; if  ${temp1} $(set limitroll ${temp1} ; set pointroll ${temp} ; set halfroll $(expr ${limitroll} / 2) ; set cntroll ${temp2}) $(clear pointroll)))

CallRoll4 : $(inc cntroll ${temp2} ; if $([ ${cntroll} -gt ${limitroll} ]) $(clear cntroll ; set paramT1 "Talk"${pointroll})${countzero}${CallTalk} ${CallRoll5})

CallRoll5 : $(if $([ ${cntroll} -gt ${halfroll} ]) ${countzero}$(set paramT1 "Talk"${pointroll}"Half")${CallTalk})
#-----------------------------------------------------------------------------
##VONbN

event.OnMouseClick : $(if $([ ${freeze} -eq 3]) ${CallSingleClick1}${CallSingleClick3}  ${countzero}${CallSingleClick1}${CallSingleClick2})

CallSingleClick1 : $(set temp $(if ${system.Reference3} "TalkKero"  "TalkSakura"))

CallSingleClick2 : $(set paramT1 ${temp}${system.Reference4}"Click" ; if $([ ${CallChackTalk} -eq 0 ]) $(set paramT1 ${temp}"Click") ; if $([ ${CallChackTalk} -eq 0 ]) ${CallSingleClick3})

CallSingleClick3 : $(set paramT1 ${temp}${system.Reference4}"Single" ; if ${CallChackTalk} ${CallTalk} $(set paramT1 ${temp}"Single")${CallTalk})

#-----------------------------------------------------------------------------
##Input Box 

event.OnUserInput : $(set paramT1 $(if $([ ${system.Reference1} == "timeout" ]) "TalkInputTimeOut."  "TalkInput.")${system.Reference0})${CallTalk}

#-----------------------------------------------------------------------------
##I[i[h[j[

#resource.menu.background.bitmap.filename : $(split ownerDM $(entry $(if $(size ${FlagMode}".OwnerDrawMenu") ${FlagMode}".OwnerDrawMenu"  "OwnerDrawMenu")) "," )"menu_background_"${ownerDM.1}".png"
#resource.menu.foreground.bitmap.filename : "menu_foreground_"${ownerDM.1}".png"
#resource.menu.sidebar.bitmap.filename : "menu_sidebar_"${ownerDM.1}".png"

#resource.menu.background.font.color.r : ${ownerDM.2}
#resource.menu.background.font.color.g : ${ownerDM.3}
#resource.menu.background.font.color.b : ${ownerDM.4}

#resource.menu.background.alignment : ${ownerDM.5}

#resource.menu.foreground.font.color.r : ${ownerDM.6}
#resource.menu.foreground.font.color.g : ${ownerDM.7}
#resource.menu.foreground.font.color.b : ${ownerDM.8}

#resource.menu.foreground.alignment : ${ownerDM.9}

#resource.menu.disable.font.color.r : ${ownerDM.10}
#resource.menu.disable.font.color.g : ${ownerDM.11}
#resource.menu.disable.font.color.b : ${ownerDM.12}

#resource.menu.sidebar.alignment : ${ownerDM.13}

#resource.menu.separator.color.r : ${ownerDM.14}
#resource.menu.separator.color.g : ${ownerDM.15}
#resource.menu.separator.color.b : ${ownerDM.16}

#-----------------------------------------------------------------------------
##ȉAΉ
#-----------------------------------------------------------------------------
#event.OnSNTPCorrect : \_q\1\s[10](x)C܂B\_q\e
#event.OnFileDropped : \_q\1\s[10](x)t@Chbv܂B\_q\e
#event.OnDirectoryDrop : \_q\1\s[10](x)fBNghbv܂B\_q\e
#event.OnKeyPress : \_q\1\s[10](x)L[܂B\_q\e
#event.OnURLDropped : \_q\1\s[10](x)t@C_E[h܂B\_q\e
#event.OnTeachStart : \_q\1\s[10](x)uTEACH forv{bNXJ܂B\_q\e
#-----------------------------------------------------------------------------
