// Hoved Menu

// input :
// " menu tekst * Menu Link * status tekst* SubMenu (arbejdsGr eller program)* bin nr"
// bin nr angiver hvilke submenu elementer der skal med 0= alle
// mainMenuStatus er tekst i status line
mainMenu = new Array()
mainMenuStatus = new Array()

mainMenu[0]="Forside*main.htm"
mainMenuStatus[0]="Hvem er vi og hvad vil vi ?"

mainMenu[1]="Arbejdsgrene*arbejdsgr.htm*arbejdGr"
mainMenuStatus[1]="Hvilke arbejdsgrene/aktiviteter har vi ?"

mainMenu[2]="Program*kalender.htm*program"
mainMenuStatus[2]="Program for foreningens aktiviteter"

mainMenu[3]="Oplysninger*oplysning.htm*arbejdGr"
mainMenuStatus[3]="Navne og adresser på kontaktpersoner mm."

mainMenu[4]="Skriv til os*mailto:post@lm-amager.dk"
mainMenuStatus[4]="Hvis du har nogen spørgsmål o.lin. kan du skrive til os på post@lm-amager.dk"

mainMenu[5]="Link*link.htm"
mainMenuStatus[5]="Link/henvisninger til andre hjemmesider"

//mainMenu[6]="Sidste nyt*sidste_nyt.htm"
//mainMenuStatus[6]="Her finder du de sidste nye informationer"

mainMenu[6]="Denne side*siden.htm"
mainMenuStatus[6]="Information om denne side"

//mainMenu[8]="English*mainuk.htm"
//mainMenuStatus[8]="Presentation in English"

// Danske ugedage navne lange
lweekday=new Array()
lweekday[0] = "Søndag"
lweekday[1] = "Mandag"
lweekday[2] = "Tirsdag"
lweekday[3] = "Onsdag"
lweekday[4] = "Torsdag"
lweekday[5] = "Fredag"
lweekday[6] = "Lørdag"

// Danske ugedage navne korte
weekday=new Array()
weekday[0] = "Sø"
weekday[1] = "Ma"
weekday[2] = "Ti"
weekday[3] = "On"
weekday[4] = "To"
weekday[5] = "Fr"
weekday[6] = "Lø"

// Danske måneds navne
monthname=new Array()
monthname[0]="Januar"
monthname[1]="Februar"
monthname[2]="Marts"
monthname[3]="April"
monthname[4]="Maj"
monthname[5]="Juni"
monthname[6]="Juli"
monthname[7]="August"
monthname[8]="September"
monthname[9]="Oktober"
monthname[10]="November"
monthname[11]="December"

// udskriv
function skriv(tekst){
  document.write(tekst)
}

// find 1. 2'er potens større end 4
function power2FindFirst(nr){
	var power2=4
	var fundet=0
	for(a in arbejdGr){
		power2=power2*2
		if((power2&nr)>0){
			fundet=power2
			break
		}
	}
	return fundet
}


// find 1. potens (af 2) større end 2
function powerFindFirst(nr){
	var power2=0.5
	var fundet=0
	for(a in arbejdGr){
		power2=power2*2
		if(power2<8) continue
		if((power2&nr)>0){
			fundet=a
			break
		}
	}
	return fundet
}


function statusLineText(statusTekst){
self.status=statusTekst
return true
}


function statusLineProgramText(arbejdsGrNo){
self.status=statusLine(parent.kalender,arbejdsGrNo)
return true
}


