Отправить текст в переводчик Google для озвучивания

[Zaramot]

Версия AutoIt: 3.3.6.1

Описание:
Нужно сделать скрипт который бы отправлял текст в "Переводчик Google" для того что-бы его озвучили.

Примерно так:

$Text = InputBox('Google Translate', 'Введите текст что-бы его озвучить')
If @error then
	Exit
Else
	;отправка
EndIf
;...

Примечания:
Нужно это всё реадизовать без браузера.

P.S. Это вообще - ВОЗМОЖНО ?

 

[beliy]

Google translate API- http://code.google.com/intl/ru-RU/apis/language/translate/v2/getting_started.html
+готовые наброски:
http://www.autoitscript.com/forum/topic/65961-google-translator/
http://www.autoitscript.com/forum/topic/79606-using-google-to-translate-text/
http://www.autoitscript.com/forum/topic/123260-google-translate-and-cr-lf/

 

[madmasles]

Zaramot,
Попробуйте так:

#include <Sound.au3>
#include <File.au3>
#include <Encoding.au3>

$fRus = False
$fEn = False

$sStringRus = 'Это вполне возможно, слушайте.'
$sStringEn = 'It is possible, listen up.'

$sUrlRus = 'http://translate.google.ru/translate_tts?ie=UTF-8&q=' & _Encoding_URLToHex($sStringRus) & '&tl=ru'
$sUrlEn = 'http://translate.google.ru/translate_tts?ie=UTF-8&q=' & _Encoding_URLToHex($sStringEn) & '&tl=en'

$sFileRus = _TempFile(@TempDir, 'rus_', '.mp3')
$sFileEn = _TempFile(@TempDir, 'en_', '.mp3')

$hDownload = InetGet($sUrlRus, $sFileRus, 17, 1)
Do
	Sleep(20)
Until InetGetInfo($hDownload, 2)
If Not InetGetInfo($hDownload, 4) Then $fRus = True
InetClose($hDownload)

$hDownload = InetGet($sUrlEn, $sFileEn, 17, 1)
Do
	Sleep(20)
Until InetGetInfo($hDownload, 2)
If Not InetGetInfo($hDownload, 4) Then $fEn = True
InetClose($hDownload)

If $fRus Then
	$aSoundRus = _SoundOpen($sFileRus)
	If Not @error Then
		_SoundPlay($aSoundRus, 1)
		_SoundClose($aSoundRus)
		Sleep(500)
	EndIf
EndIf
If $fEn Then
	$aSoundEn = _SoundOpen($sFileEn)
	If Not @error Then
		_SoundPlay($aSoundEn, 1)
		_SoundClose($aSoundEn)
	EndIf
EndIf
FileDelete($sFileRus)
FileDelete($sFileEn)

PS
Там, кажется, ограничение до 100 символов.

 

[Zaramot]

Спасибо madmasles, ваш код - то что нужно. :beer:

AZJIO, beliy спасибо...

P.S. madmasles, если бы ещё обойтись без сторонних файлов (запись во временную папку, в mp3 файл). ;)

 

[madmasles]

Zaramot [?]

если бы ещё обойтись без сторонних файлов

Этого я не могу сделать. Пробовал, не хватает квалификации. Это, ИМХО, за 5 минут сможет сделать Yashied.

 

[CreatoR]

Уже не работает, есть у кого то другая рабочая версия?