var konVersion = "Konjugator 8.0";

function test()
{
  alert("This is a test!");
}


function Home()
{
  menu.location = "menu.htm";
  field_one.location = "field_one.htm";
  field_two.location = "field_two.htm";
  results.location = "results.htm";
}

function Konjugation()
{
  menu.location = "kon_menu.htm";
  field_one.location = "kon_field01.htm";
  field_two.location = "kon_triple.htm";
  results.location = "kon_results.htm";
}

function Deklination()
{
  menu.location = "dek_menu.htm";
  field_one.location = "dek_field01.htm";
  field_two.location = "dek_triple.htm";
  results.location = "dek_results.htm";
}

function Adjektive()
{
  menu.location = "adj_menu.htm";
  field_one.location = "adj_field01.htm";
  field_two.location = "adj_triple.htm";
  results.location = "adj_results.htm";
}

function Formenerkennung_latdeu()
{
  menu.location = "form_menu_latdeu.htm";
  field_one.location = "form_field01_latdeu.htm";
  field_two.location = "form_field02_latdeu.htm";
  results.location = "form_results_latdeu.htm";
}

function Formenerkennung_deulat()
{
  menu.location = "form_menu_deulat.htm";
  field_one.location = "form_field01_deulat.htm";
  field_two.location = "form_field02_deulat.htm";
  results.location = "form_results_deulat.htm";
}

function Texterkennung()
{
  menu.location = "text_menu.htm";
  field_one.location = "text_field01.htm";
  field_two.location = "text_field02.htm";
  results.location = "text_results.htm";
}

function Drucken()
{
  results.print();
}

function Anmerkungen()
{
  //alert("Anmerkungen:\nTo be implemented");
  menu.location = "anmerkungen_menu.htm";
  field_one.location = "blank.htm";
  field_two.location = "anmerkungen_field02.htm";
  results.location = "anmerkungen_results.htm";
}

function Hilfe()
{
  //alert("Hilfe:\nTo be implemented");
  menu.location = "hilfe_menu.htm";
  field_one.location = "blank.htm";
  field_two.location = "hilfe_field02.htm";
  results.location = "hilfe_results.htm";
}

function Impressum()
{
  menu.location = "impressum_menu.htm";
  field_one.location = "blank.htm";
  field_two.location = "impressum_field02.htm";
  results.location = "impressum_results.htm";
}


function lowercase(word)
{
  return word.toLowerCase();
}



function Beispieltext_Caesar()
{
/*
var caesar0101 = "Gallia est omnis divisa in partes tres, quarum unam incolunt Belgae, aliam Aquitani, tertiam qui ipsorum lingua Celtae, nostra Galli appellantur. Hi omnes lingua, institutis, legibus inter se differunt. Gallos ab Aquitanis Garumna flumen, a Belgis Matrona et Sequana dividit. Horum omnium fortissimi sunt Belgae, propterea quod a cultu atque humanitate provinciae longissime absunt, minimeque ad eos mercatores saepe commeant atque ea quae ad effeminandos animos pertinent important, proximique sunt Germanis, qui trans Rhenum incolunt, quibuscum continenter bellum gerunt. Qua de causa Helvetii quoque reliquos Gallos virtute praecedunt, quod fere cotidianis proeliis cum Germanis contendunt, cum aut suis finibus eos prohibent aut ipsi in eorum finibus bellum gerunt. Eorum una, pars, quam Gallos obtinere dictum est, initium capit a flumine Rhodano, continetur Garumna flumine, Oceano, finibus Belgarum, attingit etiam ab Sequanis et Helvetiis flumen Rhenum, vergit ad septentriones. Belgae ab extremis Galliae finibus oriuntur, pertinent ad inferiorem partem fluminis Rheni, spectant in septentrionem et orientem solem. Aquitania a Garumna flumine ad Pyrenaeos montes et eam partem Oceani quae est ad Hispaniam pertinet; spectat inter occasum solis et septentriones.";

parent.results.form.eingabe.value = caesar0101;
*/

  results.location = "samples/caesar_01.htm";
}

