Subversion-Projekte lars-tiefland.php_share

<?php

// $Header: /cvsroot/html2ps/utils_number.php,v 1.2 2005/07/01 18:01:58 Konstantin Exp $

function arabic_to_roman($num) {

  $arabic = array(1,4,5,9,10,40,50,90,100,400,500,900,1000);

  $roman = array("I","IV","V","IX","X","XL","L","XC","C","CD","D","CM","M");

  $i = 12;

  $result = "";

  while ($num) {

    while ($num >= $arabic[$i]) {

      $num -= $arabic[$i];

      $result .= $roman[$i];

    }

    $i--;

  }

  return $result;

}

?>