中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

中国DOS联盟论坛
现在时间是 2026-08-03 08:56
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 如何让声音和显示字同步进行 查看 923 回复 5
楼 主 如何让声音和显示字同步进行 发表于 2007-02-12 10:54 ·  中国 云南 昆明 电信
初级用户
积分 48
发帖 17
注册 2007-02-11 10:02
19年会员
UID 79221
性别 男
状态 离线
mshta vbscript:CreateObject("SAPI.SpVoice").Speak("大家来看看")(Window.close)

set line="大家来看看"
for /l %%i in (0,1,5) do (
set /p=!line:~%%i,1!<nul
ping/n 1 127.1>nul
)

这两段代码如何让声音和显示字同步进行
2 发表于 2007-02-12 13:06 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
把阅读那段插入for中稍加修改一个个字读就OK
3 发表于 2007-02-12 14:20 ·  中国 陕西 西安 电信
铂金会员
★★★★
积分 5,212
发帖 2,478
注册 2007-02-08 23:39
19年会员
UID 79003
性别 男
状态 离线
我怎么听不到声音?
4 发表于 2007-02-13 22:28 ·  中国 云南 昆明 电信
初级用户
积分 48
发帖 17
注册 2007-02-11 10:02
19年会员
UID 79221
性别 男
状态 离线
Originally posted by zh159 at 2007-2-12 12:06 AM:
把阅读那段插入for中稍加修改一个个字读就OK


请问下二楼,如何把阅读那段插入for中
5 发表于 2007-02-13 22:58 ·  中国 广西 玉林 博白县 电信
金牌会员
★★★★
积分 3,687
发帖 1,467
注册 2005-08-08 12:00
20年会员
UID 44210
状态 离线
@echo off
setlocal EnableDelayedExpansion
set "line=大家来看看"
for /l %%i in (0,1,5) do (
set /p=!line:~%%i,1!<nul
mshta vbscript:CreateObject("SAPI.SpVoice").Speak("!line:~%%i,1!")(Window.close)
ping/n 1 127.1>nul
)


@echo off
set "line=大家来看看"
:loop
set line_=%line:~0,1%&set line=%line:~1%
set /p=%line_%<nul
mshta vbscript:CreateObject("SAPI.SpVoice").Speak("%line_%")(Window.close)
ping/n 1 127.1>nul
if not "%line%" == "" goto loop
6 发表于 2007-02-14 00:03 ·  中国 甘肃 兰州 电信
金牌会员
★★★★
积分 4,103
发帖 1,744
注册 2006-01-20 13:00
20年会员
UID 49241
性别 男
来自 甘肃.临泽
状态 离线
读不出中文的吧?
论坛跳转: