$angka=$_GET["angka"]; #$angka="511890"; print "
angka >> $angka <<
".
"Terbilang =
".
"
"; if (strlen($angka)<=3){ print "$angka"; } if (strlen($angka)==4){ print substr($angka,0,1); print " . "; print substr($angka,1,3); } if (strlen($angka)==5){ print substr($angka,0,2); print " . "; print substr($angka,-3,3); } if (strlen($angka)==6){ print substr($angka,0,3); print " . "; print substr($angka,-3,3); } if (strlen($angka)==7){ print substr($angka,-7,1); print " . "; print substr($angka,-6,3); print " . "; print substr($angka,-3,3); } if (strlen($angka)==8){ print substr($angka,-8,2); print " . "; print substr($angka,-6,3); print " . "; print substr($angka,-3,3); } if (strlen($angka)==9){ print substr($angka,-9,3); print " . "; print substr($angka,-6,3); print " . "; print substr($angka,-3,3); } if (strlen($angka)==10){ print substr($angka,-10,1); print " . "; print substr($angka,-9,3); print " . "; print substr($angka,-6,3); print " . "; print substr($angka,-3,3); } if (strlen($angka)==11){ print substr($angka,-11,2); print " . "; print substr($angka,-9,3); print " . "; print substr($angka,-6,3); print " . "; print substr($angka,-3,3); } if (strlen($angka)==12){ print substr($angka,-12,3); print " . "; print substr($angka,-9,3); print " . "; print substr($angka,-6,3); print " . "; print substr($angka,-3,3); } print " |
$angka |
". "
$tb |
". ""; $index=file("index.html"); while (list($e,$r)=each($index)){ print "$r"; } ?>