
var popupWnd	= null;
var scrollSpeed	= 70;
var tapeWidth	= 38;
var tapeWidth2	= 109;
var Counter		= 0;
var hdlnDelay	= 12;
var selFeed		= 2; // Security News for headline

var pageHd1 = "<html><head><meta http-equiv=\"Content-Type\"content=\"text/html;"
		+ "charset=iso-8859-1\">\n<meta name=\"copyright\" content="
		+ "\"Copyright 2002, Piotr J. Walczak. All Right Reserved.\">\n"
		+ "<title>";

var pageHd2 = "</title>\n<link rel="
		+ "\"stylesheet\" href=\"ces.css\" type=\"text/css\">\n"
		+ "<body bgColor=#f0f8ff link=#050608 text=#003399 "
		+ " topmargin=\"0\" leftmargin=\"0\" bottommargin=\"0\" "
		+ "marginwidth=\"0\" marginheight=\"0\" "
		+ "onblur=\"setTimeout('self.close()',1000)\">\n";

ar_ctr = new Array(9);
InitAry(ar_ctr);
ar_d = new Array(9);
InitAry(ar_d);
ar_blf = new Array(9);
InitAry(ar_blf);


function InitAry( x ) {
	for(var i = 0; i < x.length; i++) { x[i] = 0; }	
}


// dodalem do wyswietlania TYLKO JEDNYCH news
function Roll2() {
	// zapozyczone z dolu na probe
	if(typeof(ar_n)=="undefined"){
		// something goes wrong cache is corrupted/empty
		//var ar_n = new Array();
		return;
	}
	window.setTimeout('Roll2()',scrollSpeed);
	fc = document.news.text.value.charAt(0);
	if((fc=='*')&&(ar_d[selFeed]<hdlnDelay)) {
		ar_d[selFeed]++;
	} else {
		ar_d[selFeed]=0;
		ar_ctr[selFeed]++;
		if(ar_ctr[selFeed] >= 32768) { ar_ctr[selFeed] = 0; }
	}
	ar_blf[selFeed] = ((ar_blf[selFeed] == 0) ? -1 : 0);
	document.news.text.value = SHRLeft(ar_s[selFeed],ar_ctr[selFeed],tapeWidth2,ar_blf[selFeed]);
}

function Roll() {
	if(typeof(ar_n)=="undefined"){
		// something goes wrong cache is corrupted/empty
		//var ar_n = new Array();
		return;
	}
	window.setTimeout('Roll()',scrollSpeed);
	for(var i = 0; i < ar_n.length; i++){
		fc = document.news.text[i].value.charAt(0);
		if((fc=='*')&&(ar_d[i]<hdlnDelay)) {
			ar_d[i]++;
		} else {
			ar_d[i]=0;
			ar_ctr[i]++;
			if(ar_ctr[i] >= 32768) { ar_ctr[i] = 0; }
		}
		ar_blf[i] = ((ar_blf[i] == 0) ? -1 : 0);
		document.news.text[i].value = SHRLeft(ar_s[i],ar_ctr[i],tapeWidth,ar_blf[i]);
	}	
}

function SHRLeft(s,c,m,b) {
	var cr = ( b ? "=" : "-"); 
	var v_point = c % s.length;
	var v_str = s.substring(v_point) + s.substring(0,v_point);
	v_str = v_str.substring(0,m) + cr;
	return v_str;
} 

function NwsW(z) {
	if (ar_s[z].length == 0) { return; }
	var z1 = z * 100;
	var i = 1;
	OpnChld(400, 300); 
	var d = popupWnd.document;
	d.write(pageHd1);
	d.write("CES ", ar_n[z], " News");
	d.write(pageHd2);
	d.write("<table class=\"st1\">");
	while(ar_t[z1+i])
		{ d.write("<TR><TD class=\"ext nws\">", ar_t[z1+i++], "</TD></TR>"); } 
	d.write("</table></center></body>");
	d.close();
}

function NwsW2(z) {
	if (ar_s[z].length == 0) { return; }
	var z1 = z * 100;
	var i = 1;
	OpnChld(400, 300); 
	var d = popupWnd.document;
	d.write(pageHd1);
	d.write("CES News");
	d.write(pageHd2);
	d.write("<table class=\"st1\">");
	while(ar_t[z1+i])
		{ d.write("<TR><TD class=\"ext nws\">", ar_t[z1+i++], "</TD></TR>"); } 
	d.write("</table></center></body>");
	d.close();
}

function StkW(i) {
	var ar_s1 = ar_k[i].split(';'); 
	if (!ar_s1[8]) { return; }

	OpnChld(225, 211); 
	var d = popupWnd.document;
	var l1 = "<a class=\"a1\" href='http://www.newsalert.com/bin/charts?Symbol="
	l1 += ar_s1[0] + "' TARGET='_blank'>" + ar_s1[0] + "</a>";

	d.write(pageHd1);
	d.write("CES Stocks");
	d.write(pageHd2);
	d.write("<table class=\"st1\"><TR>");
	d.write("<TD colspan=\"2\" class=\"ext nws\">Stock Quote for <strong>", l1,"</strong></TR>");
	d.write("<TR><TD class=\"ext nws\">Last Sale</TD>");
	d.write("<TD class=\"ext nws\">", ar_s1[2], "</TD></TR>");
	d.write("<TR><TD class=\"ext nws\">Net Change</TD>");
	if(ar_s1[3]>=0){
		d.write("<TD class=\"ext nws\">", ar_s1[3]);
	} else {
		d.write("<TD class=\"ext nws\">", ar_s1[3]);
	}
	d.write(" (", ar_s1[4], "%) </TD></TR>");
	d.write("<TR><TD class=\"ext nws\">Open</TD>");
	d.write("<TD class=\"ext nws\">", ar_s1[5], "</TD></TR>");
	d.write("<TR><TD class=\"ext nws\">High</TD>");
	d.write("<TD class=\"ext nws\">", ar_s1[6], "</TD></TR>");
	d.write("<TR><TD class=\"ext nws\">Low</TD>");
	d.write("<TD class=\"ext nws\">", ar_s1[7], "</TD></TR>");
	d.write("<TR><TD class=\"ext nws\">Volume</TD>");
	d.write("<TD class=\"ext nws\">", ar_s1[8], "</TD></TR>");
	d.write("</table></center></body>");
	d.close();
}

function OpnChld(w, h) {
	var x = y = 0;
	var scr_pos = f = '';
	if(popupWnd && !popupWnd.closed) 
		{ popupWnd.close(); }
	if (document.all) {			// IE
		x=noNeg(window.event.clientX + 150);
		y=noNeg(window.event.clientY + 100);
		scr_pos = ",left="+x+",top="+y;
	} else if (document.layers) {		// NN
		x=noNeg(e.pageX + 150);
		y=noNeg(e.pageY + 100);
		scr_pos = ",screenX="+x+",screenY="+y;
	}
	f = 'scrollbars=yes,height='+h+',width='+w+scr_pos;
	popupWnd = window.open('','X',f,false);
}

function noNeg(z) {
	z = (z<0) ? 0 : z;
	return z;
}

function StkTbl() {
	document.write('\n<TABLE width="100%" class="tZmidpor">\n');
	document.write('<TR><TD colspan="8" class="tdcu tdcuZh">STOCK</TD></TR>');
	document.write('<TR><TD ID="t1s">Symbol</TD><TD ID="t1s">Sale</TD>');
	document.write('<TD ID="t1s" colspan="2" align="center">Change</TD><TD ID="t1s">Open</TD>');
	document.write('<TD ID="t1s" align="center">Hi</TD><TD ID="t1s" align="center">Lo</TD><TD ID="t1s">Volume</TD></TR>\n');
	for(var i = 0; i < ar_k.length; i++) {
		var ar_s1 = ar_k[i].split(";"); 
		if(i % 2 == 0) {
				var bgk = '#f0f0f0';
 		} else {
				var bgk = '#ffffff';
		}
		document.write('<TR style="background-color: ', bgk, ';" onClick="StkW(', i, ');" >');
		document.write('<TD ID="t1s">', ar_s1[0], '</TD><TD ID="t1s">');
		document.write(ar_s1[1] , '</TD>');
		if(ar_s1[2]>0){
			document.write('<TD ID="t1n">', ar_s1[2]);
		} else if(ar_s1[2]<0){
			document.write('<TD ID="t1r">', ar_s1[2]);
		} else {
			document.write('<TD ID="t1s">', ar_s1[2]);
		}
		document.write(' (', ar_s1[3], '%) </TD>');
		if(ar_s1[2]>0){
			document.write('<TD ID="t1s"><img border="0" width="11" height="11" src="images/arup.gif"></TD>');
		} else if(ar_s1[2]<0) {
			document.write('<TD ID="t1s"><img border="0" width="11" height="11" src="images/ardn.gif"></TD>');
		} else {
			document.write('<TD ID="t1s">&nbsp;</TD>');
		}		
		document.write('<TD ID="t1s">', ar_s1[5], '</TD>');
		document.write('<TD ID="t1s">', ar_s1[6], '</TD>');
		document.write('<TD ID="t1s">', ar_s1[7], '</TD>');
		document.write('<TD ID="t1s">', ar_s1[8], '</TD></TR>\n');
	}
	document.write('\n</TABLE>\n');
}

function VirTbl() {
	document.write('<div class="portZhdr">Top 10 Virus<br>\n');
	document.write('................................</div><br>\n');
	for(var i = 2; i < ar_v1.length-1; i++) {
		document.write(ar_v1[i], '<br>\n');
	}
	document.write('<br><div class="portZhdr">Virus Alerts<br>\n');
	document.write('................................</div><br>\n');
	for(var i = 2; i < ar_v2.length-1; i++) {
		document.write(ar_v2[i], '<br>\n');
	}
	document.write('<br>Source:<br><a href="http://www.sophos.com/" TARGET="_blank">Sophos Anti-Virus</a><br>\n');

}

function CurexTbl() {
	document.write('Foreign Exchange Rates<br>\n');
	document.write('1 unit : THB (Thai Baht)<br>&nbsp;<br>\n');
	for(var i = 0; i < ar_m.length; i++) {
		document.write(ar_m[i], '<br>\n');
	}
	document.write('<br>Source:<br><a href="http://www.bangkokbank.com/" TARGET="_blank">Bangkok Bank</a><br>\n');
}

// z adobe --------------------------------------------------------------------
function newImage(arg) {
  if (document.images) {
    rslt = new Image();
    rslt.src = arg;
    return rslt;
  }
}

function changeImages() {
  if (document.images && (preloadFlag == true)) {
    for (var i=0; i<changeImages.arguments.length; i+=2) {
      document[changeImages.arguments[i]].src = changeImages.arguments[i+1];
    }
  }
}

var preloadFlag = false;
function preloadImages() {
  if (document.images) {
    ra_b_01_over = newImage("images/ra_b_01-over.gif");
		ch_01_over = newImage("images/ch_01-over.gif");
    preloadFlag = true;
  }
}
// z adobe --------------------------------------------------------------------

