//Método de addScrool para objeto creador. Versión 1.0. 24-04-01. Victor UVE.
//Subobjeto scroller. Hereda de creador. Versión 1.0. 24-04-01. Victor UVE.
creador.prototype.addScroll=function(id,doc,x,y,w,h,z,v,inner,res,fl1,fl2){
	var objeto=new creador.scroller(this,doc,id,x,y,w,h,z,v,inner,res,fl1,fl2);
	eval("self."+id+"=objeto");
	return objeto;
}
creador.scroller=function(gestor,doc,id,x,y,w,h,z,v,inner,res,fl1,fl2){
	this.gestor=gestor;
	this.doc=doc;
	this.idObj=id;
	this.ie4=(creador.ie&&navigator.appVersion.indexOf("MSIE 5.")==-1)?1:0;
	this.sto=0;
	this.x=x;
	this.y=this.y0=y;
	this.z=z;
	this.w=w;
	this.h=h;
	this.v=v;
	this.inner=inner;
	this.currentRes=this.res=res;
	this.fl1=fl1;
	this.fl2=fl2;
	this.swap=(fl1[5]==null||fl2[5]==null)?0:1;
	this.pre=[[new Image,new Image],[new Image,new Image]];
	this.pre[0][0].src=fl1[0];
	this.pre[1][0].src=fl2[0];
	if(this.swap){
		this.pre[0][1].src=fl1[5];
		this.pre[1][1].src=fl2[5];
	}
	this.needed=this.visible=false;
	if(!creador.ns)document.onselectstart=function(){return false}
	this.set();
	return this;
}
creador.scroller.prototype.set=function(){
	var o=this.idObj;
	var idaux=(creador.DOM2)?"id":"name";
	var s=["<a href=javascript:void(null) onmouseover="+o+".perform(",") onmouseout="+o+".stop(",")><img "+idaux+"=imag"+o," border=0></a>"];
	var f1=s[0]+1+s[1]+0+s[2]+0+" src="+this.fl1[0]+" width="+this.fl1[1]+" height="+this.fl1[2]+s[3];
	var f2=s[0]+0+s[1]+1+s[2]+1+" src="+this.fl2[0]+" width="+this.fl2[1]+" height="+this.fl2[2]+s[3];
	this.madre=this.gestor.crea(o+"madre",this.doc,this.x,this.y,this.w,this.h,this.z);
	this.hija=this.gestor.crea(o+"hija",this.madre,0,0,this.w,null);
	this.flUP=this.gestor.crea(o+"fl0",this.doc,this.fl1[3],this.fl1[4],null,null,this.z,null,null,f1);
	this.flDOWN=this.gestor.crea(o+"fl1",this.doc,this.fl2[3],this.fl2[4],null,null,this.z,null,null,f2);
	if(this.swap){
		this.img=[];
		for (var i=0;i<2;i++) this.img[i]=(creador.DOM2)?document.getElementById("imag"+o+i):(creador.ie)?eval("document.all.imag"+o+i):document.layers["capa"+o+"fl"+i].document.images[0];
	}
	if(this.v=="show")this.show();
	if(this.inner!=null)this.refresh(this.inner);
}
creador.scroller.prototype.refresh=function(inner,nextEv){
	var v=this.visible;
	this.nextEv=nextEv;
	this.hide();
	this.hija.fill(inner);
	this.hija.move(0,0);
	if(this.ie4)this.sto=setTimeout(this.idObj+".actualiza('"+v+"')",100);
	else this.actualiza(v);
}
creador.scroller.prototype.actualiza=function(v){
	clearTimeout(this.sto);
	var o=this.id;
	this.hija.h=this.hija.getDocHeight();
	this.needed=(this.hija.h>this.h)?1:0;
	if(this.needed){
		this.minY=0;
		this.maxY=(this.hija.h-this.h)*-1;
		this.signos=[[">","<",-1,this.flUP,this.flDOWN,this.maxY,this.minY],["<",">",1,this.flDOWN,this.flUP,this.minY,this.maxY]];
	}
	if(this.v)this.show();
	if(this.nextEv!=null)eval(this.nextEv);
}
creador.scroller.prototype.show=function(){
	if(!this.visible){
		this.madre.show();
		this.hija.show();
		if(this.needed){
			if(this.hija.y<this.minY)this.flUP.show();
			if(this.hija.y>this.maxY)this.flDOWN.show();
		}
		this.visible=true;
	}
}
creador.scroller.prototype.hide=function(){
	if(this.visible){
		this.madre.hide();
		this.hija.hide();
		this.flUP.hide();
		this.flDOWN.hide();
		this.visible=false;
	}
}
creador.scroller.prototype.stop=function(cual){
	clearTimeout(this.sto);
	if(this.swap)this.img[cual].src=this.pre[cual][0].src;
	this.currentRes=this.res;
}
creador.scroller.prototype.perform=function(dir){
	if(this.sto)clearTimeout(this.sto);
	var cual=(dir==0)?1:0;
	if(this.swap)this.img[cual].src=this.pre[cual][1].src;
	if(eval(this.hija.y+this.signos[dir][0]+this.signos[dir][5])){
		this.signos[dir][3].show();
		if(eval(this.hija.y+this.signos[dir][1]+this.signos[dir][5]+this.signos[dir][2]*25))if(this.currentRes!=1)this.currentRes--;
		this.hija.push(0,this.signos[dir][2]*this.currentRes);
	}else{
		this.signos[dir][4].hide();
		this.stop(cual);
	}
	this.sto=setTimeout(this.idObj+'.perform('+dir+')',50);
}
creador.scroller.prototype.move=function(y){
	if(y>this.maxY)y=this.maxY;
	this.hija.move(0,y);
	if(this.needed){
		if(this.hija.y<this.minY)this.flUP.show();
		if(this.hija.y>this.maxY)this.flDOWN.show();
	}
}