/* USE WORDWRAP AND MAXIMIZE THE WINDOW TO SEE THIS FILE
========================================
 V-NewsTicker v2.1
 License : Freeware (Enjoy it!)
 (c)2003 VASIL DINKOV- PLOVDIV, BULGARIA
========================================
 For IE4+, NS4+ & Opera5+
========================================
 Get the NewsTicker script at:
 http://www.smartmenus.org/other.php
 and don't wait to get the Great SmartMenus script at:
 http://www.smartmenus.org
 LEAVE THESE NOTES PLEASE - delete the comments if you want */

/* PERL SCRIPT TO TURN WEBPAGE INTO JS ARRAY FOR THIS SCRIPT

#!/usr/bin/perl
while(<>){$line.=$_;}
$line =~ s/\s+/ /g;
@lines = split(/\<a/,$line);
$target = "_blank";
foreach(@lines){
        $_ = '<a'.$_;
        s/\.\.\///g;
        s/\'/\\\'/g;
        if(m/\<a href=\"([^\"]+)\"\>([^\<]+)\<\/a\>/){
                my $url=$1;
                my $name=$2;
                print "['$url','$name','$target'],\n";
        }
}

*/

// === 1 === FONT, COLORS, EXTRAS...
v_font='Arial,Helvetica,Verdana,Geneva,sans-serif';
v_fontSize='12px';
v_fontSizeNS4='12px';
v_fontWeight='normal';
v_fontColor='#0066cc';
v_textDecoration='none';
v_fontColorHover='#0066cc';//			| won't work
v_textDecorationHover='underline';//	| in Netscape4
v_bgColor='url()';
// set [='transparent'] for transparent
// set [='url(image_source)'] for image
v_top=0;//		|
v_left=0;//		| defining
v_width=155;//	| the box
v_height=80;//	|
v_paddingTop=0;
v_paddingLeft=0;
v_position='relative';//absolute or relative
v_timeout=3000;//1000 = 1 second
v_slideSpeed=60;
v_slideDirection=0;//0=down-up;1=up-down
v_pauseOnMouseOver=true;
v_start_num="random"; // either a number to start from or "random"

