//	Tim Wood & Steve Stoft - May 8, 2007
function info_18() {
var my=info_18;
my.co2when="2007:01:00";
my.co2=402120661112;
my.co2ps=697;
my.Wco2 =1530878205585;
my.Wco2ps=3411;
var site='http://metapager.com/giz/';
//my.iFrameClock=site + 'G18/clock.html';
my.iFrameClock='/js/clock.html';
//my.ticker=site + 'G18/ticker.js';
my.ticker='/js/ticker.js';
my.udatProg=site + 'udat/rec.php';
my.rPage="http://zfacts.com/p/194.html";
my.hPage="http://zfacts.com/p/640.html";
my.gizName='G18co2';
my.zKey='zF18';
}
init(true);
function init(try_1) {
if(try_1) { info_18(); init.delay=200; }
var zSpan=document.getElementById(info_18.zKey);
if(zSpan!=null) startAll_18();
else setTimeout('init(false)',init.delay);
init.dalay *= 1.5;
}
function startAll_18() {
my=startAll_18;
var c, IDn, ID=info_18.zKey;
if(typeof(my.i)=='undefined')
my.i=0; else my.i++;
c='.'+my.i; if(my.i==0) c=''; IDn=ID+c;
var zSpan=document.getElementById(IDn);
if(zSpan!=null) start_18(IDn, zSpan);
else if(my.i<5) startAll_18();
}
function start_18(ID, zSpan) {
var info=info_18;
var my=start_18;
if(typeof(my.loaded)=='undefined') my.loaded=0;
var year, who, cps, u, iFrame, fColor, fSize, fBold, fWidth, fHeight, fFamily;
var defaults="year=0-R; who=US; cps=5; u=cf; iFrame=1; color=black; size=14; bold=0; width=0; height=30; font=arial,sans-serif";
loadPrams_18(defaults);
var paramList, uv, nChars;
paramList=zSpan.getAttribute("rel");
if(typeof(paramList)!='undefined' && paramList &&(paramList.length > 2))
loadPrams_18(paramList);
year=pram_18('get', 'year');
who=pram_18('get', 'who');
cps=pram_18('get', 'cps'); cps=Math.max(.01,Math.min(40,cps*1));
u=pram_18('get', 'u');
my.iFrame= pram_18('get', 'iFrame');
fSize=pram_18('get', 'size');
fColor=pram_18('get', 'color');
fBold=pram_18('get', 'bold');
fWidth=pram_18('get', 'width');
fHeight=pram_18('get', 'height');
fFamily=pram_18('get', 'font');
uv=1; nChars=15;
if(u=='tons') { uv=1.10231; nChars=15; }
if(u=='pounds') { uv=2204.62; nChars=18.5; }
if(u=='kg') { uv=1000; nChars=18.5; }
if(u=='cf') { uv=17990; nChars=19.5; }
var co2=info.co2, co2ps=info.co2ps;
if(who=='world') {
co2=info.Wco2;
co2ps=info.Wco2ps;
nChars += 1;
}
var now=(new Date())/1000;
var co2start=co2 + co2ps*(now - str2date_18(info.co2when));
var startVal=0, rate=uv * co2ps, reZero=0;
if(year=='0') nChars=nChars-7.3;
if(year=='0-r') {nChars=nChars-4.3; reZero=1;}
if(year=='1') {
var y0=str2date_18("2006:01:00");
while(now-y0 > 365*24*3600) y0 += 365*24*3600;
startVal=rate *(now - y0);
nChars=nChars-2.5;
}
if(year=='2') {
startVal=uv * co2start;
}
if(fWidth=='0') fWidth=Math.floor(0.58 * fSize * nChars + 4);
if(fHeight=='0') fHeight=Math.floor(1 * fSize + 3);
my.outerSpan=document.createElement('span');
my.outerSpan.style.margin="0px";
my.outerSpan.style.padding="0px";
my.outerSpan.innerHTML="<a href='" +info.hPage+ "'>Need Link</a>";
zSpan.parentNode.replaceChild(my.outerSpan, zSpan);
if(my.iFrame=='1') {
var QSnames=new Array('ID', 'startVal', 'rate', 'cps', 'reZero', 'fSize', 'fColor', 'fBold', 'fFamily');
var QS='', name, val;
for(j=0; j<QSnames.length; j++) {
name=QSnames[j];
val=eval(name);
QS=QS + name + '=' + val + '&';
}
QS='?' + escape(QS);
my.iF='<iframe id="' +ID+ '" allowTransparency="True" width="' + fWidth + 'px" height="' + fHeight + 'px" src="' + info.iFrameClock + QS + '" frameborder="0" align="top" marginheight="0" marginwidth="0" scrolling="no"></iframe>';
} else {
my.tickerVals=new Array(ID, startVal, rate, cps);
my.clockSpan='<span id="' +ID+ '">#</span>';
if(my.loaded==0) {
my.script=document.createElement('script');
my.script.src=info.ticker;
my.script.type='text/javascript';
}
}
if(! my.loaded) {
valid_18(info.rPage);
return;
}
else completeStart_18();
}
function completeStart_18()
{ var s=start_18;
if(s.iFrame=='1') {
s.outerSpan.innerHTML=s.iF;
startAll_18();
} else {
s.outerSpan.innerHTML=s.clockSpan;
if(s.loaded==0) {
document.getElementsByTagName('head').item(0).appendChild(s.script);
s.loaded=1;
}
else nowCallTickLoop_18();
}
}
function loadPrams_18(pString) {
var params, peqv, pram, val;
params=pString.toLowerCase().replace(/ /g, '').split(';');
for(var i=0; i<params.length; i++) {
if(params[i]=='') continue;
peqv=params[i].split('=');
pram=peqv[0];
if(peqv.length==1 || peqv[1]=='') val='1';
else val=peqv[1];
pram_18('set', pram, val);
}
}
function pram_18(which, name, val) {
var my=pram_18;
name=name.toLowerCase();
if(which=='set')
eval('my.' +name+ '="' +val+ '";');
else {
return eval('my.' +name);
}
}
function str2date_18(str)
{ var ndx, s0, s=str;
var dA=new Array(7);
for(i=1; i<7; i++)
{ if(s.length)
{ ndx=s.indexOf(':')
if(ndx==-1) { s0=s; s=''; }
else s0=s.substring(0, ndx);
}
else s0=0; name="val";
if(i==2) s0 -= 1;
dA[i]=s0;
s=s.substring(ndx+1);
}
dA[4] =dA[4]*1;
return(Date.UTC(dA[1], dA[2], dA[3], dA[4], dA[5], dA[6]))/1000
}
function valid_18(rPage) {
my=valid_18;
Lnks="";
if(typeof(rPage)!='undefined')
{ my.rPage=rPage; my.delay=200; }
var links, Lnk, zLink, oops=2;
links=document.getElementsByTagName('a');
for(i=0; i<links.length; i++)
{ Lnk=links[i].href.toLowerCase();
if(Lnk==my.rPage || Lnk=='http://zfacts.com/')
{ var txt=links[i].innerHTML;
zLink=Lnk; oops=1
if(txt.length > 0 && txt!=' ')
{ oops='ok';
my.ok=1;
break;
}
}
}
if(oops=='ok') { udat_18(); completeStart_18(); }
else {
my.delay *= 1.5;
setTimeout('valid_18()', my.delay);
}
}
function udat_18() {
var file=info_18.udatProg+ '?gizName=' + info_18.gizName;
var script=document.createElement('script');
script.src=file + '&domain=' +document.domain+ '&location=' +document.location;
script.type='text/javascript';
document.getElementsByTagName('head').item(0).appendChild(script);
}
