diff options
| author | Anthony Fok <foka> | 2002-11-14 20:48:59 +0000 |
|---|---|---|
| committer | Anthony Fok <foka> | 2002-11-14 20:48:59 +0000 |
| commit | d0fbed2aee607d81ede6dceff0e2a8b9d993d919 (patch) | |
| tree | 9c6b61b7270c0a12c034f9e4eb067d7836942ab3 /chinese/bin | |
| parent | 573e8945144a725ad43fbaad018ba60be4dd4342 (diff) | |
Added a few more conversion, e.g. "via", "modem", etc.
CVS version numbers
chinese/bin/tocn.pl: 1.28 -> 1.29
chinese/bin/totw.pl: 1.31 -> 1.32
Diffstat (limited to 'chinese/bin')
| -rwxr-xr-x | chinese/bin/tocn.pl | 9 | ||||
| -rwxr-xr-x | chinese/bin/totw.pl | 3 |
2 files changed, 10 insertions, 2 deletions
diff --git a/chinese/bin/tocn.pl b/chinese/bin/tocn.pl index 078c6a5c776..7598e35e82e 100755 --- a/chinese/bin/tocn.pl +++ b/chinese/bin/tocn.pl @@ -32,8 +32,11 @@ s/使用者/用户/g; s/原始(程式)?码/源代码/g; s/原程式码/源代码/g; s/修补档案/补丁文件/g; +s/修补档/补丁/g; s/映射站(台)?/镜像/g; -s/映像档(案)?/映像文件/g; +s/映像档(案)?/映像/g; + +s/数据机(?!器|械|件)/调制解调器/g; 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)—/$1─/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)「/$1“/); @@ -51,6 +54,8 @@ s/映像档(案)?/映像文件/g; 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)以太(?=网)/$1乙太/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)闸道/$1网关/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)站台/$1站点/); +1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)频宽/$1带宽/); +1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)宽频/$1宽带/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)甚么/$1什么/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)资讯/$1信息/); @@ -65,7 +70,7 @@ s/映像档(案)?/映像文件/g; 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)连(?=络|系)/$1联/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)网路/$1网络/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)计画/$1计划/); -1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)透过/$1通过/); +1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)(?:经由|透过)/$1通过/); 1 while (s/^((?:[\x00-\x7F]|[\x80-\xFF].)*)程式设计员/$1程序师/); diff --git a/chinese/bin/totw.pl b/chinese/bin/totw.pl index b6a1cc01e18..35190a1803d 100755 --- a/chinese/bin/totw.pl +++ b/chinese/bin/totw.pl @@ -22,6 +22,7 @@ s/描钩/琈甮/g; s/描钩/琈甮/g; # s/描钩((呼)?)/琈甮$1/g; s/呼蹈癸禜家吏挂/呼蹈ン家吏挂/g; +s/秸秆秸竟/计沮诀/g; s/毕絃/毕穿合盒/g; s/(ま旧|币笆)絃/币笆合盒/g; @@ -53,6 +54,8 @@ s/干ゅン/干郎/g; 1 while (s/^((?:[\x00-\x7f]|[\x80-\xff].)*)辊/$1棵辊/); 1 while (s/^((?:[\x00-\x7f]|[\x80-\xff].)*)ゅ郎(?!)/$1ゅン/); 1 while (s/^((?:[\x00-\x7f]|[\x80-\xff].)*)硄筁/$1硓筁/); +1 while (s/^((?:[\x00-\x7f]|[\x80-\xff].)*)糴盿/$1糴繵/); +1 while (s/^((?:[\x00-\x7f]|[\x80-\xff].)*)盿糴/$1繵糴/); if ($sublang eq 'hk') { s/穨╰参/巨╰参/g; |