summa -> sõnadeks php kood :: Hinnavaatluse Foorumid

z@ke · Kreisi kasutaja liitunud: 21.12.2003

Tere,

Kas kellelgi on ehk jagada summa-> Eesti keele sõnadeks funktsiooni php's?

natukene praak versioon siin:

Spoiler

<?
echo convert_number_to_words("192837465.99");

function convert_number_to_words($number) {

$hyphen = '';
$conjunction = ' ';
$separator = ' ja ';
$negative = 'negative ';
$decimal = ' eurot ja ';
$dictionary = array(
0 => 'null',
1 => 'üks',
2 => 'kaks',
3 => 'kolm',
4 => 'neli',
5 => 'viis',
6 => 'kuus',
7 => 'seitse',
8 => 'kaheksa',
9 => 'üheksa',
10 => 'kümme',
11 => 'üksteist',
12 => 'kaksteist',
13 => 'kolmteist',
14 => 'neliteist',
15 => 'viisteist',
16 => 'kuusteist',
17 => 'seitseteist',
18 => 'kaheksateist',
19 => 'üheksateist',
20 => 'kakskümmend',
30 => 'kolmkümmend',
40 => 'nelikümmend',
50 => 'viiskümmend',
60 => 'kuuskümmend',
70 => 'seitsekümmend',
80 => 'kaheksakümmend',
90 => 'üheksakümmend',
100 => 'sada',
1000 => 'tuhat',
1000000 => 'miljon',
1000000000 => 'billion',
1000000000000 => 'trillion',
1000000000000000 => 'quadrillion',
1000000000000000000 => 'quintillion'
);

if (!is_numeric($number)) {
return false;
}

if (($number >= 0 && (int) $number < 0) || (int) $number < 0 - PHP_INT_MAX) {

trigger_error(
'convert_number_to_words only accepts numbers between -' . PHP_INT_MAX . ' and ' . PHP_INT_MAX,
E_USER_WARNING
);
return false;
}

if ($number < 0) {
return $negative . convert_number_to_words(abs($number));
}

$string = $fraction = null;

if (strpos($number, '.') !== false) {
list($number, $fraction) = explode('.', $number);
}

switch (true) {
case $number < 21:
$string = $dictionary[$number];
break;
case $number < 100:
$tens = ((int) ($number / 10)) * 10;
$units = $number % 10;
$string = $dictionary[$tens];
if ($units) {
$string .= $hyphen . $dictionary[$units];
}
break;
case $number < 1000:
$hundreds = $number / 100;
$remainder = $number % 100;
$string = $dictionary[$hundreds] . '' . $dictionary[100];
if ($remainder) {
$string .= $conjunction . convert_number_to_words($remainder);
}
break;
default:
$baseUnit = pow(1000, floor(log($number, 1000)));
$numBaseUnits = (int) ($number / $baseUnit);
$remainder = $number % $baseUnit;
$string = convert_number_to_words($numBaseUnits) . ' ' . $dictionary[$baseUnit];
if ($remainder) {
$string .= $remainder < 100 ? $conjunction : $separator;
$string .= convert_number_to_words($remainder);
}
break;
}

if (null !== $fraction && is_numeric($fraction)) {
$string .= $decimal;
$words = array();
//foreach (str_split((string) $fraction) as $number) {
//$words[] = $dictionary[$number];
$string .= $dictionary[$fraction];
// }
//$string .= implode(' ', $words);
}
return $string;
}

tänud!

Renka · HV Guru liitunud: 01.04.2002

mingi selline funktsioon vedeleb mul ühes projektis. Peaks olema kunagi kusagilt veebist leitud asi. Autor ma igatahes ei ole ja eriti kena lahendusega ka tegu ei ole aga töötab igatahes.

z@ke · Kreisi kasutaja liitunud: 21.12.2003

Renka, tänud!

limp · HV Guru liitunud: 11.08.2003

Kas see ei sobi?
http://pear.php.net/package/Numbers_Words

iFlop · Kreisi kasutaja liitunud: 03.05.2003

limp, natuke OT, aga see vaatasin korra selle koodi sisse:

limp · HV Guru liitunud: 11.08.2003

kurat seda teab, äkki keegi teeb selliseid arveid ja nii suuri summasid sõnadega vaja öelda

napoleon · Unknown virus liitunud: 08.12.2008

Ilma täiendavate eeldusteta neid reaalses elus peaagu kunagi vaja ei lähegi. Aga koodis peavad need selleks olema, et muidu tuleb testimise käigus kindlasti see ülikriitiline viga välja