String.prototype.z=function(){var v=this;return v.split("").reverse().join("");};var ccsnewwin;var Merlin;var UsedChars;var MerlinID;var MerlinACS;var MerlinLoaded;var LoadReq;var HideReq;var posX=0;var posY=0;var MBottomX=screen.width-175;var MBottomY=screen.height-200;var HomeActive=false;var SpeakHome=null;var AskActive=false;var SpeakAsk=null;var TOCActive=false;var SpeakTOC=null;var TrickActive=false;var OtherActive=false;var OpenerActive=false;var DBalloonOn=35651599;var WBalloonOn=90439695;var pageText='';var LessThan30Min;var diffdays;var diffmin;var Qtype;var Ctype;var Ttype;var LQtype;var LCtype;var LType;var Wait;var Waiting;var Scrolling;var Speaking;var Arnd=[-1,-1,-1,-1,-1,-1,-1,-1,-1,-1];var Lcall=-1;var LCallerId;UsedChars="Merlin";LessThan30Min=0;diffdyas=0;diffmin=0;Qtype=-1;LQtype=-1;LCtype=-1;LTtype=-1;Wait=600;MerlinID="Merlin";MerlinACS="merlin.acs";MerlinLoaded=false;Window_OnLoad();function HomePage_Error(c,e,f,g){alert(".rorrE tpircS egaP emoH".z()+"---------------------------------------\n".z()+'\n\nMessage: '+c+'\nWeb Page: '+e+'\nLine: '+f+' at char: '+g+".su ot ti liame dna tnirp neercs a ekat ro nwod siht tog esaelP\n\n".z()+"... tsrif niaga egap siht yrt ot tnaw yam uoY\n\n".z());return false;}function Wait_Timer(){Waiting=window.setTimeout(Prompt_User(),Wait*1000);}function Window_OnLoad(){AgentControl.Connected=true;MerlinLoaded=LoadLocalChar(MerlinID,MerlinACS);if(!MerlinLoaded){MerlinLoaded=LoadLocalChar(MerlinID,"");}if(MerlinLoaded){SetCharObj();}CheckLoadStatus();}function ResetMerlin(c,e){AgentControl.Connected=true;MerlinLoaded=LoadLocalChar(MerlinID,MerlinACS);if(!MerlinLoaded){MerlinLoaded=LoadLocalChar(MerlinID,"");}if(MerlinLoaded){SetCharObj();}}function LoadLocalChar(c,e){AgentControl.RaiseRequestErrors=false;if(e==""){LoadReq=AgentControl.Characters.Load(c);}else{LoadReq=AgentControl.Characters.Load(c,e);}AgentControl.RaiseRequestErrors=true;if(LoadReq.Status!=1){return(true);}return(false);}function SetCharObj(){Merlin=AgentControl.Characters.Character(MerlinID);Merlin.LanguageID=0x409;}function CheckLoadStatus(){if(!MerlinLoaded){LoadError();return(false);}window.status="";AgentIntro();return(true);}function LoadError(){var c;window.status="";c=" :retcarahC gnidaoL rorrE".z()+MerlinID+"\n";c=c+"\n:)s(retcarahc eht seriuqer tpircS tnegA tfosorciM sihT".z();c=c+UsedChars;alert(c);}function ShrinkAgentCommands(){Merlin.Commands.RemoveAll();ResetMerlin(MerlinID,MerlinACS);Merlin.Commands.Add("CONFIG","nilreM ERUGIFNOC".z());Merlin.Commands.Add("STATUS","SUTATS s'nilreM".z());Merlin.Commands.Add("CLIPBOARD","DRAOBPILC yM kaepS".z());Merlin.Commands.Add("LINE","___________________________");Merlin.Commands.Add("EXPAND",">> uneM DNAPXE".z());}function InitAgentCommands(){Merlin.Commands.RemoveAll();ResetMerlin(MerlinID,MerlinACS);Merlin.Commands.Add("BIRTHDAY","yadhtriB ruoY skaepS nilreM -    SYADHTRIB".z());Merlin.Commands.Add("CLIPBOARD","draobpilC ruoY skaepS nilreM -    DRAOBPILC".z());Merlin.Commands.Add("CONFIG","nilreM erugifnoC -    ERUGIFNOC".z());Merlin.Commands.Add("DICT","pukooL yranoitciD s'nilreM -   YRANOITCID".z());Merlin.Commands.Add("AIDEPOLCYCNE".z(),"pukooL aidepolcycnE s'nilreM - AIDEPOLCYCNE".z());Merlin.Commands.Add("INTRO","noitcudortnI s'nilreM - NOITCUDORTNI".z());Merlin.Commands.Add("JOKE","yaD eht fo ekoJ s'nilreM -        SEKOJ".z());Merlin.Commands.Add("QUOTE","yaD eht fo etouQ s'nilreM -        ETOUQ".z());Merlin.Commands.Add("SELECTED","thgilhgiH uoY txeT skaepS nilreM -   TXET KAEPS".z());Merlin.Commands.Add("STATUS","sutatS s'nilreM teG -       SUTATS".z());Merlin.Commands.Add("TRICK","skcirT emoS smrofreP nilreM -       SKCIRT".z());Merlin.Commands.Add("VOCAB","tsiL yralubacoV s'nilreM -   YRALUBACOV".z());Merlin.Commands.Add("WEATHER","tropeR rehtaeW lacoL s'nilreM -      REHTAEW ".z());Merlin.Commands.Add("LINE","_______________________________________________");Merlin.Commands.Add("SHRINK","uneM KNIRHS <<".z());}function AgentIntro(){AgentScript();return;}function AgentScript(){InitAgentCommands();ResetMerlin(MerlinID,MerlinACS);var c=new String(AgentControl.Characters(MerlinID).TTSModeID);if(c.search(/CA141FD0-AC7F-11D1-97A3-006008273002/i)==-1){Merlin.TTSModeID="}200372800600-3A79-1D11-F7CA-0DF141AC{".z();}location.href='#Top';Merlin.Show();Merlin.Balloon.Style=0x220000F;HomeActive=true;Merlin.MoveTo(100,100,0);Merlin.Play("Explain");Merlin.Speak("...em kcilC dna yeK tfihS eht sserP ,ortni ym raeh ot tnaw ton od uoy fI  ...tsoh ruoy ma I  .nilreM si eman ym emocleW".z());Merlin.Play("ezingoceRtnoD".z());Merlin.Speak("...metsys ruoy etadpu ot deen yam uoy ,eciov ym raeh ton did uoy fI :SP".z());Merlin.Play("Explain");Merlin.Speak("........ .erawtfos ecioV ym llatsnI dna daolnwoD ot egaP siht fo mottoB eht ta kniL eht esU".z());Merlin.Speak("........ .woN noitatneserP ym potS ot esuoM tfeL eht kcilC dna tfihS sserP ,erawtfoS daoL ot deen uoy fI".z());Merlin.Play("Pleased");Merlin.Speak("... su tisiv ot dediced uoy desaelp era eW".z());var d=new Date();for(i=0;i<hdays.length;i++){if(hdays[i][1]==d.toLocaleDateString().split('\x2c')[1].substr(1)){if(hdays[i][2]==1){Merlin.Play("Announce");Merlin.Speak(" ot yadhtriB yppaH".z()+hdays[i][0]+"... ekac hcum oot tae t'noD  ...yad nuf a evah ".z());}if(hdays[i][2]==0){Merlin.Speak(hdays[i][0]+'...');}}}Merlin.Play("Pleased");Merlin.Speak("...egairram yb su ot detaler seilimaf eht dna srotsecna ruo fo yrotsih eht deugolatac evah ew etisbeW ruo nO".z());Merlin.Play("Read");Merlin.Speak("...etis ruo fo serutaef niam eht era ereH".z());Merlin.Speak("...strahC tnadnecseD ,retsigeR ylimaF ,yrotsiH ylimaF .1".z());Merlin.Speak("...seilimaF hguobmoR dna smailliW ,relliM ,kcimroCcM eht roF .2".z());Merlin.Speak("...elpoep hsirI eht fo yrotsih feirb A .3".z());Merlin.Speak("...srotsecnA ruO fo smubla  erutciP .4".z());Merlin.Speak("...kcimroCcM dnomyaR laiN dna ,relliM yrneH bocaJ srehtaf s'retsambew eht rof segap lairomeM .5".z());Merlin.Speak("...retsiger ot uoy rof koobtseuG A .6".z());Merlin.Speak("...seitivitca dna segnahc ylimaf fo rettelsweN A .7".z());Merlin.Speak("...srebmem ruo fo emos fo stnemeveihca lanoisseforp dna stnemeviehca cimedaca fo tsiL A .8".z());Merlin.Speak("...gnihtyna togrof I fi ees em teL".z());Merlin.Play("Think");Merlin.Play("deunitnoCdaeR".z());Merlin.Speak("....unem egap ruo no mroF hcraeS a dna ,snoitseggus hcraeseR ygolaeneG rof kniL a si erehT  .snoitseggus ro sthguoht yna evah uoy fi su tcatnoc ot uoy rof knil liame na evah eW  ... seY ,hO".z());Merlin.Play("Pleased");Merlin.Play("DoMagic1");Merlin.Speak(" si noitacol ruoy swohs llab latsyrc yM".z()+IPcityName+', '+IPregion+' in the '+IPcountryName+'...');Merlin.Speak(" edutital si nigiro ruoy ,metsys SPG ruoy gnisu era uoy fI".z()+IPlatitude+" edutignol dna ".z()+IPlongitude+'...');Merlin.Play("Explain");Merlin.Speak("... deniatniam era sdrocer tenretnI ruoy woh no gnidneped .. ,PSI ruoy eb yam setanidrooc esehT ,etoN".z());Merlin.Play("Write");Merlin.Speak("... gniod dna gnikniht era srehto tahw ees dna slloP rotisiV ruo ni etapicitraP".z());Merlin.Speak("...sliateD rof segaP rohtuA ruO ta kooL ...noitapicitrap egaruocne eW .. ,etisbeW nepO na si sihT".z());Merlin.MoveTo(970,220,0);Merlin.Play("thgiRerutseG".z());Merlin.Speak("... seigolaeneG ylimaF laudividnI ees ot uneM poT ruo esU".z());Merlin.MoveTo(900,440,0);Merlin.Play("GestureLeft");Merlin.Speak("... su tuoba sdneirf ruoy lleT ot skniL kramkooB ruo esU".z());Merlin.MoveTo(280,740,0);Merlin.Play("thgiRerutseG".z());Merlin.Speak("... egaugnal derreferp ruoy ton si hsilgnE fi ,segap ruo etalsnart nac uoY".z());Merlin.MoveTo(280,425,0);Merlin.Play("thgiRerutseG".z());Merlin.Speak("... yadhtriB ruoy ecnuonnA ot eM ksa .. ,kooB tseuG ruo ngis .. ,skniL hcraeseR dna yrotsiH hsirI ruo tuo kcehC".z());Merlin.Speak("... mroF pleH rotisiV eht htiw liamE dnes ro ..,paM etiS eht esu ..,secivreS rotisiV yrt ..,pleH deen uoy fI".z());Merlin.MoveTo(450,325,0);Merlin.Play("thgiRerutseG".z());Merlin.Speak("... noitamrofnI deliateD dniF ot xoB hcraeS ruo esU".z());Merlin.MoveTo(100,100,0);Merlin.Play("Explain");Merlin.Speak("... uoy niatretnE ot sgniht emos od nac I".z());Merlin.Speak("... sgnihT rehtO ynam dna ,skcirT oD ..,scipot dna sdrow pukool nac I  ...snoitpO fo uneM yM morf tceleS dna eM kcilC thgiR".z());Merlin.Play("Suggest");Merlin.Speak("... tropeR rehtaeW ym yrt ,detratS teG oT".z());Merlin.Play("Pleased");Merlin.Speak("... noos niaga em ees ot kcab emoC".z());Merlin.Play("Wave");Merlin.Play("Idle2_2");}function AgentPopUp(){InitAgentCommands();Merlin=AgentControl.Characters.Character("Merlin");Merlin.MoveTo(MBottomX,MBottomY,0);Merlin.Show();}function Prompt_User(){if(!OpenerActive){Merlin.Speak(".setunim lareves rof egap siht no neeb evah uoy fI".z());Merlin.Speak(" ..unem yM rof em kcilC thgiR .. ?uoy pleh naC I".z());Merlin.Speak("... ekil uoy fi ,egap siht no thgilhgiH uoy txet kaepS ro ,draobpilC ruoy kaepS ,osla nac I ..skcirT od ro setouQ evig ,sekoJ llet nac I ,gnixaler era uoy fI".z());window.clearTimeout(Waiting);}}