// udskrivning af menu
// af troels.stummann@adr.dk
// 25/1 2001 sted : i luften mellem Chicago og Pittsburgh
function skrivMenu(){
	for(e in mainMenu){
		opdel= mainMenu[e].split("*")
		skriv("<h4><a")
	 	if(e==parent.mainMenuNr){skriv(" CLASS= 'valgt'")}
		skriv(" href='"+opdel[1]+"'")
	 	if((mainMenuStatus[e].length)>0){
			skriv(" onMouseOver='statusLineText(mainMenuStatus["+e+"]); return true' ")
		}
		skriv(" onClick='parent.subMenuNr=0'")
		skriv(">"+opdel[0]+"</a></h4>")
	 	if((e==parent.mainMenuNr)&&(opdel.length>2)){
//			var power2=0.5
			if(e==2) subMenu=parent.udSkriv 
			else subMenu=parent.subMenuNr
			subMenuUd=opdel[3]
			for(a in arbejdGr){
				if(e==1){test=arbejdGrPage[a]}
//				if(e==2){test=((programPage[a])&&((parent.erArbejdsGrIProgram & (Math.pow(2,a)))>1))}
				if(e==2){test=programPage[a]
					if((parent.erArbejdsGrIProgram & (Math.pow(2,a)))==0) test=false}
//				if(e==2){test=(a>2)&&((parent.erArbejdsGrIProgram & (Math.pow(2,a))>1))}
				if(e==3){test=oplysningPage[a]}

//				power2=power2*2
				anker=omtaleLink[a].split("#")[1]    
				if((test)>0){
					skriv("<a")
				 	if((Math.pow(2,a)&subMenu)>0) skriv(" CLASS= 'valgt'")
					if(e==1) skriv(" href='"+omtaleLink[a]+"' onClick='parent.subMenuNr="+Math.pow(2,a)+"; location.reload()'")
					if(e==2) skriv(" href='kalender.htm' onClick='parent.udSkriv="+Math.pow(2,a)+"'") 
					if(e==3) skriv(" href='oplysning.htm#"+anker+"' onClick='parent.subMenuNr="+Math.pow(2,a)+"; location.reload()'")
					skriv(" onMouseOver='statusLineProgramText("+Math.pow(2,a)+"); return true'>"+ arbejdGr[a]+"</a><br>")
				}
			}
		}
	}
}



// udskriv datagruppe side input angiver rækkefølge af elementer der har arbejdGrPage=true
function arbejdGrList() {
	max=arbejdGrList.arguments.length
	for (var i=0; i<max; i++) {
		nr=arbejdGrList.arguments[i]
		if(arbejdGrPage[nr]){ 
			anker=omtaleLink[nr].split("#")[1]     
			skriv("<a NAME='"+anker+"'></a><H2>"+arbejdGr[nr]+"</H2>")    
			skriv(arbejdGrTekst[nr])
			skriv("<UL>")
//				if(programPage[nr]) skriv("<LI><a href='kalender.htm' onClick='parent.udSkriv="+Math.pow(2,nr)+"'>Se program</a></LI>")
//				if((programPage[nr])&&((parent.erArbejdsGrIProgram & (Math.pow(2,nr)))>1)) skriv("<LI><a href='kalender.htm' onClick='parent.udSkriv="+Math.pow(2,nr)+"'>Se program</a></LI>")
				if((nr>2)&&((parent.erArbejdsGrIProgram & (Math.pow(2,nr)))>1)) skriv("<LI><a href='kalender.htm' onClick='parent.udSkriv="+Math.pow(2,nr)+"'>Se program</a></LI>")
				if(oplysningPage[nr])skriv("<LI><a href='oplysning.htm#"+anker+"'>Flere oplysninger</a></LI>")
				if(hjemmeside[nr].length>3) skriv("<LI>Hjemmeside: <a href='http://"+hjemmeside[nr]+"' Target='_blank'>"+hjemmeside[nr]+"</a></LI>")
			skriv("</UL><BR>")
		}
	}
}


function skrivKontakt(no){
	if(modeAdr[no].length>3) skriv("Mødested : "+ modeAdr[no]+"<BR>")
	if(kontakt[no].length>3) skriv("Kontakt : "+ kontakt[no]+"<BR>")
	if(kontaktAdr[no].length>3) skriv("Adresse : "+ kontaktAdr[no]+"<BR>")
	if(kontaktTlf[no].length>3) skriv("Telefon : "+ kontaktTlf[no]+"<BR>")
	if(no==1)skriv("Giro no : "+ giro+"<BR>")
	if (kontaktEmail[no].indexOf("@")>0) skriv("Email : <a href='mailto:"+ kontaktEmail[no]+"'>"+ kontaktEmail[no]+"</a><BR>")
	if(hjemmeside[nr].length>3) skriv("Hjemmeside: <a href='http://"+hjemmeside[nr]+"' Target='_blank'>"+hjemmeside[nr]+"</a>")
}

