掌上百科 - PDAWIKI

 找回密码
 免费注册

QQ登录

只需一步,快速开始

查看: 1212|回复: 3

[工具] 拼音等特殊字符转为26字母的宏(自制)

[复制链接]

该用户从未签到

发表于 2018-3-19 22:30:35 | 显示全部楼层 |阅读模式
除了用汉字搜索以外,对于一些生僻字词,最方便的还是用拼音来搜索。
) u7 M$ g+ T% O9 ?3 k但是直接输入拼音比输入汉字更难。- x! n+ }. ~& y2 R/ ^* ]3 b
Ebwin对拼音搜索支持很好,可以用在辞典端和程序端分别实现拼音的自动替换。2 A$ a+ b, k+ k+ B9 U* A9 U6 F
比如输入sheng,可以自检索shéng、shèng等。可惜ebwin对汉字支持差,最近开始转战mdx阵营。0 Q0 v- t& Z. r0 D

7 o2 Y# \/ z  O9 r2 }: WMdict似乎没有实现拼音搜索的好方法,所以写了一个emeditor的宏,将拼音和一些键盘上没有的文字自动转换为26个字母。) V3 a: r$ D) w$ S0 M0 Y
供大家参考。代码如下,附件里是同样内容。
2 j2 x+ e" r7 ~; z2 N6 l覆盖unicode的0A0-17F,1C0-1DF。
6 {  L+ p0 H+ `% G. t8 s, p" h/ Y$ t可以将词头和拼音单独提出后使用,再配合@@@LINK来实现。. f+ T7 W% M$ w% i9 f& e
1 J) Z- h0 I# l6 o
效果大致如下,对于多音字多的词条查起来还是很麻烦,ebwin上可以实现搜索结果的组合。1 V4 d4 {3 l( k# n/ p. l3 D

4 D% V2 t4 K. e+ y2 a可以比较ebwin的效果,可惜ebwin对汉字支持差,无法两全。
/ s9 U" k9 T: l: t5 Y  J
4 T1 j% X  {4 T0 j' g8 ?0 O
8 a+ T+ A" ?' K. B% f' n
& L* d+ [4 G8 z4 Z
: z1 c5 B/ `+ K2 I! }1 [5 @document.selection.Replace "¡","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
! l! P) X: H6 W" g# ?document.selection.Replace "§","ss",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
* {! E$ s. X) ?, ?) Udocument.selection.Replace "©","c",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
2 [( r- T: S0 w! [# p5 Ydocument.selection.Replace "ª","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 ~% C1 w& Z0 F& ^+ x. Edocument.selection.Replace "®","r",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,07 D0 r) D) ?! ]+ c8 P( B
document.selection.Replace "¯","-",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0- L7 m) Y& T9 U, J! ~& D% v
document.selection.Replace "°","。",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
4 B) _. `5 q% o6 `; y) t1 gdocument.selection.Replace "±","+-",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0" D% \; Z% m# z
document.selection.Replace "²","2",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 b* `  v/ T  Q) m/ j, I2 Ndocument.selection.Replace "³","3",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
; e6 S: y5 p, [% @5 X9 I) sdocument.selection.Replace "´","'",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,09 [8 A6 e( ~: o% c5 {% q+ R
document.selection.Replace "·",".",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
" W+ m3 m# ?: z( bdocument.selection.Replace "¹","1",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0; l; i/ h3 y, d! M
document.selection.Replace "º","。",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
+ F* c. B' M* k8 odocument.selection.Replace "¼","1/4",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
" F9 A4 |) K$ g7 p" D; p6 K. idocument.selection.Replace "½","1/2",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
+ p# Y" B- k+ ^7 jdocument.selection.Replace "¾","3/4",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0, R1 s1 v9 {  v& z" h8 p2 O
document.selection.Replace "À","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0! m& [' O9 A) @
document.selection.Replace "Á","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,02 _. m2 [# i; G( K
document.selection.Replace "Â","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 t: T% r+ q9 Z+ Ydocument.selection.Replace "Ã","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
% o/ z9 S. x. ^3 mdocument.selection.Replace "Ä","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
, C7 w1 U% B# i% G! `document.selection.Replace "Å","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 c2 |4 f1 E9 s7 ?$ [document.selection.Replace "Æ","AE",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,05 M" t! g( h5 m2 k! m4 Z& ^, c2 k
document.selection.Replace "Ç","C",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
1 Q! C( S$ y8 E9 ]2 f) k: }document.selection.Replace "È","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
* _. Y5 y6 K4 T. U2 Sdocument.selection.Replace "É","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0, C2 O* H* d1 U- r
document.selection.Replace "Ê","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
1 y( c" o; U- [8 Ldocument.selection.Replace "Ë","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0  Q6 n. V" o' f
document.selection.Replace "Ì","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
+ e8 g" k+ V3 ?2 a8 B! kdocument.selection.Replace "Í","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
: v% W: X8 \4 P0 |. ~5 T. Ddocument.selection.Replace "Î","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
' M$ f1 W" Z) |& |4 o1 v- ldocument.selection.Replace "Ï","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0* p4 c5 t. B3 I# u) p; _
document.selection.Replace "Ð","D",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0( d; u3 y3 f0 W* T+ S
document.selection.Replace "Ñ","N",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
0 ]+ c; |% ]* @8 Ldocument.selection.Replace "Ò","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,07 M& m7 K& {# v  y  _; Y/ E
document.selection.Replace "Ó","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ j3 _' r+ P# U# Q. c" N
document.selection.Replace "Ô","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
4 U/ W( L. S) z, \' I6 ~- I( Tdocument.selection.Replace "Õ","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
8 F5 E6 A! C0 o1 i$ C8 Udocument.selection.Replace "Ö","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0% J& W, Y, `; |1 X( |! S0 g! Q2 F
document.selection.Replace "Ø","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,04 W/ {- h- B$ f0 N) L; d3 j, D
document.selection.Replace "Ù","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0* V# `7 }; Z, S; ]
document.selection.Replace "Ú","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
# T. H' y2 w) }. D% L, M; G: Vdocument.selection.Replace "Û","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
$ G8 w6 ~; M# ~7 s, U6 Mdocument.selection.Replace "Ü","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,06 M" W; Y, J2 x" j
document.selection.Replace "Ý","Y",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,00 j3 f! i$ P+ q" G+ v
document.selection.Replace "à","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
0 H, h) Y$ z3 H; t5 X9 c$ ddocument.selection.Replace "á","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0  Z5 p2 G$ Z0 z0 c& Z0 F* C
document.selection.Replace "â","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,06 P* [% H; m$ l0 O" I: X/ }* g, [
document.selection.Replace "ã","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
1 w! e; ]' U$ G6 T' g4 Ydocument.selection.Replace "ä","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
# a/ X/ a  I/ T1 D) @1 c0 g) [* Edocument.selection.Replace "å","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
# ^  b0 R& D( Jdocument.selection.Replace "æ","ae",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
9 A; J' ]+ e1 X3 odocument.selection.Replace "ç","c",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,05 S1 w  T) y- |
document.selection.Replace "è","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,02 L" r, _/ j4 f9 r
document.selection.Replace "é","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0( G0 ^0 K! D! V" x  D( x
document.selection.Replace "ê","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
4 P  P& t* V( r. J; @document.selection.Replace "ë","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
, Q. N+ U$ D: @* C5 kdocument.selection.Replace "ì","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
" P$ F' j6 e! [document.selection.Replace "í","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,00 a( `9 h( U' O" k: s6 \$ S
document.selection.Replace "î","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,09 [9 x; a( X) A  U( s) R2 f
document.selection.Replace "ï","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,07 n; m( ?* o1 O8 }! Z
document.selection.Replace "ñ","n",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
1 `$ K* R' T$ Ddocument.selection.Replace "ò","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0$ ]$ w5 K; z& @; D# H* B  T
document.selection.Replace "ó","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
! g8 J1 `/ ^' ]8 p+ z1 qdocument.selection.Replace "ô","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0( g; j+ Z/ b* F" _3 g
document.selection.Replace "õ","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
5 t7 C% t( P. a% \2 Y7 x8 Cdocument.selection.Replace "ö","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
, p6 U; o3 V1 p  qdocument.selection.Replace "ù","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0, V; e7 I; ^( k4 R$ p* Y7 U& N" E8 w
document.selection.Replace "ú","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
/ }; n7 w( D. N" C* Vdocument.selection.Replace "û","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
) f9 h' `9 y; m0 @% Vdocument.selection.Replace "ü","v",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0; a# U) A. R7 @1 g% {
document.selection.Replace "ý","y",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,05 \0 t. J4 u3 e- K1 [
document.selection.Replace "ÿ","y",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,04 X8 f" Z. X: ?% R
document.selection.Replace "Ā","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
  @6 Q$ q9 q  J. v# W6 U7 ?document.selection.Replace "ā","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ M+ q# N1 M9 u& w7 X
document.selection.Replace "Ă","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ Z* [2 n- y2 f) E* T
document.selection.Replace "ă","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
+ m+ e$ `* ^$ l  J3 E3 Tdocument.selection.Replace "Ą","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
  n  S" j* k2 B5 h4 xdocument.selection.Replace "ą","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0, B4 j5 Z  g: K8 ]5 o0 B% ~* t! r
document.selection.Replace "Ć","C",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,08 P" E& \- S' O8 }: }9 F' w( p
document.selection.Replace "ć","c",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0, v! }& |3 G' `9 h7 v- [2 O
document.selection.Replace "Ĉ","C",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ G8 e& w3 h8 V' m
document.selection.Replace "ĉ","c",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0; g6 O2 b* K" H4 I9 A
document.selection.Replace "Ċ","C",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
4 `! ?% O, H/ w' v% |5 d7 ?0 O& wdocument.selection.Replace "ċ","c",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
8 r/ l" v# W; j& T% n/ }" G7 Jdocument.selection.Replace "Č","C",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
! o! ?9 J2 J1 ]- Q! V2 S2 D+ c) Gdocument.selection.Replace "č","c",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
+ S$ k. C. J3 q2 fdocument.selection.Replace "Ď","D",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0. B! p' |% ^, b; F( H* ~
document.selection.Replace "ď","d",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0$ P" K3 z; k" [! o' J
document.selection.Replace "Đ","D",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
5 P( I8 r( l! ~document.selection.Replace "đ","d",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& q! C% _: m4 ]- {document.selection.Replace "Ē","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
1 M) C6 Q6 _" H) Z6 gdocument.selection.Replace "ē","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0. }' D- l. ?# |0 Z* h
document.selection.Replace "Ĕ","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
6 Y' Y2 j+ M2 s1 n+ H5 sdocument.selection.Replace "ĕ","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,05 z2 |1 o2 m$ F0 q7 n+ z# R
document.selection.Replace "Ė","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,05 `* C# Q. p) c( |
document.selection.Replace "ė","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 h* V" ~' Y7 P. v: Ddocument.selection.Replace "Ę","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0  O# S6 h" e/ J# y$ v9 m
document.selection.Replace "ę","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0& x+ k8 i5 ^* Q
document.selection.Replace "Ě","E",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0; n3 g$ @2 H* z  c' {% d
document.selection.Replace "ě","e",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0" L5 X/ s. a: e: s
document.selection.Replace "Ĝ","G",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,00 C/ s: `6 J6 i8 A' w2 h0 G5 {. f+ A
document.selection.Replace "ĝ","g",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
2 l5 T1 z$ @! I: ?% bdocument.selection.Replace "Ğ","G",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 @; ]2 a# j3 ]8 q# pdocument.selection.Replace "ğ","g",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0# G: a* s7 F" a% v3 I0 ~
document.selection.Replace "Ġ","G",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0- h4 s8 I2 p% d; ^* o! G
document.selection.Replace "ġ","g",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,01 z5 U- V+ \" Q4 J) ]
document.selection.Replace "Ģ","G",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,06 X  j2 X. h6 V9 m) u/ M
document.selection.Replace "ģ","g",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
* v1 v) Y- z+ C5 \# y& p, U* ddocument.selection.Replace "Ĥ","H",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& i& Z* K; K. P  m2 Adocument.selection.Replace "ĥ","h",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,01 {( o% R* \: W8 `$ Z$ k% v
document.selection.Replace "Ħ","H",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
( m* W' m' Z7 d/ U# Ddocument.selection.Replace "ħ","h",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ |: g- l" m' S$ w# U8 M
document.selection.Replace "Ĩ","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
) B2 u- W9 r/ |- q% C. Hdocument.selection.Replace "ĩ","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,05 a5 _. ~2 U$ T- B
document.selection.Replace "Ī","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ C" @0 I2 e  z+ U& Y+ X
document.selection.Replace "ī","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0  G5 ]5 \# F0 i5 n* K$ B
document.selection.Replace "Ĭ","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0! x0 f8 N& O! Y+ ~' Q3 i
document.selection.Replace "ĭ","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,06 H  @! v8 `: P6 W7 s
document.selection.Replace "Į","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0# u9 ~' G) q$ e* Y% v% \/ i7 v: Z
document.selection.Replace "į","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0) T3 \0 h+ A7 Y; p- K+ h% G3 w: E! B
document.selection.Replace "İ","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,01 {- r/ k# X$ M
document.selection.Replace "ı","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0$ z! O* V9 ?0 i) z
document.selection.Replace "IJ","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0$ {0 G& M3 Q3 p5 ^% N
document.selection.Replace "ij","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
/ v) l7 K- a# Sdocument.selection.Replace "Ĵ","J",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
8 }' |$ B% R0 mdocument.selection.Replace "ĵ","j",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
, z1 T7 i7 x8 B9 A4 T  Ndocument.selection.Replace "Ķ","K",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
$ _6 c7 b; ?3 Edocument.selection.Replace "ķ","k",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0' {5 h, U5 j! Y  a
document.selection.Replace "ĸ","k",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
" r3 t! [9 N* Ydocument.selection.Replace "Ĺ","L",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ V: {+ L& V7 D) i6 O) A
document.selection.Replace "ĺ","l",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,02 J- h0 j1 W( K- J* _# t. I" @0 ^
document.selection.Replace "Ļ","L",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,04 T. i0 Y7 I( s
document.selection.Replace "ļ","l",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
2 {6 c# m. m  Y# k+ ^# xdocument.selection.Replace "Ľ","L",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
0 E9 e$ {1 B) ^# `0 c& K% [document.selection.Replace "ľ","l",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
" H$ ~* A, x7 L; i  j9 L, R% Cdocument.selection.Replace "Ŀ","L",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0% j! d, E2 ~+ Q% ^1 i) R. t
document.selection.Replace "ŀ","l",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
# p) I# }. s6 `document.selection.Replace "Ł","L",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0' m/ ~6 n1 I: o8 v, y7 x
document.selection.Replace "ł","l",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
2 S8 N( F" Q' ]8 @! {2 @document.selection.Replace "Ń","N",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& f" J) g: |% H2 g9 p2 t$ Edocument.selection.Replace "ń","n",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
3 t! C4 h4 h6 l: l; [- y0 Rdocument.selection.Replace "Ņ","N",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0! I( q" w1 k/ U7 Y
document.selection.Replace "ņ","n",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
% {- q1 [7 B, \document.selection.Replace "Ň","N",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,09 D( f5 p- V: v
document.selection.Replace "ň","n",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
- M5 V0 ?9 c) T0 W4 n: ?8 Bdocument.selection.Replace "ʼn","n",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0# P) a. s- q( M0 {; i) u, l
document.selection.Replace "Ŋ","N",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& A# D3 U* u. n3 j5 P$ z2 E# Cdocument.selection.Replace "ŋ","n",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& H4 o$ e7 |5 M+ F' \! J5 ndocument.selection.Replace "Ō","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
( h5 v+ \$ f& W$ `document.selection.Replace "ō","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,02 j, @: L9 _4 ^" N" h' ]: _! i( v8 u
document.selection.Replace "Ŏ","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
! ^; O' r6 z. ?$ D2 Udocument.selection.Replace "ŏ","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,02 H% b/ M: s+ I& y2 \% |
document.selection.Replace "Ő","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
/ G/ _( }3 v2 l8 N- X3 U: jdocument.selection.Replace "ő","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
, j, _- {; h4 u: f% p' |+ N1 ^; f3 ndocument.selection.Replace "Œ","OE",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0! |* \/ f& J$ M! f7 [
document.selection.Replace "œ","oe",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
# [% [3 ^3 s. T3 bdocument.selection.Replace "Ŕ","R",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
: A4 j$ \% ~8 O# n* e  C  ^document.selection.Replace "ŕ","r",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0+ v; O5 ]. v% D7 G) Y
document.selection.Replace "Ŗ","R",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& s4 t* x7 X2 Pdocument.selection.Replace "ŗ","r",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0  y; i8 x" Z" C, O* K4 B, F7 g3 k
document.selection.Replace "Ř","R",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,09 e) G: p- t" Q: ~0 ^/ T; m6 p' @
document.selection.Replace "ř","r",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
, g, L  l7 g2 }) L0 ]6 j% Ldocument.selection.Replace "Ś","S",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,07 s& x/ M$ x+ v0 Y: ~! Q( D4 r
document.selection.Replace "ś","s",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0, c$ I9 B" ]  V: i$ c
document.selection.Replace "Ŝ","S",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0% \, H" k9 g  c! b: {
document.selection.Replace "ŝ","s",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,07 a* v. _4 V/ g* T
document.selection.Replace "Ş","S",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0. L6 q- B$ h$ Y6 G
document.selection.Replace "ş","s",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0; P2 L) D8 {! N7 T  l, W  _9 _
document.selection.Replace "Š","S",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
5 c+ T$ n' y" p- {7 n2 R- Udocument.selection.Replace "š","s",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
' i7 H; `! _3 edocument.selection.Replace "Ţ","T",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,08 q8 h( H& D3 e" S' b' R
document.selection.Replace "ţ","t",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
! s4 E* T3 `& Y1 @document.selection.Replace "Ť","T",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0# t- P. d. R+ [1 H0 d. [) v. e
document.selection.Replace "ť","t",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0. T" g, d& A% A9 Y. ?
document.selection.Replace "Ŧ","T",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
0 p+ V, s5 W2 Mdocument.selection.Replace "ŧ","t",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0! t+ |/ a7 Q0 W5 p# U
document.selection.Replace "Ũ","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
, ]! g( }4 d2 o) vdocument.selection.Replace "ũ","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& n' \3 H& H* P6 F, b' C; zdocument.selection.Replace "Ū","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
3 F2 m' G$ d) ~& h" J1 Ndocument.selection.Replace "ū","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
' K6 F) `# O0 Z7 C: Pdocument.selection.Replace "Ŭ","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
  G9 G- ^+ M2 o- d# k) Z  ]9 `* ddocument.selection.Replace "ŭ","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,02 d2 Y% @) X: F' E
document.selection.Replace "Ů","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
# Y6 N! R1 q7 S$ }) Fdocument.selection.Replace "ů","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0: r  s2 [3 B# i0 ~4 ?/ m" P, R
document.selection.Replace "Ű","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0  X! Q8 g  P9 L0 g6 y
document.selection.Replace "ű","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
* e, o: z) p% q- ndocument.selection.Replace "Ų","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
' \! A1 s0 C- j& I2 n) g) Tdocument.selection.Replace "ų","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,02 N4 s, F' d3 {5 h7 Q$ G
document.selection.Replace "Ŵ","W",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
! ]' y% t& q/ ~# V  _: _; zdocument.selection.Replace "ŵ","w",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
) P; A, Q) w/ l3 k6 r) x5 Rdocument.selection.Replace "Ŷ","Y",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,08 x1 u. y6 }* L5 A+ F
document.selection.Replace "ŷ","y",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
9 L( @; e' F6 z# f6 v; Zdocument.selection.Replace "Ÿ","Y",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0' Z: z/ F7 n, b% P8 q3 `4 G
document.selection.Replace "Ź","Z",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
+ m$ I! S( R% D+ `% Qdocument.selection.Replace "ź","z",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
& @+ S, G: U+ E8 K  `1 f" zdocument.selection.Replace "Ż","Z",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0. x7 p+ y# p; i( m
document.selection.Replace "ż","z",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,00 @% I) Y+ o/ s+ Q5 ^# |' C$ ?
document.selection.Replace "Ž","Z",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 H( `9 g" c( E9 c( u  f! u- Rdocument.selection.Replace "ž","z",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0* N  T0 A5 m3 S' n' ^  a7 s
document.selection.Replace "Ǎ","A",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0# i. p+ @- h6 E( f8 H" y
document.selection.Replace "ǎ","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
6 u# ~$ a( c$ S) q/ z  ydocument.selection.Replace "Ǐ","I",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
' \" \+ |: Q' V6 [+ r/ o/ B2 ^$ ]document.selection.Replace "ǐ","i",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
2 k$ _6 {# D. S  ~# d: H0 Ndocument.selection.Replace "Ǒ","O",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
4 y, ~2 T( i0 R, R$ S: o5 `document.selection.Replace "ǒ","o",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0( S+ D6 I( w9 d9 A! Q) N- Q
document.selection.Replace "Ǔ","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0' Z" S  Q$ X3 O3 x9 s
document.selection.Replace "ǔ","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
7 g. z& Z% n! @' Z4 P' j; qdocument.selection.Replace "Ǖ","U",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
4 A4 s0 p) M$ B+ I# d+ \, bdocument.selection.Replace "ǖ","u",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,04 f4 }- v8 t$ E% Z
document.selection.Replace "Ǘ","V",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
6 {+ s8 g( N* @) c3 o2 [document.selection.Replace "ǘ","v",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0  W  ~. C. \9 t
document.selection.Replace "Ǚ","V",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0, t1 p7 K: o/ U4 h: n1 M0 ^4 g
document.selection.Replace "ǚ","v",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
9 T/ x" |8 q5 f# {* P$ Odocument.selection.Replace "Ǜ","V",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
( q" u* [$ @- n5 n) E  Qdocument.selection.Replace "ǜ","v",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
9 ]# Y5 A, x  Xdocument.selection.Replace "Ǟ","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
8 m  Q1 e/ \! p' E" n3 \document.selection.Replace "ǟ","a",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0
- n# G1 Q& U* e1 ddocument.selection.Replace "Ǹ","N",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0& V, p8 F  [1 A4 }
document.selection.Replace "ǹ","n",eeFindReplaceCase Or eeFindReplaceEscSeq Or eeReplaceAll,0

本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

评分

1

查看全部评分

本帖被以下淘专辑推荐:

该用户从未签到

发表于 2020-2-3 15:09:07 | 显示全部楼层
Thanks for your great work.

该用户从未签到

发表于 2020-2-8 11:26:31 | 显示全部楼层
虽然不该挖坟,还是建议在后面加上读音的数字。比如shéng替换为sheng2

该用户从未签到

 楼主| 发表于 2020-2-8 21:34:56 | 显示全部楼层
lejcey 发表于 2020-2-8 11:26
% m5 J3 b# n3 W/ x6 v虽然不该挖坟,还是建议在后面加上读音的数字。比如shéng替换为sheng2
" u" [; [4 r: M' q) `" k
说起来容易做起来难。自动转换éng的话,只能实现为e2ng,要做到数字标示到韵母最后需要非常多步的判断处理
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

小黑屋|手机版|Archiver|PDAWIKI |网站地图

GMT+8, 2024-4-25 20:11 , Processed in 0.046503 second(s), 13 queries , MemCache On.

Powered by Discuz! X3.4

Copyright © 2001-2023, Tencent Cloud.

快速回复 返回顶部 返回列表