И четвертая часть скрипта:
function stscit(p){var d=p.scpx;p.scid=0;with(stgme(p).mscm[p.pver])if(d){var sp=stgobj(p.ids+"SP"),sn=stgobj(p.ids+"SN"),sc=stg obj(p.ids+"SC"),st=p.pver?sc.scrollTop:sc.scrollLe ft,mx=p.pver?sc.scrollHeight-sc.offsetHeight:sc.scrollWidth-sc.offsetWidth;if(st==0&&d<0||st==mx&&d>0)return;i f(st==(d>0?0:mx))(d>0?sp:sn).rows[0].cells[0].childNodes[0].src=simg[d>0?0:1][1];st+=d;if(d>0?(st>=mx)st<=0)){(d>0?sn:sp).rows[0].cells[0].childNodes[0].src=simg[d>0?1:0][0];st=d>0?mx:0;}else p.scid=setTimeout("stscit(st_ms["+p.mei+"].ps["+p.ppi+"]);",10);p.pver?(sc.scrollTop=st)sc.scrollLeft=st );}}
function stgsc(x,y,p){var sc=stgobj(p.ids+"SC"),ms=p.pver?stgct()+stgch()-y-stgspc(p,1):stgcl()+stgcw()-x-stgspc(p,3);return (p.pver?sc.scrollHeight:sc.scrollWidth)+2*p.ipbw>m s?ms:0;}
function stssc(s,p){if(s>=0){if(typeof(p.scid)=="undefined" )p.scid=0,p.scsu=0,p.scsd=1;var l=stglay(p),sp=stgobj(p.ids+"SP"),sn=stgobj(p.ids+ "SN"),sc=stgobj(p.ids+"SC");(p.pver?sp.parentNode: sp).parentNode.style.display=(p.pver?sn.parentNode :sn).parentNode.style.display=s?'':'none';sc.style .overflow=s?"hidden":"";if(s)s=Math.max(s-(p.pver?sp.offsetHeight+sn.offsetHeight:sp.offsetW idth+sn.offsetWidth)-2*p.ipbw-2*p.psds-4*p.pspc,1);if((p.pver?sc.style.height:sc.style.wi dth)==(s?s+'px':'')) return;p.pver?(sc.style.height=s?s+'px':'')sc.st yle.width=s?s+'px':'');with(stgme(p).mscm[p.pver])if(s){sp.rows[0].cells[0].childNodes[0].src=simg[0][(p.pver?sc.scrollTop:sc.scrollLeft)?1:0];sn.rows[0].cells[0].childNodes[0].src=simg[1][(p.pver?sc.scrollTop!=sc.scrollHeight-sc.offsetHeight:sc.scrollLeft!=sc.scrollWidth-sc.offsetWidth)?1:0];}}}
function stwels(c,p){var m=stgme(p);if(!st_load||nNN4||nOP||p.isst) return;if(m.mhds&&!nIEM) stwtag("SELECT",c,p);if(m.mhdo&&(nIE4||navigator.a ppVersion.indexOf("Safari")>=0)) {stwtag("OBJECT",c,p);if(nIE4)stwtag("APPLET",c,p) ;}if(m.mhdi&&(nIEM||nIEW&&nVER<5.5)) stwtag("IFRAME",c,p);}
function stwtag(tg,c,p){var es=nIE?document.all.tags(tg):document.getElementsB yTagName(tg);for(var j=0;j<es.length;++j){var f=0,e=es.item(j);for(var t=e.offsetParent;t;t=t.offsetParent)if(t.id&&t.id. indexOf("Stm")>=0)f=1;if(f)continue;else if(stwover(e,p)){if(e.visLevel)e.visLevel+=c;else e.visLevel=c;if(e.visLevel==-1){if(typeof(e.visSave)=="undefined")e.visSave=e.s tyle.visibility;e.style.visibility="hidden";if(typ eof(mywehd)!='undefined'&&mywehd(e))return;}else if(!e.visLevel){if(typeof(mywesh)!='undefined'&&my wesh(e))return;e.style.visibility=e.visSave;}}}}
function stwover(e,p){var l=0,t=0,w=e.offsetWidth,h=e.offsetHeight;w?(e._wd= w)w=e._wd);h?(e._ht=h)h=e._ht);while(e)l+=e.of fsetLeft,t+=e.offsetTop,e=e.offsetParent;return l<p.rc[2]+p.rc[0]&&l+w>p.rc[0]&&t<p.rc[3]+p.rc[1]&&t+h>p.rc[1];}
function sthili(m,i){with(m)if(i.ityp!=6&&stcurl(i,midn&0x0 2000000)){if(midn&0x01000000)i.iurl="";do{if(midn& 2)i.itxc[0]=i.itxc[1];if(midn&4){i.itxf[0]=i.itxf[1];i.itxd[0]=i.itxd[1];}if(midn&8)i.ibgc[0]=i.ibgc[1];if(midn&16){i.ibgi[0]=i.ibgi[1];i.ibgr[0]=i.ibgr[1];}if(midn&32)i.ibdc[0]=i.ibdc[1];if(midn&64)i.iicn[0]=i.iicn[1];if(midn&128)i.iimg[0]=i.iimg[1];if(midn&256)i.iarr[0]=i.iarr[1];i=stgpar(i).par;}while(i&&(midn&0x04000000));}}
function stcurl(i,c){var t=stgtgt(i);var u=t?t.location.href:"",h=i.iurl;if(!c){u=u.toLower Case();h=h.toLowerCase();}if(u&&h){if(!h.indexOf(" file:////"))h=h.replace(/[\/]{4,}/,"//");else if(h.charAt(0)=="/"){var re=/(file:\/{2,}[^\/]+\/|http:\/\/[^\/]+\/|https:\/\/[^\/]+\/)/;re.exec(u);var s=RegExp.$1,n,r;r=s&&!u.indexOf(s)?s.substr(0,s.le ngth-1):"";h=r?r+h:"";}else if(!stabs(h)){h=u.substr(0,u.lastIndexOf("/")+1)+h;}}while(h.indexOf("/./")>0)h=h.replace(/\/\.\//,"/");while(h.indexOf("/../")>0)h=h.replace(/[^\/]*\/\.\.\//,"");return u&&h&&(u==h||u==h+"/"||stILNK&&u==h.substr(0,Math.max(0,h.indexOf("?") ))||stILOC&&h==u.substr(0,Math.max(0,u.indexOf("?" ))));}