// Kalender program lavet af troels.stummann@adr.dk 
// ALle rettigheder forbeholdes
// 20 marts 2000  1. udgave
// 9 november 2000 2. udgave

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


// udskriv et kalender input
// ny version 16 okotber 2000
// version 2, 29 oktober 2000, med link
function skrivNews(start, slut, text, udSkrivKode, linkText,udSkrivOption){

	var linkNo=-1
	var power2=1
	for(l in omtaleLink){
		if((power2&udSkrivKode)>0){
			linkNo=l
			break
		}
		power2=power2*2
	}


	hr=start.getHours()
	min=start.getMinutes()

	skriv("<br><h3>"+start.getDate()+" "+ monthname[start.getMonth()])


	if(slut>1) {
		skriv(" - "+slut.getDate())

		if(slut.getMonth()>start.getMonth()){
			skriv("/"+(slut.getMonth()+1))
			}
                else skriv(" "+ monthname[start.getMonth()] )
		}	

	skriv(" " + lweekday[start.getDay()] +" "  );

	delta=hr*60+min;
	if(delta>2){
		skriv(" kl " +hr+ ":" );
	        if(min<9) skriv(0);
			skriv(min); 
		}

	skriv(" ")	  
 
	if(udSkrivOption&2){
			anker=linkText.split(".")[0]
			skriv("<a name='"+anker+"'>"+ text+"</A>")
			}
	else	if(udSkrivOption&4)	skriv("<a href='"+"temp/"+linkText+"'>"+ text+"</A>")
	skriv("</h3>")
}


// udskriving sidste nyt fra dd og frem
// 10 november 2000
function lastNews(data,udSkriv){
  if (udSkriv<8) udSkriv=parent.udSkrivAll
//skriv (udSkriv)

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

	if(e==0){
// sæt nu dato : data[0]
	var nu= new Date()
	if(opdel[1]>100) nu.setTime(opdel[1])
	continue
	}

	udSkrivKode=opdel[3]
	udSkrivOption=opdel[5]


	if((udSkrivKode&udSkriv)==0) continue
	if ((udSkrivOption&6)<2) continue
//     	Her sorter vi tilfælde der indeholder 2 og eller 4

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

	eventText = opdel[2]
	linkText=opdel[4]

	if((udSkrivOption&6)==6){
	if((nu>start)&&(nu<slut))skriv("<br><h3>"+eventText+"</h3>")
	continue
  	}

	 skrivNews(start, slut ,eventText,udSkrivKode,linkText,udSkrivOption)
	
	if((udSkrivOption&2)>0){
	skriv("<IFRAME src='temp/"+linkText+"'> Det her virker ikke i Netscape<a href='"+"temp/"+linkText+"'> kik i stedet her </A></IFRAME>")}
  }
}