/* This source was written by Hendrik Thole (© 1999)        */
/*                                                          */
/* This program is free software; you can redistribute      */
/* it and/or modify it under the terms of the GNU General   */
/* Public License as published by the Free Software         */
/* Foundation; either version 2 of the License, or (at your */
/* option) any later version.                               */
/* For further details see the programm!                    */


var ATS = 13.7603  /* Österreichische Schilling */
var BEF = 40.3399  /* Belgische Franc           */
var DEM = 1.95583  /* Deutsche Mark             */
var ESP = 166.386  /* Spanische Peseten         */
var FIM = 5.94573  /* Finnische Mark            */
var FRF = 6.55957  /* Französische Franc        */
var NLG = 2.20371  /* Niederländische Gulden    */
var IEP = 0.787564 /* Irische Pfund             */
var ITL = 1936.27  /* Italienische Lire         */
var LUF = 40.3399  /* Luxemburgische Franc      */
var PTE = 200.482  /* Portugiesische Escudos    */


function displayGeld(){
if (document.forms[0].elements[1].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(ATS))
}
if (document.forms[0].elements[2].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(BEF))
}
if (document.forms[0].elements[3].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(DEM))
}
if (document.forms[0].elements[4].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(ESP))
}
if (document.forms[0].elements[5].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(FIM))
}
if (document.forms[0].elements[6].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(FRF))
}
if (document.forms[0].elements[7].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(NLG))
}
if (document.forms[0].elements[8].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(IEP))
}
if (document.forms[0].elements[9].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(ITL))
}
if (document.forms[0].elements[10].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(LUF))
}
if (document.forms[0].elements[11].checked){
var finalEuro = (document.forms[0].ihreEingabe.value)*(1/(PTE))
}
var zwEURO = (finalEuro)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
document.forms[1].result.value = finalGeld
}



function displayInATS(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(ATS)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " ATS"
document.forms[2].elements[2].value = finalUmrech
}
function displayInBEF(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(BEF)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " BEF"
document.forms[2].elements[3].value = finalUmrech
}
function displayInDEM(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(DEM)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " DEM"
document.forms[2].elements[4].value = finalUmrech
}
function displayInESP(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(ESP)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " ESP"
document.forms[2].elements[5].value = finalUmrech
}
function displayInFIM(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(FIM)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " FIM"
document.forms[2].elements[6].value = finalUmrech
}
function displayInFRF(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(FRF)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " FRF"
document.forms[2].elements[7].value = finalUmrech
}
function displayInNLG(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(NLG)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " NLG"
document.forms[2].elements[8].value = finalUmrech
}
function displayInIEP(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(IEP)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " IEP"
document.forms[2].elements[9].value = finalUmrech
}
function displayInITL(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(ITL)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " ITL"
document.forms[2].elements[10].value = finalUmrech
}
function displayInLUF(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(LUF)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " LUF"
document.forms[2].elements[11].value = finalUmrech
}
function displayInPTE(){
var euroVal = document.forms[2].neueEingabe.value
var finalEUR = (euroVal)*(PTE)
var zwEURO = (finalEUR)*(100000)
var zwiEURO = Math.round(zwEURO)
var zwisEURO = (zwiEURO)/(100000)
var finalGeld = Math.abs(zwisEURO)
var finalUmrech = Math.abs(finalGeld) + " PTE"
document.forms[2].elements[12].value = finalUmrech
}
function overgive(){
document.forms[2].neueEingabe.value = document.forms[1].result.value
displayInATS();displayInBEF();displayInDEM();displayInESP();displayInFIM();displayInFRF();displayInNLG();displayInIEP();displayInITL();displayInLUF();displayInPTE();
}

function INFO(){
alert("EURO-Rechner\n\nThis programm converts EUR into the currency of the eleven countrys\nof the monetary union and vice versa!\n\nCopyright © 1999  Hendrik Thole\n\nThis program is free software; you can redistribute it and/or modify\nit under the terms of the GNU General Public License as published by\nthe Free Software Foundation; either version 2 of the License, or\n(at your option) any later version.\nThis program is distributed in the hope that it will be useful,\nbut WITHOUT ANY WARRANTY; without even the implied warranty of\nMERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.\nSee the GNU General Public License for more details.\n\nYou should have received a copy of the GNU General Public License\nalong with this program; if not, write to the Free Software\nFoundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA\n\nTo contact me, write an e-mail to:\nhthole@gmx.de")
}