// === 2 === THE CONTENT - ['href','text','target']
// Use '' for href to have no link item
v_content=[
['http://www.heneveld.com/ad/alfalaval/001','We Have a System That Can Handle The Job','_blank'],
['http://www.heneveld.com/ad/behringer/001','Fluid Analysis Made Easy','_blank'],
['http://www.heneveld.com/ad/behringer/002','Mahle Duplex Pressure Filters: Do You Need Less Down Time?','_blank'],
['http://www.heneveld.com/ad/belfab/001','The Innovative Dust System That Grows With Your Shop','_blank'],
['http://www.heneveld.com/ad/belfab/002','Revolutionary Concept','_blank'],
['http://www.heneveld.com/ad/blackstoneney/001','Just Dial In','_blank'],
['http://www.heneveld.com/ad/blackstoneney/002','Heated Tank Series','_blank'],
['http://www.heneveld.com/ad/cecor/001','Filter Coolant Fast, Easier, Cleaner and Save!','_blank'],
['http://www.heneveld.com/ad/constructivesheetmetal/001','Midwest Industrial Woodworking Expo','_blank'],
['http://www.heneveld.com/ad/donaldson/001','The Name You Can Trust','_blank'],
['http://www.heneveld.com/ad/donaldson/002','Dura-Life: Outlasts, Outperforms &amp; Outvalues','_blank'],
['http://www.heneveld.com/ad/donaldson/003','Downflo&reg; WorkStations ','_blank'],
['http://www.heneveld.com/ad/donaldson/004','Delta P Plus and Dustronix Controls','_blank'],
['http://www.heneveld.com/ad/donaldson/005','Optimized Ultra-Web Cartridge Filters','_blank'],
['http://www.heneveld.com/ad/donaldson/006','Update Dura-Life Twice the Life Filter Bags','_blank'],
['http://www.heneveld.com/ad/donaldson/007','HEPA and 95% DOP Panel Filters','_blank'],
['http://www.heneveld.com/ad/donaldson/008','2005 Readers\' Choice Awards','_blank'],
['http://www.heneveld.com/ad/donaldson/009','Time Is Running Out','_blank'],
['http://www.heneveld.com/ad/econoline/001','Blast Gun Assemblies','_blank'],
['http://www.heneveld.com/ad/econoline/002','Gloves','_blank'],
['http://www.heneveld.com/ad/econoline/003','Media Abrasives','_blank'],
['http://www.heneveld.com/ad/filtrationsystems/001','Support Baskets, Strainers, &amp; Accessory Baskets','_blank'],
['http://www.heneveld.com/ad/finishingassociates/001/','Looking For Answers','_blank'],
['http://www.heneveld.com/ad/gmaindustries/001/','Introducing Nu Soft Steel Shot','_blank'],
['http://www.heneveld.com/ad/gusher/001/','Gusher Pumps','_blank'],
['http://www.heneveld.com/ad/heneveld/001','Industrial Filter Bags','_blank'],
['http://www.heneveld.com/ad/heneveld/002','Filtering Solutions for Air and Fluids','_blank'],
['http://www.heneveld.com/ad/heneveld/003','On a Mission to Serve, Solve and Satisfy','_blank'],
['http://www.heneveld.com/ad/heneveld/005','MRO Supplies','_blank'],
['http://www.heneveld.com/ad/heneveld/006','Got Rust?','_blank'],
['http://www.heneveld.com/ad/heneveld/007','We Keep Good Company','_blank'],
['http://www.heneveld.com/ad/heneveld/008','Seasons Greetings','_blank'],
['http://www.heneveld.com/ad/heneveld/survey','Survey Ticket Winners','_blank'],
['http://www.heneveld.com/ad/heneveld/thankyou/001','Thank You for Your Order','_blank'],
['http://www.heneveld.com/ad/heneveld/thankyou/002','Thank You We Appreciate Your Business','_blank'],
['http://www.heneveld.com/ad/heneveld/010','Introduce Teri','_blank'],
['http://www.heneveld.com/ad/heneveld/011','Parts Washing: Pieces of the Puzzle','_blank'],
['http://www.heneveld.com/ad/heneveld/012','We\'re Looking for Problems... the Dirty Kind','_blank'],
['http://www.heneveld.com/ad/heneveld/013','We Have all the Pieces of the Puzzle for Cleaning','_blank'],
['http://www.heneveld.com/ad/heneveld/014','No Fee Consultants, Engineers, and Purchasing Specialists','_blank'],
['http://www.heneveld.com/ad/heneveld/015','Air Filtration Pieces of the Puzzle','_blank'],
['http://www.heneveld.com/ad/heneveld/016','Liquid Filtration Pieces of the Puzzle','_blank'],
['http://www.heneveld.com/ad/heneveld/017','We Got It In The Bag','_blank'],
['http://www.heneveld.com/ad/heneveld/018','Generic vs. Prescription','_blank'],
['http://www.heneveld.com/ad/heneveld/019','We Like Mist Opportunities','_blank'],
['http://www.heneveld.com/ad/heneveld/020','Tanks A Lot','_blank'],
['http://www.heneveld.com/ad/heneveld/021','A Complaint is a Gift','_blank'],
['http://www.heneveld.com/ad/heneveld/022','Overstock Store','_blank'],
['http://www.heneveld.com/ad/imcs/001','IMCS General Email','_blank'],
['http://www.heneveld.com/ad/kcindustries/001','Superior Finishing Services','_blank'],
['http://www.heneveld.com/ad/matrixseparations/001','Custom Built Filters to Fit Any Need','_blank'],
['http://www.heneveld.com/ad/metallform/001','MEFO-BOX','_blank'],
['http://www.heneveld.com/ad/nordfab/001','Quick-Fit Ducting System','_blank'],
['http://www.heneveld.com/ad/nordfab/002','Laser Quick-Fit','_blank'],
['http://www.heneveld.com/ad/nordfab/003','Rock-Solid Durability with the Perfect Size','_blank'],
['http://www.heneveld.com/ad/nordfab/004','Laser Welded Benefits','_blank'],
['http://www.heneveld.com/ad/nordfab/005','World\'s Fastest Ducting','_blank'],
['http://www.heneveld.com/ad/oilskimmers/001','Why Oilskimmers?','_blank'],
['http://www.heneveld.com/ad/oilskimmers/002','Skim Around the Clock','_blank'],
['http://www.heneveld.com/ad/pall/001','Controlling Contamination in Aqueous and Chemical Systems','_blank'],
['http://www.heneveld.com/ad/pall/002','Total Fluid Cleanliness Management for Industrial Manufacturing Markets ','_blank'],
['http://www.heneveld.com/ad/pollutioncontrolproducts/001','Automotive Parts Stripping Furnace','_blank'],
['http://www.heneveld.com/ad/pollutioncontrolproducts/002','Free Offer','_blank'],
['http://www.heneveld.com/ad/pollutioncontrolproducts/003','Paint Stripping Furnace','_blank'],
['http://www.heneveld.com/ad/pollutioncontrolproducts/004','Upgrade Your Burn-Off Oven','_blank'],
['http://www.heneveld.com/ad/progresschemical/001','Not Getting Clean Parts?','_blank'],
['http://www.heneveld.com/ad/progresschemical/002','Better Solutions to Meet Your Needs','_blank'],
['http://www.heneveld.com/ad/progresschemical/003','Progress Chemical is Coming to You','_blank'],
['http://www.heneveld.com/ad/progresschemical/004','Delivery Reminder','_blank'],
['http://www.heneveld.com/ad/progresschemical/005','Progress Chemical General Email','_blank'],
['http://www.heneveld.com/ad/pvi/001','General Email','_blank'],
['http://www.heneveld.com/ad/ransohoff/001','Ransohoff General Email','_blank'],
['http://www.heneveld.com/ad/ransohoff/002','Ransohoff Lean Line - the compact, cost-effective cleaning solution','_blank'],
['http://www.heneveld.com/ad/ransohoff/003','Capitol Spending Freeze','_blank'],
['http://www.heneveld.com/ad/ransohoff/004','Key Strengths Working For You','_blank'],
['http://www.heneveld.com/ad/ransohoff/005','New Lean-Veyor','_blank'],
['http://www.heneveld.com/ad/ransohoff/006','Agi-Sonic&#8482; Ultrasonic Immersion Washer','_blank'],
['http://www.heneveld.com/ad/ransohoff/007','Immersible Ultrasonic Transducers','_blank'],
['http://www.heneveld.com/ad/recyclenow/001','Are you throwing money in the trash?','_blank'],
['http://www.heneveld.com/ad/recyclenow/002','To Clean or Not to Clean?','_blank'],
['http://www.heneveld.com/ad/smartskim/001','Sub Micron Filtration Without Media','_blank'],
['http://www.heneveld.com/ad/smartskim/002','CoolantLoop&#8482;','_blank'],
['http://www.heneveld.com/ad/smartskim/003','Finally a Solution for Oily Parts Washers','_blank'],
['http://www.heneveld.com/ad/smartskim/004','SmartSkim&reg; Keeps Machine Coolants Clean','_blank'],
['http://www.heneveld.com/ad/smartskim/005','SmartSkim&reg; Products','_blank'],
['http://www.heneveld.com/ad/smartskim/006','CrossFlow Separator - Open Channel Technology','_blank'],
['http://www.heneveld.com/ad/superiorsurfacetech/001','Manufacturer of Automated Peening and Blasting Systems','_blank'],
['http://www.heneveld.com/ad/vacumax/001','We\'re #1, We\'re #1','_blank'],
['http://www.heneveld.com/ad/vacumax/002','Source Capture Vacuum Systems','_blank'],
['http://www.heneveld.com/ad/vacumax/003','Are You Tired of Throwing Away Shop Vacs?','_blank'],
['http://www.heneveld.com/ad/vacumax/004','The Perfect Pick-Up Line','_blank'],
['http://www.heneveld.com/ad/vacumax/005','New Model 55 2-Jet Air Powered Vacuum','_blank']
];

