资源描述：
《易语言中文转拼音》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、.版本2.程序集窗口程序集1.子程序自动取汉字声母2,文本型.参数文本,文本型.局部变量格式化文本,文本型.局部变量文字,文本型.局部变量temp,文本型.局部变量拼音,文本型.局部变量字节集,字节集.局部变量i,整数型字节集＝到字节集(文本).计次循环首(128,i)字节集＝子字节集替换(字节集,到字节集(字符(i)),到字节集(“”),,).计次循环尾()格式化文本＝到文本(字节集).计次循环首(取文本长度(格式化文本)÷2,i)temp＝取文本右边(格式化文本,取文本长度(格式化文本)－2×(i－1))文字＝取文本左边(temp,2)拼音＝拼音＋到小
2、写(取文本左边(取拼音(文字,1),1))＋取文本右边(取拼音(文字,1),取文本长度(取拼音(文字,1))－1).计次循环尾()返回(拼音).子程序自动取汉字声母,文本型.参数文本,文本型.局部变量格式化文本,文本型.局部变量文字,文本型.局部变量temp,文本型.局部变量拼音,文本型.局部变量字节集,字节集.局部变量i,整数型字节集＝到字节集(文本).计次循环首(128,i)字节集＝子字节集替换(字节集,到字节集(字符(i)),到字节集(“”),,).计次循环尾()格式化文本＝到文本(字节集).计次循环首(取文本长度(格式化文本)÷2,i)temp＝取
3、文本右边(格式化文本,取文本长度(格式化文本)－2×(i－1))文字＝取文本左边(temp,2)拼音＝拼音＋到大写(取文本左边(取拼音(文字,1),1))＋取文本右边(取拼音(文字,1),取文本长度(取拼音(文字,1))－1).计次循环尾()返回(拼音).子程序_按钮2_被单击.局部变量分本组,文本型,,"0".局部变量i,整数型.局部变量temp,文本型分本组＝分割文本(待转换编辑框.内容,#换行符,).计次循环首(取数组成员数(分本组),i)temp＝temp＋自动取汉字声母(分本组[i])＋#换行符.计次循环尾()转换后编辑框.内容＝temp置剪辑板
4、文本(temp).子程序_按钮4_被单击待转换编辑框.内容＝“请在这里粘贴要转换的汉字..”转换后编辑框.内容＝“”待转换编辑框.获取焦点()待转换编辑框.被选择字符数＝-1.子程序_按钮3_被单击销毁().子程序_按钮1_被单击.局部变量分本组,文本型,,"0".局部变量i,整数型.局部变量temp,文本型分本组＝分割文本(待转换编辑框.内容,#换行符,).计次循环首(取数组成员数(分本组),i)temp＝temp＋自动取汉字声母2(分本组[i])＋#换行符.计次循环尾()转换后编辑框.内容＝temp置剪辑板文本(temp).子程序_待转换编辑框_按下某
5、键,逻辑型.参数键代码,整数型.参数功能键状态,整数型.如果真(功能键状态＝#Alt键且键代码＝#A键)待转换编辑框.被选择字符数＝-1.如果真结束.子程序_转换后编辑框_按下某键,逻辑型.参数键代码,整数型.参数功能键状态,整数型.如果真(功能键状态＝#Alt键且键代码＝#A键)转换后编辑框.被选择字符数＝-1.如果真结束.子程序__启动窗口_创建完毕待转换编辑框.获取焦点()待转换编辑框.被选择字符数＝-1.子程序_按钮5_被单击信息框(“版本：1.1”,0,).子程序_待转换编辑框_内容被改变待转换编辑框.文本颜色＝#黑色
