精易论坛

标题: 语言识别程序 [打印本页]

作者: bugaosuni1314    时间: 2025-1-14 16:55
标题: 语言识别程序
  
窗口程序集名保 留  保 留备 注
窗口程序集_启动窗口   
变量名类 型数组备 注
常用语句文本型0 
命令数组文本型0 
命令数整数型  
热标整数型  

子程序名返回值类型公开备 注
_语音识别1_识别到语音  
参数名类 型参考可空数组备 注
识别文本文本型
变量名类 型静态数组备 注
临时命令文本型2
i整数型 
信息框 (识别文本, 0, , )
计次循环首 (命令数, i)
临时命令 = 分割文本 (命令数组 [i], “@”, )
如果真 (识别文本 = 临时命令 [1])
执行 ( #打开文件, 临时命令 [2], , “C:\Program Files\Internet Explorer”, )
跳出循环 ()

计次循环尾 ()
如果真 (识别文本 = “您好”)
api发送消息 (获取当前窗口 (), 274, 61536, 0)
信息框 (获取当前窗口 (), 0, , )
如果真 (识别文本 = “再见”)
api发送消息 (获取当前窗口 (), 274, 61536, 0)
信息框 (获取当前窗口 (), 0, , )

子程序名返回值类型公开备 注
_按钮5_被单击  
如果 (按钮5.标题 = “开始”)
语音识别1.创建 (0, 1)
按钮5.标题 = “停止”
按钮5.标题 = “开始”
语音识别1.释放 ()

子程序名返回值类型公开备 注
__启动窗口_创建完毕  
变量名类 型静态数组备 注
文件号整数型 
一行文本型 
命令文本型2
XP风格 (2)
文件号 = 打开文件 (取运行目录 ()“命令文件.txt”, #改读, )
判断循环首 (取反 (是否在文件尾 (文件号, )))
一行 = 读入一行 (文件号)
加入成员 (命令数组, 一行)
列表框1.加入项目 (一行, )
命令 = 分割文本 (一行, “@”, )
加入成员 (常用语句, 命令 [1])
判断循环尾 ()
加入成员 (常用语句, “关闭”)
加入成员 (常用语句, “再见”)
加入成员 (常用语句, “你好”)
语音识别1.加入常用 (常用语句)
命令数 = 取数组成员数 (命令数组)
关闭文件 (文件号)
子程序名返回值类型公开备 注
_列表框1_列表项被选择  
变量名类 型静态数组备 注
命令文本型2
命令 = 分割文本 (列表框1.取项目文本 (列表框1.现行选中项), “@”, )
执行 ( #打开文件, 命令 [2], , “C:\Program Files\Internet Explorer”, )
子程序名返回值类型公开备 注
到文本读入文件  

子程序名返回值类型公开备 注
_按钮1_被单击  
变量名类 型静态数组备 注
命令文本型2
i整数型 
xms整数型 
如果真 (编辑框1.内容 = “”)
信息框 (“不能为空”#换行符“格式为:命令文本(一般为汉字)@命令代码(一般为英文)”, 0, “反馈信息”, )
编辑框1.获取焦点 ()
返回 ()
如果真 (寻找文本 (编辑框1.内容, “@”, , ) = -1)
信息框 (“格式不正确!”#换行符“格式为:命令文本(一般为汉字)@命令代码(一般为英文)”, 0, , )
编辑框1.获取焦点 ()
返回 ()
列表框1.加入项目 (编辑框1.内容, )
xms = 列表框1.取项目数 ()
计次循环首 (xms, i)
命令 = 分割文本 (列表框1.取项目文本 (i - 1), “@”, )
加入成员 (常用语句, 命令 [1])
计次循环尾 ()
语音识别1.加入常用 (常用语句)
子程序名返回值类型公开备 注
_按钮4_被单击  
如果真 (编辑框2.内容 = “”)
信息框 (“不能为空”, 0, , )
编辑框2.获取焦点 ()
返回 ()
加入成员 (常用语句, 编辑框2.内容)
语音识别1.加入常用 (常用语句)
编辑框2.内容 = “”
信息框 (“加入成功!”, 0, , )
编辑框2.获取焦点 ()


i支持库列表   支持库注释   
shell操作系统界面功能支持库
ESpeechEngine文本语音转换支持库
xplibXP风格界面库

语言识别程序.rar

629.56 KB, 下载次数: 20, 下载积分: 精币 -2 枚


作者: hjinpwhe1    时间: 2025-1-14 17:34
感谢分享~!
作者: 卡卡1111    时间: 2025-1-14 18:00
支持开源~!感谢分享
作者: 卿卿吖    时间: 2025-1-14 18:05
学习一下,好东西,感谢大佬的分享!
作者: wh1234567    时间: 2025-1-15 03:43
学习一下
作者: year1970    时间: 2025-1-15 08:00
感谢分享
作者: hjinpwhe1    时间: 2025-1-15 08:01
  下个学习一下
作者: zhujinkui    时间: 2025-1-15 08:56
感谢分享~!
作者: 一指温柔    时间: 2025-1-15 09:07
#在这里快速回复#支持开源~!感谢分享
作者: wjswzj0    时间: 2025-1-15 09:56
感谢分享,很给力!~
作者: 胖子葛格    时间: 2025-1-16 18:28
感谢大神分享~!
作者: 冷叶追风    时间: 2025-1-20 05:25
承蒙君之分享,实感幸甚,吾鼎力支持开源之举 !




欢迎光临 精易论坛 (https://125.confly.eu.org/) Powered by Discuz! X3.4