function fadeOut(name,vals){var obj=$(name);try{$test(obj);var tmp=new Object();tmp.s=Object.select(vals,"s","step")||-5;tmp.n=Object.select(vals,"n","min")||0;tmp.t=Object.select(vals,"t","time")||100;if(s>0){s=(-s)}
var fVal=fade(name,tmp);if(fVal){if(fVal>fMin){setTimeout(function(){fadeOut(obj,tmp)},tmp.t);}
else if(fMin==0){toggle(name);}}}
catch(e){Log('dhtml_error',[e,"Object Name = "+name,"fadeOut"]);}}
function fadeIn(name,vals){var obj=$(name);try{$test(obj);if(getDisplay(name)=="none"){toggle(name)}
var tmp=new Object();tmp.s=Object.select(vals,"s","step")||5;tmp.n=Object.select(vals,"x","max")||100;tmp.t=Object.select(vals,"t","time")||100;tmp.s=Math.abs(tmp.s);var fVal=fade(name,tmp);if(fVal&&(fVal<fMax)){setTimeout(function(){fadeIn(obj,tmp)},tmp.t);}}
catch(e){Log('dhtml_error',[e,"Object Name = "+name,"fadeIn"]);}}
function flash(name){var obj=$(name);try{$test(obj);var tStep=((isDefined(arguments[1]))?arguments[1]:1);var tMax=((isDefined(arguments[2]))?arguments[2]:fade(name,{i:0}));tMax=((tMax==0)?100:tMax);tMax=(((tMax<=1)&&(tMax>0))?tMax*100:tMax);var amt=Math.floor(tMax/2);switch(tStep){case 1:case 2:amt=-amt;fade(name,{s:amt,n:10});break;case 3:case 4:fade(name,{s:amt,x:tMax});break;default:return}
tStep++;setTimeout(function(){flash(obj,tStep,tMax)},100);}
catch(e){Log('dhtml_error',[e,"Object Name = "+name,"flash"]);}}
function fade(name,vals){var obj=$(name);try{$test(obj);var oVal=null;var fIncr=Object.select(vals,"s","step")||5;var fMax=Object.select(vals,"n","min","x","max")||100;var dec=isDefined(Object.select(vals,"n","min"));if(dec){fIncr=-fIncr}
function checkLim(){if(((dec)&&(oVal<fMax))||((!dec)&&(oVal>fMax))){oVal=fMax;}}
if(isDefined(obj.filters)){var tmp="DXImageTransform.Microsoft.Alpha";if(obj.filters[tmp]!=null){oVal=obj.filters.item().opacity;oVal+=fIncr;checkLim();obj.filters.item(tmp).opacity=oVal;}
else{oVal=fIncr;checkLim();obj.style.filter+="progid:"+tmp+"(opacity="+oVal+")";}}
else{var stl=Object.selectProperty(obj.style,"opacity","MozOpacity","KhtmlOpacity")||'opacity';oVal=parseFloat(getStyle(obj,stl));fIncr/=100;fMax/=100;oVal+=fIncr;checkLim();setStyle(name,stl,oVal,"fade");}
return oVal;}
catch(e){Log('dhtml_error',[e,"Object Name = "+name,"fade"]);}}