v_start_num = (v_start_num=="random")? Math.floor(Math.random()*v_content.length): v_start_num;
if(isNaN(v_start_num))v_start_num=0;

//v_start_num = v_content.length-1;

// THE SERIOUS SCRIPT - PLEASE DO NOT TOUCH
v_ua=navigator.userAgent;
v_nS4=document.layers?1:0;
v_iE=document.all&&!window.innerWidth&&v_ua.indexOf("MSIE")!=-1?1:0;
v_oP=v_ua.indexOf("Opera")!=-1&&document.clear?1:0;
v_oP4=v_ua.indexOf("Opera")!=-1&&!document.clear;
v_kN=v_ua.indexOf("Konqueror")!=-1&&parseFloat(v_ua.substring(v_ua.indexOf("Konqueror/")+10))<3.1?1:0;
v_count=v_content.length;
v_s1=1;
v_cur=v_start_num+1;
v_cl=0;
v_d=v_slideDirection?-1:1;
v_TIM=0;
v_fontSize2=v_nS4&&navigator.platform.toLowerCase().indexOf("win")!=-1?v_fontSizeNS4:v_fontSize;
v_canPause=0;
v_first_run=1;

function v_getOS(a){
	if(v_iE){
		ret_val=document.all[a].style;
	}else if(v_nS4){
		ret_val=document.layers['v_container'].document.layers[a];
	}else{
		if(document.getElementById(a)){
			ret_val=document.getElementById(a).style
		}else{
			alert("Error: "+a);
		}
	}
	return(ret_val);
};

