ae galera to com uma duvida é assim
quero faze um bat em que as letras vaoaparecendo uma por uma
eu achei um bat no forum tentei analiza ele mais nao consegui
o bat é esse
@echo off
COLOR 2A
:INI
FOR /L %%W IN (14,1,75) DO MODE CON:LINES=1 COLS=%%W
FOR /L %%W IN (1,1,35) DO MODE CON:COLS=75 LINES=%%W
title calculando com Boss-Head
call:maq Bem vindo a calculadora Boss-Head
echo.
echo.
call:maq Digite a opera‡Æo matem tica que deseja realizar
echo.
echo.
echo.
call:maq 1---Somar
call:maq 2---Subtrair
call:maq 3---Multiplicar
call:maq 4---Dividir
call:maq 5---Teorema de pitagoras
call:maq 6---Extrair hipotemusa de um angulo em graus
call:maq 7---Passar de Hexadecimal a Decimal
call:maq 8---Elevar um numero a a 2
call:maq 9---Elevar um numero a a 3
call:maq 10--Elevar um numero a a 4
call:maq 11--Elevar um numero al a 5
call:maq 12--Passar um numero de graus sexagemal a radiano
call:maq 13--Passar um numero de radiano a graus sexagemal
call:maq 14--Extrair os valores das funcoes trigonom‚tricas de 30 45 e 60 graus
call:maq 15--Extrair o porcentagem de um numero
echo.
set /p opc=Qual ‚ a seua op‡Æo:
if %opc%==1 (goto somar)
if %opc%==2 (goto subtrair)
if %opc%==3 (goto multiplicar)
if %opc%==4 (goto dividir)
if %opc%==5 (goto pitagoras)
if %opc%==6 (goto semo)
if %opc%==7 (goto decimal)
if %opc%==8 (goto quadrado)
if %opc%==9 (goto cubo)
if %opc%==10 (goto elevar)
if %opc%==11 (goto alevares)
if %opc%==12 (goto radiano)
if %opc%==13 (goto sexagemal)
if %opc%==14 (goto funcoes)
if %opc%==15 (goto porcentagem)
:porcentagem
Set /p radi= 1 numero :
echo.
Set /p rad= 2 Segundo numero :
echo.
Set /a Res= (radi*rad)/100
msg * sua porcentagem ‚ = %res%
pause
goto goto exit
:funcoes
cls
set /p pass= escreva a fun‡Æo trigonometrica e os graus para saber seu valor =
set num=1
if [%pass%]==[] echo Boss-Head&pause > nul&goto memu
set pass=%pass:semo30=1/2%
set pass=%pass:semo45=raiz de 2 /2%
set pass=%pass:semo60=raiz de 3 /2%
set pass=%pass:cosemo30=raiz de 3 /2%
set pass=%pass:cosemo45=raiz de 2 /2%
set pass=%pass:cosemo60=1/2%
set pass=%pass:tangemte30=raiz de 3/2%
set pass=%pass:tangemte45=1%
set pass=%pass:tangemte60=raiz de 3%
set pass=%pass:cotangemte30=raiz de 3%
set pass=%pass:cotangemte45=1%
set pass=%pass:cotangemte60=raiz de 3 /3%
set pass=%pass:secante30=2 raiz de 3/3%
set pass=%pass:secante45=raiz de 2%
set pass=%pass:secante60=2%
set pass=%pass:cosecante30=2%
set pass=%pass:cosecante45=raiz de 2%
set pass=%pass:cosecante60=2 raiz de 3 /2%
echo.
echo.
echo.
echo.
echo.
call:maq processando informa‡Æo....
ping -n 3 localhost >nul
cls
msg * Este ‚ o valor da fun‡Æo ====== %pass%
goto exit
:radiano
cls
set /p var=Escreva um numero em graus exagesimal.
call:maq aqui est o resultado
set /a reseultado=%var% / 180
set /a var1=%reseultado% / 3.141692
msg * aqui est o resultado em radiano = %var1%
goto exit
:sexagemal
cls
set /p var=Escreva um numero em radiano
call:maq aqui est o resultado
set /a reseultado=%var% * 180
set /a var1=%reseultado% / 3.141692
msg * aqui est o resultado em graus sexagemal = %var1%
goto exit
:somar
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero.
cls
set /a reseultado=%var% + %var1%
call:maq %reseultado%
pause
goto exit
:subtrair
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero.
call:maq reseultado
set /a reseultado=%var% - %var1%
call:maq %reseultado%
pause
goto exit
:multiplicar
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero
call:maq reseultado
set /a reseultado=%var% * %var1%
call:maq %reseultado%
pause
goto exit
:dividir
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero.
call:maq aqui est o resultado
set /a reseultado=%var% / %var1%
call:maq %reseultado%
pause
goto exit
:semo
cls
set /p var=Coloque um angulo em graus.
set /a muriba=%var% * 2 * 3.1416 /360
msg * esta ‚ seu hipotemusa = %muriba%
goto exit
:pitagoras
cls
set /p c1=Coloque valor de um cateto
set /p c2=Escreva valor do outro cateto
set /a reseultado= %c1%*%c1%+%c2%*%c2%
call:maq %reseultado%
:nas
set /a cont=cont+1
set /a multi=cont*cont
if %multi%==%reseultado% echo Raiz: %cont%&pause&goto:EOF
if %multi% GTR %reseultado% echo o numero nÆo tem raiz inteira &pause&goto:EOF
goto nas
pause
goto exit
:decimal
set /p num=Coloque um numero Hexadecimal para passar para Decimal:
set /a num2=%num%/16
set /a res=%num2%*16
Set /a r=%num%-%res%
if %num2%==10 (set num2=A)
if %num2%==11 (set num2=B)
if %num2%==12 (set num2=C)
if %num2%==13 (set num2=D)
if %num2%==14 (set num2=E)
if %num2%==15 (set num2=F)
:bucle
if %num2% GTR 16 (goto dep) else (goto sig)
:dep
set /a a=%num2%/16
set /a b=%a%*16
set /a c=%num2%-%b%
if %c%==0 (set num2=%a%0)
if %c%==1 (set num2=%a%1)
if %c%==2 (set num2=%a%2)
if %c%==3 (set num2=%a%3)
if %c%==4 (set num2=%a%4)
if %c%==5 (set num2=%a%5)
if %c%==6 (set num2=%a%6)
if %c%==7 (set num2=%a%7)
if %c%==8 (set num2=%a%8)
if %c%==9 (set num2=%a%9)
if %c%==10 (set num2=%a%A)
if %c%==11 (set num2=%a%B)
if %c%==12 (set num2=%a%C)
if %c%==13 (set num2=%a%D)
if %c%==14 (set num2=%a%E)
if %c%==15 (set num2=%a%F)
:sig
if %r%==0 (echo o Resultado ‚ %num2%0 && pause > nul && goto :exit)
if %r%==1 (echo o Resultado ‚ %num2%1 && pause > nul && goto :exit)
if %r%==2 (echo o Resultado ‚ %num2%2 && pause > nul && goto :exit)
if %r%==3 (echo o Resultado ‚ %num2%3 && pause > nul && goto :exit)
if %r%==4 (echo o Resultado ‚ %num2%4 && pause > nul && goto :exit)
if %r%==5 (echo o Resultado ‚ %num2%5 && pause > nul && goto :exit)
if %r%==6 (echo o Resultado ‚ %num2%6 && pause > nul && goto :exit)
if %r%==7 (echo o Resultado ‚ %num2%7 && pause > nul && goto :exit)
if %r%==8 (echo o Resultado ‚ %num2%8 && pause > nul && goto :exit)
if %r%==9 (echo o Resultado ‚ %num2%9 && pause > nul && goto :exit)
if %r%==10 (echo o Resultado ‚ %num2%A && pause > nul && goto :exit)
if %r%==11 (echo o Resultado ‚ %num2%B && pause > nul && goto :exit)
if %r%==12 (echo o Resultado ‚ %num2%C && pause > nul && goto :exit)
if %r%==13 (echo o Resultado ‚ %num2%D && pause > nul && goto :exit)
if %r%==14 (echo o Resultado ‚ %num2%E && pause > nul && goto :exit)
if %r%==15 (echo o Resultado ‚ %num2%F && pause > nul && goto :exit)
:quadrado
cls
call:maq Coloque o numero para elevar a 2:
set/p quadrado=
set /a quadrado2=%quadrado% * %quadrado%
cls
call:maq reseultado:%quadrado2%
pause
goto exit
:cubo
cls
call:maq Coloque o numero para elevar a 3:
set/p cubo=
set /a cubo2=%cubo% * %cubo% * %cubo%
cls
call:maq reseultado:%cubo2%
pause
goto exit
:elevar
cls
call:maq Coloque o numero para elevar a 4:
set/p cuatro=
set /a cuatro2=%cuatro% * %cuatro% * %cuatro% * %cuatro%
cls
call:maq reseultado:%cuatro2%
pause
goto exit
:alevares
cls
call:maq Coloque o numero para elevar a 5:
set/p cinco=
set /a cinco2=%cinco% * %cinco% * %cinco% * %cinco% * %cinco%
cls
call:maq reseultado:%cinco2%
pause
goto exit
:maq
;;if,not,defined,.m_,set.m_=%*&if,not,defined,.m_,goto:eof
;;<nul,set/p.m_=%.m_:~0,1%&>nul,ping -n 1 0&set.m_=%.m_:~1%&if,defined,.m_ (goto:maq),else,(echo.)
;;goto:eof
:exit
FOR /L %%W IN (35,-2,1) DO MODE CON:COLS=75 LINES=%%W
FOR /L %%W IN (75,-2,14) DO MODE CON:LINES=1 COLS=%%W
é uma calculadora do boss quero sabe como se faz no comeso que vai aparecendo seja bem vindo e tals
que vai aparecendo letra por letra
ajuda ae galera vlw
quero faze um bat em que as letras vaoaparecendo uma por uma
eu achei um bat no forum tentei analiza ele mais nao consegui
o bat é esse
@echo off
COLOR 2A
:INI
FOR /L %%W IN (14,1,75) DO MODE CON:LINES=1 COLS=%%W
FOR /L %%W IN (1,1,35) DO MODE CON:COLS=75 LINES=%%W
title calculando com Boss-Head
call:maq Bem vindo a calculadora Boss-Head
echo.
echo.
call:maq Digite a opera‡Æo matem tica que deseja realizar
echo.
echo.
echo.
call:maq 1---Somar
call:maq 2---Subtrair
call:maq 3---Multiplicar
call:maq 4---Dividir
call:maq 5---Teorema de pitagoras
call:maq 6---Extrair hipotemusa de um angulo em graus
call:maq 7---Passar de Hexadecimal a Decimal
call:maq 8---Elevar um numero a a 2
call:maq 9---Elevar um numero a a 3
call:maq 10--Elevar um numero a a 4
call:maq 11--Elevar um numero al a 5
call:maq 12--Passar um numero de graus sexagemal a radiano
call:maq 13--Passar um numero de radiano a graus sexagemal
call:maq 14--Extrair os valores das funcoes trigonom‚tricas de 30 45 e 60 graus
call:maq 15--Extrair o porcentagem de um numero
echo.
set /p opc=Qual ‚ a seua op‡Æo:
if %opc%==1 (goto somar)
if %opc%==2 (goto subtrair)
if %opc%==3 (goto multiplicar)
if %opc%==4 (goto dividir)
if %opc%==5 (goto pitagoras)
if %opc%==6 (goto semo)
if %opc%==7 (goto decimal)
if %opc%==8 (goto quadrado)
if %opc%==9 (goto cubo)
if %opc%==10 (goto elevar)
if %opc%==11 (goto alevares)
if %opc%==12 (goto radiano)
if %opc%==13 (goto sexagemal)
if %opc%==14 (goto funcoes)
if %opc%==15 (goto porcentagem)
:porcentagem
Set /p radi= 1 numero :
echo.
Set /p rad= 2 Segundo numero :
echo.
Set /a Res= (radi*rad)/100
msg * sua porcentagem ‚ = %res%
pause
goto goto exit
:funcoes
cls
set /p pass= escreva a fun‡Æo trigonometrica e os graus para saber seu valor =
set num=1
if [%pass%]==[] echo Boss-Head&pause > nul&goto memu
set pass=%pass:semo30=1/2%
set pass=%pass:semo45=raiz de 2 /2%
set pass=%pass:semo60=raiz de 3 /2%
set pass=%pass:cosemo30=raiz de 3 /2%
set pass=%pass:cosemo45=raiz de 2 /2%
set pass=%pass:cosemo60=1/2%
set pass=%pass:tangemte30=raiz de 3/2%
set pass=%pass:tangemte45=1%
set pass=%pass:tangemte60=raiz de 3%
set pass=%pass:cotangemte30=raiz de 3%
set pass=%pass:cotangemte45=1%
set pass=%pass:cotangemte60=raiz de 3 /3%
set pass=%pass:secante30=2 raiz de 3/3%
set pass=%pass:secante45=raiz de 2%
set pass=%pass:secante60=2%
set pass=%pass:cosecante30=2%
set pass=%pass:cosecante45=raiz de 2%
set pass=%pass:cosecante60=2 raiz de 3 /2%
echo.
echo.
echo.
echo.
echo.
call:maq processando informa‡Æo....
ping -n 3 localhost >nul
cls
msg * Este ‚ o valor da fun‡Æo ====== %pass%
goto exit
:radiano
cls
set /p var=Escreva um numero em graus exagesimal.
call:maq aqui est o resultado
set /a reseultado=%var% / 180
set /a var1=%reseultado% / 3.141692
msg * aqui est o resultado em radiano = %var1%
goto exit
:sexagemal
cls
set /p var=Escreva um numero em radiano
call:maq aqui est o resultado
set /a reseultado=%var% * 180
set /a var1=%reseultado% / 3.141692
msg * aqui est o resultado em graus sexagemal = %var1%
goto exit
:somar
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero.
cls
set /a reseultado=%var% + %var1%
call:maq %reseultado%
pause
goto exit
:subtrair
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero.
call:maq reseultado
set /a reseultado=%var% - %var1%
call:maq %reseultado%
pause
goto exit
:multiplicar
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero
call:maq reseultado
set /a reseultado=%var% * %var1%
call:maq %reseultado%
pause
goto exit
:dividir
cls
set /p var=Escreva um numero.
set /p var1=Escreva outro numero.
call:maq aqui est o resultado
set /a reseultado=%var% / %var1%
call:maq %reseultado%
pause
goto exit
:semo
cls
set /p var=Coloque um angulo em graus.
set /a muriba=%var% * 2 * 3.1416 /360
msg * esta ‚ seu hipotemusa = %muriba%
goto exit
:pitagoras
cls
set /p c1=Coloque valor de um cateto
set /p c2=Escreva valor do outro cateto
set /a reseultado= %c1%*%c1%+%c2%*%c2%
call:maq %reseultado%
:nas
set /a cont=cont+1
set /a multi=cont*cont
if %multi%==%reseultado% echo Raiz: %cont%&pause&goto:EOF
if %multi% GTR %reseultado% echo o numero nÆo tem raiz inteira &pause&goto:EOF
goto nas
pause
goto exit
:decimal
set /p num=Coloque um numero Hexadecimal para passar para Decimal:
set /a num2=%num%/16
set /a res=%num2%*16
Set /a r=%num%-%res%
if %num2%==10 (set num2=A)
if %num2%==11 (set num2=B)
if %num2%==12 (set num2=C)
if %num2%==13 (set num2=D)
if %num2%==14 (set num2=E)
if %num2%==15 (set num2=F)
:bucle
if %num2% GTR 16 (goto dep) else (goto sig)
:dep
set /a a=%num2%/16
set /a b=%a%*16
set /a c=%num2%-%b%
if %c%==0 (set num2=%a%0)
if %c%==1 (set num2=%a%1)
if %c%==2 (set num2=%a%2)
if %c%==3 (set num2=%a%3)
if %c%==4 (set num2=%a%4)
if %c%==5 (set num2=%a%5)
if %c%==6 (set num2=%a%6)
if %c%==7 (set num2=%a%7)
if %c%==8 (set num2=%a%8)
if %c%==9 (set num2=%a%9)
if %c%==10 (set num2=%a%A)
if %c%==11 (set num2=%a%B)
if %c%==12 (set num2=%a%C)
if %c%==13 (set num2=%a%D)
if %c%==14 (set num2=%a%E)
if %c%==15 (set num2=%a%F)
:sig
if %r%==0 (echo o Resultado ‚ %num2%0 && pause > nul && goto :exit)
if %r%==1 (echo o Resultado ‚ %num2%1 && pause > nul && goto :exit)
if %r%==2 (echo o Resultado ‚ %num2%2 && pause > nul && goto :exit)
if %r%==3 (echo o Resultado ‚ %num2%3 && pause > nul && goto :exit)
if %r%==4 (echo o Resultado ‚ %num2%4 && pause > nul && goto :exit)
if %r%==5 (echo o Resultado ‚ %num2%5 && pause > nul && goto :exit)
if %r%==6 (echo o Resultado ‚ %num2%6 && pause > nul && goto :exit)
if %r%==7 (echo o Resultado ‚ %num2%7 && pause > nul && goto :exit)
if %r%==8 (echo o Resultado ‚ %num2%8 && pause > nul && goto :exit)
if %r%==9 (echo o Resultado ‚ %num2%9 && pause > nul && goto :exit)
if %r%==10 (echo o Resultado ‚ %num2%A && pause > nul && goto :exit)
if %r%==11 (echo o Resultado ‚ %num2%B && pause > nul && goto :exit)
if %r%==12 (echo o Resultado ‚ %num2%C && pause > nul && goto :exit)
if %r%==13 (echo o Resultado ‚ %num2%D && pause > nul && goto :exit)
if %r%==14 (echo o Resultado ‚ %num2%E && pause > nul && goto :exit)
if %r%==15 (echo o Resultado ‚ %num2%F && pause > nul && goto :exit)
:quadrado
cls
call:maq Coloque o numero para elevar a 2:
set/p quadrado=
set /a quadrado2=%quadrado% * %quadrado%
cls
call:maq reseultado:%quadrado2%
pause
goto exit
:cubo
cls
call:maq Coloque o numero para elevar a 3:
set/p cubo=
set /a cubo2=%cubo% * %cubo% * %cubo%
cls
call:maq reseultado:%cubo2%
pause
goto exit
:elevar
cls
call:maq Coloque o numero para elevar a 4:
set/p cuatro=
set /a cuatro2=%cuatro% * %cuatro% * %cuatro% * %cuatro%
cls
call:maq reseultado:%cuatro2%
pause
goto exit
:alevares
cls
call:maq Coloque o numero para elevar a 5:
set/p cinco=
set /a cinco2=%cinco% * %cinco% * %cinco% * %cinco% * %cinco%
cls
call:maq reseultado:%cinco2%
pause
goto exit
:maq
;;if,not,defined,.m_,set.m_=%*&if,not,defined,.m_,goto:eof
;;<nul,set/p.m_=%.m_:~0,1%&>nul,ping -n 1 0&set.m_=%.m_:~1%&if,defined,.m_ (goto:maq),else,(echo.)
;;goto:eof
:exit
FOR /L %%W IN (35,-2,1) DO MODE CON:COLS=75 LINES=%%W
FOR /L %%W IN (75,-2,14) DO MODE CON:LINES=1 COLS=%%W
é uma calculadora do boss quero sabe como se faz no comeso que vai aparecendo seja bem vindo e tals
que vai aparecendo letra por letra
ajuda ae galera vlw