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

 

 


Tema destacado: Guía actualizada para evitar que un ransomware ataque tu empresa


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  [BATCH]¡Convertir keyboard.com en CHOICE!
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: [BATCH]¡Convertir keyboard.com en CHOICE!  (Leído 1,735 veces)
Binary_Death

Desconectado Desconectado

Mensajes: 214



Ver Perfil
[BATCH]¡Convertir keyboard.com en CHOICE!
« en: 27 Julio 2012, 04:53 am »

Uno de los grandes inconvenientes de los batch games es sin duda que muchos necesitan el comando choice para poder seguir la ejecución del juego mientras se espera la entrada por el teclado.

Con este método, se puede lograr el mismo efecto e incluso mejor, porque no hay un tiempo de espera de 1 segundo.

Código:
@Echo Off
setlocal enableextensions enabledelayedexpansion
chdir /d "%TEMP%"
if not exist "keyboard.com" call :_code[keymake]
goto:_code[%~1]
:_code[]

start "" /b "%~0" keypress

:_keypress
if exist @ (
1>nul 2>&1,set/p "k_p=" 0<@
if "!k_p!" EQU "65" echo. Presionaste A & ping -n 2 localhost > nul
if "!k_p!" EQU "66" echo. Presionaste B & ping -n 2 localhost > nul
1>nul 2>&1,del /f /q @
)
echo: Mientras tanto, mostramos mensajes.
goto :_keypress

:_code[keypress]
keyboard.com & echo.!errorlevel!>@ 2>nul
goto:_code[keypress]

:_code[keymake]
(ECHO.N KEYBOARD.COM
ECHO.E 0000 B4 08 CD 21 3C 00 75 02 CD 21 B4 4C CD 21
ECHO.R CX
ECHO.000E
ECHO.W0
ECHO.Q)|DEBUG 1>NUL 2>&1
GOTO:EOF

¡Un saludo!

PD: Lo malo es que no funciona con ansi.sys  :xD ni siquiera sé bien por qué, pero parece ser que el command.com interrumpe la ejecución del hilo principal y se la da al hilo secundario, es algo raro, pero bueh, usando el método de toda la vida para los batch games no hay ningún problema.


« Última modificación: 27 Julio 2012, 04:58 am por Binary_Death » En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
Cómo convertir mayúsculas a minúsculas y viceversa en Batch. Ayuda!!
Scripting
<ИΘZIЭ(ŦB> 3 10,509 Último mensaje 11 Septiembre 2009, 23:15 pm
por <ИΘZIЭ(ŦB>
Ayuda con choice.com
Scripting
Sr.Origami 5 6,297 Último mensaje 30 Junio 2010, 12:56 pm
por Sr.Origami
Ayuda para "convertir" este VBS a BATCH
Scripting
Eleкtro 4 3,970 Último mensaje 7 Noviembre 2011, 10:09 am
por Eleкtro
ayuda con choice
Scripting
asdexiva 4 2,707 Último mensaje 17 Junio 2013, 00:05 am
por Eleкtro
[BATCH] ¿Se puede o no usar choice con las flechas de dirección?
Scripting
.:Xx4NG3LxX:. 2 4,263 Último mensaje 23 Mayo 2020, 04:15 am
por .:Xx4NG3LxX:.
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines