老有关问题:输入汉字自动转换为首字母的拼音码 比如中国显示ZG

老问题:输入汉字自动转换为首字母的拼音码 比如中国显示ZG
 
什么样的汉字（氧化铁） 对应 什么样的缩写（YHT）

曾经看过 在一个医保系统是可以生成的它还可以生在五笔码）

需要建立自己的汉字库了！(估计不可行)  
那位仁兄有PB9中的的代码？

------解决方案--------------------
给你个函数:f_getpy()
long no
long pyi
long len
string pytable
string py
string str
string ch1
string ch2


pytable = "aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa" + "aaaabbbbbbbbbbbbbbbbbbbbbbbbbbbb" + "bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb" + "bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb" + "bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb" + "bbbbbbbbbbbbbbbbbbbbbbbbbbbbbbbb" + "bbbbbbbbbbbbbbbbbbbbbbbbbbbbcccc" + "cccccccccccccccccccccccccccccccc" + "cccccccccccccccccccccccccccccccc" + "cccccccccccccccccccccccccccccccc" + "cccccccccccccccccccccccccccccccc" + "cccccccccccccccccccccccccccccccc" + "cccccccccccccccccccccccccccccccc" + "cccccccccccccccccccccccccccccccc" + "cccccddddddddddddddddddddddddddd" + "dddddddddddddddddddddddddddddddd" + "dddddddddddddddddddddddddddddddd" + "dddddddddddddddddddddddddddddddd" + "dddddddddddddddddddddddddddddddd" + "dddddddddddddddddddddddddddddeee" + "eeeeeeeeeeeeeeeeeeefffffffffffff" + "ffffffffffffffffffffffffffffffff" + "ffffffffffffffffffffffffffffffff" + "ffffffffffffffffffffffffffffffff" + "ffffffffffffffffgggggggggggggggg" + "gggggggggggggggggggggggggggggggg" + "gggggggggggggggggggggggggggggggg" + "gggggggggggggggggggggggggggggggg" + "gggggggggggggggggggggggggggggggg" + "ggggggggggghhhhhhhhhhhhhhhhhhhhh" + "hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh" + "hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh" + "hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh" + "hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh" + "hhhhhhhhhhhhhhhhhhhhhhhhhhhhhhhh" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjjjjjjjjjjjjjjjjjjjjjjjjjj" + "jjjjjjjkkkkkkkkkkkkkkkkkkkkkkkkk" + "kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk" + "kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk" + "kkkkkkkkkkklllllllllllllllllllll" + "llllllllllllllllllllllllllllllll" + "llllllllllllllllllllllllllllllll" + "llllllllllllllllllllllllllllllll" + "llllllllllllllllllllllllllllllll" + "llllllllllllllllllllllllllllllll" + "llllllllllllllllllllllllllllllll" + "llllllllllllllllllllllllllllllll" + "lllmmmmmmmmmmmmmmmmmmmmmmmmmmmmm" + "mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm" + "mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm" + "mmmmmmmmmmmmmmmmmmmmmmmmmmmmmmmm" + "mmmmmmmmmmmmmmmmmmmmmmmmmmnnnnnn" + "nnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn" + "nnnnnnnnnnnnnnnnnnnnnnnnnnnnnnnn" + "nnnnnnnnnnnooooooooppppppppppppp" + "pppppppppppppppppppppppppppppppp" + "pppppppppppppppppppppppppppppppp" + "pppppppppppppppppppppppppppppppp" + "pppppppppppppqqqqqqqqqqqqqqqqqqq" + "qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq" + "qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq" + "qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq" + "qqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqq" + "qqqqqqqqqqrrrrrrrrrrrrrrrrrrrrrr" + "rrrrrrrrrrrrrrrrrrrrrrrrrrrrrrrr" + "rrrrrsssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "ssssssssssssssssssssssssssssssss" + "sssttttttttttttttttttttttttttttt" + "tttttttttttttttttttttttttttttttt" + "tttttttttttttttttttttttttttttttt" + "tttttttttttttttttttttttttttttttt" + "tttttttttttttttttttttttttttttttw" + "wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww" + "wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww" + "wwwwwwwwwwwwwwwwwwwwwwwwwwwwwwww" + "wwwwwwwwwwwwwwwwwwwwwwwxxxxxxxxx" + "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" + "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" + "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" + "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" + "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" + "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx" + "xxxxxxxxxxxxxxxxxxxxxxyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyyyyyyyyyyyyyyyyyyyyyyyyy" + "yyyyyyyyzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzznzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz" + "zzzzzzzzzzz{{{{{cjwgnspgcgne{y{b" + "tyyzdxykygt{jnnjqmbsgzscyjsyy{pg" + "kbzgy{ywykgkljswkpjqhy{w{dzlsgmr" + "ypywwcckznkyygttnjjeykkzytcjnmcy" + "lqlypyqfqrpzslwbtgkjfyxjwzltbncx" + "jjjjzxdttsqzycdxxhgck{phffss{ybg" + "mxlpbyll{hlxs{zm{jhsojnghdzqyklg" + "jhxgqzhxqgkezzwyscscjxyeyxadzpmd" + "ssmzjzqjyzc{j{wqjbdzbxgznzcpwhkx" + "hqkmwfbpbydtjzzkqhylygxfptyjyyzp" + "szlfchmqshgmxxsxj{{dcsbbqbefsjyh" + "xwgzkpylqbgldlcctnmayddkssngycsg" + "xlyzaybnptsdkdylhgymylcxpy{jndqj" + "wxqxfyyfjlejpzrxccqwqqsbzkymgplb" + "mjrqcflnymyqmsqyrbcjthztqfrxqhxm" + "jjcjlxxgjmshzkbswyemyltxfsydsgly" + "cjqxsjnqbsctyhbftdcyzdjwyghqfrxw" + "ckqkxebptlpxjzsrmebwhjlbjslyysmd" + "xlclqkxlhxjrzjmfqhxhwywsbhtrxxgl" + "hqhfnm{ykldyxzpwlgg{mtcfpajjzylj" + "tyanjgbjplqgdzyqyaxbkysecjsznsly" + "zhzxlzcghpxzhznytdsbcjkdlzayfmyd" + "lebbgqyzkxgldndnyskjshdlyxbcghxy" + "pkdqmmzngmmclgwzszxzjfznmlzzthcs" + "ydbdllscddnlkjykjsycjlkohqasdknh" + "csganhdaashtcplcpqybsdmpjlpzjoql" + "cdhjjysprchn{nnlhlyyqyhwzptczgww" + "mzffjqqqqyxaclbhkdjxdgmmydjxzlls" + "ygxgkjrywzwyclzmssjzldbydcpcxyhl" + "xchyzjq{{qagmnyxpfrkssbjlyxysygl" + "nscmhswwmnzjjlxxhchsy{{ctxrycyxb" + "yhcsmxjsznpwgpxxtaybgajcxly{dccw" + "zocwkccsbnhcpdyznfcyytyckxkybsqk" + "kytqqxfcwchcykelzqbsqyjqcclmthsy" + "whmktlkjlycxwhyqqhtqh{pq{qscfymm" + "dmgbwhwlgsllysdlmlxpthmjhwljzyhz" + "jxhtxjlhxrswlwzjcbxmhzqxsdzpmgfc" + "sglsxymqshxpjxwmyqksmyplrthbxftp" + "mhyxlchlhlzylxgsssstclsltclrpbhz" + "hxyyfhb{gdmycnqqwlqhjj{ywjzyejjd" + "hpblqxtqkwhlchqxagtlxljxmsl{htzk" + "zjecxjcjnmfby{sfywybjzgnysdzsqyr" + "sljpclpwxsdwejbjcbcnaytwgmpabcly" + "qpclzxsbnmsggfnzjjbzsfzyndxhplqk" + "zczwalsbccjx{yzhwkypsgxfzfcdkhjg" + "xdlqfsgdslqwzkxtmhsbgzmjzrglyjbp" + "mlmsxlzjqshzyj{zydjwbmjklddpmjeg" + "xyhylxhlqyqhkycwcjmyyxnatjhyccxz" + "pcqlbzwwytwbqcmlpmyrjcccxfpznzzl" + "jplxxyztzlgdldcklyrzzgqtgjhhgjlj" + "axfgfjzslcfdqzlclgjdjcsnclljpjqd" + "cclcjxmyzftsxgcgsbrzxjqqctzhgyqt" + "jqqlzxjylylbcyamcstylpdjbyregkjz" + "yzhlyszqlznwczcllwjqjjjkdgjzolbb" + "zppglghtgzxyghzmycnqsycyhbhgxkam" + "txyxnbskyzzgjzlqjdfcjxdygjqjjpmg" + "wgjjjpkqsbgbmmcjssclpqpdxcdyyky{" + "cjddyygywrhjrtgznyqldkljszzgzqzj" + "gdykshpzmtlcpwnjafyzdjcnmwescygl" + "btzcgmssllyxqsxsbsjsbbsgghfjlypm" + "zjnlyywdqshzxtyywhmzyhywdbxbtlms" + "yyyfsxjc{txxlhjhf{sxzqhfzmzcztqc" + "xzxrttdjhnnyzqqmnqdmmg{ytxmjgdhc" + "dyzbffallztdltfxmxqzdngwqdbdczjd" + "xbzgsqqddjcmbkzffxmkdmdsyyszcmlj" + "dsynsprskmkmpcklgdbqtfzswtfgglyp" + "lljzhgj{gypzltcsmcnbtjbqfkthbyzg" + "kpbbymtdssxtbnpdkleycjnyddykztdh" + "qhsdzsctarlltkzlgecllkjlqjaqnbdk" + "kghpjtzqksecshalqfmmgjnlyjbbtmly" + "zxdcjpldlpcqdhzycbzsczbzmsljflkr" + "zjsnfrgjhxpdhyjybzgdljcsezgxlblh" + "yxtwmabchecmwyjyzlljjyhlg{djlsly" + "gkdzpzxjyyzlwcxszfgwyydlyhcljscm" + "bjhblyzlycblydpdqysxqzbytdkyyjy{" + "cnrjmpdjgklcljbctbjddbblblczqrpp" + "xjcglzcshltoljnmdddlngkaqhqhjhyk" + "heznmshrp{qqjchgmfprxhjgdychghly" + "rzqlcyqjnzsqtkqjymszswlcfqqqxyfg" + "gyptqwlmcrnfkkfsyylqbmqammmyxctp" + "shcptxxzzsmphpshmclmldqfyqxszyjd" + "jjzzhqpdszglstjbckbxyqzjsgpsxqzq" + "zrqtbdkyxzkhhgflbcsmdldgdzdblzyy" + "cxnncsybzbfglzzxswmsccmqnjqsbdqs" + "jtxxmbltxzclzshzcxrqjgjylxzfjphy" + "{zqqydfqjjlzznzjcdgzygctxmzysctl" + "kphtxhtlbjxjlxscdqxcbbtjfqzfsltj" + "btkqbxxjjljchczdbzjdczjdcprnpqcj" + "pfczlclzxzdmxmphjsgzgszzqlylwtjp" + "fsyaxmcjbtzyycwmytcsjjlqcqlwzmal" + "bxyfbpnlsfhtgjwejjxxglljstgshjql" + "zfkcgnndszfdeqfhbsaqtgylbxmmygsz" + "ldydqmjjrgbjtkgdhgkblqkbdmbylxwc" + "xyttybkmrtjzxqjbhlmhmjjzmqasldcy" + "xy??????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????" + "????????????????????????????????"