block_zi='';
mouse_at_x = 0;
mouse_at_y = 0;
my_browser =''
is_w3c = (document.getElementById)  ? true : false;
is_ie = (document.all) ? true : false;
is_ie4 = (document.all && !is_w3c) ? true : false;
is_ie5 = (document.all &&  is_w3c) ? true : false;
is_ns4 = (document.layers) ? true : false;
cii_max = 0;
spec_at= '';
pi = 3,14159265;
winstat='';

function fetch_Element(id) {

    if (typeof id == 'object' || typeof id=='[object]') {
//      window.status='You passed the data-type  ' + id + '    .';
      return id;
      }
    else {
//      window.status='You passed the id-label  ' + id + '    .';
      }

  if( is_ns4 ) return findlayer( id, document );
    else if( is_ie4 ) return document.all[id];
  else return window.document.getElementById(id);

}

function doreplace(whichtext,whatpat,bywhat) {
var uvar='undefined';
if (typeof bywhat==uvar) var bywhat='*';
if (typeof whatpat==uvar) return whichtext;

var donerep=whichtext.replace(whatpat,bywhat);

return donerep;

}

function init_colorpal() {

bgcolors=new Array('#000400','#002200','#003E00','#005500','#006600','#007900','#008C00','#009700','#00A600','#00BF00','#00CC00','#00DD00','#00E800','#00F900','#06FF06','#22FF22');
cii_max=bgcolors.length;
}


function makewin(winurl,winame,winwidth,winheight,resize,dirs,locatio,menus,scrolls,toolbar) {

var jq=String.fromCharCode(34);
var qo='';
var qe='';

if (winurl=='*') var winurl='';
if (resize=='*') var resize='no';
if (scrolls=='*') var srcolls='no';

var paras=new Array();

var ecode='window.open(';
var eot='\")';
var argsep=',';
var upat=/undefined/g;
var urep='no';


paras[1]='\"'+ winurl + '\"';
paras[2]=' \"' + winame + '\"';
paras[3]= jq + ' width=' + qo + winwidth +qe;
paras[4]=' height=' + qo + winheight + qe;
paras[5]=' resizable=' + qo + resize + qe;
paras[6]=' directories=' + qo + dirs + qe;
paras[7]=' location=' + qo + locatio + qe;
paras[8]=' menubar=' + qo + menus +qe;
paras[9]=' scrollbars=' + qo + srcolls + qe;
paras[10]=' toolbar=' + qo+ toolbar + qe;

var nrargs=paras.length;


var it=1;
while (it<nrargs) {
  var ipar=paras[it];
  var epar=ipar.replace(upat,urep);
  var ecode=ecode+ epar + argsep;
  it+=1;
}

var ecode=ecode.substring(0,(ecode.length)-1);
var ecode='winchild=' + ecode+eot;

alert(ecode);
eval(ecode);

return true;
}

function writechild(towin) {

towin.document.open("text/html");
towin.document.write('Here we go ...');


return true;

}

function readradio(buttonname) {

var rano=-1;


return rano;

}