
toel='Verplaats de 5 schijven van de ene toren/paal naar een andere.\n\nEen schijf kan alleen op de oranje basis of op een grotere schijf geplaatst worden.\nOm te verplaatsen: Klik op de linker of rechter helft van een bovenste schijf.\n\nHerstarten: Dubbelklik op de oranje basis of een paal.\n\nDit is "freeware". Commercieel gebruik, ongeacht hoe, is zonder schriftelijke toestemming van de auteur niet toegestaan. \n____________________________________________________________\n\nMove the 5 discs from one tower/pole to an other.\n\nA disc can be placed on the orange base or on a larger disc only.\nTo move: Click on the left or right half of an upper disc.\n\nTo Restart: Double click on the orange base or a pole.\n\nThis is freeware. Commercial use, no matter how, is not allowed without written permission by the author.\n\n\n  © Aad van der Arend, 2000, '+mijnmeeladres;

Ngewonnen=0;
schijfdikte=35;
steek=220;								//is steek of hartafstand van palen
schijfradiusverschil=10;
Links=new Array(0,21,21+steek,21+steek+steek)	//mogelijke Left waarden van de schijflagen
Schijf=new Array('','Lschijf1','Lschijf2','Lschijf3','Lschijf4','Lschijf5');
TopType=new Array()					//ivm klein boven groot
TopPlek=new Array();				//0...	in betreffende paal (0 is paal zonder schijf)
Nivo=new Array()						//niveau's van bovenkanten van basis en elke hogere schijflaag in pixels
NivoStapel=new Array()			//niveau's van bovenkanten van stapel op resp. paal in pixels
PlekkenTypen=new Array(40);	//schijflocaties (10..19, 20..29, 30..39) (10, 20, 30 =lege paal)
paalstart=2;
paalnw=2;
paalnu=2;
mapnivo='../';

function bijladen(){
	plaatshomeknop();
	bemeet();
	W=parseInt(STIJL('torengroep').width);
	STIJL('torengroep').left=Math.max(0,Math.round((Vbr-W)/2));
	STIJL('torengroep').visibility='visible';
	STIJL('hoppers1').visibility	=	'visible';
	STIJL('hoppers2').visibility	=	'visible';
	STIJL('hoppers3').visibility	=	'visible';
	STIJL('hoppers4').visibility	=	'visible';
	Afst(6); //6
	opnieuw(2); 
	rol(); 
	hop();
}

function bemeet(){
	actuelematen();
	STIJL('ramenvol').width=Vbr;
	STIJL('ramenleeg').width=Vbr;
	STIJL('dek').width=Vbr;
	STIJL('dek').height=Vho-parseInt(STIJL('dek').top);
}

function opnieuw(x){
	paalstart=x;
	TopType[1]=0;	TopType[2]=0;	TopType[3]=0;	TopType[x]=5;
	TopPlek[1]=0;	TopPlek[2]=0;	TopPlek[3]=0;	TopPlek[x]=5;
	NivoStapel[1]=205;	NivoStapel[2]=205;	NivoStapel[3]=205;	NivoStapel[x]=30;
	Yi=205;
	for(i=1;i<6;i++){
		Xi=Links[x]+i*schijfradiusverschil;
		Yi-=schijfdikte;
		STIJL(Schijf[i]).left=Xi;
		STIJL(Schijf[i]).top=Yi;
	};
	for(i=0;i<40;i++){	//om bij te houden waar de schijven zitten
		if(i>x*10 && i<x*10+6){PlekkenTypen[i]=i%5}else{PlekkenTypen[i]=0}
	}
}

function Verplaats(Snr,incr){
	paalnu=0;
	if(Snr==TopType[1])paalnu=1;
	if(Snr==TopType[2])paalnu=2;
	if(Snr==TopType[3])paalnu=3;
	if(paalnu==0)return;					//er is op een schijf onder een schijf geklikt

	paalnw=(paalnu+incr)%3;
	if(paalnw==0)paalnw=3;
	if(TopType[paalnw]!=0&&Snr<TopType[paalnw])return;		//geen grotere op kleinere

	pleknu=paalnu*10+TopPlek[paalnu];					//bereik pleknu is 0..39
	TopType[paalnu]=PlekkenTypen[pleknu-1];		//type van lagere schijf ophalen
	TopPlek[paalnu]--;												//plek (...5) van hoogste schijf in paal 1 verlaagd
	PlekkenTypen[pleknu]=0;										//oude plek wordt gewist

	TopType[paalnw]=Snr;
	TopPlek[paalnw]++;
	pleknw=paalnw*10+TopPlek[paalnw];
	PlekkenTypen[pleknw]=Snr;

	NivoStapel[paalnu]+=schijfdikte;				//let op: oorsprong ligt bovenaan
	NivoStapel[paalnw]-=schijfdikte;
	Xnw=Links[paalnw]+Snr*schijfradiusverschil;
	Ynw=NivoStapel[paalnw];
	STIJL(Schijf[Snr]).left=Xnw;
	STIJL(Schijf[Snr]).top=Ynw;

	if(paalnw!=paalstart && TopType[paalnw]==5 && TopPlek[paalnw]==5)win();
}

function win(){
	paalstart=paalnw;
	Ngewonnen++;
	doegeluid('gong','gong.wav');
	if(Ngewonnen<3){
		STIJL('ramenvol').visibility='visible';
		STIJL('ramenleeg').visibility='visible';
		HopNiveauRef-=40;
	}else{
		STIJL('ramenvol').visibility='hidden';
		STIJL('ramenleeg').visibility='hidden';
		STIJL('dek').visibility='hidden';
		STIJL('hopafst').visibility='visible';
	}
}



