将数字金额转换成大写金额

来源：互联网发布：趣味百科软件编辑：程序博客网时间：2024/04/30 23:36

注：这个小算法适用于一亿以下的金额。

isset($_GET['sz'])?$sz=$_GET['sz']:$sz=31225603.903;            $srt='';          $szarr=array(0=>'零',1=>'壹',2=>'贰',3=>'叁',4=>'肆',5=>'伍',6=>'陆',7=>'柒',8=>'捌',9=>'玖');      $strarr=str_split($sz);              $w=0;       $wb=0;      foreach ($strarr as $k => $v) {        if($v=='.'){          $w=$k;        }      }      if($w==0){        $wb=count($strarr);      }            $dw=array(2=>'拾',3=>'佰',4=>'仟',5=>'万');      $i=0;      foreach ($strarr as $k => $v) {        if($w>0){        if($k<$w){                        if(($w-$i)>5){              if($v==0){                  $srt=$srt.$szarr[$v];              }else{                  $srt=$srt.$szarr[$v].$dw[$w-$i-4];               }            }else{                        if($v==0){                  $srt=$srt.$szarr[$v];              }else{                  $srt=$srt.$szarr[$v].$dw[$w-$i];               }            }            $i++;        }else{          if($k==$w){            $srt=$srt.'点';          }else{            $srt=$srt.$szarr[$v];                      }        }       }else{          if(($wb-$i)>5){             if($v==0){                  $srt=$srt.$szarr[$v];              }else{                  $srt=$srt.$szarr[$v].$dw[$wb-$i-4];               }                          }else{                            if($v==0){                  $srt=$srt.$szarr[$v];              }else{                  $srt=$srt.$szarr[$v].$dw[$wb-$i];               }            }         $i++;       }      }           print_r($srt);

0 0