// *********************************************************
// Preisrechner apoint Uebersetzungen
// Berechnung von Tarifen
// Eingabe von Sprachkombination und Anzahlt Zeichen
// Erstellt am 09.04.2006 von Marco Stoessel
// Copyright bei apoint Uebersetzungen, CH - 4657 Dulliken
// *********************************************************

// 1. Ueberpruefung der Eingaben als Zahl
function CheckZahl(Eingabe){
  var nur_das ="0123456789";
  for (var i = 0; i < Eingabe.length; i++)
   if (nur_das.indexOf(Eingabe.charAt(i))<0 ) return false;
  return true;
 }

// 2. Funktion zur Rundung der Eingabe Anzahl Zeichen 
 function Neuzeichen(){
  with(document.calcfare){
   zeichen.value=Math.round(zeichen.value);
  }
 }
// 3. Berechnung der Zeilen
 function calc_zeilen(zeichen) {
   var zeilen = 0;
   zeilen = (Math.round(zeichen/55));
   return zeilen;
 }
 
// 4. Berechnung des Preises
 function PreisBerechnen(){
   var sprachkomb=document.calcfare.sprachkomb.value;
   var zeichen=document.calcfare.zeichen.value;
   var zeilen=document.calcfare.zeilen.value;
   var preis=document.calcfare.preis.value;
   
   if (document.calcfare.sprachkomb.value != "" && document.calcfare.zeichen.value != ""){
     zeichen=pruef_zeichen(zeichen);
     zeilen=calc_zeilen(zeichen);
     preis=calc_preis(sprachkomb,zeichen);
     document.calcfare.zeichen.value=Math.round(zeichen);
     document.calcfare.zeilen.value=zeilen
     document.calcfare.preis.value=preis.toFixed(2);
     return;
   }
 }

// 5. Formel zur Berechnung des Preises 
 function calc_preis(sprachkomb,zeichen){
   var preis = 0;
   preis = ((Math.round(zeichen/55))*document.calcfare.sprachkomb.value)/100; 
   if(preis<20)
     preis=20;
   return preis;
 }

// 6. Ueberpruefung der Variable zeichen  
 function pruef_zeichen(zeichen){
   if(zeichen<0)
     zeichen=0;
   if(!CheckZahl(zeichen))
     zeichen=0;
   return zeichen;
 }

// 7. Funktion zum Loeschen der Eingaben
  function Loeschen(){
    with(document.calcfare){
      sprachkomb.value="";
      zeichen.value="";
      zeilen.value="";
      preis.value="";
    }
 }

// <--- ENDE --->

