//-------------------------------------------------------
// (c) by simon riedl august 1999
// dni word translation tool
//-------------------------------------------------------

//=======================================================

function ArraySet() 
    {
    this[ 0]=""; 
    this.length=1;
    }


var leer=""
var wortzahl=0
wort_dni=new ArraySet();
wort_eng=new ArraySet();
wort_ger=new ArraySet();
wort_typ=new ArraySet();
wort_artikel=new ArraySet();

function newword (dni,eng,ger,root,art)
    {
	wort_dni[wortzahl]=dni;
	wort_eng[wortzahl]=eng;
	wort_ger[wortzahl]=ger;
	wort_typ[wortzahl]=root;
	wort_artikel[wortzahl]=art;
	wortzahl++
    }

//=======================================================
//=======================================================

function dnisearch()
	{
	var dni=window.document.deg.deg_d.value
	var abbruch=0
	
	window.document.deg.deg_e.value=leer;
	window.document.deg.deg_g.value=leer;
	
	//ist ueberhaupt was drin...?
	if (dni=="" || dni=="XXX" || dni=="xxx")
		{
		abbruch=1
		window.document.deg.deg_d.value=leer;
		alert("Please enter a word to translate!")
		}
	if (abbruch==0)
		{
			dnisearch2()
		}	
	}


function dnisearch2()
	{
	window.document.deg.deg_e.value="Please wait..."
	var sw_d=""
	var sw_e=""
	var sw_g=""
	var a_e=""
	var a_g=""
	var a_d=""
	var ende="xxx|/"
	var i=0
	var anz=0
	var strende="/"
	var dni=window.document.deg.deg_d.value
	dni=dni.toLowerCase();
	window.document.deg.deg_d.value=dni;		
	while (sw_d!=ende)
		{
			sw_d=wort_dni[i]+"|/"
			sw_e=wort_eng[i]+"|/"
			sw_g=wort_ger[i]+"|/"
			sw_d=sw_d.toLowerCase()


			swd=sw_d.split("|")
			
			
			
				
			for(j = -1; j <(swd.length); j++)
			{
				

				if (dni==swd[j])
					{
						anz++
						swe=sw_e.split("|")
						swg=sw_g.split("|")
						k=0
						while(swe[k]!=strende)
							{
								if (swe[k]!=strende)
								{
									a_e=a_e+swe[k]+", "
								}
								k++
							}
						k=0
						while(swg[k]!=strende)
							{
								if (swg[k]!=strende)
								{
									a_g=a_g+swg[k]+", "
								}
								k++
							}
						k=0
						while(swd[k]!=strende)
							{
								if (swd[k]!=strende)
								{
									a_d=a_d+swd[k]+", "
								}
								k++
							}
						a_e=a_e.substring(0,((a_e.length)-2))+"; "
						a_d=a_d.substring(0,((a_d.length)-2))+"; "
						a_g=a_g.substring(0,((a_g.length)-2))+"; "



					
					}
			
			}
		
		i++
						
		
		}

		a_d=a_d.substring(0,((a_d.length)-2))
		a_e=a_e.substring(0,((a_e.length)-2))
		a_g=a_g.substring(0,((a_g.length)-2))

	if (anz==0)
		{
			window.document.deg.deg_d.value=leer;
			window.document.deg.deg_e.value=leer;
			alert("The word '"+dni+"' could not be found in the database.")
		}
	else
		{
			
			window.document.deg.deg_d.value=a_d;
			window.document.deg.deg_e.value=a_e;
			window.document.deg.deg_g.value=a_g;
		}
	
	
	}

//=======================================================
//=======================================================


function engsearch()
	{
	var eng=window.document.edg.edg_e.value
	var abbruch=0
	
	window.document.edg.edg_d.value=leer;
	window.document.edg.edg_g.value=leer;
	
	//ist ueberhaupt was drin...?
	if (eng=="" || eng=="xxx" || eng=="XXX")
		{
		abbruch=1
		window.document.edg.edg_e.value=leer;
		alert("Please enter a word to translate!")
		}
	if (abbruch==0)
		{
			engsearch2()
		}	
	}