// udskriv datagruppe side input angiver rækkefølge af elementer der har arbejdGrPage=true
function oplysningList() {
	max=oplysningList.arguments.length
	for (var i=0; i<max; i++) {
		nr=oplysningList.arguments[i]
		if(oplysningPage[nr]){ 
			anker=omtaleLink[nr].split("#")[1]     
			skriv("<a NAME='"+anker+"'></a><H2>"+arbejdGr[nr]+"</H2>")    
			skrivKontakt(nr)
			skriv("<UL>")
				if((nr>2)&&((parent.erArbejdsGrIProgram & (Math.pow(2,nr)))>1)) skriv("<LI><a href='kalender.htm' onClick='parent.udSkriv="+Math.pow(2,nr)+"'>Se program</a></LI>")
				if(arbejdGrPage[nr]) skriv("<LI><a href='arbejdsgr.htm#"+anker+"'>Beskrivelse</a></LI>")
			skriv("</UL><BR>")
		}
	}
}


function skrivKontaktx(no){
skriv(arbejdGr[no]+"<BR>")
skriv("Mødested : "+modeAdr[no]+"<BR>")
skriv("Kontakt : "+ kontakt[no]+"<BR>")
skriv("Adresse : "+ kontaktAdr[no]+"<BR>")
skriv("Telefon : "+ kontaktTlf[no]+"<BR>")
skriv("Email : "+ kontaktEmail[no]+"<BR>")
}

function skrivKontakt1(no){
	erDerEmail=kontaktEmail[no].indexOf("@")>0

	skriv(kontakt[no]+"  ")
	skriv("Telefon : "+ kontaktTlf[no]+"<BR>")
	if (erDerEmail) skriv("Email : <a href='mailto:"+ kontaktEmail[no]+"'>"+ kontaktEmail[no]+"</a><BR>")
}




var sidehoved="<H4><A HREF='main.htm'>Til forsiden </A>"+
              "| <A HREF='JavaScript:history.back()'>Tilbage</A></H4>"

function sidefod(){
dag=new Date(Date.parse(document.lastModified))
aar=dag.getFullYear()
if (aar<2000) dag.setYear(2000)
skriv("<H4>Opdateret den ")
skriv(dag.getDate()+ ". ")
skriv(monthname[dag.getMonth()] +" ")
skriv(dag.getFullYear())
skriv ("  |<A HREF='mailto:post@lm-amager.dk'>  Skriv til os  </A>" +
         "|<A HREF='mailto:webmaster2@lm-amager.dk'>  Webmaster  </A>" +
//         "|<A HREF='#top'>  Til toppen af siden  </A>" +
         "|<A HREF='http://www.lm-amager.dk' Target='_top'>Til forsiden </A>" +
         "</H4>")
}

function sidefodMain(){
ukText="English introduktion"
dag=new Date(Date.parse(document.lastModified))
aar=dag.getFullYear()
if (aar<2000) dag.setYear(2000)
skriv("<H4>Opdateret den ")
skriv(dag.getDate()+ ". ")
skriv(monthname[dag.getMonth()] +" ")
skriv(dag.getFullYear())
skriv ("  |<A HREF='mailto:post@lm-amager.dk'>  Skriv til os  </A>" +
         "|<A HREF='mailto:webmaster2@lm-amager.dk'>  Webmaster  </A>" +
//         "|<A HREF='#top'>  Til toppen af siden  </A>" +
         "|<A HREF='http://www.lm-amager.dk'  Target='_top'>Til forsiden </A>" +
	 "|<a href='mainuk.htm'><img SRC='system/uk.gif' BORDER=0 height=18 width=36, onMouseOver='self.status=ukText; return true'></a>"+
         "</H4>")
}

function sidefodKalender(start){
dag=new Date(Date.parse(document.lastModified))
aar=dag.getFullYear()
if (aar<2000) dag.setYear(2000)
skriv("<H4>Siden opdateret den ")
skriv(dag.getDate()+ ". ")
skriv(monthname[dag.getMonth()] +" ")
skriv(dag.getFullYear())
skriv("| Data opdateret den ")
skriv(start.getDate()+ ". ")
skriv(monthname[start.getMonth()] +" ")
skriv(start.getFullYear())
skriv ("  |<A HREF='mailto:post@lm-amager.dk'>  Skriv til os  </A>" +
         "|<A HREF='mailto:webmaster2@lm-amager.dk'>  Webmaster  </A>" +
//         "|<A HREF='#top'>  Til toppen af siden  </A>" +
         "|<A HREF='www.lm-amager.dk'  Target='_top'>Til forsiden </A>" +
         "</H4>")
}

