复制代码 代码如下:
ECHO OFF
REM QBFC Project Options Begin
REM HasVersionInfo: No
REM Companyname:
REM Productname:
REM Filedescription:
REM Copyrights:
REM Trademarks:
REM Originalname:
REM Comments:
REM Productversion: 0. 0. 0. 0
REM Fileversion: 0. 0. 0. 0
REM Internalname:
REM Appicon:
REM QBFC Project Options End
ECHO ON
@echo off
title 读单词和句子的软件 By:Leeleeon QQ:646568194
echo ------------------------------------------------------------------
echo 欢迎使用本软件
echo ------------------------------------------------------------------
echo By:Leeleeon QQ:646568194
echo ------------------------------------------------------------------
echo %date% %time:~0,8%
echo ------------------------------------------------------------------
:main
echo.
set /p word=输入单词或句子:
:read
mshta vbscript:CreateObject("SAPI.SpVoice").speak("%word%")(Window.close)
:choice
echo.
echo 1.重新读一遍
echo 2.输入新单词读
echo 3.清空屏幕
echo 4.退出
set /p ch=选择你要做的事:
If "%ch%"=="1" goto read
If "%ch%"=="2" goto main
If "%ch%"=="3" (
cls
goto choice
)
If "%ch%"=="4" goto end
echo.
echo 你输入的信息有误
goto choice
:end
echo.
echo 感谢你使用本软件
echo QQ:646568194
pause >nul
ECHO OFF
REM QBFC Project Options Begin
REM HasVersionInfo: No
REM Companyname:
REM Productname:
REM Filedescription:
REM Copyrights:
REM Trademarks:
REM Originalname:
REM Comments:
REM Productversion: 0. 0. 0. 0
REM Fileversion: 0. 0. 0. 0
REM Internalname:
REM Appicon:
REM QBFC Project Options End
ECHO ON
@echo off
title 读单词和句子的软件 By:Leeleeon QQ:646568194
echo ------------------------------------------------------------------
echo 欢迎使用本软件
echo ------------------------------------------------------------------
echo By:Leeleeon QQ:646568194
echo ------------------------------------------------------------------
echo %date% %time:~0,8%
echo ------------------------------------------------------------------
:main
echo.
set /p word=输入单词或句子:
:read
mshta vbscript:CreateObject("SAPI.SpVoice").speak("%word%")(Window.close)
:choice
echo.
echo 1.重新读一遍
echo 2.输入新单词读
echo 3.清空屏幕
echo 4.退出
set /p ch=选择你要做的事:
If "%ch%"=="1" goto read
If "%ch%"=="2" goto main
If "%ch%"=="3" (
cls
goto choice
)
If "%ch%"=="4" goto end
echo.
echo 你输入的信息有误
goto choice
:end
echo.
echo 感谢你使用本软件
echo QQ:646568194
pause >nul
华山资源网 Design By www.eoogi.com
广告合作:本站广告合作请联系QQ:858582 申请时备注:广告合作(否则不回)
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
免责声明:本站资源来自互联网收集,仅供用于学习和交流,请遵循相关法律法规,本站一切资源不代表本站立场,如有侵权、后门、不妥请联系本站删除!
华山资源网 Design By www.eoogi.com
暂无评论...
更新日志
2024年11月18日
2024年11月18日
- 【雨果唱片】中国管弦乐《鹿回头》WAV
- APM亚流新世代《一起冒险》[FLAC/分轨][106.77MB]
- 崔健《飞狗》律冻文化[WAV+CUE][1.1G]
- 罗志祥《舞状元 (Explicit)》[320K/MP3][66.77MB]
- 尤雅.1997-幽雅精粹2CD【南方】【WAV+CUE】
- 张惠妹.2007-STAR(引进版)【EMI百代】【WAV+CUE】
- 群星.2008-LOVE情歌集VOL.8【正东】【WAV+CUE】
- 罗志祥《舞状元 (Explicit)》[FLAC/分轨][360.76MB]
- Tank《我不伟大,至少我能改变我。》[320K/MP3][160.41MB]
- Tank《我不伟大,至少我能改变我。》[FLAC/分轨][236.89MB]
- CD圣经推荐-夏韶声《谙2》SACD-ISO
- 钟镇涛-《百分百钟镇涛》首批限量版SACD-ISO
- 群星《继续微笑致敬许冠杰》[低速原抓WAV+CUE]
- 潘秀琼.2003-国语难忘金曲珍藏集【皇星全音】【WAV+CUE】
- 林东松.1997-2039玫瑰事件【宝丽金】【WAV+CUE】