function engsearch2()
	{
	window.document.edg.edg_d.value="Please wait..."
	var sw_d=""
	var sw_e=""
	var sw_g=""
	var anz=0
	var a_d=""
	var a_e=""
	var a_g=""
	var ende="xxx|/"
	var i=0
	var strende="/"
	var eng=window.document.edg.edg_e.value
	eng=eng.toLowerCase();
	window.document.edg.edg_e.value=eng;		
	while (sw_e!=ende)
		{
			sw_d=wort_dni[i]+"|/"
			sw_e=wort_eng[i]+"|/"
			sw_g=wort_ger[i]+"|/"
			sw_e=sw_e.toLowerCase()


			swe=sw_e.split("|")
			
			
			
				
			for(j = -1; j <(swe.length); j++)
			{
				

				if (eng==swe[j])
					{
						anz++
						swd=sw_d.split("|")
						swg=sw_g.split("|")
						k=0
						while(swd[k]!=strende)
							{
								if (swd[k]!=strende)
								{
									a_d=a_d+swd[k]+", "
								}
								k++
							}
						k=0
						while(swg[k]!=strende)
							{
								if (swg[k]!=strende)
								{
									a_g=a_g+swg[k]+", "
								}
								k++
							}
						k=0
						while(swe[k]!=strende)
							{
								if (swe[k]!=strende)
								{
									a_e=a_e+swe[k]+", "
								}
								k++
							}
						a_e=a_e.substring(0,((a_e.length)-2))+"; "
						a_d=a_d.substring(0,((a_d.length)-2))+"; "
						a_g=a_g.substring(0,((a_g.length)-2))+"; "


					
					}
			
			}
		
		i++
						
		
		}

		a_e=a_e.substring(0,((a_e.length)-2))
		a_d=a_d.substring(0,((a_d.length)-2))
		a_g=a_g.substring(0,((a_g.length)-2))

	if (anz==0)
		{
			window.document.edg.edg_e.value=leer;
			window.document.edg.edg_d.value=leer;
			alert("The word '"+eng+"' could not be found in the database.")
		}
	else
		{
			window.document.edg.edg_e.value=a_e;
			window.document.edg.edg_d.value=a_d;
			window.document.edg.edg_g.value=a_g;
		}
	
	
	}

//=======================================================
//=======================================================


function gersearch()
	{
	var ger=window.document.ged.ged_g.value
	var abbruch=0
	
	window.document.ged.ged_d.value=leer;
	window.document.ged.ged_e.value=leer;
	
	//ist ueberhaupt was drin...?
	if (ger=="" || ger=="XXX" || ger=="xxx")
		{
		abbruch=1
		window.document.ged.ged_g.value=leer;
		alert("Please enter a word to translate!")
		}
	if (abbruch==0)
		{
			gersearch2()
		}	
	}


function gersearch2()
	{
	window.document.ged.ged_d.value="Please wait..."
	var sw_d=""
	var sw_e=""
	var sw_g=""
	var anz=0
	var a_d=""
	var a_g=""
	var a_e=""
	var ende="xxx|/"
	var i=0
	var strende="/"
	var ger=window.document.ged.ged_g.value
	var gerx=ger
	window.document.ged.ged_g.value=gerx
	ger=ger.toLowerCase();
	while (sw_g!=ende)
		{
			sw_d=wort_dni[i]+"|/"
			sw_e=wort_eng[i]+"|/"
			sw_g=wort_ger[i]+"|/"
			sw_g=sw_g.toLowerCase()

			swg=sw_g.split("|")
					
			for(j = -1; j <(swg.length); j++)
			{
				
				if (ger==swg[j])
					{
						anz++
						swe=sw_e.split("|")
						swd=sw_d.split("|")
						k=0
						while(swe[k]!=strende)
							{
								if (swe[k]!=strende)
								{
									a_e=a_e+swe[k]+", "
								}
								k++
							}
						k=0
						while(swd[k]!=strende)
							{
								if (swd[k]!=strende)
								{
									a_d=a_d+swd[k]+", "
								}
								k++
							}
						k=0
						while(swg[k]!=strende)
							{
								if (swg[k]!=strende)
								{
									a_g=a_g+swg[k]+", "
								}
								k++
							}
						a_g=a_g.substring(0,((a_g.length)-2))+"; "
						a_e=a_e.substring(0,((a_e.length)-2))+"; "
						a_d=a_d.substring(0,((a_d.length)-2))+"; "


					
					}
			
			}
		
		i++
						
		
		}
		a_g=a_g.substring(0,((a_g.length)-2))
		a_e=a_e.substring(0,((a_e.length)-2))
		a_d=a_d.substring(0,((a_d.length)-2))

	if (anz==0)
		{
			window.document.ged.ged_g.value=leer;
			window.document.ged.ged_d.value=leer;
			alert("The word '"+gerx+"' could not be found in the database.")
		}
	else
		{
			window.document.ged.ged_g.value=a_g;
			window.document.ged.ged_d.value=a_d;
			window.document.ged.ged_e.value=a_e;
		}
	
	
	}