function _cls_slider(obj,speed,delay,filter){
	var _speed=speed;if (isNaN(_speed)) _speed=2;
	var _delay=delay;if (isNaN(_delay)) _delay=4000;
	function _IMG(src,url,alt){
		this.src=src;this.url=url;
		this.alt=alt;
	}
	if (!obj) return null;
	var PICS=new Array();
	var curIndex=0;
	if (filter=='b'||filter=='blendtrans'){
		obj.style.filter='blendtrans();';
	}else if (filter=='r'||filter=='revealtrans'){
		obj.style.filter='rolltrans();';
	}else if (filter==null||filter=='0'){
		if (Math.random()>.5){
			obj.style.filter='BlendTrans();';
		}else{
			obj.style.filter='RevealTrans();';
		}
	}
	function slide(){
		if (PICS[curIndex].href!='#'&&PICS[curIndex].href!='') obj.onclick='window.open('+ PICS[curIndex].href +',\'_blank\')';
		obj.filters[0].apply();
		obj.src=PICS[curIndex].src;
		if (obj.filters[0].transition)	obj.filters[0].transition=26;		
		obj.filters[0].play(_speed);
		if (++curIndex>=PICS.length) curIndex=0;
		setTimeout(slide,_delay);
	}
	this.play=function(xmlFile){
		var xmlDoc=new ActiveXObject('msxml2.domdocument');
		xmlDoc.async=true;
		xmlDoc.onreadystatechange=function(){
			if (xmlDoc.readyState==4){
				var root=xmlDoc.documentElement;
				if (root.childNodes.length){
					for (var i=0;i<root.childNodes.length;i++){
						PICS.push(new _IMG(root.childNodes[i].getAttribute('src'),root.childNodes[i].getAttribute('href'),root.childNodes[i].getAttribute('alt')));
					}
					obj.src=PICS[0].src;
					slide();
				}
			}
		}
		if (/^\d+$/.test(xmlFile)) xmlFile='/slider_xml.asp?classid='+xmlFile;
		xmlDoc.load(xmlFile);
	}
}