#fu t1 {%eval(%replace(%replace(%replace(0+%replace(%replace(%replace(%replace(%replace(%replace(%replace(%replace(%replace(%replace(%replace(%replace(%replace(%1,"零","0+"),"十","*10+"),"百","*100+"),"千","*1000+"),"六","6"),"一","1"),"二","2"),"三","3"),"四","4"),"五","5"),"七","7"),"八","8"),"九","9")+0),"++","+"),"+*","+"))}
#fu t2 {%if(%pos(万,%1),%eval(@t1(%word(%1,1,万))*10000+@t1(%word(%1,2,万))),@t1(%1))}
一万以内用 @ti(%1)
一亿以内用 @t2(%1) |
