


var TheItemURL = 0
var TheItemText = 1

// HEIGHT, WIDTH, TOP POSITION AND LEFT POSITION OF THE SCROLLER
var ScrollerWidth = 200; 
var ScrollerHeight = 40; 
var ScrollerLeft = 400;
var ScrollerTop = 50;

// THE SPEED OF THE "STEPS" TAKEN BY THE SCROLLING ACTION
var ScrollStepSpeed = 50;

// THE SIZE OF THE "STEPS" TAKEN BY THE SCROLLING ACTION
var ScrollStepSize = 3;

// THE AMOUNT OF TIME TO DISPLAY EACH HYPERLINK IN THE SCROLLER
var DisplayInterval = 2000;


// AMOUNT OF "WHITESPACE" TO THE LEFT AND TO THE TOP OF EACH HYPERLINK...RELATIVE TO THE CORRESPONDING <DIV> OR <LAYER> THAT HOLDS EACH HYPERLINK
var PaddingLeft = 1;
var PaddingTop = 25;

// HOW MANY TIMES WILL THE ENTIRE SET OF HYPERLINKS CYCLE THROUGH?
var ScrollCycleCount = 50;

// WHERE WILL THE NEW PAGE BE OPENED?
// FOR EXAMPLE, IF USING FRAMES, YOU MAY WANT TO SET OpenNewPageHere = ' TARGET="_top" '
var OpenNewPageHere = ' TARGET="New" '

// THE NAME OF THE DHTML STYLE CLASS THAT WILL BE APPLIED TO THE SCROLLING HYPERLINKS
var ClassStyleName = ' CLASS="headlines" '

// IS THE CURRENT BROWSER NETSCAPE NAVIGATOR OR INTERNET EXPLORER?
var NN4=(document.layers);
var IE4=(document.all);

// ANY ADDITIONAL INFORMATION THAT GOES IN FRONTOF THE HYPERLINK
// CAN GO HERE.
var LinkPrefix ='';

// THE TEXT AND THE URL FOR EACH HYPERLINK SCROLL ITEM.
// THE TEXT AND THE URLs OF THE SAME INDEX RELATE TO ONE ANOTHER
// AND WILL BE COMBINED TO FORM HYPERLINKS
//
// NOTE: THE NUMBER OF ITEMS IN ScrollItemText MUST EQUAL
// THE NUMBER OF ITEMS IN ScrollItemURL
var ScrollItemURL = new Array()
var ScrollItemText = new Array()

// THE COMPLETE HYPERLINK THAT WILL BE USED IN THE SCROLLER
// EACH ELEMENT IS THE COMBINATION OF ScrollItemURL AND ScrollItemText 
var ScrollItemTextAndURL=[];


<!-- beginarray -->
ScrollItemText[0] = 'Austrian American Society of Pennsylvania  610-356-3271'
ScrollItemURL[0] = 'www.aasop.org'
ScrollItemText[1] = 'Bayerischer Volksfest-Verein (BVV) 215-942-7411'
ScrollItemURL[1] = ''
ScrollItemText[2] = 'Cannstatter Volksfest-Verein (CVV) 215-332-0121'
ScrollItemURL[2] = 'http://www.cvvphilly.com'
ScrollItemText[3] = 'Damenchor Wald-echo  215-725-1718'
ScrollItemURL[3] = ''
ScrollItemText[4] = 'DonauSchule-Deutschesprachschule (DSS) '
ScrollItemURL[4] = 'http://www.donauschule.org'
ScrollItemText[5] = 'First German Sport Club Phoenix   215-357-9913'
ScrollItemURL[5] = 'http://www.phoenixsportclub.com'
ScrollItemText[6] = 'Franklinville - Schwarzwald Maennerchor  215-439-1443'
ScrollItemURL[6] = ''
ScrollItemText[7] = 'German American Committee of Phila & Vicinty  215-872-0568'
ScrollItemURL[7] = 'http://germanamericancommittephila.com'
ScrollItemText[8] = 'German American Firefighters Assoc  215-332-7538'
ScrollItemURL[8] = 'http://www.igafa.com'
ScrollItemText[9] = 'German American Memorial Assoc  215-886-4530'
ScrollItemURL[9] = ''
ScrollItemText[10] = 'German American Steuben Parade  215-332-4300'
ScrollItemURL[10] = 'http://www.steubenparade.com'
ScrollItemText[11] = 'Germania Maennerchor  856-783-6590'
ScrollItemURL[11] = ''
ScrollItemText[12] = 'German Language Awards - Deutsch Lehrer Verband (AATG) 215-794-5460'
ScrollItemURL[12] = ''
ScrollItemText[13] = 'German Society of Pennsylvania  215-627-2332'
ScrollItemURL[13] = 'http://www.germansociety.org'
ScrollItemText[14] = 'German Society Womens Auxiliary  215-342-5140'
ScrollItemURL[14] = ''
ScrollItemText[15] = 'GTV Almrausch  215-677-6394'
ScrollItemURL[15] = 'http://www.gtvalmrausch.org'
ScrollItemText[16] = 'Hermann-Humboldt Lodge #125  484-624-1285'
ScrollItemURL[16] = 'www.pagrandlodge.org/districta/125'
ScrollItemText[17] = 'Immanuel German School  '
ScrollItemURL[17] = 'www.TheImmanuelGermanSchool.org'
ScrollItemText[18] = 'Immanuel Lutheran Church  215-464-1540'
ScrollItemURL[18] = 'http://www.immanuelphilly.org'
ScrollItemText[19] = 'Intl German American Police Association  215-957-0401'
ScrollItemURL[19] = 'http://www.igapa.com'
ScrollItemText[20] = 'Krystyna`s Schnitzlehaus  609-724-9606'
ScrollItemURL[20] = 'www.enjoysebastians.com'
ScrollItemText[21] = 'Lehigh Saenserbund  215-453-8809'
ScrollItemURL[21] = 'www.lehighsaengerbund.org'
ScrollItemText[22] = 'Catholic Kolping Society  215-676-8977'
ScrollItemURL[22] = 'http://www.kolpingphilly.com'
ScrollItemText[23] = 'Steuben Society-Pastorius unit #38  215-725-8819'
ScrollItemURL[23] = ''
ScrollItemText[24] = 'United German Hungarians  215-357-9851'
ScrollItemURL[24] = ''
ScrollItemText[25] = 'United Singers of Philadelphia  215-728-1755'
ScrollItemURL[25] = ''
ScrollItemText[26] = 'Vereinigung der Donauschwaben (Danube Swabian) 215-722-4253'
ScrollItemURL[26] = ''
ScrollItemText[27] = 'Vereinigung Erzgebirge (VE) 215-675-5380'
ScrollItemURL[27] = 'http://www.veclub.org'
ScrollItemText[28] = 'Schlaraffia Filadelfia'
ScrollItemURL[28] = 'http://www.filadelfia128.com'

