fzz='';fc=''

arltr=new Array('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');
arltl=new Array('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');

function urch(a) {b=a.value
if (b=='') {alert("You have not provided anything as a domain name \n\n Please enter a domain name, before you activate this button again.");return false;}
if (b.substring(0,7) != 'http://' && b.substring(0,8) != 'https://' ) {alert("Your domain name has prefix errors \n Your domain needs to have the prefix of either \n\n  http://   OR  https://  \n\n for it to work. ~"+b.substring(0,7)+"~");return false;}
location.href=b}

function fngetcookie(fa) {
if (fa!="") {coka = new Array;cokb = new Array;fc=fa.split(",")
for (fl=0;fl<fc.length;fl++) {coka[fl]="";cokb[fl]=""}
fk=document.cookie.split("; ");for (fl=0;fl<fc.length;fl++) {
for (fm=0;fm<fk.length;fm++) {fj=fk[fm].split("=");if (fj[0]==fc[fl]) {coka[fl]=fj[0];cokb[fl]=fj[1]}
}
}}}

function fnacookie(fa) {if (fa!="") {fk=document.cookie.split("; ");
for (fm=0;fm<fk.length;fm++) {fj=fk[fm].split('=');
if (fj[0]==fa) {a=fj[1];}}}
return a}

function fnsetack(a,b) {
d=new Date();d.setMonth(d.getMonth()+6);
document.cookie=a+"="+b+";expires="+d.toGMTString()}


function fngeturl(fa) {if (fa!="") { 
fb=fa.split(",")
fc=location.search
fd=fc.split("?")[1]
fe=fd.split(":")
document.write("<br><br> Requested items = "+fa+" Qty = "+fb.length)
document.write("<br> Location Search is = "+fc+"  Qty = "+fe.length+"<br>")
fz=""
fx=""
for (fm=0;fm<fb.length;fm++) {fx=""
for (fl=0;fl<fe.length;fl++) {fw=fe[fl].split("=")
document.write("<br><font color=#ffffff> #"+fl+" & #"+fm+" = "+fe[fl]+" - "+fw[0]+" --- "+fb[fm])
if (fw[0]==fb[fm]) {fx=fw[1]} 
}
fz=fz+","+fx
document.write("<br><font color=#ffff00>fx/fz "+fx+"  "+fz)}
document.write("<br><br> FZ = "+fz)
fue=fz.split(",")
for (fa=0;fa<fue.length;fa++){document.write("<br> #"+fa+" =  "+fue[fa])}
document.write("<br><br> Finish of the roll out of the array ")
}}


function frad(a) {
for (i=0;i<a.length;i++) {
x=a[i].name+a[i].value;if (a[i].checked) {c='#141';} else {c='#004'}
if (a[i].defaultChecked) {d='#080';} else {d='#008';}
if (a[i].disabled) {c='#200';d='#950';}
fel(x)
}}

function fradr(a) {r='?'
for (i=0;i<a.length;i++) {
x=a[i].name+a[i].value;if (a[i].checked) {c='#141';r=a[i].value} else {c='#004'}
if (a[i].defaultChecked) {d='#080';} else {d='#008';}
if (a[i].disabled) {c='#200';d='#950';}
fel(x)
}
return r}


function fchx(a) {
x=a.name+a.value;if (a.checked) {c='#141';} else {c='#004'}
if (a.defaultChecked) {d='#080';} else {d='#008';}
if (a.disabled) {c='#220';d='#880';}
fel(x)}

function fclr(form) {for (i=0;i<document.form.length;i++) {
a=document.form[i]
if (a.type=='radio') {
x=a.name+a.value;
if (a.defaultChecked) {c='#141';d='#080';} else {c='#224';d='#008';}
if (a.disabled) {c='#210';d='#775';}
fel(x)}

if (a.type=='checkbox') {fchx(a)}
}}

function fel(x) {
e=document.getElementById(x);e.style.backgroundColor=c;e.style.border='3px solid '+d}

function link(l,h,b,a,c,s) {
document.write('<td><a href="'+l+location.search+'" accesskey="'+a+'"><div class="'+s+'"><h4>('+c+')'+h+'</h4>'+b+'</div></a></td>')
}

function fnusn(uv) {ud=''+uv;ua=ud.split('.');uc=ua[0];ub=uc.length
if (uv==0) {ue='---0---'} else {
if (uv>9999) {uc=uc.substring(0,ub-3)+','+uc.substring(ub-3,ub+1)}
if (uv>999999) {uc=uc.substring(0,ub-6)+','+uc.substring(ub-6,ub+1)}
if (ud.indexOf('.')>0) {ue=uc+'.'+ua[1]} else {ue=uc+'.o'}}
return ue}

function rad2deg(r) {d=360 * r/(2 * Math.PI);return d;}

function deg2rad(d) {r = (2 * Math.PI * d)/360;return r;}