Imprimir Página - Sendkeys command

Título: Sendkeys
Temática: Funcional
Autor: xassiz
Descripción: Efecto grafico en notepad.
Funcionamiento: Coge un mensaje como argumento. Este lo muestra con un efecto de marquesina como mandando pulsaciones de teclado en el notepad, de manera que da un efecto en el cual escribimos en otra aplicacion que no sea cmd.

Código:

::
:: $Auth0r=xassiz
:: $script=sendkeys command
::
::      -Use:       sendkeys <msg>
::                                            (2009)

  @echo off
set "file=sendk%random:~0,3%.txt"
set "text=%*"
call:sklen %text%&set/a len+=1
call:sendkeys %text%
del /q/s/f/a "%file%">nul 2>&1
echo on
  @exit /b
:sendkeys
set/a count+=1
set "msg=%*"
call set "msg=%%msg:~0,%count%%%"
if not defined msg (goto:eof)
if %count% equ %len% (goto:eof)
echo.%msg%>%file%
start notepad.exe %file%
ping -n 1 127.1>nul
taskkill /im notepad.exe /f>nul || tskill notepad>nul
goto:sendkeys
:sklen
set "len="
set "sk=%*"
:sklen2
set "sk=%sk:~1%" && set/a len+=1
if defined sk goto sklen2 || goto :eof

Es un efecto que vi hacer con vbs :p

Dudas y sugerencias ^^

bytes

Foro de elhacker.net

Programación => Scripting => Mensaje iniciado por: xassiz_ en 18 Agosto 2009, 15:26 pm