function frameset(colrow,wihi,frame){
  var i,j;
  j=arguments.length;
  fr_text='<FRAMESET BORDER="0" FRAMEBORDER="no"';
  fr_text=fr_text+' '+colrow+'='+wihi+' ';
  fr_text=fr_text+'>';
  for (i=2;i<j;i++){
    fr_text=fr_text+arguments[i];
  }
  fr_text=fr_text+'</FRAMESET>';
return fr_text;
}

function frame(name,src,scroll){
var frame_text;
frame_text='<FRAME FRAMEBORDER="NO" marginheight="0" marginwidth="0" noresize';
if ((name=="main") && (src=="")){

 frame_text=frame_text+' src="'+self.location.protocol+'//'+self.location.host+self.location.pathname+self.location.search+'&'+self.location.hash+'" NAME="'+name+'" ';
}
else{
if (src!=""){ frame_text=frame_text+' src="'+src+'" '; }
if (name!=""){frame_text=frame_text+' NAME="'+name+'" ';}
}
frame_text=frame_text+'SCROLLING='+scroll+'>';
return frame_text;
}

function wr_frame(frame_content){
 var l=top.frames.length,fr_text;
 if (l==0){
 document.write(frame_content);
 document.close;
 }
}