分类
大小:151.2M更新:2020-08-13
类别:音频播放系统:WinAll
儿童睡前故事电脑版是一款少儿睡前故事-儿童睡前故事大全软件,通过故事学习更容易被接受,更让宝宝觉得有一种安全感,让宝宝知道宝宝即使在睡觉的时候也有爸爸妈妈的陪伴和保护。
软件用的是微软自带的语音包,在软件压缩包当中附带得有。
在网上查阅过,都说XP以后都已经支持了,但是不知道你们用的系统是否被删除过相关的语音包,所以附带了微软的。
暂停键旁边有一个下拉框,如果下拉框是空的,那么就说明你没有安装过,需要安装后才能显示,同时软件也会检测并提醒!
由于之前发表一次说我没有相关原创的信息,这次补上!下面是开发截图和版权截图,如果还不够,那么我只剩下开源这样才行了!反正这个软件也不是什么很难写的东西,开源也行!如果大家喜欢的话!
开发截图
备注:如果大家有更好的想法或语音API,请私信我!或者回帖交流!最后我也不知道过不过审核,干脆直接把源代码贴出来吧!
.版本 2
.支持库 RegEx
.支持库 ESpeechEngine
.支持库 internet
.支持库 iext
.程序集 窗口程序集_启动窗口
.程序集变量 Json, 类_json
.程序集变量 zz, 正则表达式
.程序集变量 搜索, 搜索结果, , "0"
.程序集变量 jd, 机读文本
.程序集变量 d, 文本型, , "0"
.程序集变量 zt, 标签
.子程序 __启动窗口_创建完毕
页数 = “1”
读取数据 (页数)
初始化朗诵 ()
置托盘图标 (#图标, “睡前故事”)
.子程序 读取数据
.参数 页数, 文本型
.局部变量 返回数据, 文本型
.局部变量 临时变量, 文本型
临时变量 = 子文本替换 (#POST数据, “【页数】”, 页数, , , 真)
返回数据 = 到文本 (HTTP读文件 (临时变量))
返回数据 = 子文本替换 (返回数据, “\/”, “/”, , , 真)
处理数据 (返回数据)
.子程序 下一页
.参数 传递页数, 文本型
页数 = 到文本 (到整数 (传递页数) + 10)
.子程序 处理数据
.参数 传输数据, 文本型
.局部变量 title, 文本型, , "0"
.局部变量 img, 文本型, , "0"
.局部变量 url, 文本型, , "0"
.局部变量 description, 文本型, , "0"
.局部变量 i, 整数型
.局部变量 索引, 整数型
Json.解析 (传输数据)
.计次循环首 (Json.成员数 (), i)
加入成员 (title, Json.取通用属性 (“[” + 到文本 (i - 1) + “].title”))
加入成员 (img, Json.取通用属性 (“[” + 到文本 (i - 1) + “].img”))
加入成员 (url, Json.取通用属性 (“[” + 到文本 (i - 1) + “].url”))
加入成员 (description, Json.取通用属性 (“[” + 到文本 (i - 1) + “].description”))
索引 = 超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 到文本 (索引 + 1))
超级列表框1.置标题 (索引, 1, title [i])
超级列表框1.置标题 (索引, 2, description [i])
超级列表框1.置标题 (索引, 3, img [i])
超级列表框1.置标题 (索引, 4, url [i])
.计次循环尾 ()
.子程序 _超级列表框1_被双击, 逻辑型
.参数 横向位置, 整数型
.参数 纵向位置, 整数型
.参数 功能键状态, 整数型
.如果 (超级列表框1.现行选中项 ≠ -1)
标签2.标题 = “《” + 超级列表框1.取标题 (超级列表框1.现行选中项, 1) + “》”
标签4.标题 = “ ” + 超级列表框1.取标题 (超级列表框1.现行选中项, 2)
图片框1.图片 = HTTP读文件 (超级列表框1.取标题 (超级列表框1.现行选中项, 3))
获取故事 (超级列表框1.取标题 (超级列表框1.现行选中项, 4))
.否则
信息框 (“无法获取数据”, 0, “请检查网络通信是否正常?”, )
.如果结束
.子程序 获取故事
.参数 url, 文本型
.局部变量 临时数据, 文本型
.局部变量 i, 整数型
临时数据 = 编码_utf8到gb2312 (到文本 (HTTP读文件 (url)))
zz.创建 (#正则方法, )
搜索 = zz.搜索全部 (临时数据)
.判断开始 (取数组成员数 (搜索) > 0)
编辑框1.内容 = 网页_取文本_dom (搜索 [1].取匹配文本 (临时数据, ))
.默认
.判断结束
.子程序 _滑块条2_位置被改变
滑块条2.选择长度 = 滑块条2.位置
标签3.标题 = “音量:” + 到文本 (滑块条2.位置)
jd.设置声音大小 (滑块条2.位置)
.子程序 _滑块条1_位置被改变
标签1.标题 = “语速:” + 到文本 (滑块条1.位置)
jd.设置语速 (滑块条1.位置)
.子程序 _超级列表框1_右键单击表项
弹出菜单 (功能, , )
.子程序 _获取新数据_被选择
下一页 (页数)
读取数据 (页数)
.子程序 初始化朗诵
.局部变量 i, 整数型
d = jd.列举语音库 ()
.如果 (取数组成员数 (d) > 0)
组合框1.刷新显示 ()
.计次循环首 (取数组成员数 (d), i)
组合框1.插入项目 (i - 1, d [i], )
.计次循环尾 ()
组合框1.现行选中项 = 0
jd.设置语音库 (组合框1.被选择文本)
jd.设置语速 (滑块条1.位置)
jd.设置声音大小 (滑块条2.位置)
.否则
信息框 (“请先安装压缩包中的语言包”, 0, “语言包未安装”, )
.如果结束
.子程序 _按钮2_被单击
.如果 (按钮2.标题 = “朗诵”)
按钮2.标题 = “关闭”
.如果真 (编辑框1.内容 ≠ “”)
jd.文本到语音 (0, 编辑框1.内容, , )
.如果真结束
.否则
按钮2.标题 = “朗诵”
jd.停止发音 ()
.如果结束
.子程序 _按钮3_被单击
.如果 (按钮3.标题 = “暂停”)
按钮3.标题 = “恢复”
jd.暂停发音 ()
.否则
按钮3.标题 = “暂停”
jd.恢复发音 ()
.如果结束
.子程序 _超级列表框1_按下某键, 逻辑型
.参数 键代码, 整数型
.参数 功能键状态, 整数型
.如果真 (键代码 = #F5键)
_获取新数据_被选择 ()
.如果真结束
.子程序 _版权所有_被选择
信息框 (“软件免费试用 版权所有 Mr.Liu ” + #换行符 + #换行符 + “52破解 作者:djlyr”, 0, “版权信息”, )
.子程序 __启动窗口_托盘事件
.参数 操作类型, 整数型
.如果真 (操作类型 = #单击右键)
弹出菜单 (版权, , )
.如果真结束
.版本 2
.全局变量 页数, 文本型
.版本 2
.常量 POST数据, "<文本长度: 94>"
具体内容:https://dynamic.qbaobei.com/dynamic.php?s=/qbaobeimobile/cate_position/cate/1414/star/【页数】
.常量 正则方法, "<文本长度: 36>"
具体内容:<p class="introTit">([\s\S]*?)</div>
最强音乐软件(J.River Media Center)音频播放Mv20.0.84 多语中文特别版
查看海洋视音盒音频播放Mv1.2 绿色版
查看云村音乐【Na出品】音频播放Mv1.0.0 PC版
查看皇室战争背景音乐音频播放M完整版
查看米兔dj音乐网解析音频播放.43M
查看星娱网络收音机音频播放Mv2.0.0.0
查看Wind Chimes音频播放.16Mv2.4.0.0
查看电子配音软件音频播放Mv1.0.2 官方免费版
查看海洋网络收音机音频播放Mv1.0
查看歪歪被封帐号多线查询器音频播放MV8.1最新免费版带补丁
查看Music Thief音乐试听下载工具音频播放Mv1.0.2.3 PC版
查看能说会道英语听力制作专家音频播放Mv5.3.0官方版
查看TTKMusicPlayer播放器音频播放Mv2.8.0.0 免费版
查看mic大评委音频播放Mv3.9.6 官方最新版
查看黑洞热搜播报精灵附支持语音库大全音频播放.47MV1.0绿色免费版
查看IC player 测试版音频播放Mv1.0电脑版
查看德玛西亚主持音效音频播放M
查看跨平台音乐播放器(Amarra Luxe)音频播放Mv4.3.500官方版
查看Last.fm 世界上最大的社交音乐平台音频播放M1.5.4.27091 免费版
查看千千音乐(原百度音乐)音频播放M11.1.6 最新版
查看酷我音乐UWP版客户端音频播放MV3.1.14.0官方版
查看Dj97 QtPlayer音乐播放器音频播放M电脑版
查看被窝声次元电脑版音频播放Mv3.1.0最新版
查看青のララバイ音频播放.00M原版无损
查看点击查看更多