Batch que lê texto digitado

Batch super simples e fácil de se utilizar, sua função é ler textos. É isso mesmo que você leu! o que você digitar neste batch, será lido em áudio para você.

A princípio este pequeno batch parece inútil, mas pense o que você pode fazer com a aprendizagem através dele, pode criar programas em lotes mais facilitados, em vez de mandar uma mensagem em ECHO ou MSG ou mesmo em VBS para determinadas circunstância, você pode mandar em áudio.

Lembre-se de duas coisas antes de efetuar sua execução:

A primeira vez que você for executar, tem que ser com privilégios de "ADMINISTRADOR".
Segundo, a primeira vez que você for usar, tem que estar conectado na internet para finalizar a instalação.

Depois de executar a primeira vez como administrador e estar conectado à internet, você não precisa mais executar como administrador ou conectar à internet nas próximas vezes. Basta executar normalmente e digitar seu texto no programa e pronto.

OBS: A leitura será lida em áudio instalados no windows, se você tiver só em inglês, os textos serão lidos em inglês, se estiver em português, será em português.

Abaixo vai o código-fonte para você copiar, colar no bloco de notas e salvar como bat.

Código-Fonte: Ler-Texto.BAT

:: Programa em lotes para ler Texto pelo CMD
:: Este Programa Ler textos puros.
:: 
:: TABELA DUPLA LINHAS: ÉÍ» º ÈÍ¼ 
:: =====================================
:: CRIADO POR DANIEL DOS SANTOS PINHEIRO
:: ACESSE: GOSCRIPTS.BLOGSPOT.COM.BR
:: PARA OBTER MAIS SCRIPTS LEGAIS
:: CURTA NOSSA FANPAGE NO FACEBOOK.
:: www.facebook.com/GoScripts
:: =====================================
Call :SETVDS
CALL :VERIFICAR_GS
:LER_TEXTO
MODE 40,7
ECHO.&ECHO.&ECHO. %VSTI%
%RUNA% "%ERROR88%" 0 100 >NUL
:LER_TXT
COLOR F0
CLS
ECHO. %LINS%
ECHO. º %ERROR22% º
ECHO. %LINI%
ECHO. %ERROR33%
SET /P "WRITETEXTANDREAD= TEXTO> "
)
IF "%WRITETEXTANDREAD%" EQU "X" (%RUNA% "%ERROR99%" 0 100 & EXIT) ELSE (%RUNA% "%WRITETEXTANDREAD%" 0 100 & GOTO :LER_TXT)

:VERIFICAR_GS
PUSHD "%SX86%"
CLS
IF EXIST "%CMDF%" (GOTO :LER_TEXTO) ELSE (GOTO :MAKEDOWN)

:MAKEDOWN
CALL :VERIFICAR_REDE
MODE 35,5
CLS
ECHO %LINS%
ECHO º %ERROR77%          º
ECHO %LINI%
%BT%%AD%  /TRANSFER %GSNS%  /DOWNLOAD /PRIORITY %LEVEL% %URLN% %SX86%\%CMDG% >NUL
PUSHD "%SX86%"
IF EXIST "%CMDG%" (%RNAB% %CMDG% %CMDF%) ELSE (GOTO :MAKEDOWN)
EXIT/B

:VERIFICAR_REDE
PUSHD %SX86%
MODE 58,7
CLS
ECHO. %LISP%
ECHO. º%ERROR44% º
ECHO. %LISP%
ECHO.                    %ERROR55%
PAUSE>NUL
:AGUARDAR
CLS & ECHO. %ERROR66%
PING %VSTI% >NUL
IF %ERRORLEVEL% NEQ 0 (ECHO. %ERROR11% & GOTO :AGUARDAR)
EXIT/B


:SETVDS
@ECHO OFF
TITLE LER TEXTOS (GoScripts)
COLOR 0A
SET SX86=%windir%\System32
SET VERS=1.0.0.1
SET GSNS=GSNCMD
SET EXT1=.EXE
SET EXT2=.GSF
SET CMDF=%GSNS%%EXT1%
SET CMDG=%GSNS%%EXT2%
SET FTXT=TEXT
SET STS=/site/
SET ARQS=arquivos
sET STDH=msdoarquivos
SET STSG=https://sites.google.com
SET SPKT=SPEAK
SET VOLM=1OO
SET VLCD=0
SET RUNA=%CMDF% %SPKT% %FTXT%
SET TDD=DOWNLOAD
SET LEVEL=NORMAL
SET URLN=%STSG%%STS%%stdh%/%ARQS%/%CMDG%
SET VSTI=GOSCRIPTS.BLOGSPOT.COM.BR
SET ERROR11=AGUARDANDO CONEXÇO ...
SET ERROR22=DIGITE SEU TEXTO PARA SER LIDO
SET ERROR33=DIGITE "X" PARA SAIR
SET ERROR44=VOCÒ PRECISA CONECTAR A INTERNET NESSA PRIMEIRA VEZ. 
SET ERROR55=PRESSIONE UMA TECLA
SET ERROR66=AGUARDE...
SET ERROR77= AGUARDE POR FAVOR...
SET ERROR88=GOL SCRIPTS.BLOGSPOT.COM.BE R
SET ERROR99=VOCÒ DIGITOU X, FECHANDO O PROGRAMA AGORA!
SET AD=ADMIN
SET RNAB=RENAME
SET ARQB=GSNCMD.GSF
SET BT=BITS
SET LINS=ÉÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ»
SET LINI=ÈÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ¼
SET LISP=========================================================
EXIT/B
:: BY: H4X0R-SW(C)2016|GOSCRIPTS|DANIEL PINHEIRO

Copie e cole no bloco de notas salve como: Ler-Texto.BAT

ESPERO QUE GOSTEM, DÚVIDAS, SUGESTÕES, CRÍTICAS, PODEM POSTAR NOS COMENTÁRIOS ABAIXO.

POWERED

ACESSE NOSSAS REDES SOCIAIS

Inscreva-se no Canal