function Beispieltext_Catull()
{

/*
var catull05 = "Carmen 5 - ad Lesbiam\n";
catull05 += "Vivamus mea Lesbia, atque amemus,\n";
catull05 += "rumoresque senum severiorum\n";
catull05 += "omnes unius aestimemus assis!\n";
catull05 += "soles occidere et redire possunt:\n";
catull05 += "nobis cum semel occidit brevis lux,\n";
catull05 += "nox est perpetua una dormienda.\n";
catull05 += "da mi basia mille, deinde centum,\n";
catull05 += "dein mille altera, dein secunda centum,\n";
catull05 += "deinde usque altera mille, deinde centum.\n";
catull05 += "dein, cum milia multa fecerimus,\n";
catull05 += "conturbabimus illa, ne sciamus,\n";
catull05 += "aut ne quis malus invidere possit,\n";
catull05 += "cum tantum sciat esse basiorum.\n";
	
parent.results.form.eingabe.value = catull05;
*/

  results.location = "samples/catull_05.htm";
}


function Beispieltext_Ovid()
{
var ovid = "";
ovid += " Ille per Aonias fama celeberrimus urbes\n";
ovid += "340 inreprehensa dabat populo responsa petenti;\n";
ovid += " prima fide vocisque ratae temptamina sumpsit\n";
ovid += " caerula Liriope, quam quondam flumine curvo\n";
ovid += " inplicuit clausaeque suis Cephisos in undis\n";
ovid += " vim tulit: enixa est utero pulcherrima pleno\n";
ovid += "345 infantem nymphe, iam tunc qui posset amari,\n";
ovid += " Narcissumque vocat. de quo consultus, an esset\n";
ovid += " tempora maturae visurus longa senectae,\n";
ovid += " fatidicus vates 'si se non noverit' inquit.\n";
ovid += " vana diu visa est vox auguris: exitus illam\n";
ovid += "350 resque probat letique genus novitasque furoris.\n";
ovid += " namque ter ad quinos unum Cephisius annum\n";
ovid += " addiderat poteratque puer iuvenisque videri:\n";
ovid += " multi illum iuvenes, multae cupiere puellae;\n";
ovid += " sed fuit in tenera tam dura superbia forma,\n";
ovid += "355 nulli illum iuvenes, nullae tetigere puellae.\n";
ovid += " adspicit hunc trepidos agitantem in retia cervos\n";
ovid += " vocalis nymphe, quae nec reticere loquenti\n";
ovid += " nec prior ipsa loqui didicit, resonabilis Echo.\n";

parent.results.form.eingabe.value = ovid;
}

function Beispieltext_Cicero()
{
	
  results.location = "samples/cicero_0101.htm";
}

function return_Texteingabe()
{
	parent.results.location="text_results.htm";
	parent.results.document.form.eingabe.value=textarea_backup;
}



// --------------------------------------------------------------------------------


var praes_stamm = "";
var perf_stamm = "";
var perf_pass_stamm = "";


// Variables for the four Stammformen
var infinitiv = "";
var stamm_01 = "";
var stamm_02 = "";
var stamm_03 = "";
var translation = "";




// Returns the forms of the Stammformen
function getInfinitiv()
{
  return parent.field_one.form.infinitiv.value;
}

function getStamm_01()
{
  return document.form.stamm_01.value;
}

function getStamm_02()
{
  return document.form.stamm_02.value;
}

function getStamm_03()
{
  return document.form.stamm_03.value;
}

function getTranslation()
{
  return document.form.translation.value;
}




var konjugator_text = "";
konjugator_text += "--------------------------------------------------------------------------------------\n";
konjugator_text += "                            > K O N J U G A T O R  8.0 <\n";
konjugator_text += "--------------------------------------------------------------------------------------\n\n";

var lateinseiten_text = "";
lateinseiten_text += "\n\n--------------------------------------------------------------------------------------\n";
lateinseiten_text += "                           http://www.lateinseiten.de \n";
lateinseiten_text += "--------------------------------------------------------------------------------------\n\n";

var no_forms_given = konjugator_text + "\n";
no_forms_given += "\tBitte Stammformen eingeben oder Verb wählen!"
no_forms_given += "\n" + lateinseiten_text;

