Numerologie

Quelltext von numerologie.html

Im folgenden Quelltext sind wichtige Bereiche rot markiert.
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=iso-8859-1">
<meta http-equiv="content-language" content="de">
<title>Numerologie</title>
<script type="text/javascript">
<!--
var nummern=new Array();
var kette,i,j,ebene,nummer;

function quersum()
{
  nummer=0;
  j=0;
  for (i=0;i<nummern.length;i++)
  {
    if (nummern[i]!=0)
      nummer+=nummern[i];
    else
    {
      nummern[j]=nummer;
      nummer=0;
      j++;
    }
  }
  nummern[j]=nummer;
  j++;
  nummern.length=j;
}

function querquersum()
{
  for (i=0;i<nummern.length;i++)
  {
    nummer=0;
    while (nummern[i]>0)
    {
      nummer+=nummern[i]%10;
      nummern[i]=Math.floor(nummern[i]/10);
    }
    nummern[i]=nummer;
  }
}

function numer()
{
  kette=document.numerologie.zeichenkette.value;
  kette=kette.toUpperCase();
  for (i=0;i<kette.length;i++)
  {
    nummern[i]=kette.charCodeAt(i)-64;
    if (nummern[i]<0)
      nummern[i]=0;
    if (nummern[i]>26)
      nummern[i]=0;
    if (nummern[i]>0)
      nummern[i]=((nummern[i]-1)%9)+1;
  }
  nummern.length=kette.length;
  ebene="";
  for (i=0;i<nummern.length;i++)
  {
    if (nummern[i]!=0)
      ebene=ebene+nummern[i];
    else
      ebene=ebene+" ";
  }
  document.numerologie.ebene1.value=ebene;
  quersum();
  ebene="";
  for (i=0;i<nummern.length;i++)
    ebene=ebene+nummern[i]+" ";
  document.numerologie.ebene2.value=ebene;
  querquersum();
  ebene="";
  for (i=0;i<nummern.length;i++)
    ebene=ebene+nummern[i]+" ";
  document.numerologie.ebene3.value=ebene;
  querquersum();
  ebene="";
  for (i=0;i<nummern.length;i++)
    ebene=ebene+nummern[i]+" ";
  document.numerologie.ebene4.value=ebene;
}
//-->
</script>
</head>
<body onLoad="numer();">
<table cellpadding="10" cellspacing="5" border="0" width="100%">
<tr><td>
<a name="a0"></a>
<h1 align="center">Numerologie (Quersumme)</h1>
<p align="center">
basierend auf dem lateinischen Alphabet (ohne Sonderzeichen) und dem dezimalen Zahlensystem
</p>
</td></tr>
<tr><td style="background:#E0E0E0">
<a name="a1"></a>
<a href="index.html">Index</a>
</td></tr>
<tr><td align="center">
<form name="numerologie">
<table cellpadding="3" cellspacing="2" border="0" align="center">
<tr><th colspan="2" style="background:#D0F0D0">
Namen eintippen und dann auf "berechnen" klicken
</td></tr>
<tr><td align="right" style="background:#F0E0F0"> Name: </td><td style="background:#FFE0D0">
<input name="zeichenkette" size="30" value="fox">
</td></tr>
<tr><td align="right" style="background:#E0E0F0"> Quersumme: </td><td style="background:#F0F0D0">
<input name="ebene1" size="30" readonly>
</td></tr>
<tr><td align="right" style="background:#E0E0F0"> Quersumme: </td><td style="background:#F0F0D0">
<input name="ebene2" size="30" readonly>
</td></tr>
<tr><td align="right" style="background:#E0E0F0"> Quersumme: </td><td style="background:#F0F0D0">
<input name="ebene3" size="30" readonly>
</td></tr>
<tr><td align="right" style="background:#E0E0F0"> Quersumme: </td><td style="background:#F0F0D0">
<input name="ebene4" size="30" readonly>
</td></tr>
<tr><td align="center" colspan="2" style="background:#D0F0D0">
<input type="button" value="berechnen" onClick="numer();">
</td></tr>
</table>
</form>
</td></tr>
<tr><td>
<table cellpadding="2" cellspacing="2" border="0" align="center">
<tr><td style="background:#F0F0FF" align="right">Buchstaben&nbsp;&nbsp;</td>
<td><tt><b>a b c d e f g h i</b></tt></td></tr>
<tr><td style="background:#F0F0FF" align="right">Buchstaben&nbsp;&nbsp;</td>
<td><tt><b>j k l m n o p q r</b></tt></td></tr>
<tr><td style="background:#F0F0FF" align="right">Buchstaben&nbsp;&nbsp;</td>
<td><tt><b>s t u v w x y z</b></tt></td></tr>
<tr><td style="background:#F0F0FF" align="right">Quersumme der Buchstabennummer&nbsp;&nbsp;</td>
<td><tt><b>1 2 3 4 5 6 7 8 9</b></tt></td></tr>
</table>
</td></tr>
</table>
</body>
</html>
Autor: Ulrich Kritzner