function sidefodMainUk(){
dkText="Dansk introduktion"
dag=new Date(Date.parse(document.lastModified))
aar=dag.getFullYear()
if (aar<2000) dag.setYear(2000)
skriv("<H4>Last updated ")
skriv(dag.getDate()+ ". ")
skriv(monthname[dag.getMonth()] +" ")
skriv(dag.getFullYear())
skriv ("  |<A HREF='mailto:post@lm-amager.dk'>  Email us </A>" +
         "|<A HREF='mailto:webmaster2@lm-amager.dk'>  Webmaster  </A>" +
//         "|<A HREF='#top'>  To the top  </A>" +
         "|<A HREF='http://www.lm-amager.dk'  Target='_top'>To the frontpage </A>" +
	 "|<a href='main.htm'><img SRC='system/dk.gif' BORDER=0 height=18 width=36, onMouseOver='self.status=dkText; return true'></a>"+
         "</H4>")
}
// udskriv tekst til staus
// 28 November 2000
function skrivStatus(start, slut, text){
	hr=start.getHours()
	min=start.getMinutes()
	statusText="Velkommen til vores næste møde: "+ lweekday[start.getDay()]+"  "+start.getDate()+"/"+(start.getMonth()+1)


	if(slut>1) {
		statusText=statusText+" - "+slut.getDate()+"/"+(slut.getMonth()+1)
		}	
	delta=hr*60+min;
	if(delta>2){
		statusText=statusText+" kl " +hr+ ":" 
	        if(min<9) statusText=statusText+0
			statusText=statusText+min 
		}

	statusText=statusText+" "   

	statusText=statusText+text
	return statusText
}



// næste møde i status line udgave med "*" som adskilleslse til normerede input
// 26 november 2000
function statusLine(data,udSkriv){
	statusText="Oplysning om næste møde fås hos kontaktperson"
	if (udSkriv<8) udSkriv=parent.udSkrivAll

   for(e in data){
	opdel= data[e].split("*")

	if(e==0){continue}

	udSkrivKode=opdel[3]

	if((udSkrivKode&udSkriv)==0) continue
	if((udSkrivKode&3)==3) continue
	if((udSkrivKode&5)==5) continue
	if((udSkrivKode&6)==6) continue
	if((udSkrivKode&7)==7) continue
//     	Her fjerner vi tilfælde der indeholder 3, 5, 6 og 7

	var start = new Date()
	var slut= new Date()
	start.setTime(opdel[0])
	slut.setTime(opdel[1])

	eventText = opdel[2]
	a=0
//skriv (" "+start +" "+slut+" "+eventText)
	statusText=skrivStatus(start, slut, eventText)
	break
  }
	return statusText
}

function ArbejdGrTotalList() {
for(nr in arbejdGr) {
// navne på arbejdsgrene
	skriv("<H2>"+arbejdGr[nr]+"</H2>")
	skriv("<EM>arbejdGr nr :</EM> "+nr+"<EM>  binær kode :</EM> " +Math.pow(2,nr))
// Beskrivelse af arbejdsgrene på hjemmeside:
	skriv("<BR><EM>arbejdGrTekst, Beskrivelse på hjemmeside:</EM> <br>"+arbejdGrTekst[nr])
// Link til arbejdsgrene
	skriv("<BR><EM>omtaleLink :</EM> "+omtaleLink[nr])
// adresse på arbejdsgrenes mødested
	skriv("<BR><EM>modeAdr adresse på mødested :</EM> "+modeAdr[nr])
// Kontakt personer til arbejdsgrene
	skriv("<BR><EM>kontakt Kontakt personer :</EM> "+ kontakt[nr])
// adresse på Kontaktpersoner til arbejdsgrene
	skriv("<BR><EM>kontaktAdr adresse på Kontaktpersoner :</EM> "+ kontaktAdr[nr])
// tlf på Kontaktpersoner til arbejdsgrene
	skriv("<BR><EM>kontaktTlf tlf på Kontaktpersoner :</EM> "+ kontaktTlf[nr])
// Emailadresse på Kontaktpersoner til arbejdsgrene
	skriv("<BR><EM>kontaktEmail Emailadresse på Kontaktpersoner :</EM> "+ kontaktEmail[nr])
	skriv("<BR><EM>arbejdGrPage :</EM> ")
	if(arbejdGrPage[nr]) {skriv("ja")} 
	else {skriv("nej")}
	skriv("<BR><EM>programPage :</EM> ")
	if(programPage[nr]) {skriv("ja")} 
	else {skriv("nej")}
	skriv("<BR><EM>oplysningPage :</EM> ")
	if(oplysningPage[nr]) {skriv("ja")} 
	else {skriv("nej")}
	}
}