		/*------------ GLOBAL VARIABLES -------------*/
sc=(window.screen.width)/1024;
Rmonth=new Array('января','февраля','марта','апреля','мая','июня','июля','августа','сентября','октября','ноября','декабря')
Rdow=new Array('воскресенье','понедельник','вторник','среда','четверг','пятница','суббота')
SBF('body',16)
SBF('td',13)
Now=new Date();
function SBF(t,x){  // Scale Body Font: Parameter x is General font-size (in pxs for 1024x768-screen)
  W('<style type=text/css>');
  W(t+'{font-size:'+(x*sc)+'px}');
  W('</style>')
}

		/*---------------- FUNCTIONS ----------------*/
function tabulator(arr,styleCap,styleTab){
  W('<table border=1 cellspacing=0 cellpadding=0 ><tr>')
    W('<tr>')
      for(var j=0;j<arr[0].length;j++) {
        W('<td  width='+parseInt(arr[0][j])*sc+'px class='+styleCap+'>'+arr[1][j]+'</td>')
      }
    W('</tr>')
  for(var i=2;i<arr.length;i++){
    W('<tr>')
      for(var j=0;j<arr[0].length;j++) {
        W('<td  width='+parseInt(arr[0][j])*sc+'px class='+styleTab+'>'+arr[i][j]+'</td>')
      }
    W('</tr>')
  }
  W('</table>')
}

function chPg(x){
  if(x==0){
    urlPg='produce.htm'
  }else{
    var urlPg=document.URL.search('prod')
    ChNmb=parseInt(document.URL.substr(urlPg+4))+x
    if(ChNmb<0){ChNmb=10}
    if(ChNmb>10){ChNmb=0}
    urlPg='prod'+ChNmb+'.htm'
  }
  self.location=urlPg
}

function Roll(acro,pic,act){
  W('<acronym title="'+acro+'">')
  W('<img src='+pic+'.gif id='+pic) 
      W(' onMouseOver=this.src="'+pic+'Over.gif"')
      W(' onMouseOut=this.src="'+pic+'.gif"')
      W(' onMouseDown=this.src="'+pic+'Down.gif"')
      W(' onMouseUp=this.src="'+pic+'Over.gif"')
      W(' onClick=chPg('+act+')>')
  W('</acronym>')
}

function Nvg(){
  Roll('СПИСОК&#10;РАЗРАБОТОК','pphm','0')
  Roll('ПРЕДЫДУЩАЯ','ppbk','-1')
  Roll('СЛЕДУЮЩАЯ','ppfw','1')
  W('<div id=prods style="font-size:0.7em;font-weight:bold;color:maroon;text-align:center">')
  W('РАЗРАБОТКИ')
  W('</div>')
  S('pphm','',20,115,26)
  S('ppbk','',80,115,16)
  S('prods','',100,115,80)
  S('ppfw','',185,115,16)
}

function W(x){document.write(x)}

function RM(L,U){return Math.floor((U-L+1)*Math.random()+L)}

function SetCoo(n,p){document.cookie=n+'='+escape(p)}

function GetCoo(Coo_Id){
  Arr=document.cookie.split('; ');
  for(i=0;i<Arr.length;i++){
    pair=Arr[i].split('=');
    Ide=pair[0];
    Val=unescape(pair[1]);
    if(Ide==Coo_Id){return (Val)};
  }
  return null;
}

function S(id,pos,x,y,w,h) {      //Scaler by Id
  a=document.getElementById(id);
  if (a!=null){
    a.style.position=(pos=='')?'absolute':pos;
    a.style.left=sc*x+'px'; 
    a.style.top=sc*y+'px'; 
    if (w!=null && w>0){a.style.width=sc*w+'px'}
    if (h!=null){a.style.height=sc*h+'px'}
  }
}

function popUp(x,id){
  z=document.getElementById(id);
  z.style.visibility=(x==0)?'visible':'hidden'
}

function Shadow(text,x,y,w,ClrTxt,ClrShd,Clss,n){
  if (n==null){n=0}
  W('<div id=bot'+n+' class='+Clss+' style=color:'+ClrShd+'>')
    W(text)
  W('</div>')
  W('<div id=top'+n+' class='+Clss+' style=color:'+ClrTxt+'>')
    W(text)
  W('</div>')
  S('top'+n,'',x,y,w);
  S('bot'+n,'',x+2,y+2,w);
}

function ToDay(x){          //x=0|1 - brief/full format
  if (x==null){x=0}
  var Now=new Date()
    var DT=Now.getDate()    //(number)
    var DY=Now.getDay()     //(name)
      var m=Now.getMonth()  //(number 0-11 -index)
    var MM=(m<9)?'0'+(m+1):(m+1)   //(number 1-12)
    var Mo=Rmonth[m]
    var YY=Now.getFullYear()
  W(DT+((x==0)?'.':' ')+((x==0)?MM+'.':Mo+' ')+YY+((x==0)?'':' года, '+Rdow[DY]))
}

function Clock(){document.write('<div id=_c>&nbsp;</div>');AuxClk()}

function AuxClk(){var Now=new Date();var HH=Now.getHours();var MM=Now.getMinutes();
  var SS=Now.getSeconds();el=document.getElementById('_c');
  el.firstChild.nodeValue=((HH<10)?' ':'')+HH+((MM<10)?':0':':')+MM+((SS<10)?':0':':')+SS
  var sto = setTimeout('AuxClk()',1000)
}

