<!-- 	 _stdio.js - General Utilities
//
// 	Copyright (C) USC (UK) Ltd, 2000-2004
//	All rights reserved worldwide.
//
// 	Private or Commercial use, copying, adaptation of any kind not allowed 
//	without written permission.
//
function xurl() {var url=self.location.href; url=url.substring(url.lastIndexOf('/')+1);if (url.indexOf('#')>-1) url=url.substring(0,url.indexOf('#'));return url}
function isEmail(e) { return !(e==''||e.indexOf(' ')>-1||e.indexOf('@')<0||e.indexOf('.')<0||e.lastIndexOf('.')>e.length-3||e.lastIndexOf('.')<e.indexOf('@')+2) }
//
var cookieVersion='1.3', cookieExpiryDate='31-Dec-2000 08:00:00 GMT';
function convertString(s,mode) { var sx=s+'';if (s=='') return ''; else { var sc='**;~ ^**',cx='',r='',i=0,x;for(x=0;x<sx.length;x++) { cx=sx.charAt(x);i=sc.indexOf(cx);r+=(i!=-1)?sc.charAt(i+mode):cx;}return r}}
function mksemic(s) { return convertString(s,-1); }
function rmsemic(s) { return convertString(s,1); }
function readCmdLine(fld) { var r=self.location.href,x=r.substring(r.indexOf(fld+'=')); return (x=-1)?readCookie(fld):r.substring(x+1); }
//
function readCookie(n) { var x,y,xC=document.cookie,f=lcase(n);if (xC.length>0) { x=xC.indexOf(f+'=');if (x!=-1) x+=f.length+1;y=xC.indexOf(';',x);if (y==-1) y=xC.length;if (x>0&&y>x) return mksemic(unescape(xC.substring(x,y)));} return ''} 
function writeCookie(n,v) { return setCookie(n,v,14) }
function setCookie(n,v,edays) { if (v=='') {killCookie(n);return ''}; var f=lcase(trim(n)),xC=document.cookie,edate=new Date(); edate.setTime(edate.getTime()+(edays*24*3600*1000)); document.cookie=f+'='+escape(rmsemic(v))+((edays==null)?'':'; expires='+edate.toGMTString());return readCookie(f)}
function killCookie(n) { var r=readCookie(n);if (r!='') document.cookie=lcase(trim(n))+'= ; expires=Thu, 01-Jan-2000 00:00:01 GMT';return r}
//
function updateCookie(n,v) { writeCookie(n,v);}
function toggleCookie(n) { var v=readCookie(n);v=v!=1?1:''; return writeCookie(n,v)}	
function togglePage(n) { toggleCookie(n); self.location.href=xurl()}
//
var gf_mode='|';
function gxf(data,j,item) { if (data=='') return item==-1?0:'';var d=(data+' '),x,y=-1,z=-1,L=d.length;for (x=0;x<L;x++) { if (gf_mode==d.charAt(x)||x==L-1) { if (++z>=j&&j!=-1) return d.substring(y,x); else { x=d.indexOf(gf_mode,x);if (x<0) break;y=x+1; }}}; return j!=-1?'':z+1;}
function gf(d,i) {gf_mode='|';return gxf(d,i)}
function gcf(d,i) {gf_mode=',';return gxf(d,i);gf_mode='|'}
function gsf(d,i) {gf_mode=';';return gxf(d,i);gf_mode='|'}
function lcase(a) {return trim(a).toLowerCase()}
function ucase(a) {return trim(a+' ').toUpperCase();}
function tcase(a) {s=a+'       ';return (ucase(s.charAt(0))!=s.charAt(0)?(ucase(s.charAt(1))!=s.charAt(1)?trim(ucase(s.charAt(0))+s.substring(1)):a):a)}
function trim(t) { var s=t+' ';if (s==' ') return ''; else { while(s.charAt(0)==' '||s.charAt(0)=='\t') s=s.substring(1);while(s.charAt(s.length-1)==' '||s.charAt(s.length-1)=='\t') s=s.substring(0,s.length-1);return s}}
function qq(s) {var r='';for (var x=0;x<s.length;x++) { r+=((s.charAt(x-1)!='\\'&&s.charAt(x)=='\"')?'\\"':s.charAt(x));}return r}
function swapchars(s,c1,c2) {var x,s1=lcase(s),s2=lcase(c1),s3=s;while (s1.indexOf(s2)>-1) {s3=s3.substring(0,s3.indexOf(s2))+c2+s3.substring(s3.indexOf(s2)+c1.length);s1=lcase(s3);};return s3}
function stripq(s) {var x,y=s.length,c=new Array('"',"'",' ');for (x=2;x>=0;x--) {y=s.length;while(s.charAt(0)==c[x]) { s=s.substring(1); y--; };while(s.charAt(y-1)==c[x]) { s=s.substring(0,--y);}};return s}
function extract(n,d) { var t=d+'',x=t.toLowerCase().indexOf(n.toLowerCase()+'=');if (x<0) x=t.toLowerCase().indexOf(n.toLowerCase()+':');if (x>=0) {t=stripq(t.substring(x+n.length+1));x=t.indexOf(';');y=t.indexOf('\n');return t.substring(0,(y>-1&&y<x)?y:(x>-1?x:t.length));};return ''}

//
//-->