E4A5 易安卓和单片机keil串口通讯mini理疗仪项目代码_易安卓 蓝牙源码

一、软件E4A5 APP部署方法

•       E4A5的部署文件有两个，后缀为e4a为编程文件，技术人员代码编辑文件，部署文件为apk。使用E4A5时候在设置处可以设置png格式的图标以及apk文件名，在调试程序前，需要下载雷电模拟器作为手机模拟发生器（官网可以下载），E4A5为中文编程，其APK文件通过QQ附件形式可以直接下载安装在手机上，有些手机为了安全会在QQ下载时候后缀名改了，这个时候在手机默认的文档里找到该APK，将后缀名修改为APK后可以下载安装，下载前由于签字唯一性，需要将之前的程序先卸载，切记。

• 二、软件飞讯语音功能技术部署方法

•      讯飞语音组件在E4A5的example例子文件里中级历程有例子，在编程的媒体类软件处可以找到，同时也需要在扩展库找到权限操作，将例程里将里面的libs\arm64-v8a\libmsc.so 和 libs\armeabi-v7a\libmsc.so 文件导入到E4A左侧的工程里的SO库中,并将Msc.jar文件导入到工程里的JAR包中。然后讯飞语音可以用，如果手机有拦截警告，可以予以信任，讯飞语音的准确度一直在平台更新，准确率达90%。但是有一点需要注意，就是识别结束时候以逗号结束，所以一定在代码要加上“。”比如：时间设置为10分钟。