function Creep(_style,A,B,fs,x,y,w){
  wwd=(w==0 || w>824-x)?(824-x):w;
  tmp=new Array();tmpc=new Array();
  for(i=0;i<A.length;i++){tmp[i]=A[i]}
  for(i=0;i<B.length;i++){tmpc[i]=B[i]}
  W('<DIV id=_out style="overflow:hidden;">');
    W('<div id=_run class='+_style+' style="font-size:'+fs+'em">&nbsp;</div>');
  W('</DIV>');
  setInterval('move(tmp,tmpc,2*sc,wwd)',20) //Activation of running row
  S('_out','',x,y,wwd,fs*16+4);  
  S('_run','',0,0,wwd);
}
    function move(A,B,step,jump){
      var x=parseInt(_run.style.left);
      x=x-step;
      if(x>3 && x<5){
        rn=document.getElementById('_run'); 
        rn.firstChild.nodeValue=A[RM(0,A.length)]
        rn.style.color=B[RM(0,B.length)]
      }
      if(x<-jump){x=jump};
      _run.style.left=x;
    }



/*		BANNERS' FUNCTIONS	*/
/*		==================	*/


function Meta(x,y){
  W('<a href="http://meta.ua">');
  W('<img src="http://meta.ua/img/banners/meta/88X31/Flag001.gif" border=0 id=meta alt="meta">');
  W('</a>');
  S('meta','',x,y,88,31);
}

function StartUA(x,y){
  var q='<a href=http://www.startua.com/?i=8015 target=_blank>';
      q+='<img src=http://top.startua.com/?i=8015&r=28&t=1&f='+escape(document.referrer);
      q+='&p='+escape(window.location.href);
  document.cookie="b=b";
  if(document.cookie)q+='&u=1';
  s=screen;
  q+='&s='+s.width+'&l='+(s.colorDepth?s.colorDepth:s.pixelDepth);
  W(q+'&n='+Math.random()+' id=startua border=0 alt=StartUA.com></a>');
  S('startua','',x,y,88,31);
}

function Bigmir(x,y){
  W('<a href=http://www.bigmir.net/ target=_blank onClick="slave()">');
  bmQ='<img src=http://c.bigmir.net/?s97285&t0';
  document.cookie="b=b";
  if(document.cookie)bmQ+='&c1';
  bmS=screen;bmQ+='&d'+(bmS.colorDepth?bmS.colorDepth:bmS.pixelDepth)+"&r"+bmS.width;
  bmF=document.referrer.slice(7);
  ((bmI=bmF.indexOf('/'))!=-1)?(bmF=bmF.substring(0,bmI)):(bmI=bmF.length);
  if(bmF!=window.location.href.substring(7,7+bmI))bmQ+='&f'+escape(document.referrer);
  W(bmQ+" border=0 id=bigmir alt='bigmir TOP100'>");
  W('</a>');
  S('bigmir','',x,y,88,31);
}

function UAport(x,y){
  W('<a href=http://uaport.net target=_blank>');
  W('<img src=http://uaport.net/banners/88x31.gif id=uaport border=0 alt="UAport" title="UAport - объединяя лучшее, найти главное">');
  W('</a>');
  S('uaport','',x,y,88,31);
}

function Rambler(x,y){
  W('<a href="http://top100.rambler.ru/top100/">');
  W('<img src="http://top100-images.rambler.ru/top100/banner-88x31-rambler-orange2.gif" alt="Rambler\'s Top100" id=rambler border=0>');
  W('</a>');
  S('rambler','',x,y,88,31);
}

function Realt(x,y){
  W('<a href="http://realt.kiev.ua/RealtCR/ShwStt.php?idn=647" title=" рейтинг-каталог НЕДВИЖИМОСТЬ " target=_blank>')
  W('<img src="http://realt.kiev.ua/RealtCR/CrtImg.php?idn=647" border=0 id=realt></a>') 
  S('realt','',x,y,88,31);
}

function UBN(x,y){						//UBN
  v1='\"http://banner.kiev.ua/cgi-bin/bi.cgi?'
  v2='!!26502!!&'
  v3=Math.round((Math.random()*(10000000 - 1)))
  v4='&!!0!!&2\"';
  W('<iframe src='+v1+'h'+ v2+v3+v4+' frameborder=0 id=ifrubn scrolling=no>');
  W('<a href='+v1+v2+v3+v4+'target=_top>');
  W('<img src='+v1+'i'+v2+v3+v4+' id=picubn border=0 alt="\Украинска\я баннерна\я сеть\">');
  W('</a>');
  W('</iframe>');
  W('<a href="http://banner.kiev.ua" target=_top>');
  W('<img src=\"http://banner.kiev.ua/dividers/d100v-1.gif\" id=divubn border=0 alt=\"Украинские 100x100\">');
  W('</a>');
  S('ifrubn','',x,y,100,100);
  S('picubn','',x,y,100,100);
  S('divubn','',x+105,y,15,100);
//  S('divubn','relative',0,0,15,100);
}

function Ping(x,y){
  user = "6894";
  pingid = Math.round((Math.random()*(10000000 - 1)));
  W("<a href='http://banner.topping.com.ua/cgi-bin/pbn_click.cgi?" + user + "&"+ pingid + "' target='_top'>");
  W("<img border=0 src='http://banner.topping.com.ua/cgi-bin/pbn_show.cgi?" + user + "&" + pingid +"' id=ping alt='PING Banner Network'></a>");
  S('ping','',x,y,468,60);
}
