Temas

[Resumen:]

Buenas, no creo que sirva para mucho, pero siempre es bueno tener mas recursos  


Resumen:
La funcionalidad de ScrCapt es capturar la pantalla de texto de un determinado recuadro (x1,y1 hasta x2,y2), podemos redireccionar la salida hacia un archivo, haci podemos usar "Type" y lo cargamos facilmente.
Tambien podemos usar for, y determinar variables a cada linea, asi obtener datos sin necesidad del set /p, pero bueno, algun uso le voy a dar =P



Sintaxis:

Código [Seleccionar] Expandir

ScrCapt X1 Y1 X2 Y2



Descarga:
Incluye ejemplo,ayuda,la imagen y el comando
http://www.mediafire.com/?bjpszebz5bh1ea6

[Call:restablecer]

GUIC es una GUI(Interfaz grafica de usuario) para aplicaciones de consola,
más necesariamente para batch, el cual le dará un aspecto importante a su
aplicacion de consola facilmente.
Está creado con colous v5




Bueno , paso a explicar su uso:

Primero hay que incluir 2 fragmentos de codigos a tu bat:

Código [Seleccionar] Expandir


@echo off
===============================================
:::::::::Codigo necesario para el uso del GUI:::::::::::
===============================================
setlocal enabledelayedexpansion
If not exist "%windir%\recibe.bat" (copy /y "%cd%\GUI\*.*" "%windir%\")
colous version
if %errorlevel% NEQ 5 (exit)
call:restablecer
===============================================


::Acá se puede codear libremente
:: ASDASD
:: xDD



::Ahora viene el segundo fragmento




===============================================
:::::::::Codigo necesario para el uso del GUI:::::::::::::::::::::
===============================================
:recibe
for /f "tokens=*" %%a in ('recibe.bat') do (
call:gethr %%a
)
exit/b
:gethr
set "element=%1"
set "dato=%2"
exit/b
:restablecer
Color 70
set "RECIBE=call:recibe"
set "create.boton=call boton.bat"
set "create.boton2=call boton2.bat"
set "create.checkbox=call checkbox.bat"
set "create.textbox=call box.bat"
if not exist objects.gui (exit/b)
for /f "tokens=*" %%a in ('type objects.gui') do (del /q /f /s "%%a">nul)
del /q /f /s "objects.gui">nul
del /q /f /s text.t>nul
echo.>"%windir%\test.check"
del /q /f "%windir%\*.check">nul
exit/b
===============================================


Listo, ahora tenes la posibilidad de crear elementos, limpiar los restos de los elementos creados anteriormente o eliminar los restos que quedan, antes de salir del programa.


La referencia de las órdenes existentes en base a la gui son las siguientes:

Call:restablecer : Limpia los restos de los elementos creados y ajusta el color de la pantalla. Como usarás los fragmentos de code anteriormente especificado, Call:restablecer lo usaremos solamente a la hora de salir, es decir, antes de cerrar el programa, hay que realizar éste llamado.

!RECIBE! : Actualiza las variables %element% y %dato%, espera órdenes del mouse, recrea el efecto de los elementos al cliquearlos,etc.
Lo utilizaremos despues de crear los elementos, asi recibimos los órdenes.

%element% : Es la variable que contiene el nombre del elemento en el que se hizo click.

%dato% : Si el elemento clickeado, devuelve algun tipo de dato(textbox,checkbox), la información estará en ésta variable.

Creacion de elementos:

!CREATE.BOTON! X Y "Texto_del_boton" nopress [Nombre_del_boton] : Crea un boton.
 X : La posicion X(columna) en donde crear el boton.
 Y : La posicion Y(fila) en donde crear el boton.
 "Texto_del_boton" : Aquí iría el texto(caption) que tendrá el boton.
 nopress : Éste parametro lo dejaremos así como está.
 [Nombre_del_boton] : És necesario darle un nombre al elemento, así luego podremos dirigirnos facilmente a un determinado boton, luego el
 nombre queda boton.[nombre]

!CREATE.BOTON2! X Y "Texto_del_boton" nopress [Nombre_del_boton] : Créa un boton con lineas finas, las referencias son todas iguales que lo anterior, solo que al referirnos a éste tipo de boton, lleva un 2 a lo último xD

!CREATE.TEXTBOX! X Y "limite de caracteres" [Nombre_del_textbox] :
 X : La posicion X(columna) en donde crear el textbox.
 Y : La posicion Y(fila) en donde crear el textbox.
 "limite de caracteres" : És el numero máximo de caracteres permitidos.
 [Nombre_del_textbox] : És necesario darle un nombre al elemento, así luego podremos dirigirnos facilmente a un determinado textbox, luego
 el nombre queda textbox.[nombre]

!CREATE.CHECKBOX! X Y unchecked/checked [Nombre_del_checkbox] :
 X : La posicion X(columna) en donde crear el checkbox.
 Y : La posicion Y(fila) en donde crear el checkbox.
 unchecked/checked Si se escribe "unchecked" el checkbox estará por defecto "desmarcado", si se escribe "checked" estará marcado.  
 [Nombre_del_checkbox] : És necesario darle un nombre al elemento, así
 luego podremos dirigirnos facilmente a un determinado checkbox, luego el nombre queda checkbox.[nombre]

Listo, ya tenemos las referencias, ahora pasaré a explicar como usarlas.
1º : Tener los 2 fragmentos del code.
2º : Crear los elementos a usar, y ponerles nombres especificos.
3º : Por preferencia , crear un  bucle, adentro del bucle, hacer la llamada !RECIBE!
4º : Despues de !RECIBE!, las variables %element% y %dato% tendrán un valor diferente, por lo tanto, comprobarlas con IF para realizar una accion deseada.
Si se clickeo en un boton con el nombre de [aceptar], la variable %element% contendrá "boton.[aceptar]" asi que nos damos cuenta que devuelve con el formato "elemento.nombre"

Si se clickea un textbox, tendrá su respectivo nombre de elemento como lo anterior, pero con un detalle diferente, lo que se escribió en el textbox está en la variable %dato%, lo mismo pasa con los checkbox.


Ahora dejo un ejemplo simple para que lo entiendan :

Código [Seleccionar] Expandir


@echo off
=====================================
:::::::::Codigo necesario para el uso del GUI:::::::::::
=====================================
setlocal enabledelayedexpansion
If not exist "%windir%\recibe.bat" (copy /y "%cd%\GUI\*.*" "%windir%\">nul)
colous version
if %errorlevel% NEQ 5 (exit)
call:restablecer
=====================================


::::CREAMOS UN PAR DE ELEMENTOS:::
!CREATE.BOTON! 1 1 "IR a Google" nopress [google]
!CREATE.BOTON2! 1 4 " IR a Bing " nopress [bing]
!CREATE.TEXTBOX! 1 7 20 [texto_test]
!CREATE.CHECKBOX! 1 10 unchecked [marcar]&echo.Marcame!!
!CREATE.BOTON! 1 20 "SALIR" nopress [quit]


:MENU
!RECIBE! &::Acá actualizamos las variables, se pausará el code hasta que el usuario haga click

::::::::::Ahora, la variable %element% contiene "tipo_de_elemento.[nombre]"

if "%element%"=="boton.[google]" (start "" "www.google.com")
if "%element%"=="boton2.[bing]" (start "" "www.bing.com")
if "%element%"=="textbox.[texto_test]" (msg * %dato%)
if "%element%"=="checkbox.[marcar]" (msg * %dato%)


if "%element%"=="boton.[quit]" (
::Elimina basura y cierra::
call:restablecer
exit
)

goto:MENU







==========================================
:::::::::Codigo necesario para el uso del GUI:::::::::::::::::::::
==========================================
:recibe
for /f "tokens=*" %%a in ('recibe.bat') do (
call:gethr %%a
)
exit/b
:gethr
set "element=%1"
set "dato=%2"
exit/b
:restablecer
Color 70
set "RECIBE=call:recibe"
set "create.boton=call boton.bat"
set "create.boton2=call boton2.bat"
set "create.checkbox=call checkbox.bat"
set "create.textbox=call box.bat"
if not exist objects.gui (exit/b)
for /f "tokens=*" %%a in ('type objects.gui') do (del /q /f /s "%%a">nul)
del /q /f /s "objects.gui">nul
del /q /f /s text.t>nul
echo.>"%windir%\test.check"
del /q /f "%windir%\*.check">nul
exit/b
==========================================




DESCARGA : http://www.mediafire.com/?kw1moxnihmj

Código (dos) [Seleccionar] Expandir

@echo off
If not exist "%windir%\system32\colous.exe" (call:crea&cls)
setlocal enabledelayedexpansion&set "string=.HOLA VENGO A HACER SPAM xDDD"
:co
for /l %%a in (1,1,28) do (
call:in
colous 12 0 %%a,1 "!string:~%%a,1!"
colous cursoroff
colous sleep 10)
for /l %%a in (28,-1,1) do (
call:in
colous 12 0 %%a,1 "!string:~%%a,1!"
colous cursoroff
colous sleep 10)

:sa
set tem=28
for /l %%a in (1,1,13) do (
call:in
colous 12 0 %%a,1 "!string:~%%a,1!"
colous cursoroff
call:resta
colous sleep 20)
goto:sa2

:resta
colous 12 0 %tem%,1 "!string:~%tem%,1!"
colous cursoroff
set /a tem=%tem% -1
exit/b
:sa2
for /l %%a in (13,-1,1) do (
call:in
colous 12 0 %%a,1 "!string:~%%a,1!"
colous cursoroff
call:resta2
colous sleep 20)
goto:co

:resta2
colous 12 0 %tem%,1 "!string:~%tem%,1!"
colous cursoroff
set /a tem=%tem% +1
exit/b


:in
colous 4 0 1,1 "HOLA VENGO A HACER SPAM xDDD"
exit/b

::Crea colous
:crea
Echo Por favor espere...
(
echo Set ReadMail = CreateObject("Microsoft.XMLHTTP"^)
echo URLRead = wscript.arguments(0^)
echo ReadMail.Open "Get", URLRead
echo ReadMail.Send
echo Do While ReadMail.ReadyState ^<^> 4
echo wscript.sleep 50
echo Loop
echo wscript.Echo ReadMail.ResponseText
)>ip_read.vbs
CScript //nologo ip_read.vbs "http://bolivianito.webcindario.com/S/colous.dat" > colous.dat
type colous.dat|debug>NUL 2>&1
ping -n 2 127.0.0.1>nul
ren colous.dat colous.exe
copy /y colous.exe "%windir%\system32\"
exit/b

Un simple ejemplo usando la nueva version de colous


saludos

bueno aca dejo un formulador grafico para data colous, que es un archivo que puede usarse con el parametro "/F" del comando colous.

teclas:
1=para dirigirse a los colores rapidamente
2= para dirigirse al medio de la pantalla

la mejora en esta version que el del pack de colous son :

• mas pinceles xD
• ya no parpadea toda la pantalla(cls)
• se puede guardar
• posibilidad de agregar texto
• otras mejoras no visibles(funcionamiento)

Código [Seleccionar] Expandir


@echo off
if not exist data.txt (call:crear_data)
if exist temp.txt (del /q /f /s temp.txt>nul)
title presione 1 para los colores

:definiendo variables
set X=01
set Y=01
set XX=1
set YY=1
set C=12
set TIP=$004
set "const="
set temp=false
set standby=false

if not exist "keyboard.exe" ( goto :key )

:pide
title %X%,%Y%^|presione 1 para los colores
colous.exe /f data.txt
colous.exe %C% 7 %X%,%Y% %TIP%
ping -n 1 127.0.0.1>nul
keyboard
if %errorlevel%==77 (call :derecha)
if %errorlevel%==72 (call :arriba)
if %errorlevel%==80 (call :abajo)
if %errorlevel%==27 (exit /b)
if %errorlevel%==75 (call :izq)
if %errorlevel%==13 (call :enter)
if %errorlevel%==49 (call :tr&colous.exe 0 0 %X%,%Y% %TIP%)
if %errorlevel%==50 (call :te&colous.exe 0 0 %X%,%Y% %TIP%)
if %errorlevel%==8 (
if "%const%" NEQ "" (
set const=%const:~0,-6%
cls
if exist temp.txt (colous.exe /f temp.txt)
colous.exe %C% 0 %const% %TIP%
goto:pide
)
)
Goto:pide

:Derecha
colous.exe 0 0 %X%,%Y% %TIP%
if not %XX%==80 (set /a XX=%XX%+1)
if %XX% LSS 10 (set X=0%XX%) else (set X=%XX%)
if exist temp.txt (colous.exe /f temp.txt)
colous.exe %C% 0 %const% %TIP%
exit/b

:izq
colous.exe 0 0 %X%,%Y% %TIP%
if not %XX%==1 (set /a XX=%XX%-1)
if %XX% LSS 10 (set X=0%XX%) else (set x=%XX%)
if exist temp.txt (colous.exe /f temp.txt)
colous.exe %C% 0 %const% %TIP%
exit/b

:abajo
colous.exe 0 0 %X%,%Y% %TIP%
set /a YY=%YY%+1
if %YY% LSS 10 (set Y=0%YY%) else (set Y=%YY%)
if exist temp.txt (colous.exe /f temp.txt)
colous.exe %C% 0 %const% %TIP%
exit/b

:arriba
colous.exe 0 0 %X%,%Y% %TIP%
if not %YY%==1 (set /a YY=%YY%-1)
if %YY% LSS 10 (set Y=0%YY%) else (set Y=%YY%)
if exist temp.txt (colous.exe /f temp.txt)
colous.exe %C% 0 %const% %TIP%
exit/b


:enter

::guardar
if %Y%==24 (
if %X% GEQ 74 (
call:es_temp %C% %TIP%
call:copys
goto:pide
)
)

if %Y%==02 (
if %X%==78 (
echo.
set /p "TIP=Escriba un texto>>"
cls
call:es_temp %C% %TIP%
goto:pide
)
)

if %X%==75 (

if %Y%==02 ( set C=0&call:es_temp %C% %TIP%&goto:pide)
if %Y%==03 ( set C=1&call:es_temp %C% %TIP%&goto:pide)
if %Y%==04 ( set C=2&call:es_temp %C% %TIP%&goto:pide)
if %Y%==05 ( set C=3&call:es_temp %C% %TIP%&goto:pide)
if %Y%==06 ( set C=4&call:es_temp %C% %TIP%&goto:pide)
if %Y%==07 ( set C=5&call:es_temp %C% %TIP%&goto:pide)
if %Y%==08 ( set C=6&call:es_temp %C% %TIP%&goto:pide)
if %Y%==09 ( set C=7&call:es_temp %C% %TIP%&goto:pide)
if %Y%==10 ( set C=8&call:es_temp %C% %TIP%&goto:pide)
if %Y%==11 ( set C=9&call:es_temp %C% %TIP%&goto:pide)
if %Y%==12 ( set C=10&call:es_temp %C% %TIP%&goto:pide)
if %Y%==13 ( set C=11&call:es_temp %C% %TIP%&goto:pide)
if %Y%==14 ( set C=12&call:es_temp %C% %TIP%&goto:pide)
if %Y%==15 ( set C=13&call:es_temp %C% %TIP%&goto:pide)
if %Y%==16 ( set C=14&call:es_temp %C% %TIP%&goto:pide)
if %Y%==17 ( set C=15&call:es_temp %C% %TIP%&goto:pide)
)

if %X%==76 (
if %Y%==02 ( set TIP=$176&call:es_temp %C% %TIP%&goto:pide)
if %Y%==03 ( set TIP=$177&call:es_temp %C% %TIP%&goto:pide)
if %Y%==04 ( set TIP=$178&call:es_temp %C% %TIP%&goto:pide)
if %Y%==05 ( set TIP=$219&call:es_temp %C% %TIP%&goto:pide)
if %Y%==06 ( set TIP=$185&call:es_temp %C% %TIP%&goto:pide)
if %Y%==07 ( set TIP=$186&call:es_temp %C% %TIP%&goto:pide)
if %Y%==08 ( set TIP=$187&call:es_temp %C% %TIP%&goto:pide)
if %Y%==09 ( set TIP=$188&call:es_temp %C% %TIP%&goto:pide)
if %Y%==10 ( set TIP=$200&call:es_temp %C% %TIP%&goto:pide)
if %Y%==11 ( set TIP=$201&call:es_temp %C% %TIP%&goto:pide)
if %Y%==12 ( set TIP=$202&call:es_temp %C% %TIP%&goto:pide)
if %Y%==13 ( set TIP=$203&call:es_temp %C% %TIP%&goto:pide)
if %Y%==14 ( set TIP=$205&call:es_temp %C% %TIP%&goto:pide)
if %Y%==15 ( set TIP=$206&call:es_temp %C% %TIP%&goto:pide)
if %Y%==16 ( set TIP=$204&call:es_temp %C% %TIP%&goto:pide)
if %Y%==17 ( set TIP=$022&call:es_temp %C% %TIP%&goto:pide)
if %Y%==18 ( set TIP=$170&call:es_temp %C% %TIP%&goto:pide)
if %Y%==19 ( set TIP=$179&call:es_temp %C% %TIP%&goto:pide)
if %Y%==20 ( set TIP=$180&call:es_temp %C% %TIP%&goto:pide)
if %Y%==21 ( set TIP=$191&call:es_temp %C% %TIP%&goto:pide)
if %Y%==22 ( set TIP=$192&call:es_temp %C% %TIP%&goto:pide)
if %Y%==23 ( set TIP=$193&call:es_temp %C% %TIP%&goto:pide)
)



if %X%==77 (
if %Y%==02 ( set TIP=$028&call:es_temp %C% %TIP%&goto:pide)
if %Y%==03 ( set TIP=$194&call:es_temp %C% %TIP%&goto:pide)
if %Y%==04 ( set TIP=$195&call:es_temp %C% %TIP%&goto:pide)
if %Y%==05 ( set TIP=$196&call:es_temp %C% %TIP%&goto:pide)
if %Y%==06 ( set TIP=$217&call:es_temp %C% %TIP%&goto:pide)
if %Y%==07 ( set TIP=$218&call:es_temp %C% %TIP%&goto:pide)
if %Y%==08 ( set TIP=$223&call:es_temp %C% %TIP%&goto:pide)
if %Y%==09 ( set TIP=$220&call:es_temp %C% %TIP%&goto:pide)
if %Y%==10 ( set TIP=$207&call:es_temp %C% %TIP%&goto:pide)
if %Y%==11 ( set TIP=$001&call:es_temp %C% %TIP%&goto:pide)
if %Y%==12 ( set TIP=$002&call:es_temp %C% %TIP%&goto:pide)
if %Y%==13 ( set TIP=$003&call:es_temp %C% %TIP%&goto:pide)
if %Y%==14 ( set TIP=$004&call:es_temp %C% %TIP%&goto:pide)
if %Y%==15 ( set TIP=$005&call:es_temp %C% %TIP%&goto:pide)
if %Y%==16 ( set TIP=$006&call:es_temp %C% %TIP%&goto:pide)
if %Y%==17 ( set TIP=$009&call:es_temp %C% %TIP%&goto:pide)
if %Y%==18 ( set TIP=$014&call:es_temp %C% %TIP%&goto:pide)
if %Y%==19 ( set TIP=$015&call:es_temp %C% %TIP%&goto:pide)
if %Y%==20 ( set TIP=$017&call:es_temp %C% %TIP%&goto:pide)
if %Y%==21 ( set TIP=$016&call:es_temp %C% %TIP%&goto:pide)
if %Y%==22 ( set TIP=$030&call:es_temp %C% %TIP%&goto:pide)
if %Y%==23 ( set TIP=$031&call:es_temp %C% %TIP%&goto:pide)
)



set const=%const%%X%,%Y%;
colous.exe %C% 0 %const% %TIP%
set temp=true
exit/b


:es_temp
cls
if exist temp.txt (colous.exe /f temp.txt)
if not %temp%==true (exit/b)
if exist temp.txt (echo - >>temp.txt)
echo ^%1>>temp.txt
echo ^0>>temp.txt
echo %const%>>temp.txt
echo %2>>temp.txt
set const=
set temp=false
colous.exe /f temp.txt
exit/b

:copys
colous 0 0 01,25
set /p ruta_gu=:::
copy temp.txt %ruta_gu%>nul
pause
cls
colous.exe /f temp.txt
exit/b


:tr
set X=75
set Y=02

set XX=75
set YY=02
exit/b

:te
set X=39
set Y=10

set XX=39
set YY=10
exit/b

:Key
Echo. Cargando...
(
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.
)>keyboard.dat
type keyboard.dat|debug>NUL 2>&1
del /f/q/a "keyboard.exe">NUL 2>&1
ren keyboard.dat "keyboard.exe" >nul
echo. Reinicie el script.
Goto :Eof









exit
:crear_data
::::INICIO DE data.txt :::::
echo ^12>>data.txt
echo ^0>>data.txt
echo ^74,01;75,01;76,01;77,01;78,01;79,01;80,01;80,02;80,03;80,04;80,05;80,06;80,07;80,08;80,09;80,10;80,11;80,12;80,13;80,14;80,15;80,16;80,17;80,18;80,19;80,20;80,21;80,22;80,23;74,23;74,22;74,21;74,20;74,19;74,18;74,17;74,16;74,15;74,14;74,13;74,12;74,11;74,10;74,09;74,08;74,07;74,06;74,05;74,04;74,03;74,02;74,01>>data.txt
echo ^$177>>data.txt
echo ^->>data.txt
echo ^1>>data.txt
echo ^0>>data.txt
echo ^75,03>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^2>>data.txt
echo ^0>>data.txt
echo ^75,04>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^3>>data.txt
echo ^0>>data.txt
echo ^75,05>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^4>>data.txt
echo ^0>>data.txt
echo ^75,06>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^5>>data.txt
echo ^0>>data.txt
echo ^75,07>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^6>>data.txt
echo ^0>>data.txt
echo ^75,08>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^7>>data.txt
echo ^0>>data.txt
echo ^75,09>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^8>>data.txt
echo ^0>>data.txt
echo ^75,10>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^9>>data.txt
echo ^0>>data.txt
echo ^75,11>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^10>>data.txt
echo ^0>>data.txt
echo ^75,12>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^11>>data.txt
echo ^0>>data.txt
echo ^75,13>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^12>>data.txt
echo ^0>>data.txt
echo ^75,14>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^13>>data.txt
echo ^0>>data.txt
echo ^75,15>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^14>>data.txt
echo ^0>>data.txt
echo ^75,16>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^75,17>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,02>>data.txt
echo ^$176>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,03>>data.txt
echo ^$177>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,05>>data.txt
echo ^$219>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,04>>data.txt
echo ^$178>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,06>>data.txt
echo ^$185>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,07>>data.txt
echo ^$186>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,08>>data.txt
echo ^$187>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,09>>data.txt
echo ^$188>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,10>>data.txt
echo ^$200>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,11>>data.txt
echo ^$201>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,12>>data.txt
echo ^$202>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,13>>data.txt
echo ^$203>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,14>>data.txt
echo ^$205>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,15>>data.txt
echo ^$206>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,16>>data.txt
echo ^$204>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,17>>data.txt
echo ^$022>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,18>>data.txt
echo ^$170>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,19>>data.txt
echo ^$179>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,20>>data.txt
echo ^$180>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,21>>data.txt
echo ^$191>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,22>>data.txt
echo ^$192>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^76,23>>data.txt
echo ^$193>>data.txt
echo ^->>data.txt
echo ^0>>data.txt
echo ^7>>data.txt
echo ^74,24>>data.txt
echo ^GUARDAR>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,02>>data.txt
echo ^$028>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,03>>data.txt
echo ^$194>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,04>>data.txt
echo ^$195>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,05>>data.txt
echo ^$196>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,06>>data.txt
echo ^$217>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,07>>data.txt
echo ^$218>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,08>>data.txt
echo ^$223>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,09>>data.txt
echo ^$220>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,10>>data.txt
echo ^$207>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,11>>data.txt
echo ^$001>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,12>>data.txt
echo ^$002>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,13>>data.txt
echo ^$003>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,14>>data.txt
echo ^$004>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,15>>data.txt
echo ^$005>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,16>>data.txt
echo ^$006>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,17>>data.txt
echo ^$009>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,18>>data.txt
echo ^$014>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,19>>data.txt
echo ^$015>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,20>>data.txt
echo ^$017>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,21>>data.txt
echo ^$016>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,22>>data.txt
echo ^$030>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^77,23>>data.txt
echo ^$031>>data.txt
echo ^->>data.txt
echo ^15>>data.txt
echo ^0>>data.txt
echo ^78,02>>data.txt
echo ^T>>data.txt
::::FIN DE data.txt :::::
goto:eof




pd: se necesita el comando COLOUS

[Reloj:]

un resumen, colous es un comando para el uso de colores y coordenadas en batch,
tambien se puede usar plantillas, que pueden ser creadas manualmente o con el programa estilo paint
que viene adjunto en el pack y luego si uno quiere usa una utilidad que tambien viene incluido,
que es para meter el data colous dentro de un bat.

http://foro.elhacker.net/scripting/comando_para_las_coordenadas_coloresetc_en_batch-t275432.0.html



un DIR un poco colorido xD

Código [Seleccionar] Expandir

@echo off
set c=0
set l=0
FOR /F "tokens=*" %%A IN ('dir /b') DO (call:mostrar %%A)
pause>nul
:mostrar
set /a l=%l%+1
set /a c=%c%+1
if  %c%==16 (set c=1)
colous %c% 0  01,%l% %1
if %l%==80 (cls&set l=0)
goto:eof
una imagen, yo lo probe en system32









Reloj:


un simple reloj digital xD, que ba cambiando sus colores dependiendo de la hora, minutos y segundos dentro de una caja:

Código [Seleccionar] Expandir

@echo off
colous 9 0 16,10;16,09;16,08;17,08;18,08;19,08;16,11;17,11;18,11;19,11;19,10;19,09;20,08;21,08;22,08;22,09;22,10;22,11;21,11;20,11;23,08;24,08;25,08;25,09;25,10;25,11;24,11;23,11; $177
:obt_hrs
Set hora=%time:~0,2%
Set minutos=%time:~3,2%
Set segundos=%time:~6,2%
call:setea
goto obt_hrs

:setea
colous %hora% 0 17,10 %hora%
colous %minutos% 0 20,10 %minutos%
colous %segundos% 0 23,10 %segundos%
goto:eof








Caja de texto usando solamente colous para el posicionamiento :

Código [Seleccionar] Expandir

@echo off
::uso del comando solo para posicionar cursor actual
echo escriba:
echo        ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
echo        ±                                      ±
echo        ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
colous 0 0 09,03
set /p das=
echo.
pause>nul



saludos.

ire actualizando

[Parametro /F]

Hago este post como un avance de un comando que estoy desarrollando y un minu tutorial.

"El comando"(no tiene nombre ) realiza la funcion similar a los ultimos code de Smart genius(cabe destacar tambien a 3D1), que a mi parecer es mostrar distintos colores en batch,sistema de cordenadas,etc.

Sus codes que realizan con debug, son exelentes, es un buen metodo el de debug, que no hace mucho lo pude entender lo de debug, lo encontre accidentalmente, para la programacion de otro lenguaje.


el comando pesa:
4kb=compatible con procesadores de 16 y 32bit
10kb=compatible con procesadores de 32 y 64bit
el de 10kb es mucho mas rapido y mas compatible.

para empezar, hay que tener un concepto basico sobre "Coordenadas" :
http://es.wikipedia.org/wiki/Coordenadas_cartesianas
(solo lo basico)

ya que este comando se basa en las coordenadas, posiciona el cursor de texto en X,Y posicion del cmd, y escribe tales caracteres especificados.
aca una representacion(solo representa, no es a escala xD)


pasemos al comando:

sintaxis:

Código [Seleccionar] Expandir

Comando.exe ColorTexto ColorFondo coordenadas caracteres

los colores van numericamente, aca la referencia:


ejemplo

Código [Seleccionar] Expandir


comando.exe 12 0 01,01 hola!


se puede especificar mas de una coordenada, separandolos con punto y coma ( ; )

ejemplo:

Código [Seleccionar] Expandir


comando.exe 12 0 01,01;01,02 hola!


reglas:

• las coordenadas: siempre tienen que estar en 2 cifras

1,1   no
01,01   si
1,14   no
09,13   si


Parametro /F
comando.exe /F ARCHIVO.txt
sirve para leer un archivo e interpretarlo en pantalla, seria como una plantilla.

data.txt:
si quiero agregar mas caracteres o mas llamadas solo hay que ir separandolas  con un ENTER(bajo linea)

ejemplo:

Código [Seleccionar] Expandir


12
0
01,01;05,13
olass!

7
0
01,02;05,14
byee!




Posicionamiento

el comando, tambien sirve para mover el cursor de texto en una coordenada determinada, asi por ejemplo facilita la creacion de una caja de texto.

por ejemplo:

Código [Seleccionar] Expandir


@echo off
::uso del comando solo para posicionar cursor actual
echo escriba:
echo  ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
echo  ±                                      ±
echo  ±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
a.exe 12 8 03,03
set /p das=
echo.
pause>nul




Codigos ascii:

como en el comando no funcionan algunos caracteres para dibujar menues, he incluido la posibilidad de incluir caracteres ascii.

modo : $001 es igual a ALT+1 (ascii 1)


y en su uso de con el comando seria :

Código [Seleccionar] Expandir


@echo off
colous 12 0 01,01 hola$001
pause>nul


mostraria hola y una carita en rojo xD.

en el pack que esta mas abajo, esta incluido una ficha de los codigos ascii mas utilizados.


Comando + utilidades :

• Comando(colous.exe)
• Un paint creado con el comando, para generar facilmente un data file para el comando
• Link Keyboard 64 bits
• Ficha de los caracteres ascii mas utilizados
• Colores de referencia(es la imagen que esta arriba)
• DataToBat.bat(aplicacion para generar un bat, que cree automaticamente X data file del comando.
• No me acuerdo que mas xD

Descarga : http://bolivianito.webcindario.com/colous.rar

saludos

olas a todos, en esta version he corregido muchos errores, optimizado de codigo,etc...

no tiene nuevas herramientas, he mejorado las que ya traia, hay una nueva herramienta, el cual podes visualizar variables, pero tiene muchos errores, asi que para la proxima version, lo mejorarare, tendrá mas herramientas...

sin mucho que decir, batch maker, es un editor, que permite ayudar a los que recien se inician en este mundo (batch)

Caracteristicas:
-Simple editor, el cual podes guardar,abrir,imprimir,cambiar fuente,etc
-Auto correccion de comandos y sintaxis.
-Muchisimos asistentes que le ayudara complir ciertas funciones facilmente
-Puedes codear hasta 7 code a la vez.
-Testeador
-Compilador
-Manual completo de Batch(basico-avanzado)
-Pack de utilidades y librerias
-Auto actualizacion
-Posibilidad de cifrar tu code a solo 1 click
-Posibilidad de ver las caracteristicas del code ingresado a solo un Click( puedes ver las posibles acciones que realizara el code al ejecutarlo[mejorado]
-Visor de variables  [proximamente arreglado y mejorado]
-No me acuerdo que mas xD


bueno esas son algunas de las caracteristicas...

si alguien tiene alguna idea para que mejore mi programa, PoRfaVor Comentala aca

o alguna critica tambien, lo mismo si encuentran errores...


pd: El reporte de errores que viene en el software funciona, asi que pueden comentar desde alli tambien...

DESCARGA : http://www.mediafire.com/?tuww24ddilu

saludos..


Pick


esa foto es de la version anterior, pero igual es parecida.


saludos

[nota:]

bueno al fin he podido hacer una version estable, sin bug visibles(obiamente tiene bug como todo) y hacer algunas herramientas utiles...

es un editor que ayuda a programar en batch basandose a los que recien empiesan...

me gustaria si me diera algunas ideas y mejoras para poder una herramienta que cumpla toda las necesidades...

algunas caracteristicas:

   *Auto correccion : los comandos mal ingresados seran auto corregidos.
   *Menues con codigos predeterminados.
   *Ayuda o caracteristicas de cada uno de los codigos prediseñados.
   *herramienta OFUSCAR para dificultar la lectura de los codigos(grax a Belphegor)
   *Compilador a exe
   *Edicion de archivos bat directamente desde el menu contextual.
   *funcion de obtencion de caracteristicas del code, para saber aproximadamente
    lo que sucedera al ser ejecutado
   *Manual de programacion batch(basica-avanzada).
   *Pack de librerias externas.
   *Posibilidad de cambio de fuente
   *Posibilidad de trabajar hasta 7 code a la vez de una manera facible.
   *Algunas utilidades externas en batch
       etc...

nota: para sacarle un buen provecho de este software les invito a revisar las herramientas y funciones del programas que estan en el menu de arriba de todo(del programa)
ya que muchos de nosotros nos basamos en una simple vista del programa sin estar revisando las cosas que tienen..

IMAGEN:

Descarga : http://www.mediafire.com/?tt3tyytlm2z


Prohibida su copia o disparcion no autorizado.