var html_ending = '';
html_ending += '<p>&nbsp;</p>\n';
html_ending += '<hr size="1"><br>\n';
html_ending += '<table border="0" width="100%">\n';
html_ending += '  <tr>\n';
html_ending += '    <td width="33%" align="center" id="buttons"><a href="JavaScript:history.back();">&nbsp;Zurück&nbsp;</a></td>\n';
html_ending += '    <td width="34%" align="center" id="buttons"><a href="JavaScript:window.print();">&nbsp;Dokument drucken&nbsp;</a></td>\n';
html_ending += '    <td width="33%" align="center" id="buttons"><a href="mailto:webmaster@lateinseiten.de?subject=Anmerkungen zum ' + konVersion + '">&nbsp;Anmerkungen&nbsp;</a></td>\n';
html_ending += '  </tr>\n';
html_ending += '</table>\n';
html_ending += '<br>\n';
html_ending += '<hr size="1">\n';
html_ending += '<p>&nbsp;</p>\n';
html_ending += '<div align="center">\n';
html_ending += '  <center>\n';
html_ending += '  <table border="0" width="100%" id="buttons">\n';
html_ending += '    <tr>\n';
html_ending += '      <td width="100%">\n';
html_ending += '        <p align="center"><font size="2">\n';
html_ending += '<a href="http://www.lateinseiten.de"\n';
html_ending += 'target="_blank">&nbsp;Der ' + konVersion + ' auf www.lateinseiten.de&nbsp;</a></font></td>\n'; 
html_ending += '    </tr>\n';
html_ending += '  </table>\n';
html_ending += '  </center>\n';
html_ending += '</div>\n';
html_ending += '</div>\n';
html_ending += '<script language="JavaScript" type="text/javascript" src="js/wz_tooltip.js"></script>\n';
html_ending += '\n</body>\n</html>';


var html_beginning_1 = '';
html_beginning_1 += '<!-- Der ' + konVersion + ' ist geistiges Eigentum von Nils Neuenkirchen!  -->\n';
html_beginning_1 += '<!-- Der Gebrauch dient ausschließlich privaten Zwecken.               -->\n';
html_beginning_1 += '<!-- Jedwede Vervielfältigung oder Veröffentlichung auf anderen        -->\n';
html_beginning_1 += '<!-- Homepages, CDs oder sonstigen Medien darf nur mit                 -->\n';
html_beginning_1 += '<!-- Einverständnis des Autors (webmaster@lateinseiten.de) geschehen.  -->\n';
html_beginning_1 += '<!-- (url): http://www.lateinseiten.de                                 -->\n';
html_beginning_1 += '<html>\n';
html_beginning_1 += '<head>\n';
html_beginning_1 += '<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">\n';
html_beginning_1 += '<meta http-equiv="Content-Language" content="de">\n';

var html_beginning_2 = '';
html_beginning_2 += '<link rel="stylesheet" type="text/css" href="css/kon.css" title="style1">\n';
html_beginning_2 += '</head>\n';
html_beginning_2 += '<body>\n\n';





// clears the fields in the html file
function clearEntries()
{
  infinitiv = "";
  stamm_01 = "";
  stamm_02 = "";
  stamm_03 = "";
  translation = "";
  
  parent.field_one.form.infinitiv.value = "";
  parent.field_one.form.stamm_01.value = "";
  parent.field_one.form.stamm_02.value = "";
  parent.field_one.form.stamm_03.value = "";
  parent.field_one.form.translation.value = "";
  
  parent.field_two.left.location = "kon_left.htm";
  parent.field_two.middle.location = "kon_middle.htm";
  parent.results.location = "kon_results.htm";
}

// clears the fields in the html file - DEKLINATOR
function clearDekEntries()
{
  nominativ = "";
  genitiv = "";
  genus = "";
  deutsch = "";
  grammar = "";
  
  parent.field_one.form.nominativ.value = "";
  parent.field_one.form.genitiv.value = "";
  parent.field_one.form.genus.value = "";
  parent.field_one.form.deutsch.value = "";
  parent.field_one.form.grammar.value = "";
  
  parent.field_two.left.location = "dek_left.htm";
  parent.field_two.middle.location = "dek_middle.htm";
  parent.results.location = "dek_results.htm";
}


function clearAll()
{
  for(i=0;i<=verbformen_list.length-1;i++)
    verbformen_list[i].verb_form = "";
  infinitiv = "";
  stamm_01 = "";
  stamm_02 = "";
  stamm_03 = "";
  translation = "";
  document.formseek.infinitiv.value = "";
  document.formseek.stamm_01.value = "";
  document.formseek.stamm_02.value = "";
  document.formseek.stamm_03.value = "";
  document.formseek.translation.value = "";
}


// Function that checks whether a certain word ends with a special set of characters
// Returns "true" if the ending is identical, "false" if not
// Answer to question: Does WORD end with CHARACTERS?
function endsWith(word,characters)
{
  var char_length = characters.length;
  if(word.substring(word.length-char_length,word.length) == characters)
    return true;
  return false;
}


// Function that checks whether a certain word starts with a special set of characters
// Returns "true" if the beginning is identical, "false" if not
// Answer to question: Does WORD start with CHARACTERS?
function beginsWith(word,characters)
{
  var char_length = characters.length;
  if(word.substring(0,char_length) == characters)
    return true;
  return false;
}




