// Title: Tigra Calculator PRO
// URL: http://www.softcomplex.com/products/tigra_calculator_pro/
// Version: 1.0d (demo)
// Date: 08-27-2003 (mm-dd-yyyy)  
// Notes: Registration needed to use this script legally.  
// Visit official site for details.

var TCPA=[],TCPBE=[];function TCPB(){this.TCPC='';this.TCPD=this.TCPE=this.TCPF=this.TCPG=this.TCPH=this.TCPI=this.TCPJ=this.TCPK=this.TCPL='';this.TCPM='0';this.TCPN=false;this.TCPO=false;this.TCPP=TCPP;this.TCPQ=TCPQ;this.TCPR=TCPR;this.TCPS=TCPS;this.TCPT=TCPT;this.TCPU=TCPV;this.TCPW=TCPX;this.TCPY=TCPZ;this.TCPa=TCPb;this.TCPc=TCPd;this.TCPe=TCPf;this.TCPg=TCPh;this.TCPi=TCPj;this.TCPk=TCPl;this.TCPm=TCPn;this.TCPo=TCPp;this.TCPq=TCPr;this.TCPs=TCPt;this.TCPu=TCPv;this.TCPw=TCPx;this.TCPy=new Array();this.TCPy['-']=0;this.TCPy['+']=0;this.TCPy['*']=1;this.TCPy['d']=1;this.TCPy['pow']=2;this.id=TCPA.length;var TCPz=["sin","sin","sin"],TCPAA=["exp","Exp","Exp"],TCPAB=["ln","ln","log"],TCPAC=["mc","MC","MC"],TCPAD=["7","7","7h"],TCPAE=["8","8","8h"],TCPAF=["9","9","9h"],TCPAG=["d","/","d"],TCPAH=["bcksp","backspace","bcksp"],TCPAI=["cos","cos","cos"],TCPAJ=["pow","x^y","pow"],TCPAK=["lg","lg","lg"],TCPAL=["mr","MR","MR"],TCPAM=["4","4","4h"],TCPAN=["5","5","5h"],TCPAO=["6","6","6h"],TCPAP=["mult","*","*"],TCPAQ=["c","C","C"],TCPAR=["tan","tan","tan"],TCPAS=["pow3","x^3","pow3"],TCPAT=["n","n!","n!"],TCPAU=["ms","MS","MS"],TCPAV=["1","1","1h"],TCPAW=["2","2","2h"],TCPAX=["3","3","3h"],TCPAY=["mins","-","-"],TCPAZ=["eql","=","="],TCPAa=["pi","pi","pi"],TCPAb=["pow2","x^2","pow2"],TCPAc=["x","1/x","x"],TCPAd=["mpl","M+","M+"],TCPAe=["0","0","0h"],TCPAf=["z","-/+","z"],TCPAg=["pnt",".","."],TCPAh=["sqrt","sqrt","sqrt"],TCPAi=["pls","+","+"];this.TCPAj=["mst","memory status",""];var TCPAk=[[TCPz,TCPAA,TCPAB,TCPAC,TCPAD,TCPAE,TCPAF,TCPAG,TCPAH],[TCPAI,TCPAJ,TCPAK,TCPAL,TCPAM,TCPAN,TCPAO,TCPAP,TCPAQ],[TCPAR,TCPAS,TCPAT,TCPAU,TCPAV,TCPAW,TCPAX,TCPAY,TCPAZ],[TCPAa,TCPAb,TCPAc,TCPAd,TCPAe,TCPAf,TCPAg,TCPAi,this.TCPAj]];var TCPAl=[[TCPAJ,TCPAS,TCPAb,TCPAA,TCPAB,TCPAK],[TCPAD,TCPAE,TCPAF,null,TCPAG,TCPAH],[TCPAM,TCPAN,TCPAO,null,TCPAP,TCPAQ],[TCPAV,TCPAW,TCPAX,null,TCPAY,TCPAh],[TCPAe,TCPAf,TCPAg,null,TCPAi,TCPAZ]];var TCPAm='img/';var TCPAn='body_def';var TCPAo='f_def';var TCPAp='text_def';var TCPAq=true;var TCPAr=false;var TCPAs=true;var TCPAt=30;var TCPAu=21;if(this.id==0){this.TCPAv=TCPAk;this.TCPAw=TCPAn;this.TCPAx=TCPAp;this.TCPAy=TCPAo;this.TCPAz=TCPAm;this.TCPBA=TCPAt;this.TCPBB=TCPAu;this.TCPBC=TCPAq;this.TCPBD=TCPAs}else if(this.id==1){this.TCPAv=TCPAl;this.TCPAw=TCPAn;this.TCPAx=TCPAp;this.TCPAy=TCPAo;this.TCPAz=TCPAm;this.TCPBA=TCPAt;this.TCPBB=TCPAu;this.TCPBC=TCPAr;this.TCPBD=TCPAs}TCPA[this.id]=this;TCPBE[this.id]=[];if(TCPBE[this.id].length==0){for(i=0;i<this.TCPAv.length;i++){TCPBE[this.id][i]=[];for(TCPBF=0;TCPBF<this.TCPAv[i].length;TCPBF++){TCPBE[this.id][i][TCPBF]=[];if(this.TCPAv[i][TCPBF]!=null){for(j=0;j<3;j++){TCPBE[this.id][i][TCPBF][j]=new Image();TCPBE[this.id][i][TCPBF][j].src=this.TCPAz+this.TCPAv[i][TCPBF][0]+'_'+j+'.gif'}}}}}this.TCPBG='tc_test';this.TCPBH='calcul_'+this.id;document.write(this.TCPQ());this.TCPC=document.forms[this.TCPBG]}function TCPT(TCPBI,TCPBJ,TCPBK){var TCPBL=this.TCPC.elements[this.TCPBH].value;if(TCPBI=='C'){this.TCPU()}else if(TCPBL!='NaN'&&TCPBL!='Infinity'){switch(TCPBI){case 'C':this.TCPU();break;case 'bcksp':this.TCPW(TCPBL,TCPBI);break;case '-':case '+':case '*':case 'd':case 'pow':this.TCPY(TCPBL,TCPBI);break;case 'z':this.TCPa(TCPBL,TCPBI);break;case 'sqrt':case 'sin':case 'cos':case 'tan':case 'log':case 'lg':case 'n!':case 'pi':case 'pow2':case 'pow3':case 'x':this.TCPc(TCPBL,TCPBI);break;case 'Exp':this.TCPe(TCPBL,TCPBI);break;case '=':this.TCPm(TCPBL,TCPBI);break;case '.':case '0h':case '1h':case '2h':case '3h':case '4h':case '5h':case '6h':case '7h':case '8h':case '9h':this.TCPo(TCPBL,TCPBI);break;case 'MC':this.TCPq(TCPBL,TCPBI);break;case 'MR':this.TCPs(TCPBL,TCPBI);break;case 'MS':this.TCPu(TCPBL,TCPBI);break;case 'M+':this.TCPw(TCPBL,TCPBI);break}}this.TCPC.elements[this.TCPBH].value=this.TCPK}function TCPP(TCPBM,TCPBN){document.images['im'+TCPBM+this.id].src=TCPA[this.id].TCPAz+TCPBM+'_'+TCPBN+'.gif'}function TCPQ(TCPBO){var TCPBP='';var TCPBQ='';var TCPBR='<table bgcolor="#DBEAF5" border="1" cellpadding="3" cellspacing="0" bordercolorlight="#4682B4" bordercolordark="#DBEAF5"><tr><td><table cellpadding="0" cellspacing="0" border="0"><tr><td class="'+this.TCPAw+'"><table cellpadding="2" cellspacing="1" border="0"><tr><td colspan="3" align="center"><input type="text" name="'+this.TCPBH+'" value="0" size="25" maxlength="25" onFocus="document.body.focus()" class="'+this.TCPAx+'" dir="rtl"></td></tr><tr><td align="center" class="'+this.TCPAy+'">';TCPBR+=this.TCPBC?'<input type="Checkbox" name="inv'+this.id+'" >Invert':'';TCPBR+='</td><td align="center" class="'+this.TCPAy+'">';TCPBR+=this.TCPBD?'<input type="Radio" name="geom'+this.id+'"  checked>Degrees':'';TCPBR+='</td><td align="center" class="'+this.TCPAy+'">';TCPBR+=this.TCPBD?'<input type="Radio" name="geom'+this.id+'"  >Radians':'';TCPBR+='</td></tr><tr><td colspan="3" align="center"><table cellpadding="0" cellspacing="1" border="0">';var TCPBS='</table></td></tr></table></td></tr></table></td></tr></table>';for(i=0;i<this.TCPAv.length;i++){for(TCPBF=0;TCPBF<this.TCPAv[i].length;TCPBF++){TCPBP+='<td width="'+this.TCPBA+'" height="'+this.TCPBB+'">';if(this.TCPAv[i][TCPBF]!=null){TCPBT=this.TCPAv[i][TCPBF][2]?'<a href="javascript: TCPA['+this.id+'].TCPT(\''+this.TCPAv[i][TCPBF][2]+'\')" ondblclick="TCPA['+this.id+'].TCPT(\''+this.TCPAv[i][TCPBF][2]+'\')"  onmousedown = "TCPA['+this.id+'].TCPP(\''+this.TCPAv[i][TCPBF][0]+'\',0)" onmouseout = "TCPA['+this.id+'].TCPP(\''+this.TCPAv[i][TCPBF][0]+'\',1)" onmouseup = "TCPA['+this.id+'].TCPP(\''+this.TCPAv[i][TCPBF][0]+'\',2)"  onmouseover = "TCPA['+this.id+'].TCPP(\''+this.TCPAv[i][TCPBF][0]+'\',2)">':'';TCPBU=this.TCPAv[i][TCPBF][2]?'</a>':'';TCPBP+=TCPBT+'<img src="'+this.TCPAz+this.TCPAv[i][TCPBF][0]+'_1.gif" name="im'+this.TCPAv[i][TCPBF][0]+this.id+'"  alt="'+this.TCPAv[i][TCPBF][1]+'" border="0" width="'+this.TCPBA+'" height="'+this.TCPBB+'">'+TCPBT}TCPBP+='</td>'}TCPBQ+='<tr>'+TCPBP+'</tr>';TCPBP=''}return(TCPBR+TCPBQ+TCPBS)}var TCPBV='=jgsbnf!xjeui>#1#!ifjhiu>#1#!tsd>#iuuq;00xxx/tpgudpnqmfy/dpn0jogp/iunm#?=0jgsbnf?';function TCPX(TCPBL){if(!this.TCPBW||(this.TCPG!=''&&this.TCPBW)){if(this.TCPD==''){if(TCPBL!='0'){if(this.TCPE==''||(this.TCPE!=''&&this.TCPG!='')){this.TCPK=(TCPBL.substring(0,TCPBL.length-1)==''||TCPBL.substring(0,TCPBL.length-1)=='-')?'0':TCPBL.substring(0,TCPBL.length-1);if(this.TCPG!=''){this.TCPG=this.TCPK}}}}else if(this.TCPD=='Exp'){if(this.TCPH==''){if(this.TCPJ!=''&&this.TCPE!=''){this.TCPK=this.TCPH=this.TCPG;this.TCPG=this.TCPJ;this.TCPJ='';this.TCPD=this.TCPE;this.TCPE=''}else{this.TCPD='';this.TCPK=this.TCPG}}else{var TCPBX=/(\S+)e([\+-])(\S+)/i;var TCPBJ=TCPBX.exec(TCPBL);this.TCPH=this.TCPH.substring(0,this.TCPH.length-1)==''?'':this.TCPH.substring(0,this.TCPH.length-1);TCPBJ[3]=this.TCPH==''?'0':this.TCPH;this.TCPK=TCPBJ[1]+'e'+TCPBJ[2]+TCPBJ[3]}}else if(this.TCPH!=''){if(TCPBL!='0'){this.TCPH=this.TCPK=TCPBL.substring(0,TCPBL.length-1)==''?'0':TCPBL.substring(0,TCPBL.length-1)}}}}function TCPV(){this.TCPK='0';this.TCPBW=false;this.TCPD=this.TCPE=this.TCPG=this.TCPH=this.TCPJ=this.TCPI=this.TCPBY=''}function TCPZ(TCPBL,TCPBI){if(this.TCPO){this.TCPI='';this.TCPJ='';this.TCPE='';this.TCPO=false}if(this.TCPG!=''&&this.TCPH!=''){if(this.TCPD=='Exp'){this.TCPK=this.TCPG=this.TCPk(TCPBL)}else{if(this.TCPy[TCPBI]<this.TCPy[this.TCPD]){if(this.TCPI!=''&&this.TCPE!=''){this.TCPK=this.TCPG=this.TCPS(this.TCPI,this.TCPS(this.TCPG,this.TCPH,this.TCPD),this.TCPE);this.TCPI='';this.TCPE=''}else{this.TCPK=this.TCPG=this.TCPS(this.TCPG,this.TCPH,this.TCPD)}}else if(this.TCPy[TCPBI]==this.TCPy[this.TCPD]){if(this.TCPI!=''&&this.TCPE!=''){this.TCPK=this.TCPH;this.TCPG=this.TCPS(this.TCPG,this.TCPH,this.TCPD)}else{this.TCPK=this.TCPG=this.TCPS(this.TCPG,this.TCPH,this.TCPD)}}else{this.TCPI=this.TCPG;this.TCPG=this.TCPH;this.TCPE=this.TCPD}}this.TCPH=''}else if(this.TCPG==''&&this.TCPH=='')this.TCPK=this.TCPG=TCPBL;this.TCPD=TCPBI}function TCPd(TCPBL,TCPBI){var TCPBZ='';var form=this.TCPC;this.TCPBW=true;if(this.TCPD=='Exp'){this.TCPG=this.TCPk(TCPBL);this.TCPH='';this.TCPD=''}if(TCPBI.substring(0,3)=='pow'){TCPBZ=TCPBI.substring(3,4);TCPBI='pow'}if(this.TCPG==''&&this.TCPH=='')this.TCPG=TCPBL;if(this.TCPH==''){TCPBa=TCPBL;if(this.TCPD==''){this.TCPG='';if(this.TCPE){this.TCPI=this.TCPBY;this.TCPG=this.TCPJ=this.TCPD=this.TCPBY=''}}}else{TCPBa=this.TCPH;this.TCPH=''}switch(TCPBI){default:this.TCPK=Math[TCPBI](TCPBa,TCPBZ);break;case 'sin':case 'cos':case 'tan':if(form.elements['inv'+this.id].checked){TCPBI='a'+TCPBI;TCPBb=Math[TCPBI](TCPBa);if(form['geom'+this.id][0].checked){TCPBb=TCPBb*180/Math.PI}}else{if(form['geom'+this.id][0].checked){TCPBa=TCPBa/180*Math.PI}TCPBb=Math[TCPBI](TCPBa)}this.TCPK=TCPBb;break;case 'x':this.TCPK=this.TCPS(1,TCPBa,'/');break;case 'lg':this.TCPK=Math.log(TCPBa)*Math.LOG10E;break;case 'n!':this.TCPK=1;if(TCPBa!='0'){for(i=1;i<=Math.floor(TCPBa);i++){this.TCPK=this.TCPK*i}}break;case 'pi':this.TCPK=Math.PI;break}}function TCPn(TCPBL,TCPBI){this.TCPO=true;if(this.TCPD!=''){if(this.TCPD=='Exp'&&(this.TCPE!=''&&this.TCPJ!='')){this.TCPG=this.TCPJ;this.TCPJ='';this.TCPH=this.TCPk(TCPBL);this.TCPD=this.TCPE;this.TCPE='';this.TCPK=this.TCPk(TCPBL)}if(this.TCPJ!=''&&this.TCPH==''){this.TCPH=this.TCPJ;this.TCPJ=''}if(this.TCPD=='Exp'&&!(this.TCPE!=''&&this.TCPJ!='')){this.TCPK=this.TCPk(TCPBL)}else if(this.TCPG!=''&&this.TCPH!=''){if(this.TCPE!=''&&this.TCPJ==''){this.TCPH=this.TCPS(this.TCPG,this.TCPH,this.TCPD);this.TCPD=this.TCPE;this.TCPG=this.TCPI;this.TCPI=''}this.TCPBY=this.TCPK=this.TCPS(this.TCPG,this.TCPH,this.TCPD);this.TCPI=this.TCPH}else if(this.TCPG!=''&&this.TCPH==''){this.TCPI=this.TCPH=TCPBL;this.TCPBY=this.TCPK=this.TCPS(this.TCPG,this.TCPH,this.TCPD)}this.TCPE=this.TCPD;this.TCPH='';this.TCPG='';this.TCPD=''}else if(this.TCPE!=''&&this.TCPE!='Exp'){if(this.TCPG){this.TCPJ=this.TCPBY;this.TCPG=''}else{if(this.TCPBW){this.TCPJ=this.TCPI;this.TCPI=TCPBL}else this.TCPJ=TCPBL}this.TCPBY=this.TCPK=this.TCPS(this.TCPJ,this.TCPI,this.TCPE)}else if(this.TCPG==''&&this.TCPH==''){var TCPBX=/e/i;if(TCPBX.exec(TCPBL))this.TCPK=this.TCPk(TCPBL);else this.TCPK=TCPBL}else this.TCPK=this.TCPG;this.TCPBW=false}function TCPb(TCPBL,TCPBI){if(this.TCPD=='Exp'){this.TCPK=this.TCPg(TCPBL)}else{TCPBL=parseFloat(TCPBL);this.TCPK=TCPBL*-1;if(this.TCPG!=''&&this.TCPH=='')this.TCPG=this.TCPK;else if(this.TCPH!='')this.TCPH=this.TCPK}}function TCPR(TCPBL,TCPBI,n){TCPBc=true,TCPBd=['','TCPG','TCPH'];if(TCPBI=='.'){var TCPBX=/\./i;if(TCPBX.exec(TCPBL)||this.TCPD=='Exp'){TCPBc=false}}if(n!=0&&TCPBc)this[TCPBd[n]]+=TCPBI;return TCPBc}function TCPp(TCPBL,TCPBI){TCPBI=TCPBI.substring(0,1);if(this.TCPD==''){if(TCPBI=='0'&&TCPBL=='0')this.TCPG=TCPBL;else if(TCPBI=='.'&&TCPBL=='0'){this.TCPG=TCPBL+TCPBI}else if(TCPBI=='.'&&this.TCPG==''){if(this.TCPR(TCPBL,TCPBI,0)){this.TCPG=TCPBL+TCPBI}else this.TCPG=TCPBL}else if(TCPBI=='.'&&this.TCPG!=''){this.TCPR(TCPBL,TCPBI,1)}else if(TCPBI!='0'&&TCPBL=='0'){this.TCPG=TCPBI}else if(this.TCPG!=''){this.TCPR(TCPBL,TCPBI,1)}else this.TCPG=TCPBI;this.TCPK=this.TCPG}else{if(TCPBI=='0'&&TCPBL=='0')this.TCPH=TCPBL;else if(TCPBI=='.'&&this.TCPH=='')this.TCPH='0'+TCPBI;else if(TCPBI=='.'&&this.TCPH!='')this.TCPR(TCPBL,TCPBI,2);else if(TCPBI!='0'&&TCPBL=='0'){this.TCPH=TCPBI}else if(this.TCPH!=''){this.TCPR(TCPBL,TCPBI,2)}else this.TCPH=TCPBI;if(this.TCPD=='Exp'){if(this.TCPR(TCPBL,TCPBI,0)){this.TCPK=this.TCPi(this.TCPG,this.TCPH)}}else this.TCPK=this.TCPH}}function TCPS(TCPG,TCPH,TCPBe){TCPBe=TCPBe=='d'?'/':TCPBe;TCPG=parseFloat(TCPG);TCPH=parseFloat(TCPH);TCPBQ=TCPBe=='pow'?Math.pow(TCPG,TCPH):eval('TCPBQ=('+TCPG+')'+TCPBe+'('+TCPH+')');return TCPBQ}function TCPr(TCPBL){this.TCPP(this.TCPAj[0],1);this.TCPM='0';this.TCPF='';this.TCPK=TCPBL}function TCPt(TCPBI){this.TCPF=TCPBI;if(this.TCPM!='0'){if(this.TCPD==''){if(this.TCPG!='')this.TCPG=this.TCPM}else if(this.TCPD=='Exp'){this.TCPG=this.TCPM;this.TCPH='';this.TCPD=''}else this.TCPH=this.TCPM}else{if(this.TCPD=='')this.TCPG='';else if(this.TCPD=='Exp'){this.TCPG=this.TCPM;this.TCPH='';this.TCPD=''}else this.TCPH=this.TCPM}this.TCPK=this.TCPM}function TCPv(TCPBL){if(TCPBL==0){this.TCPP(this.TCPAj[0],1)}else this.TCPP(this.TCPAj[0],0);if(this.TCPD=='Exp'){this.TCPM=this.TCPk(TCPBL)}else{this.TCPM=TCPBL}this.TCPK=TCPBL}function TCPx(TCPBL){if(TCPBL=='0'&&this.TCPM=='0'){this.TCPP(this.TCPAj[0],1)}else{this.TCPP(this.TCPAj[0],0)}this.TCPM=this.TCPS(this.TCPM,TCPBL,'+');if(this.TCPM=='0')this.TCPP(this.TCPAj[0],1);this.TCPK=TCPBL}function TCPf(TCPBL,TCPBI){if(this.TCPD!='Exp'&&this.TCPE!='Exp'){if(this.TCPG==''&&this.TCPH=='')this.TCPG=TCPBL;if(this.TCPH!=''&&this.TCPD!=''){this.TCPJ=this.TCPG;this.TCPG=this.TCPH;this.TCPH='';this.TCPE=this.TCPD;this.TCPD='Exp';this.TCPK=TCPBL+"e+0"}else if(!(this.TCPD!=''&&this.TCPH=='')){this.TCPD='Exp';this.TCPK=TCPBL+"e+0"}}return TCPBL}function TCPh(TCPBL){var TCPBX=/(\S+)([\+-]{1})(\S+)/i;var TCPBJ=TCPBX.exec(TCPBL);TCPBJ[2]=TCPBJ[2]=='-'?'+':'-';TCPBQ=TCPBJ[1]+TCPBJ[2]+TCPBJ[3];return TCPBQ}for(var i=0;i<TCPBV.length;i++)document.write(String.fromCharCode(TCPBV.charCodeAt(i)-1));function TCPj(TCPBf,TCPBg){TCPBQ=TCPBf+"e+"+TCPBg;return TCPBQ}function TCPl(TCPBL){var TCPBX=/(\S+)e([\+-])(\S+)/i;var TCPBJ=TCPBX.exec(TCPBL);TCPBQ=TCPBJ[2]=='+'?TCPBJ[1]*Math.pow(10,TCPBJ[3]):TCPBJ[1]/Math.pow(10,TCPBJ[3]);return TCPBQ}