1 (изменено: Yurachb, 2018-08-23 10:43:35)

Тема: Напоминание о дне недели

Напоминание о текущем дне недели.
Звуковые файлы взяты давно из переводчика от Гугл. Если у кого есть файлы лучшие, опубликуйте. Также, если есть, опубликуйте ссылку на подобный ресурс...

Post's attachments

days.7z 21.91 kb, 12 downloads since 2018-08-23 

You don't have the permssions to download the attachments of this post.

2 (изменено: Yurachb, 2018-08-24 09:39:42)

Re: Напоминание о дне недели

stealzy пишет
Планируется ли в следующей версии сделать напоминание о текущем часе?

В самом файле информация об этом есть.

Я много лет пользуюсь, и это оказалось весьма полезным.

В моей личной версии есть hta дополнение, напоминающее о событии и о оставшемся до него времени, но не хватает некоторых слов, для чего тему и опубликовал и попросил помочь найти „места” озвучивания слов...

3

Re: Напоминание о дне недели

Для чтения по-русски в win10 можно использовать объект SAPI.SpVoice, а в Win7 SPEECH.SpVoice.

4 (изменено: Yurachb, 2018-08-24 12:13:23)

Re: Напоминание о дне недели

Скачал „Елена”, но сценарий VBScript.vbs говорит:
Ошибка: Не удается найти класс программируемых объектов с именем "SPEECH.SpVoice".
Тогда как озвучивание переводчика 'xetranslator' работает.
Впрочем, такой звук, в сравнении с гугловским или с микрофонным, совсем не годится.
Спасибо, конечно, но, к сожалению, вопрос не снят.

5

Re: Напоминание о дне недели

Надо установить ещё:
https://www.microsoft.com/en-us/downloa … x?id=27225
Если Елена не устраивает, то погуглите другие голоса.

6 (изменено: Yurachb, 2018-09-19 17:59:23)

Re: Напоминание о дне недели

Установил компонент Speech Platform – файл SpeechPlatformRuntime.msi
Прямая ссылка (x64):
https://yadi.sk/d/FBI8vqNwZbPaR
и всё заработало, но голос слишком глухой.

Русский голос Елена прямая ссылка:
https://yadi.sk/d/Y-axw4ZnZbPoS

На семёрке тоже работает, но через транслит:
CreateObject("Sapi.SpVoice").Speak"Privet"

7

Re: Напоминание о дне недели

https://harposoftware.com/en/russian/24 … Voice.html

8

Re: Напоминание о дне недели

Yurachb, как альтернативу можно использовать WMPlayer.OCX (вроде как он присутствует в Win начиная с XP) в совмещении с google translate. К тому же можно сохранить фразы через XMLHTTP/WINHTTP + ADODB.Stream для кэша.

textToSpeech.wsf


<?xml version="1.0"?>
<job>
	<script language="vbscript">
	<![CDATA[
	Dim vDate
	vDate = Now
	vDate = "Сегодня " & WeekDayName(WeekDay(vDate)) & " " & FormatDateTime(vDate,vbShortDate) & " " & FormatDateTime(vDate,vbShortTime)
	]]>
	</script>
	<script language="jscript">
	<![CDATA[
	
	textToSpeech(vDate)
	
	function textToSpeech(text, language){
		text = String(text||"")
		with(new ActiveXObject("WMPlayer.OCX")){
			settings.volume = 100
			url = "https://translate.google.com/translate_tts?ie=UTF-8&client=tw-ob&q=" + encode(text) + "&tl=" + encode(language||"ru")
			while(playState != 1){
				WScript.Sleep(100)
			}
		}
		function encode(s){
			return encodeURIComponent(s).replace(/%20/g,"+")
		}
	}
	]]>
	</script>
</job>
Передумал переделывать мир. Пашет и так, ну и ладно. Сделаю лучше свой !