<!-- endarray -->



// IS THE SCROLLER GOING TO CYCLE ONLY A FIXED NUMBER OF LOOPS?
var LoopingFixedNumberOfTimes = (ScrollCycleCount > 0);

// HOW MANY ITEMS ARE PART OF THE SCROLLING LIST?
var ScrollItemsCount = ScrollItemURL.length;

//-----------------------------------------------------------------
function LaunchScroller()
{
	
	HyperlinkCount = 0;	

	if(ScrollItemsCount == 0)	
		return;	

	if(!window.ScrollItemURL)
		return;
	
	
	if(LoopingFixedNumberOfTimes)
		loopCount=0;

	for(i=0; i<ScrollItemsCount; i++)
	{
		ScrollItemTextAndURL[i] = [LinkPrefix+ScrollItemURL[i], ScrollItemText[i]];
	}
	
	if(NN4)
	{
		CreateItemContainersForNN();
	}
	else
	{
		CreateItemContainersForIE();
	}

	LoadHyperlinksIntoScroller();
	
	SetItemVisibility(0, true);
	
	CurrentItem=0;
	
	timeoutID = setTimeout("ScrollControl()", DisplayInterval);
}
//-----------------------------------------------------------------
function ScrollItemContainer(i)
{
	//-----------------------------------------------------------------
	//	RETURN A REFERENCE TO THE DIV OR LAYER CORRESPONDING TO THE
	//	NUMBER PASSED IN THROUGH i
	//-----------------------------------------------------------------	
	ReferenceToItemContainer = eval("ContainerItem" + i +  ((IE4)?".style":""));
	return ReferenceToItemContainer
}
//-----------------------------------------------------------------
function SetItemVisibility(n, show)
{
	//-----------------------------------------------------------------
	//	SHOW OR HIDE AN ITEM CONTAINER
	//-----------------------------------------------------------------	

	var TheScrollItemContainer = ScrollItemContainer(n);
	TheScrollItemContainer.visibility=(show)?"visible":"hidden";
}
function ScrollControl()
{
	//-----------------------------------------------------------------
	//	CONTROL WHETHER OR NOT THE SCROLLER WILL CONTINUE TO SCROLL
	//-----------------------------------------------------------------

	
	var temp = CurrentItem;
	CurrentItem = (temp == ScrollItemTextAndURL.length-1)?0:temp+1;
	
	if(CurrentItem==1)
		loopCount++;
	
	if(LoopingFixedNumberOfTimes&&(loopCount>=ScrollCycleCount))
		return;
	
	StartScrollingHyperlinks(temp, CurrentItem);
}