function ApplySingleInf(infNumber)
{
  field_one.form.infinitiv.value = stammformen_list[infNumber].inf;
  checkForInfinitive();
}


// print range of infinitives
function createSingleInfOptionList(begin)
{
  if(begin == "") return;
  
  
  var print_buffer = '<select size="1" name="D1" id="buttons" onChange="javascript:parent.parent.ApplySingleInf(this.value)">';
  
  var start = al[begin++].occ;
  var end = al[begin].occ;
//  alert("start " + start + "\nend " + end);

  for(i=start;i<end;i++)
  {
    print_buffer += '<option value="' + i + '">' + stammformen_list[i].inf + '</option>';

  }
  
  print_buffer += '</select>';

  field_two.middle.document.open("text/html");
  

with(field_two.middle.document)
{
writeln('<html><head>');
writeln('<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">');
writeln('<meta http-equiv="Content-Language" content="de">');
writeln('<title>' + konVersion + ' - www.lateinseiten.de</title>');
writeln('<link rel="stylesheet" type="text/css" href="css/kon.css" title="style1"></head><body id="formenerkennung_td">');


writeln('<form name="form" method="POST" action="--WEBBOT-SELF--"><p align="center">');
writeln('-->' + print_buffer);
writeln('</p></form></body></html>');
}
parent.parent.ApplySingleInf(al[--begin].occ);
}



function ApplySingleSub(subNumber)
{
  field_one.form.nominativ.value = suB_list[subNumber].nominativ;
  apply_Dek_forms(suB_list[subNumber].nominativ + ' ');
}

// print range of substantives
function createSingleSubOptionList(begin)
{
  if(begin == "") return;
  
  
  var print_buffer = '<select size="1" name="D1" id="buttons" onChange="javascript:parent.parent.ApplySingleSub(this.value)">';
  
  var start = alDk[begin++].occ;
  var end = alDk[begin].occ;
//  alert("start " + start + "\nend " + end);

  for(i=start;i<end;i++)
  {
    print_buffer += '<option value="' + i + '">' + suB_list[i].nominativ + '</option>';

  }
  
  print_buffer += '</select>';

  field_two.middle.document.open("text/html");
  

with(field_two.middle.document)
{
writeln('<html><head>');
writeln('<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">');
writeln('<meta http-equiv="Content-Language" content="de">');
writeln('<title>' + konVersion + ' - www.lateinseiten.de</title>');
writeln('<link rel="stylesheet" type="text/css" href="css/kon.css" title="style1"></head><body id="formenerkennung_td">');


writeln('<form name="form" method="POST" action="--WEBBOT-SELF--"><p align="center">');
writeln('-->' + print_buffer);
writeln('</p></form></body></html>');
}
parent.parent.ApplySingleSub(alDk[--begin].occ);
}



function ApplySingleAdj(adjNumber) //- - - inserted 04-01-2008 ----------------------------------------------
{
  
  declinate_adj(adj_list[adjNumber].adjNomM);
//  field_one.form.nominativ.value = adj_list[adjNumber].adjNomM;
//  apply_Adj_forms(adj_list[adjNumber].adjNomM);
}


// print range of adjectives - - - inserted 04-01-2008 ----------------------------------------------
function createSingleAdjOptionList(begin)
{
  if(begin == "") return;
  
  
  var print_buffer = '<select size="1" name="D1" id="buttons" onChange="javascript:parent.parent.ApplySingleAdj(this.value)">';
  
  var start = alAdj[begin++].occ;
  var end = alAdj[begin].occ;
//  alert("start " + start + "\nend " + end);

  for(i=start;i<end;i++)
  {
    print_buffer += '<option value="' + i + '">' + adj_list[i].adjNomM + '</option>';

  }
  
  print_buffer += '</select>';

  field_two.middle.document.open("text/html");
  

with(field_two.middle.document)
{
writeln('<html><head>');
writeln('<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">');
writeln('<meta http-equiv="Content-Language" content="de">');
writeln('<title>' + konVersion + ' - www.lateinseiten.de</title>');
writeln('<link rel="stylesheet" type="text/css" href="css/kon.css" title="style1"></head><body id="formenerkennung_td">');


writeln('<form name="form" method="POST" action="--WEBBOT-SELF--"><p align="center">');
writeln('-->' + print_buffer);
writeln('</p></form></body></html>');
}
parent.parent.ApplySingleAdj(alAdj[--begin].occ);
}
