en Batch, ya que se podia usar keyBoard..
Pues decidi hacer un Comando MS-DOS en VB6, pero me salio re pesado aun comprimiendolo con UPX..
25Kb, algo grande al convertirlo en Binario para hacerlo Portable, asi que me cae este code..
De la escuela de Batch (Año 1995 - 2005)..
Primero digo que les sera un poco mas dificil entenderlo, ya que no es como el KeyBoard, ya que este no se ensambla..
Bueno sin mas que decir es sencillo, un ejemplo claro:
Código
Al ejecutarlo, den le Click en cualquier parte de la ventana del Cmd..
y les saldra algo como esto:
Código
Explico BX=0001 tiene dos valores 0001 y 0002 osea si se hace Click derecho o Izquierdo..
AX=0003 BX=0001 CX=0038 DX=0014 SP=FFEE BP=0000 SI=0000 DI=0000
El CX=... es la posicion X del cursor, y DX=... es la posicion Y del Cursor..
Eso nos basta para hacer un buen Batch, y podemos colocarlos en una variable con For..
Otro ejemplo para jugar mas con su funcionamiento:
Código
Espero les Guste..
Un Ejemplo de Uso mas Avanzado:
Código
Espero les Guste, en Vista la Parte de Set /p= X:%CX% ::: Y:%DX%<nul pueden borrarla ya que les molestara, eso solo funca en XP, pero lo demas funciona Bien..
@Echo off ( echo g116 echo q )>Zmouse.txt Mode Con Cols=80 lines=25 SetLocal ENABLEDELAYEDEXPANSION cls Echo [X] Echo. Echo. Echo. Echo Presina un Boton: Echo. Echo. Echo +------+ +------+ Echo + Ok + +Cancel+ Echo +------+ +------+ :g Debug< Zmouse.txt |Find /i "x">ZDats Call:x call:y Call:Back ) Goto:g :X Set /p LineCode=<ZDats Goto:eof ) :Y Set /p LineCode=<ZDats Goto:eof ) :Back Goto :eof ) :mous Set state=OK Set CX=0000 Set DX=0000 Goto:eof Set state=NO ) ) ) Goto:eof
SaluDOS!!!