function ScrollHyperlinks(){
	//-----------------------------------------------------------------
	//	THIS FUNCTION ACTUALLY DOES THE SCROLLING
	//-----------------------------------------------------------------

	if(NN4)
	{
		ScrollItemContainerFrom.top-=ScrollStepSize;

		if(ScrollItemContainerTo.top-ScrollStepSize<=ScrollItemContainerToTarget)
		{
			ScrollItemContainerTo.top=ScrollItemContainerToTarget;
			clearInterval(intervalID);
			ScrollItemContainerFrom.visibility="hidden";
			timeoutID=setTimeout("ScrollControl()",DisplayInterval);
		}
		else
		{
			ScrollItemContainerTo.top-=ScrollStepSize;
		}
	}
	else
	{
		ScrollItemContainerFrom.pixelTop-=ScrollStepSize;

		if(ScrollItemContainerTo.pixelTop-ScrollStepSize<=ScrollItemContainerToTarget)
		{
			ScrollItemContainerTo.pixelTop=ScrollItemContainerToTarget;
			clearInterval(intervalID);
			ScrollItemContainerFrom.visibility="hidden";
			timeoutID=setTimeout("ScrollControl()",DisplayInterval);
		}
		else
		{
			ScrollItemContainerTo.pixelTop-=ScrollStepSize;
		}
	}
}
function StartScrollingHyperlinks(ContainerItemFrom,ContainerItemTo){
	//-----------------------------------------------------------------
	//	BEGIN THE PROCESS OF SCROLLING THE HYPERLINKS
	//-----------------------------------------------------------------

	ScrollItemContainerFrom = ScrollItemContainer(ContainerItemFrom);
	ScrollItemContainerTo = ScrollItemContainer(ContainerItemTo);
	
	if(NN4)
	{
		ScrollItemContainerTo.top = ScrollItemContainerFrom.top + ScrollerHeight;
		ScrollItemContainerToTarget = ScrollItemContainerFrom.top;
	}
	else
	{
		ScrollItemContainerTo.pixelTop = ScrollItemContainerFrom.pixelTop + ScrollerHeight;
		ScrollItemContainerToTarget = ScrollItemContainerFrom.pixelTop;
	}
	
	SetItemVisibility(ContainerItemTo,true);
	intervalID = setInterval("ScrollHyperlinks()", ScrollStepSpeed);
}

function CreateItemContainersForIE(){
	//-----------------------------------------------------------------
	// CREATE MULTIPLE DIVs TO BE CONTAINERS FOR THE HYPERLINKS
	//-----------------------------------------------------------------
	var text='<DIV ID="scroller" STYLE="position:absolute;overflow:hidden;top:'+ ScrollerTop +';left:'+ ScrollerLeft +';width:'+ ScrollerWidth +';height:'+ ScrollerHeight +'">';
	text='<DIV ID="links" class="links">';

        ItemTextWidth = ScrollerWidth-PaddingLeft;
	

	for(var i=ScrollItemTextAndURL.length-1; i>=0; i--)
	{
		text += '<DIV ID="ContainerItem'+i+'" STYLE="position:absolute;visibility:hidden;top:'+ PaddingTop +';left:'+ PaddingLeft +';width:'+ ItemTextWidth +'"></DIV>';
	}
	
	text += '</DIV></DIV>';

	document.body.insertAdjacentHTML("BeforeEnd",text);
}

function CreateItemContainersForNN()
{
	//-----------------------------------------------------------------
	// CREATE NETSCAPE LAYERS TO BE CONTAINERS FOR THE HYPERLINKS
	//-----------------------------------------------------------------

	var scroller = new Layer(ScrollerWidth);

	with(scroller)
	{
		clip.right=ScrollerWidth;
		clip.bottom=ScrollerHeight;
		moveTo(ScrollerLeft,ScrollerTop);
		visibility="show";
	}

	for(var i=0; i<ScrollItemTextAndURL.length; i++)
	{
		eval("ContainerItem" + i + "=" + "new Layer(ScrollerWidth-PaddingLeft, scroller)");
		
		with(eval("ContainerItem" + i)) 
		{
			moveTo(PaddingLeft, PaddingTop);
		}
	}
}

function LoadHyperlinksIntoScroller()
{
	//-----------------------------------------------------------------
	// EXTRACT THE TEXT TO BE DISPLAYED AND THE CORRESPONDING URLs
	// FROM THE ARRAY AND BUILD HYPERLINKS. PUT ONE HYPERLINK INTO
	// EACH LAYER (IF NS) OR DIV (IF IE).
	//-----------------------------------------------------------------

	var TheScrollItemContainer;
	
	for(i=0; i<ScrollItemTextAndURL.length; i++)
	{
		TheScrollItemContainer = eval("ContainerItem"+i);

		// BUILD THE HYPERLINK
		newsStr = "<A " + OpenNewPageHere + ClassStyleName 
		newsStr += " HREF=" + ScrollItemTextAndURL[HyperlinkCount][TheItemURL] + ">" 
		newsStr += ScrollItemTextAndURL[HyperlinkCount][TheItemText] + "</A>";
		
		
		if(NN4)
		{
			with(TheScrollItemContainer.document)
			{
				write(newsStr);
				close();
			}
		}
		else
		{
			TheScrollItemContainer.innerHTML = newsStr;
		}
		
		HyperlinkCount++;
		if(HyperlinkCount == ScrollItemTextAndURL.length)
			HyperlinkCount=0;
	}
}

function ReloadPage()
{
	//-----------------------------------------------------------------
	// REFRESH/RELOAD THE PAGE
	//-----------------------------------------------------------------
	window.location.reload();
}



