批处理版的语音报时代码
其中用到了第三方工具 wav.exe
代码读秒部分 没找到解决读秒不准的方法
代码没有上下午
但上下午的语音已打包进附件- @echo off
- title 语音报时
- mode con: cols=26 lines=4
-
- :::::::::::::::::::::::::::::::::::::::::::
- :: ::
- :: 新手练习作品 欢迎大家多提建议 ::
- :: ::
- :: 一起讨论学习 ::
- :: ::
- :: 建议邮箱 sc.419@qq.com ::
- :: ::
- :::::::::::::::::::::::::::::::::::::::::::
-
-
- :读年
- echo.
- echo %date:~0,4%年%date:~5,2%月%date:~8,2%日 %date:~11,3%
- echo %time:~0,2%点%time:~3,2%分
- wav %date:~0,1%
- wav %date:~1,1%
- wav %date:~2,1%
- wav %date:~3,1%
- wav 年
-
-
-
- :读月
- if %date:~5,1% == 0 goto 月
- if %date:~5,1% == 1 wav 十&goto 月
- wav %date:~5,1%
- wav 十
- :月
- if %date:~6,1% == 0 wav 月&goto 读日
- wav %date:~6,1%
- wav 月
-
-
-
- :读日
- if %date:~8,1% == 0 goto 日
- if %date:~8,1% == 1 wav 十&goto 日
- wav %date:~8,1%
- wav 十
- :日
- if %date:~9,1% == 0 wav 日&goto 读星期
- wav %date:~9,1%
- wav 日
-
-
-
- :读星期
- wav 星期
- if %date:~13,1% == 一 wav 1
- if %date:~13,1% == 二 wav 2
- if %date:~13,1% == 三 wav 3
- if %date:~13,1% == 四 wav 4
- if %date:~13,1% == 五 wav 5
- if %date:~13,1% == 六 wav 6
- if %date:~13,1% == 日 wav 日
-
-
-
- :读点
- if %time:~0,2% == 00 wav 0&wav 点&goto 读分
- if %time:~0,1% == 0 goto 点
- if %time:~0,1% == 1 wav 十&goto 点
- wav %time:~0,1%
- wav 十
- :点
- if %time:~1,1% == 0 wav 点&goto 读分
- wav %time:~1,1%
- wav 点
-
-
-
- :读分
- if %time:~3,2% == 00 wav 0&wav 分&goto 读秒
- if %time:~3,1% == 0 wav 0&goto 分
- if %time:~3,1% == 1 wav 十&goto 分
- wav %time:~3,1%
- wav 十
- :分
- if %time:~4,1% == 0 wav 分&goto 读秒
- wav %time:~4,1%
- wav 分
-
-
-
- :读秒
- set /a mm = %time:~6,2%+1
- :没找到解决读秒不准的方法
- cls
- echo.
- echo %mm%秒
- if %time:~6,2% == 00 wav 0&wav 秒&goto :eof
- if %time:~6,1% == 0 wav 0&goto 秒
- if %time:~6,1% == 1 wav 十&goto 秒
- wav %time:~6,1%
- wav 十
- :秒
- if %time:~7,1% == 0 wav 秒&goto :eof
- wav %time:~7,1%
- wav 秒
复制代码 下载地址 |