elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Introducción a Git (Primera Parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [ BATCH ] Efecto visual de escribir lento?
0 Usuarios y 2 Visitantes están viendo este tema.
Páginas: [1] 2 Ir Abajo Respuesta Imprimir
Autor Tema: [ BATCH ] Efecto visual de escribir lento?  (Leído 12,462 veces)
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.878



Ver Perfil
[ BATCH ] Efecto visual de escribir lento?
« en: 19 Noviembre 2011, 00:41 am »

Hola, me gustaría crear en batch una "función" para "typear" lento en la CMD... Pudiendola llamar facilmente desde un call, por ejemplo así "CALL :SLOW leeeeeeeento" y que escribiera letra por letra el argumento, con un "ping" entre cada letra para darle ese efecto de teclear typear...

No se si existe alguien que ya lo haya echo... A mi me está costando mucho hacerme una idea de como podría hacerse :/, No se de que forma puedo utilizar un FOR para hacer esta tarea.. que por cierto me parece divertida xD.

Código
  1. @echo off
  2.  
  3. Call :SLOW abcdefghijklmnopqrstuvwxyz
  4.  
  5. :SLOW
  6.  
  7. For /F "Tokens=1-3" %%a in ('echo %1') do (
  8.  
  9. echo %%a
  10. ping -n 1 localhost >nul & ping -n 1 localhost >nul
  11. echo %%b
  12. ping -n 1 localhost >nul & ping -n 1 localhost >nul
  13. echo %%c
  14. ping -n 1 localhost >nul & ping -n 1 localhost >nul
  15. )

No se como seguir el script, es solo un ejemplo...



« Última modificación: 20 Noviembre 2011, 02:01 am por EleKtro H@cker » En línea



$Edu$


Desconectado Desconectado

Mensajes: 1.842



Ver Perfil
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #1 en: 19 Noviembre 2011, 04:32 am »

Yo tenia uno guardado que no se de quien era, pero funciona de la forma que lo haces si o algo asi, porq eso q tienes no pone hacia abajo? en vez de dejarlo solo en una linea..


En línea

Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.878



Ver Perfil
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #2 en: 19 Noviembre 2011, 04:59 am »

porq eso q tienes no pone hacia abajo? en vez de dejarlo solo en una linea..

se me habia ocurrido pero de todas formas... no veo como "separar" cada una de las letras de ese texto  >:(

gracias por contestar
En línea



Darioxhcx


Desconectado Desconectado

Mensajes: 2.294


Ver Perfil
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #3 en: 19 Noviembre 2011, 22:48 pm »

algo asi ?
http://foro.elhacker.net/scripting/batch_funcion_maquina_de_escribir-t225483.0.html
En línea

leogtz
. . .. ... ..... ........ ............. .....................
Colaborador
***
Desconectado Desconectado

Mensajes: 3.069


/^$/


Ver Perfil WWW
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #4 en: 20 Noviembre 2011, 01:33 am »

Me ha ganado la respuesta Dariohxcx :p
En línea

Código
  1. (( 1 / 0 )) &> /dev/null || {
  2. echo -e "stderrrrrrrrrrrrrrrrrrr";
  3. }
  4.  
http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.878



Ver Perfil
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #5 en: 20 Noviembre 2011, 01:35 am »


justo lo que andaba buscando, buenisimo!!!


gracias a los 3 por el interés.
En línea



Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.878



Ver Perfil
Re: (Solucionado) [ BATCH ] Efecto visual de escribir lento?
« Respuesta #6 en: 20 Noviembre 2011, 02:01 am »

lo único malo de aquel script, es que no imprime los espacios :/

Alguien tiene idea de como arreglarlo?:



Código
  1. ::autor CarlitoS.dll
  2. @echo off
  3. mode con cols=100
  4. mode con lines=20
  5.  
  6. call :SLOW aaa     aaaa           aaaa
  7. call :SLOW quiero un espacio
  8. pause>nul
  9. goto:eof
  10.  
  11.  
  12. :SLOW
  13. set palabra=%*
  14. if not defined palabra (goto:eof)
  15. set palabra=%palabra: =_%
  16. call:length %palabra%
  17. set /a contt=0
  18. :loopt
  19. call :SLOW1 %%palabra:~%contt%,1%%
  20. set /a contt +=1
  21. if %contt% leq %tam% (goto:loopt)
  22. goto:eof
  23. :SLOW1
  24. set char=%1
  25. if [%char%]==[_] (set char= )
  26. <nul (set /p msg=%char%)
  27. ping -n 1 127.0.0.0 -w 1>nul 2>&1
  28. goto:eof
  29. :length
  30. set argl=%*
  31. if not defined argl (goto :eof)
  32. set wordl=%argl%
  33. set /a contl=0
  34. :loopl
  35. if not defined wordl (goto endl)
  36. set wordl=%wordl:~1%
  37. set /a contl +=1
  38. goto loopl
  39. :endl
  40. set tam=%contl%
  41. goto :eof





No se si en otros windows funciona, pero en win 7 no

el fallo está aqui:

Código
  1. :tpwrtr1
  2. set char=%1
  3. if [%char%]==[_] (set char= )
  4. <nul (set /p msg=%char%)
  5. goto:eof

He intentado modifiar esa parte de mil formas, pero no consigo que "reconozca" el espacio :/




EDITO: Es que es increible!!!! el code original debería ir, y ni cambiandolo así:


Código
  1. :SLOW1
  2. set char=%1
  3.  
  4. if not defined char (
  5. <nul set /p "msg=%1 "
  6. ) ELSE (
  7. <nul set /p "msg=%1"
  8. )
  9. goto:eof


Ni así!:

Código
  1. Set "Space= "
  2.  
  3. :SLOW1
  4. set char=%1
  5.  
  6. if not defined char (
  7. <nul set /p "msg=%space%"
  8. ) ELSE (
  9. <nul set /p "msg=%1"
  10. )
  11. goto:eof

Me estoy desesperando, siempre me lo escribe todo junto  >:D
« Última modificación: 20 Noviembre 2011, 03:55 am por EleKtro H@cker » En línea



Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.878



Ver Perfil
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #7 en: 20 Noviembre 2011, 04:37 am »

me han pasado este script, más sencillo, pero tampoco imprime los espacios (al menos en windows 7)

Código
  1. @echo off
  2. setlocal enabledelayedexpansion
  3.  
  4. ::aqui le decimos que queremos que escriba
  5. call:slowrite escribiendo leeento
  6. pause>nul
  7.  
  8.  
  9. :: iniciamos la función de escribir
  10. :slowrite
  11. set parm=%*
  12. :write
  13. if "%parm%"=="" goto:eof
  14. set /p=!parm:~0,1!<nul
  15. set parm=%parm:~1%
  16. ping -n 1 127.0.0.0 -w 1>nul 2>&1
  17. ping -n 1 127.0.0.0 -w 1>nul 2>&1
  18. goto :write
En línea



leogtz
. . .. ... ..... ........ ............. .....................
Colaborador
***
Desconectado Desconectado

Mensajes: 3.069


/^$/


Ver Perfil WWW
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #8 en: 20 Noviembre 2011, 04:51 am »

Prueba lo siguiente:

Código
  1. @echo off
  2. REM Echo Dinamico by Fhaker
  3. REM Optimized by ::SmartGenius::
  4. copy %0 tempcode.txt
  5. cls
  6. set /p a=Echo Dinamico:
  7. set b=
  8. goto start
  9. :start
  10. set /a f=%f%+1
  11. if %f%==1 echo ::Inicio Code Generado >>%0
  12. set h=%a:~0,
  13. set l=%h%%f%%o%
  14. echo :menu%f% >>%0
  15. echo cls >>%0
  16. echo set b=%%%l%%% >>%0
  17. echo echo %b%_ >>%0
  18. echo if "%b%"=="%a% " goto fin >>%0
  19. echo goto start >>%0
  20. ping -n 2 0.0.0.0 >nul
  21. goto menu%f%
  22.  
  23. :fin
  24. pause
  25. exit
  26.  

Aquí está lo que buscas:

http://www.portalhacker.net/index.php?topic=79814.0
« Última modificación: 20 Noviembre 2011, 04:53 am por Leo Gutiérrez. » En línea

Código
  1. (( 1 / 0 )) &> /dev/null || {
  2. echo -e "stderrrrrrrrrrrrrrrrrrr";
  3. }
  4.  
http://leonardogtzr.wordpress.com/
leogutierrezramirez@gmail.com
Eleкtro
Ex-Staff
*
Desconectado Desconectado

Mensajes: 9.878



Ver Perfil
Re: [ BATCH ] Efecto visual de escribir lento?
« Respuesta #9 en: 20 Noviembre 2011, 11:07 am »

Buf!

Vale, el método lo entiendo, copia unas cosas dentro del mismo batch y hace unos "goto" que hacen "CLS" y muestran cada vez la frase con 1 caracter más.

supongo que intentar escribir varías lineas con ese método, es imposible... Lo he modificado un poco pero no puedo

PD: uso nircmd y colous en el script

PD2: he probado otro script de esa página, pero hace casi lo mismo que este así que solo puedo escribir una línea.   >:(

Código
  1. @echo off
  2. Set Batch=%0
  3.  
  4. CALL :SLOW Hola como estan?
  5. CALL :SLOW Gracias Leo xD
  6.  
  7. :SLOW
  8. If not defined Batch (Goto:EOF)
  9. set a=%*
  10. set b=
  11. goto :start
  12.  
  13.  
  14. :start
  15. set /a f=%f%+1
  16. if %f%==1 echo ::Inicio Code Generado >>%batch%
  17. set h=%a:~0,
  18. set l=%h%%f%%o%
  19. echo :menu%f% >>%batch%
  20. echo cls >>%batch%
  21. echo echo+ >>%batch%
  22. echo set b=%%%l%%% >>%batch%
  23. echo Colous writesec "[11] %b%">>%batch%
  24. echo if "%b%"=="%a% " Goto :FIN>>%batch%
  25. echo goto :start>>%batch%
  26. nircmd wait 100
  27. goto menu%f%
  28.  
  29.  
  30. :fin
  31. set a=
  32. set b=
  33. set f=
  34. set l=
  35. goto :eof
En línea



Páginas: [1] 2 Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
BATCH - Función máquina de escribir
Scripting
carlitos.dll 3 8,366 Último mensaje 3 Octubre 2008, 22:17 pm
por -/lnkx/-
Escribir por batch # o /
Scripting
clonh 8 6,904 Último mensaje 12 Octubre 2009, 22:31 pm
por morenochico
Video 3D de efecto visual :P « 1 2 »
Multimedia
engel lex 13 7,970 Último mensaje 30 Marzo 2014, 23:23 pm
por Vaagish
Efecto maquina de escribir en Vbs para Consola
Scripting
.:: KsV ::. 0 2,255 Último mensaje 24 Junio 2015, 00:45 am
por .:: KsV ::.
El Chat del Facebook me va lento al Escribir
Mensajería
El_Andaluz 6 5,921 Último mensaje 19 Septiembre 2021, 17:53 pm
por El_Andaluz
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines