QQ拼音输入法导入易语言源码
.版本 2
.子程序 _按钮2_被单击
.局部变量 文本, 文本型, , "0"
.局部变量 n, 整数型
.局部变量 n1, 整数型
.局部变量 拼音, 文本型
.局部变量 首字母, 文本型
文本 = 分割文本 (编辑框2.内容, #换行符, )
.计次循环首 (取数组成员数 (文本), n)
首字母 = “”
处理事件 ()
.计次循环首 (取文本长度 (文本 [n]), n1)
.如果真 (n1 % 2 ≠ 0)
拼音 = 取拼音 (取文本中间 (文本 [n], n1, 2), 1)
首字母 = 首字母 + 取文本左边 (拼音, 1)
.如果真结束
.计次循环尾 ()
编辑框3.加入文本 (首字母 + “=1,” + 文本 [n] + #换行符)
.计次循环尾 ()