terbilang.pehape

<?php

// $x = 1234567890.34;
// echo number_format($x,2,',','.') ."<br>". Terbilang($x);

// Konversi Dari Numerik ke Verbal (Terbilang)
function Terbilang($angka) {
        $Value = round($angka,2) ;
        $Nilai = round($angka,2) ;
        $Hasil_r = $Hasil_p = $Hasil_b = $Hasil_s = "" ;
        $Terb1 = $Terb2 = "" ;
        $Terbilang = "" ;

        if($Value <= 0) {
                return($Terbilang) ;
        } elseif ($Value > 2147483647.99) {
                $Terbilang = " Angka Melampaui Batas Maksimum 2.147.483.647,99 !!" ;
                return($Terbilang) ;
        }

        // Milyar
        $Milyar = floor($Value / 1000000000);
        if($Milyar > 0) {
                $Hasil1 = Satuan($Milyar,'12345') ;
                $Terbilang = $Hasil1 . ' Milyar' ;
        }

        // Jutaan
        $Value = $Nilai % 1000000000 ;
        $RtsJt = floor($Value / 100000000) ;
        if($RtsJt > 0) {
                $Terbilang = $Terbilang . Ratusan($RtsJt) ;
        }

        $Value = $Nilai % 100000000 ;
        $Jutaan = floor($Value / 1000000) ;
        if($Jutaan == 10 || $Jutaan >= 20 ) {
                $Juta = floor($Value / 10000000) ;
                $Hasil1 = Puluhan($Juta) ;
                $Hasil2 = "";
                if($Jutaan > 20 && ($Jutaan % 10) != 0 ) {
                        $Hasil2 = Satuan($Jutaan % 10,$Nilai) ;
                }
                $Terbilang = $Terbilang . $Hasil1 . $Hasil2 ;

        } elseif ( $Jutaan > 10 && $Jutaan < 20 ) {
                $Belasan = $Jutaan % 10 ;
                $Hasil1 = Belasan($Belasan) ;
                $Terbilang = $Terbilang . $Hasil1 ;

        } elseif ( $Jutaan > 0 ) {
                $Hasil1 = Satuan($Jutaan, $Nilai) ;
                $Terbilang = $Terbilang . $Hasil1 ;
        }

        if( $Value >= 1000000 ) {
                $Terbilang = $Terbilang . ' Juta' ;
        }

        // Ribuan
        $Value = $Nilai % 1000000 ;
        if( $Value >= 100000 ) {
                $Ratusan = floor($Value / 100000) ;
                $Hasil1 = Ratusan($Ratusan) ;
                $Terbilang = $Terbilang . $Hasil1 ;
        }

        $Value = $Nilai % 100000 ;
        $Ribuan = floor($Value / 1000) ;
        if( $Ribuan == 10 || $Ribuan >= 20 ) {
                $Puluhan = floor($Value / 10000) ;
                $Hasil1 = Puluhan($Puluhan) ;
                $Terbilang = $Terbilang . $Hasil1 ;

        } elseif ( $Ribuan > 10 && $Ribuan < 20 ) {
                $Belasan = $Ribuan % 10 ;
                $Hasil1 = Belasan($Belasan) ;
                $Terbilang = $Terbilang . $Hasil1 ;
        }

        $Sisa = $Ribuan % 10 ;
        if( ($Ribuan > 20 || ( $Ribuan > 0  && $Ribuan < 11 )) && $Sisa != 0  ) {
                $Hasil1 = Satuan($Sisa, $Nilai) ;
                $Terbilang = $Terbilang . $Hasil1 ;
        }

        $Bulat = floor(( $Nilai % 1000000 ) / 1000) ;
        if( $Bulat > 0 ) {
                if( $Terbilang == ' Se' ) {
            $Terbilang = $Terbilang . 'ribu' ;
                } else {
                        $Terbilang = $Terbilang . ' Ribu' ;
                }
        }

        $Value = $Nilai % 1000 ;
        if( $Value >= 100 ) {
                $Ratusan = floor($Value / 100) ;
                $Hasil1 = Ratusan($Ratusan) ;
                $Terbilang = $Terbilang . $Hasil1 ;
        }

        $Value = $Nilai % 100 ;
        if( $Value == 10 || $Value >= 20 ) {
                $Puluhan = floor($Value / 10) ;
                $Hasil1 = Puluhan($Puluhan) ;
                $Terbilang = $Terbilang . $Hasil1 ;

        } elseif ( $Value > 10 && $Value < 20 ) {
                $Belasan = $Value % 10 ;
                $Hasil1 = Belasan($Belasan) ;
                $Terbilang = $Terbilang . $Hasil1 ;
        }

        $Sisa = $Value % 10 ;
        if( ( $Value > 20 || ( $Value > 0 && $Value < 11)) && $Sisa != 0 ) {
                $Hasil1 = Satuan($Sisa, $Nilai) ;
                $Terbilang = $Terbilang . $Hasil1 ;
        }
//      $Terbilang = $Terbilang . ' Rupiah ' ;


// ====================
        // Decimal
        $Value = ($Nilai - floor($Nilai))*100 ;
        $Value = (int) round($Value,0) ;
        if( $Value != 0 ) {
                if( $Value == 10 || $Value >= 20 ) {
                        $Puluhan = floor($Value / 10) ;
                        $Hasil1 = Puluhan($Puluhan) ;
                        $Deci = $Hasil1 ;
        } elseif ( $Value > 10 && $Value < 20 ) {
                        $Belasan = $Value % 10 ;
                        $Hasil1 = Belasan($Belasan) ;
                        $Deci = $Hasil1 ;
                }
                $Sisa = $Value % 10 ;
                if( ( $Value > 20 || ( $Value > 0 && $Value < 11)) && $Sisa != 0 ) {
                        $Hasil1 = Satuan($Sisa, $Nilai) ;
                        $Deci = $Deci . $Hasil1 ;
                }
                $Deci .= ' Sen' ;
                $Terbilang .= $Deci ;
        }
// ====================
        return $Terbilang;

}


