@echo off

title Explicando el keyboard - by xassiz

if exist "keyboard.exe" (goto:main)

::
:: Creamos el keyboard (si no existe), que pide una tecla y devuelve su errorlevel (en ascii)
::
:KeyBoard
(
echo n keyboard.dat
echo e 0000 4D 5A 2E 00 01 00 00 00 02 00 00 10 FF FF F0 FF
echo e 0010 FE FF 00 00 00 01 F0 FF 1C 00 00 00 00 00 00 00
echo e 0020 B4 08 CD 21 3C 00 75 02 CD 21 B4 4C CD 21
echo rcx
echo 002E
echo w0
echo q
echo.
)|debug>nul
ren keyboard.dat keyboard.exe

:main
cls
echo:Para salir pulsa Esc.
keyboard
if "%errorlevel%"=="27" (exit) else (goto:main)