Erste Schritte Gematrierechner

Delphi64

Neues Mitglied
Hallo, ich bin neu hier im Forum und suche kreative Ideen ein Wort durch Gematrie als Zahl
zu berechnen, nur sollte dieses Script wie ein Programm laufen, um gleich mehrere
Wörter oder sogar Wörterlisten nach bestimmten Gematriewerten zu durchsuchen...

Ein einfaches Beispiel eines normalen Gematrierechners:
http://cosmos2000.chez.com/Numbers/Encode_en.html

Das wäre ein Beispiel für eine einfache Funktion zur Berechnung der Gematrie...
Nur wäre die Frage, wie man ein komplettes Script erstellt, um auch Wörterlisten
durch verschiedene Gematriemethoden berechnen zu können...

Code:
function cal_AZ (phrase) {
  var sum=0;
  for (var i=0; i < phrase.length; i++) {
    letter = phrase.substring (i, i+1);
    val = 0;
    if ((letter == "A") || (letter == "a")) val = 1;
    if ((letter == "B") || (letter == "b")) val = 2;
    if ((letter == "C") || (letter == "c")) val = 3;
    if ((letter == "D") || (letter == "d")) val = 4;
    if ((letter == "E") || (letter == "e")) val = 5;
    if ((letter == "F") || (letter == "f")) val = 6;
    if ((letter == "G") || (letter == "g")) val = 7;
    if ((letter == "H") || (letter == "h")) val = 8;
    if ((letter == "I") || (letter == "i")) val = 9;
    if ((letter == "J") || (letter == "j")) val = 10;
    if ((letter == "K") || (letter == "k")) val = 11;
    if ((letter == "L") || (letter == "l")) val = 12;
    if ((letter == "M") || (letter == "m")) val = 13;
    if ((letter == "N") || (letter == "n")) val = 14;
    if ((letter == "O") || (letter == "o")) val = 15;
    if ((letter == "P") || (letter == "p")) val = 16;
    if ((letter == "Q") || (letter == "q")) val = 17;
    if ((letter == "R") || (letter == "r")) val = 18;
    if ((letter == "S") || (letter == "s")) val = 19;
    if ((letter == "T") || (letter == "t")) val = 20;
    if ((letter == "U") || (letter == "u")) val = 21;
    if ((letter == "V") || (letter == "v")) val = 22;
    if ((letter == "W") || (letter == "w")) val = 23;
    if ((letter == "X") || (letter == "x")) val = 24;
    if ((letter == "Y") || (letter == "y")) val = 25;
    if ((letter == "Z") || (letter == "z")) val = 26;

    sum = sum + val;
   }
  return sum;
  }
 

Neue Themen


Oben