function v_start(){
	if(v_first_run != 1){
		  v_start_num = 0;
		  v_count=v_content.length;
		  v_s1=1;
		  v_cur=v_start_num+1;
		  v_cl=0;
		  v_d=v_slideDirection?-1:1;
	}
	var o=v_getOS('v_'+(v_start_num+1));
	var px=v_nS4?0:'px';
	if(v_iE||v_oP){
		if(o.pixelTop==v_paddingTop){
			v_canPause=1;
			if(v_count>1)v_TIM=setTimeout("v_canPause=0;v_slide()",v_timeout);
			return
		};
		o.pixelTop-=v_d;
		if(v_oP&&o.visibility.toLowerCase()!='visible')o.visibility='visible';
		setTimeout("v_start()",v_slideSpeed);
		return
	};
	if(parseInt(o.top)==v_paddingTop){
		v_canPause=1;if(v_count>1)v_TIM=setTimeout("v_canPause=0;v_slide()",v_timeout);
		return
	};
	o.top=parseInt(o.top)-v_d+px;
	setTimeout("v_start()",v_slideSpeed)
};
function v_slide(){
	var o=v_getOS('v_'+v_cur);
	var o2=v_getOS('v_'+(v_cur<v_count?v_cur+1:1));
	var px=v_nS4?0:'px';
	if(v_iE||v_oP){if(o.pixelTop==v_paddingTop*2-v_height*v_d){
		if(v_oP)o.visibility='hidden';
		o.pixelTop=v_height*v_d;
		v_cur=v_cur<v_count?v_cur+1:1;
		v_canPause=1;
		v_TIM=setTimeout("v_canPause=0;v_slide()",v_timeout);
		return
	};
	o.pixelTop-=v_d;
	if(v_oP&&o2.visibility.toLowerCase()!='visible')o2.visibility='visible';
	o2.pixelTop-=v_d;
	setTimeout("v_slide()",v_slideSpeed);
	v_first_run=0;
	return
};

if(parseInt(o.top)==v_paddingTop*2-v_height*v_d){
	o.top=v_height*v_d+px;
	v_cur=v_cur<v_count?v_cur+1:1;
	v_canPause=1;
	v_TIM=setTimeout("v_canPause=0;v_slide()",v_timeout);
	return
};
o.top=parseInt(o.top)-v_d+px;
o2.top=parseInt(o2.top)-v_d+px;
setTimeout("v_slide()",v_slideSpeed)};
if(v_nS4||v_iE||v_oP||document.getElementById&&!v_kN&&!v_oP4){
	document.write('<style>.vnewsticker,a.vnewsticker{font-family:'+v_font+';font-size:'+v_fontSize2+';color:'+v_fontColor+';text-decoration:'+v_textDecoration+';font-weight:'+v_fontWeight+'}a.vnewsticker:hover{font-family:'+v_font+';font-size:'+v_fontSize2+';color:'+v_fontColorHover+';text-decoration:'+v_textDecorationHover+'}</style>');v_temp='<div '+(v_nS4?"name":"id")+'=v_container style="position:'+v_position+';top:'+v_top+'px;left:'+v_left+'px;width:'+v_width+'px;height:'+v_height+'px;background:'+v_bgColor+';layer-background'+(v_bgColor.indexOf("url(")==0?"-image":"-color")+':'+v_bgColor+';clip:rect(0,'+v_width+','+v_height+',0);overflow:hidden">';
																																																																																																																																																									  for(v_i=0;v_i<v_count;v_i++){																																																																																																																																																					v_temp+='<div '+(v_nS4?"name":"id")+'=v_'+(v_i+1)+' style="position:absolute;top:'+(v_height*v_d)+'px;left:'+v_paddingLeft+'px;width:'+(v_width-v_paddingLeft*2)+'px;height:'+(v_height-v_paddingTop*2)+'px;clip:rect(0,'+(v_width-v_paddingLeft*2)+','+(v_height-v_paddingTop*2)+',0);overflow:hidden'+(v_oP?";visibility:hidden":"")+'" class=vnewsticker>'+(v_content[v_i][0]!=''?'<a href="'+v_content[v_i][0]+'" target="'+v_content[v_i][2]+'" class=vnewsticker'+(v_pauseOnMouseOver?" onmouseover=\'if(v_canPause&&v_count>1){clearTimeout(v_TIM);v_cl=1}\' onmouseout=\'if(v_canPause&&v_count>1&&v_cl)v_TIM=setTimeout(\"v_canPause=0;v_slide();v_cl=0\","+v_timeout+")\'":"")+'>':'<span'+(v_pauseOnMouseOver?" onmouseover=\'if(v_canPause&&v_count>1){clearTimeout(v_TIM);v_cl=1}\' onmouseout=\'if(v_canPause&&v_count>1&&v_cl)v_TIM=setTimeout(\"v_canPause=0;v_slide();v_cl=0\","+v_timeout+")\'":"")+'>')+v_content[v_i][1]+(v_content[v_i][0]!=''?'</a>':'</span>')+'</div>';
																																																																																																																																																									  }
																																																																																																																																																									  v_temp+='</div>';
																																																																																																																																																									  document.write(v_temp);																																																																																																																																																				
																																																																																																																																																									  setTimeout("v_start()",1000);
																																																																																																																																																									  if(v_nS4)onresize=function(){
																																																																																																																																																										  	location.reload()
																																																																																																																																																								}
																																																																																																																																																											}