zoukankan      html  css  js  c++  java
  • 学科竞赛作品 智能家居受控端

    最新调试更新版本见另一个帖子2017-11-1012:07:54>~(修复讯飞语音基本崩溃的bug纯属原创!!结合自带语音插件实现!)

    经多次调试最终版本

    2017-10-2614:24:36

    今天特来修改相关内容,原来写好了,没有加讯飞语音的语音识别功能,,但是我的控制端肯定要加语音识别的呀,

    远程控制端发送语音识别,然后发送到服务器,接着接收端解析,然后执行动作,播放语音。

    找了一上午,终于找到了原因,竟然是编程软件的问题!jar库和so库的解析,并没有更新,导致现在的e4a已经无法使用语音识别功能了,机智的我调用了例程里面的库文件,就可以运行了。下面代码无需更改,不再闪退了。

      1 变量 K1开关 为 文本型
      2 变量 K2开关 为 文本型
      3 变量 启动时间 为 长整数型
      4 变量 网址 为 文本型
      5 变量 引号 为 文本型
      6 变量 一级返回文本 为 文本型
      7 变量 二级返回文本 为 文本型
      8 变量 三级返回文本 为 文本型
      9 变量 终级返回文本 为 文本型
     10 变量 日光灯返回值 为 文本型
     11 变量 门锁返回值 为 文本型
     12 常量 日光灯 为 文本型="开灯"
     13 常量 门锁 为 文本型="开门"
     14 变量 检测 为 整数型
     15 变量 型号 为 文本型
     16 事件 按钮3.被单击()
     17         判断 按钮3.标题
     18         分支 "搜索设备"
     19             列表框1.清空项目()
     20             蓝牙1.搜索设备() '搜索设备
     21             弹出提示("正在搜索")    
     22         分支 "断开连接"
     23         蓝牙1.断开连接() '退出处理,释放资源,结束内部处理线程
     24         按钮3.标题="搜索设备"
     25     结束 判断        
     26 结束 事件
     27 事件 主窗口.按下某键(键代码 为 整数型,传址 屏蔽 为 逻辑型)
     28         如果 键代码 = 返回键 则
     29         如果 取启动时间() - 启动时间 >2000 30             弹出提示("再按一次退出程序")
     31             启动时间 = 取启动时间()
     32         否则 
     33             结束程序()
     34         结束 如果
     35     结束 如果
     36 结束 事件
     37 事件 主窗口.创建完毕()
     38     时钟1.时钟周期=0
     39     讯飞语音1.初始化("59f06f73")
     40     讯飞语音1.初始化语音识别()
     41     讯飞语音1.设置语音识别参数(1,真)
     42     讯飞语音1.初始化语音合成()
     43     讯飞语音1.设置语音合成参数(1,50,50,50)
     44     
     45     列表框1.字体大小 = 15
     46     标签2.背景颜色=无色
     47     标签1.背景颜色=无色
     48     列表框1.背景颜色=灰色
     49     蓝牙1.是否存在()
     50     判断 蓝牙1.是否存在()
     51         分支 假
     52             弹出提示("没有检测到蓝牙设备,程序将关闭")
     53             结束程序()
     54         分支 真
     55             判断 蓝牙1.是否已开启()
     56                 分支 假
     57                  蓝牙1.开启蓝牙()
     58             结束 判断            
     59     结束 判断        
     60 结束 事件
     61 事件 蓝牙1.发现设备(设备名称 为 文本型,设备地址 为 文本型,是否已配对 为 逻辑型)
     62     列表框1.添加项目(设备名称 & "/" & 设备地址 & "/" & 是否已配对)    
     63 结束 事件
     64 事件 列表框1.表项被单击(项目索引 为 整数型)
     65     变量 设备信息 为 文本型
     66     变量 文本数组 为 文本型()
     67     变量 设备地址 为 文本型
     68     设备信息 = 列表框1.取项目内容(项目索引)
     69     文本数组 = 分割文本(设备信息,"/")
     70     设备地址 = 文本数组(1)
     71     弹出提示(设备地址)
     72     蓝牙1.连接设备(设备地址)         '连接设备 我看了有些例程是没有的    
     73     弹出提示("正在连接")
     74     蓝牙1.停止搜索()    
     75 结束 事件
     76 事件 蓝牙1.连接完毕(连接结果 为 逻辑型,设备名称 为 文本型,设备地址 为 文本型,连接模式 为 整数型)
     77     变量 设备信息 为 文本型
     78     变量 文本数组 为 文本型()
     79     如果 连接结果 = 真 则
     80         标签2.标题 = "已连接:" & 设备名称 & "-" & 设备地址
     81         按钮3.标题="断开连接"    
     82         弹出提示("连接成功")
     83         时钟1.时钟周期=6000
     84     否则
     85         弹出提示("连接失败")
     86     结束 如果    
     87 结束 事件
     88 
     89 事件 蓝牙1.蓝牙设置完毕(设置结果 为 整数型)
     90     判断 设置结果
     91         分支 1 '开启蓝牙
     92             弹出提示("蓝牙已开启")
     93             蓝牙1.置可被发现() '置可被发现
     94         分支 2    '不开启蓝牙
     95             信息框("信息","蓝牙未被开启,程序将退出!","确定")
     96             结束程序()
     97         分支 3    '置可被发现
     98             弹出提示("蓝牙已设置为可被发现")
     99             蓝牙1.置工作模式(2) '蓝牙聊天模式
    100         分支 4    '不置可被发现
    101             信息框("信息","蓝牙未被设置为可被发现,程序将退出!","确定")
    102             结束程序()
    103     结束 判断    
    104 结束 事件
    105 事件 蓝牙1.收到数据(数据 为 字节型(),设备名称 为 文本型,设备地址 为 文本型)
    106 结束 事件
    107 '''toclassid=70965&book_title=456213&book_content=sfauiasfgufg&ishidden=0&action=gomod&classid=70965&siteid=24233&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320&bt=%E6%8F%90+%E4%BA%A4    
    108     事件 时钟1.周期事件()
    109     型号=手机1.取手机型号() & 到文本(  取秒(取现行时间()))
    110     引号=编辑框1.内容    
    111     多线程1.开始取网页源码("http://back.waphx.com/guessbook/book_list.aspx?siteid=24233&classid=70965&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320","utf-8")
    112     二级返回文本=取指定文本2(一级返回文本,"line1" & 引号 &"><a href=" & 引号 ,引号 & ">")
    113     多线程1.开始取网页源码2(二级返回文本,"utf-8")
    114     终级返回文本=取指定文本2(三级返回文本,"","")
    115     弹出提示(终级返回文本)
    116     判断 取指定文本2(三级返回文本,"","")
    117         分支 "开门"
    118             蓝牙1.发送数据(文本到字节("k","GBK"))
    119             讯飞语音1.开始语音合成("正在执行开门服务")
    120             弹出提示(发送网络数据("http://back.waphx.com/guessbook/admin_WAPadd.aspx","toclassid=70965&book_title="& 型号 &"&book_content="&"【门已打开】"&型号 &"&ishidden=0&action=gomod&classid=70965&siteid=24233&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320&bt=%E6%8F%90+%E4%BA%A4","utf-8",2000))
    121         分支 "关门"
    122             蓝牙1.发送数据(文本到字节("g","GBK"))
    123             讯飞语音1.开始语音合成("正在执行关门服务")
    124             弹出提示(发送网络数据("http://back.waphx.com/guessbook/admin_WAPadd.aspx","toclassid=70965&book_title="& 型号 &"&book_content="&"【门已关闭】"&型号 &"&ishidden=0&action=gomod&classid=70965&siteid=24233&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320&bt=%E6%8F%90+%E4%BA%A4","utf-8",2000))
    125         分支 "开灯"
    126             蓝牙1.发送数据(文本到字节("m","GBK"))
    127             讯飞语音1.开始语音合成("正在执行开灯服务")
    128             弹出提示(发送网络数据("http://back.waphx.com/guessbook/admin_WAPadd.aspx","toclassid=70965&book_title="& 型号 &"&book_content="&"【灯已打开】"& 型号&"&ishidden=0&action=gomod&classid=70965&siteid=24233&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320&bt=%E6%8F%90+%E4%BA%A4","utf-8",2000))
    129         分支 "关灯"
    130             蓝牙1.发送数据(文本到字节("l","GBK"))
    131             讯飞语音1.开始语音合成("正在执行关灯服务")
    132             弹出提示(发送网络数据("http://back.waphx.com/guessbook/admin_WAPadd.aspx","toclassid=70965&book_title="& 型号 &"&book_content="&"【灯已关闭】"&型号 &"&ishidden=0&action=gomod&classid=70965&siteid=24233&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320&bt=%E6%8F%90+%E4%BA%A4","utf-8",2000))
    133         分支 "开风"
    134             蓝牙1.发送数据(文本到字节("f","GBK"))
    135             讯飞语音1.开始语音合成("正在执行开风扇服务")
    136             弹出提示(发送网络数据("http://back.waphx.com/guessbook/admin_WAPadd.aspx","toclassid=70965&book_title="& 型号 &"&book_content="&"【风扇已打开】"& 型号 &"&ishidden=0&action=gomod&classid=70965&siteid=24233&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320&bt=%E6%8F%90+%E4%BA%A4","utf-8",2000))
    137         分支 "关风"
    138             蓝牙1.发送数据(文本到字节("o","GBK"))
    139             讯飞语音1.开始语音合成("正在执行关风扇服务")
    140             弹出提示(发送网络数据("http://back.waphx.com/guessbook/admin_WAPadd.aspx","toclassid=70965&book_title="& 型号 &"&book_content="&"【风扇已关闭】"&型号 &"&ishidden=0&action=gomod&classid=70965&siteid=24233&page=1&sid=D1BD2C713EF464690_3_23240_25313_23240-2-0-0-0-320&bt=%E6%8F%90+%E4%BA%A4","utf-8",2000))
    141         
    142     结束 判断
    143 结束 事件
    144 
    145 事件 多线程1.取网页源码完毕(源码 为 文本型)
    146     一级返回文本=源码
    147 结束 事件
    148 事件 多线程1.取网页源码2完毕(源码 为 文本型)
    149     三级返回文本=源码
    150 结束 事件
    151 
    152 事件 时钟2.周期事件()
    153 结束 事件
    154 
    155 事件 讯飞语音1.语音识别初始化完毕(初始化结果 为 逻辑型)
    156     弹出提示("语音初始化成功")
    157 结束 事件
    158 
    159 事件 讯飞语音1.语音合成初始化完毕(初始化结果 为 逻辑型)
    160     弹出提示("语音合成成功")
    161 结束 事件
    162 
    163 事件 按钮1.被单击()
    164     讯飞语音1.开始语音合成("666666")
    165 结束 事件
    166 
    167 事件 按钮2.被单击()
    168     讯飞语音1.开始语音识别()
    169 结束 事件
    170 
    171 
    172 事件 讯飞语音1.语音识别完毕(识别结果 为 逻辑型,识别内容 为 文本型)
    173     弹出提示(识别内容)
    174 结束 事件
    @青山不移,文笔不息。学习,坚持,梦想青春!
  • 相关阅读:
    【转载】《代码大全2》读书笔记之…
    【转载】使用注解和反射实现通用性…
    【转载】使用注解和反射实现通用性…
    23种设计模式的形象比喻&nbsp;(转载)
    SSH&nbsp;整合-&nbsp;3&nbsp;-&nbsp;add&nbsp;-&nbsp;hibernate
    SSH&nbsp;整合-&nbsp;4&nbsp;-&nbsp;add&nbsp;service_servic…
    SSH&nbsp;整合-&nbsp;5&nbsp;-&nbsp;service_serviceImp…
    SSH&nbsp;整合-&nbsp;6&nbsp;-&nbsp;service_serviceImp…
    SSH&nbsp;整合-&nbsp;6&nbsp;-&nbsp;service_serviceImp…
    Hadoop-2.6.0&nbsp;集群的安装配置
  • 原文地址:https://www.cnblogs.com/pengwenzheng/p/7732367.html
Copyright © 2011-2022 走看看