• 核心代码：
   事件 窗口1.创建完毕()
  	如果 权限操作1.取系统版本号()>=23 则
  		权限操作1.申请全部权限()
  	结束 如果
  	讯飞语音1.初始化("5cf517a5") '！！！请替换成你自己的APPID,并到左侧的工程选项卡中的  引入SO库  那里替换你自己申请到的SDK开发包中的libmsc.so库文件和Msc.jar文件
  	讯飞语音1.初始化语音识别()
  	讯飞语音1.设置语音识别参数(1,真)
  	讯飞语音1.初始化语音合成()
  	讯飞语音1.设置语音合成参数(1,50,50,50)
  结束 事件
  事件 讯飞语音1.语音识别初始化完毕(初始化结果 为 逻辑型)
  	如果 初始化结果 = 真 则
  		语音识别.可用=真
  		弹出提示("语音识别初始化成功")
  	否则	
  	语音识别.可用=假
  		弹出提示("语音识别初始化失败")
  	结束 如果
  结束 事件
  事件 讯飞语音1.语音合成初始化完毕(初始化结果 为 逻辑型)
  	如果 初始化结果 = 真 则
  		
  		弹出提示("语音合成初始化成功")
  	否则	
  		弹出提示("语音合成初始化失败")
  	结束 如果
  结束 事件
  事件 语音识别.被单击()
  讯飞语音1.开始语音识别()
  结束 事件
  事件 讯飞语音1.语音识别完毕(识别结果 为 逻辑型,识别内容 为 文本型)
  	变量 分割 为 文本型()
  	如果 识别结果 = 真 则
  		分割 = 分割文本(识别内容,"\n")
  		如果 取数组下标(分割,1) > 0 则
  		
  			如果 分割(0)="时间设置为10分钟。" 则			
  			分=10
  		   结束 如果
  		   如果 分割(0)="时间设置为20分钟。" 则
  			分=20
  		    结束 如果
  		    如果 分割(0)="时间设置为30分钟。" 则
  			分=30
  		    结束 如果
  	        如果 分割(0)="强度增大。" 则
  			    强度=强度+1
  			    如果 到数值(强度) > 9 或 到数值(强度) < 0 则
  			    弹出提示("请输入0-9数字" )
  				强度=强度-1
  			    结束 如果	
  			结束 如果
  			如果 分割(0)="强度减小。" 则
  				 强度=强度-1
  				如果 到数值(强度) > 9 或 到数值(强度) < 0 则
  			    弹出提示("请输入0-9数字" )
  				强度=强度+1
  			    结束 如果	 
  			结束 如果
  			如果 分割(0)="模式选择为针灸模式。" 则
  			模式="针灸模式"
  		    结束 如果
  			如果 分割(0)="模式选择为腰部模式。" 则
  			模式="腰部模式"
  		    结束 如果
  			如果 分割(0)="模式选择为腿部模式。" 则
  			模式="腿部模式"
  		    结束 如果
  			如果 分割(0)="模式选择为脑部模式。" 则
  			模式="脑部模式"
  		    结束 如果
  			如果 分割(0)="启动。" 则			
  			  启动状态=1
  	           如果 分 > 0 则
  		       秒=59
  		       毫秒=100
  		       分=分-1
  		       时间设置.可用=假
  		       强度设置.可用=假
  		       模式选择.可用=假
  		       蓝牙1.发送数据(文本到字节(启动状态,"GBK"))
  		       如果 分<10 则
  			
  			   蓝牙1.发送数据(文本到字节(",0"&分,"GBK"))
  			   否则
  			   蓝牙1.发送数据(文本到字节(","&分,"GBK"))
  		       结束 如果
  		       如果 秒<10 则
  			
  			   蓝牙1.发送数据(文本到字节(",0"&秒,"GBK"))
  			   否则
  			   蓝牙1.发送数据(文本到字节(","&秒,"GBK"))
  		       结束 如果
  	 
  	           蓝牙1.发送数据(文本到字节(","&强度,"GBK"))
  	           蓝牙1.发送数据(文本到字节(","&模式序号,"GBK"))
  		       启动.可用=假
  		      按钮暂停.可用=真
                时钟1.时钟周期 = 1
  	          结束 如果
  	          如果 分 = 0 则
  		     弹出提示("请先设置时间")
  	         结束 如果
  		结束 如果
  		如果 分割(0)="暂停。" 则			
  			如果 按钮暂停.标题="暂停" 则
  		   按钮暂停.标题="继续"
  		   时间设置.可用=真
  		   强度设置.可用=真
  		   模式选择.可用=真
  		
  		   时钟1.时钟周期 = 0
  		   启动状态=2 
  	     否则
  	       时钟1.时钟周期 = 1
  		   按钮暂停.标题="暂停"
  		   时间设置.可用=假
  		   强度设置.可用=假
  		   模式选择.可用=假
  		   启动状态=1
  	     结束 如果
  	
  	       蓝牙1.发送数据(文本到字节(启动状态,"GBK"))
  		 如果 分<10 则
  			
  			蓝牙1.发送数据(文本到字节(",0"&分,"GBK"))
  			否则
  			蓝牙1.发送数据(文本到字节(","&分,"GBK"))
  		  结束 如果
  		  如果 秒<10 则
  			
  			蓝牙1.发送数据(文本到字节(",0"&秒,"GBK"))
  			否则
  			蓝牙1.发送数据(文本到字节(","&秒,"GBK"))
  		   结束 如果
  	       蓝牙1.发送数据(文本到字节(","&强度,"GBK"))
  	       蓝牙1.发送数据(文本到字节(","&模式序号,"GBK"))
  	    结束 如果  
  		如果 分割(0)="停止。" 则			
  			秒 = 0
              分 = 0
              时 = 0
  	        强度=0
  	        启动状态=0
  	        时间设置.可用=真
  		   强度设置.可用=真
  		   模式选择.可用=真
  	       蓝牙1.发送数据(文本到字节(启动状态,"GBK"))
  		   蓝牙1.发送数据(文本到字节(",0"&分,"GBK"))
  		
  	        蓝牙1.发送数据(文本到字节(",0"&秒,"GBK"))
  	        蓝牙1.发送数据(文本到字节(","&强度,"GBK"))
  	        蓝牙1.发送数据(文本到字节(","&模式序号,"GBK"))
  	        
  	       启动.可用=真
  	       按钮暂停.可用=假
  		结束 如果   
  	        标签1.标题 = "时间："&到文本(时) & ":" & 到文本(分) & ":" & 到文本(秒)&"\n"&"强度："&到文本( 强度 )&"  "&"模式："&模式
  		结束 如果
  		弹出提示(分割(0))	
  	否则	
  		弹出提示("识别失败")
  	结束 如果
  结束 事件