datalogik

< ?php
define("NC_SMALL", 
  serialize(array('Zero', 'One', 'Two', 
                  'Three', 'Four', 'Five', 
                  'Six', 'Seven', 'Eight', 
                  'Nine'))
);
define("NC_MEDIUM", 
  serialize(array('Zero', 'Ten', 'Twenty', 
                  'Thirty', 'Forty', 'Fifty', 
                  'Sixty', 'Seventy', 'Eighty', 
                  'Ninety'))
);
define("NC_LARGE", 
  serialize(array('Ten', 'Eleven', 'Twelve', 
                  'Thirteen', 'Fourteen', 'Fifteen', 
                  'Sixteen', 'Seventeen', 'Eighteen', 
                  'Nineteen'))
);
define("NC_HUGE", 
  serialize(array('Thousand', 'Million', 'Billion', 
                  'Trillion', 'Quadrillion', 'Quintillion', 
                  'Sextillion', 'Septillion', 'Octillion', 
                  'Nonillion', 'Decillion', 'Undecillion', 
                  'Duodecillion', 'Tredecillion', 'Quattuordecillion', 
                  'Quindecillion', 'Sexdecillion', 'Septendecillion', 
                  'Octodecillion', 'Novemdecillion', 'Vigintillion'))
);
function ConvertThree ($intArgNumber, $dispAnd = true)
{
  $intNumber = '';
  $strNumConv = '';
  $aySmall = unserialize(NC_SMALL);
  $ayMedium = unserialize(NC_MEDIUM);
  $ayLarge = unserialize(NC_LARGE);
  if ($intArgNumber > 99)
    $strNumConv .= $aySmall[$intArgNumber/100] . " Hundred";
  if (($dispAnd == true) and ($intArgNumber > 99))
    $strNumConv .= " and";
  $intNumber = $intArgNumber % 100;
  if ($intNumber > 19) {
    if ($intArgNumber > 99) 
      $strNumConv .= " ";
    $strNumConv .= $ayMedium[$intNumber/10];
    if ($intNumber % 10 > 0) 
      $strNumConv .= " " . $aySmall[$intNumber % 10];
  } elseif ($intNumber > 9) {
    if ($intArgNumber > 99)
      $strNumConv .= $ayLarge[$intNumber-10];
  } elseif ($intNumber > 0) {
    if ($intArgNumber > 99)
      $strNumConv .= " ";
    $strNumConv .= $aySmall[$intNumber];
  }
  return $strNumConv;
}
function ConvertAll ($intArgNumber)
{
  $ayHuge = unserialize(NC_HUGE);
  $strNumConv = '';
  if ($intArgNumber > 999)
  {
    if (strlen($intArgNumber) > 66)
      return "Entry too long.";
    for ($x = 0; $intArgNumber > 0; $x++)
    {
      if ($x > count($ayHuge) - 1)
      {
        $strNumConv = ConvertAll($intArgNumber, false) . " " . $ayHuge[$x-1] . " " . $strNumConv;
        $intArgNumber = 0;
      } else {
        $strGrabThree = substr($intArgNumber, -3);
        $intArgNumber = substr($intArgNumber, 0, -1 * strlen($strGrabThree));
        if ($strGrabThree > 0)
          $strNumConv = ConvertThree($strGrabThree, true) . " " . $ayHuge[$x-1] . " " . $strNumConv;
      }
    }
    return $strNumConv;
  } else {
    return ConvertThree ($intArgNumber);
  }
}
?>

while (strlen($b) < 15)
{
  srand ((double) microtime() * 1000000);
  $b .= rand(1,9);
  echo $b . " - " . ConvertAll($b) . "\r\n";
}