如題，依置換的極限分成三種：
1～99999
1～2147479999
1～999999999999
複雜度也隨之增加，單純跑血肉用的話使用第一種即可。
Pattern：
~為第(%1)段!
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
適用範圍：1～99999。
Commands：
chnumbers="零 一 二 三 四 五 六 七 八 九 十 百 千 萬 0*"
numbers="+0 +1 +2 +3 +4 +5 +6 +7 +8 +9 *10 *100 *1000 *10000 0+"
#var bloodmap %1
#loop 1,15 {#var bloodmap
%replace(@bloodmap,%word(@chnumbers,%i),%word(@numbers,%i))}
#var bloodmap %delete(@bloodmap,1,1)
#var total %eval(@bloodmap)
#say @total
說明：
01行：建立列表(string list) chnumbers，內容是將被置換前的字元。
02行：建立列表(string list) numbers，內容是將要取代中文數字的字元。
03行：將中文格式數字存入bloodmap。
04行：將bloodmap中符合chnumbers的單詞，置換成nunbers中的單詞。兩個列表
中的單詞排列位置具備相對性，不能錯放。本行指令因#loop，會執行15次
，與兩列表的單詞數目相同。執行結果如下表列。
05行：刪除bloodmap中字串的第一個字元，主要為刪除*，見下表第7項。
06行：執行bloodmap中的運算式，並存入total。
07行：檢視total值。
情 境 04行結果(05行刪除行首字元) 06行結果
01 九萬九千九百九十九 +9*10000+9*1000+9*900+9*10+9 99999
02 九萬零十 +9*10000+0+10 90010
03 九萬 +9*10000 90000
04 九千零十一 +9*1000+0+10+1 9011
05 九百九十 +9*900+9*10 990
06 九百 +9*900 900
07 十 *10 10
08 一 +1 1
結語：比上兩篇的寫法更快更好懂。有需要的話，建議使用這個。
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
適用範圍：1～2147479999。
Commands：
chnumbers="零 一 二 三 四 五 六 七 八 九 十 百 千 萬 億 0*"
numbers="+0 +1 +2 +3 +4 +5 +6 +7 +8 +9 *10 *100 *1000 )*10000 )*100000000 0+"
#var bloodmap %1
#loop 1,16 {#var bloodmap
%replace(@bloodmap,%word(@chnumbers,%i),%word(@numbers,%i))}
#var bloodmap %delete(@bloodmap,1,1)
#if (%pos("萬",%1)>0 or %pos("億",%1)>0) {#var bloodmap "("@bloodmap}
#if (%pos("億",%1)>0 and %pos("萬",%1)>0) {#var bloodmap
%replace(@bloodmap,"100000000+","100000000+(")}
#var total %eval(@bloodmap)
#say @total
說明：01與02行的部份單詞有些變動，加入括號來正確執行四則運算。
01行：建立列表(string list) chnumbers，內容是將被置換前的字元。
02行：建立列表(string list) numbers，內容是將要取代中文數字的字元。
03行：將中文格式數字存入bloodmap。
04行：將bloodmap中符合chnumbers的單詞，置換成nunbers中的單詞。兩個列表
中的單詞排列位置具備相對性，不能錯放。本行指令因#loop，會執行16次
，與兩列表的單詞數目相同。
05行：刪除bloodmap中字串的第一個字元，主要為刪除*。
06行：補括號的指令，如果%1中有"萬"或"億"，就在bloodmap最前補"("，詳見下表：
07行：專門補萬運算括號的行，如果%1中"萬"與"億"，就把bloodmap中的"100000000+"
改成"100000000+("。詳見下表：
08行：執行bloodmap中的運算式，並存入total。
09行：檢視total值。
新 情 境 05行結果
06行結果 07行結果
08行結果
01 十一億零十萬十 10+1)*100000000+0+10)*10000+10
(10+1)*100000000+0+10)*10000+10 (10+1)*100000000+(0+10)*10000+10
1100100010
02 二十億九千萬 2*10)*100000000+9*1000)*10000
(2*10)*100000000+9*1000)*10000 (2*10)*100000000+(9*1000)*10000
2090000000
03 二十億 2*10)*100000000
(2*10)*100000000 (2*10)*100000000
2000000000
04 十億零九百萬九千 10)*100000000+0+9*100)*10000+9*1000
(10)*100000000+0+9*100)*10000+9*1000 (10)*100000000+(0+9*100)*10000+9*1000
1009009000
05 九十九萬 9*10+9)*10000
(9*10+9)*10000 (9*10+9)*10000
990000
06 十萬零一 10)*10000+0+1
(10)*10000+0+1 (10)*10000+0+1
100001
結語：較上篇增加了十萬到千億級的判斷，不過程式本身無法算到這等級，大約21億就
出現負數了，沒什麼需要就不要用，純粹展示用。
=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
適用範圍：1～999999999999。
Commands：
chnumbers="零 一 二 三 四 五 六 七 八 九 十 百 千 萬 億 0* |*"
numbers="+0 +1 +2 +3 +4 +5 +6 +7 +8 +9 *10 *100 *1000 )*10000 | 0+ |"
zeros="0|00|000|0000|00000|000000|0000000|00000000"
#var bloodmap %1
#loop 1,17 {#var bloodmap
%replace(@bloodmap,%word(@chnumbers,%i),%word(@numbers,%i))}
#var bloodmap %delete(@bloodmap,1,1)
#if (%pos(億,%1)>0) {#var bloodmapE %eval(%item(@bloodmap,1))
#var bloodmap %item(@bloodmap,2)} {#var bloodmapE ""}
#if (%pos("萬",%1)>0) {#var bloodmap "("@bloodmap}
#var bloodmap %eval(@bloodmap)
#var bloodmap @bloodmapE%item(@zeros,8-%len(@bloodmap))@bloodmap
#if (%len(@bloodmap)<9) {#var bloodmap %eval(@bloodmap)}
#say @bloodmap
說明：新增一條列表，並將億以上的位數獨立運算，以下則與上一個差不多，各自運
算完成後，再合併起來。
01行：建立列表(string list) chnumbers，內容是將被置換前的字元。
02行：建立列表(string list) numbers，內容是將要取代中文數字的字元。
03行：建立列表(string list) zeros，內容是一連串位數遞增的0。
04行：將中文格式數字存入bloodmap。
05行：將bloodmap中符合chnumbers的單詞，置換成nunbers中的單詞。兩個列表
中的單詞排列位置具備相對性，不能錯放。本行指令因#loop，會執行17次
，與兩列表的單詞數目相同。
06行：刪除bloodmap中字串的第一個字元，主要為刪除*。
07行：判斷%1的值中是否有"億"，沒有的話清空bloodmapE，有的話，將bloodmap中
的第一個字串放入bloodmapE並運算，第二個字串則放入bloodmap中。
08行：補括號的指令，如果%1中有"萬"，就在bloodmap最前補"("。
09行：執行bloodmap中的運算式。
10行：在bloodmap中存入格式為：@bloodmapE補零@bloodmap
補零的式子：%item(@zeros,8-%len(@bloodmap))
拆開後：
8-%len(@bloodmap)：計算bloodmap的長度差千萬位幾個數，結果假設為Ａ。
%item(@zeros,Ａ)：取出zeros中，第Ａ個字串。
11行：如果bloodmap長度小於9位，就把bloodmap再計算一次，可以清除字首不用的0。
12行：檢視bloodmap值。
範例對照：
初始值：一千零十億十萬十 十億零四十三萬 三萬
↓ bloodmap bloodmap bloodmap
06 行：1*1000+0+10|10)*10000+10 10|+0+4*10+3)*10000 3)*10000
↓ bloodmapE bloodmap bloodmapE bloodmap bloodmap
07 行：1010 10)*10000+10 10 0+4*10+3)*10000 3)*10000
↓ bloodmapE bloodmap bloodmapE bloodmap bloodmap
08 行：1010 (10)*10000+10 10 (0+4*10+3)*10000 (3)*10000
↓ bloodmapE bloodmap bloodmapE bloodmap bloodmap
09 行：1010 100010 10 430000 30000
↓ bloodmap bloodmap bloodmap
10 行：101000100010 1000430000 00030000
↓ bloodmap bloodmap bloodmap
11 行：101000100010 1000430000 30000
結語：為突破程式極限，使用兩段式計算，再接起來的寫法，也是展示用。