function Ratusan($p) {
    switch ($p) {
         case 1: $Hasil_r = ' Seratus'; break;
         case 2: $Hasil_r = ' Duaratus'; break;
         case 3: $Hasil_r = ' Tigaratus'; break;
         case 4: $Hasil_r = ' Empatratus'; break;
         case 5: $Hasil_r = ' Limaratus'; break;
         case 6: $Hasil_r = ' Enamratus'; break;
         case 7: $Hasil_r = ' Tujuhratus'; break;
         case 8: $Hasil_r = ' Delapanratus'; break;
         default: $Hasil_r = ' Sembilanratus';
        }
        return $Hasil_r;
}

function Puluhan($p) {
        switch ($p) {
         case 1: $Hasil_p = ' Sepuluh'; break;
         case 2: $Hasil_p = ' Duapuluh'; break;
         case 3: $Hasil_p = ' Tigapuluh'; break;
         case 4: $Hasil_p = ' Empatpuluh'; break;
         case 5: $Hasil_p = ' Limapuluh'; break;
         case 6: $Hasil_p = ' Enampuluh'; break;
         case 7: $Hasil_p = ' Tujuhpuluh'; break;
         case 8: $Hasil_p = ' Delapanpuluh'; break;
         default: $Hasil_p = ' Sembilanpuluh';
        }
        return $Hasil_p;
}

function Belasan($p) {
        switch ($p) {
         case 1: $Hasil_b = ' Sebelas'; break;
         case 2: $Hasil_b = ' Duabelas'; break;
         case 3: $Hasil_b = ' Tigabelas'; break;
         case 4: $Hasil_b = ' Empatbelas'; break;
         case 5: $Hasil_b = ' Limabelas'; break;
         case 6: $Hasil_b = ' Enambelas'; break;
         case 7: $Hasil_b = ' Tujuhbelas'; break;
         case 8: $Hasil_b = ' Delapanbelas'; break;
         default: $Hasil_b = ' Sembilanbelas';
        }
        return $Hasil_b;
}

function Satuan($p,$xx) {
        switch ($p) {
         case 1: $XSisa = floor( ($xx % 1000000) / 1000 ) ;
                 if ( $XSisa == 1 && $xx < 2000 ) {
                    $Hasil_s = ' Se' ;
                 } else {
                    $Hasil_s = ' Satu' ;
                 }
                 break;
         case 2: $Hasil_s = ' Dua'; break;
         case 3: $Hasil_s = ' Tiga'; break;
         case 4: $Hasil_s = ' Empat'; break;
         case 5: $Hasil_s = ' Lima'; break;
         case 6: $Hasil_s = ' Enam'; break;
         case 7: $Hasil_s = ' Tujuh'; break;
         case 8: $Hasil_s = ' Delapan'; break;
         default: $Hasil_s = ' Sembilan';
        }
        return $Hasil_s;
}
?>