Numerologie

Quelltext von numero6.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;
    nummern[i]*=6;
  }
  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 (Faktor 6 [illuminatuz rulz da world])</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="Unwort Computer">
</td></tr>
<tr><td align="right" style="background:#E0E0F0"> Nummern: </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>A=6</td><td>B=12</td><td>C=18</td><td>D=24</td><td>E=30</td>
<td>F=36</td><td>G=42</td><td>H=48</td><td>I=54</td><td>J=60</td></tr>
<tr><td>K=66</td><td>L=72</td><td>M=78</td><td>N=84</td><td>O=90</td>
<td>P=96</td><td>Q=102</td><td>R=108</td><td>S=114</td><td>T=120</td></tr>
<tr><td>U=126</td><td>V=132</td><td>W=138</td><td>X=144</td><td>Y=150</td>
<td>Z=156</td><td></td><td></td><td></td><td></td></tr>
</table>
</td></tr>
</table>
</body>
</html>
Autor: Ulrich Kritzner