在电脑上说话的脚本
现在的WINDOWS操作系统都有一个 Text-to-Speech 的引擎 简单来说就是把任意英文 转换成人声(电脑合成) 复读出来. 把下面的脚本用记事本存成 speech.vbs: Set voice = CreateObject("SAPI.SpVoice") voice.Rate = 1 voice.Volume = 90 Say = InputBox("Say Something", "Say Something", "I Love you!") If (Len(Say) …