[BATCH] Se animan a postear sus codes con COLOUS? 8)

Iniciado por .:Xx4NG3LxX:., 19 Abril 2020, 18:06 PM

0 Miembros y 1 Visitante están viendo este tema.

.:Xx4NG3LxX:.

Saludos,

Quisiera pedirles (humildemente) que compartieran sus scripts, pero... Usando el comando COLOUS, no se si habrán hecho alguno... Es para ver creatividad. Yo no encuentro que hacer ...

Gracias !

PD: Captures ! ><
"Quizá Batch no sea un lenguaje de programación, pero no obstante deja de ser útil. Asi que no anden diciendo «Que ganas de perder el tiempo»"



Mudereded401

 Buenas, Por favor, Dime si es una Adición al BATCH o Otro comando que Desconozco? Nunca Había escuchado el "Colous". El Más cercano sería Color.  :-\
Pero aunque los que sepan me digan que no, yo sé muy bien que existe el lado oscuro del sol. – El lado soleado de la calle

.:Xx4NG3LxX:.

Cita de: Mudereded401 en 24 Abril 2020, 01:23 AM
Buenas, Por favor, Dime si es una Adición al BATCH o Otro comando que Desconozco? Nunca Había escuchado el "Colous". El Más cercano sería Color.  :-\




Citar
Resumen: Colous es un comando principalmente para mejorar el diseño de nuestros bat´s, permitiendo el uso del mouse, posicionarse en una determinada parte de la pantalla, escribir con un determinado color, integrando el uso del teclado pausando el code hasta recibir una tecla, o sin pausarlo.




Sí, el Colous, es un comando externo.




[Batch] ejemplos del comando colous
Comando para las coordenadas, colores,etc en batch


"Quizá Batch no sea un lenguaje de programación, pero no obstante deja de ser útil. Asi que no anden diciendo «Que ganas de perder el tiempo»"



Mudereded401

#3
Dónde Podría encontrar ese Colous?

Edit: Batch No deberia Usarse con el mouse, Pues está basado en una terminal. Si Estás intentando hacer programas con COLOUS, Deberías replantearte tu forma de Programar, NO es por criticar pero hay Otros Lenguajes de Programación que ya Tienen implementados el uso de Mouse.
Edit2: Si eres nuevo en la Programación, Rápidamente te encantará Batch por su Fácil uso, eso no lo Niego.
Pero aunque los que sepan me digan que no, yo sé muy bien que existe el lado oscuro del sol. – El lado soleado de la calle

.:Xx4NG3LxX:.

#4
Checa este link: LINK

No se si esta caido...

Y... Citando tu "edit"...
Lo publique más que todo por lo de los colores no por el mouse.... Y no no hay ofensa tranquilo...

EDITO: link a mediafire --> LINK
"Quizá Batch no sea un lenguaje de programación, pero no obstante deja de ser útil. Asi que no anden diciendo «Que ganas de perder el tiempo»"



Mudereded401

 Aquí Hice un "mini-code" de BATCH, sobre un juego que llamé "Maze" (que nombre más simple jaja), Ya que estaba aburrido y experimentando con Colous. Pues esa extensión me pareció interesante, Pero pienso que Hay otra (batbox) Que es un poco más completa. Pero bueno, Aqui te dejo mi Code:


@echo off
goto inicio
::FUNCIONES INTEGRADAS

:MOVIMIENTO
set key=%errorlevel%
set beforex=%x%
set beforey=%y%
if %key%==100 (set/a x+=1)
if %key%==97 (set/a x-=1)
if %key%==115 (set/a y+=1)
if %key%==119 (set/a y-=1)
goto :EOF

:pared
colous 7 7 %1,%2 " "
echo -%1-%2>>configuracion.txt
goto :EOF

:set-coord
set x=%beforex%
set y=%beforey%
goto :EOF

:inicio
title MAZE Game By Mudereded401
@mode con cols=60 lines=30
cls
echo.
colous 14 0 25,10 "Bienvenido"
colous 14 0 17,13 "Pulsa una tecla para iniciar"
echo.
pause>nul
cls
:lvl1
title Nivel 1
colous 14 0 1,1 "LOADING..."
colous 7 7 6,3 "     "
colous 7 7 6,4 " "
colous 7 7 10,4 " "
colous 7 7 6,5 " "
colous 7 7 10,5 " "
colous 7 7 6,6 " "
colous 7 7 10,6 " "
colous 7 7 6,7 " "
colous 7 7 10,7 " "
colous 7 7 6,8 " "
colous 7 7 10,8 " "
colous 7 7 6,9 " "
colous 7 7 10,9 " "
colous 7 7 6,10 " "
colous 7 7 10,10 " "
colous 7 7 6,11 " "
colous 7 7 10,11 " "
colous 7 7 6,12 " "
colous 7 7 10,12 " "
colous 7 7 6,13 " "
colous 7 7 10,13 " "
colous 7 7 6,14 " "
colous 7 7 10,14 " "
colous 7 7 6,15 " "
colous 7 7 10,15 " "
colous 7 7 6,16 "     "
colous 14 0 14,5 "W A S D = Movimiento"
colous 14 0 14,7 "Ve hacia el Punto amarillo."
colous 0 6 7,15 " "
colous 0 0 1,1 "LOADING..."
set x=7
set y=4
:lvl1_
colous 2 2 %x%,%y% " "
colous 0 0 %beforex%,%beforey% " "
colous 2 2 %x%,%y% " "
colous readkey
CALL :MOVIMIENTO
::VERIFICAR COLISIONES
::SIGUIENTE NIVEL
if %x%==7 (
if %y%==15 (
goto lvl2
)
)
::PAREDES
if %x%==6 (set x=7)
if %x%==10 (set x=9)
if %y%==3 (set y=4)
if %y%==16 (set y=15)
goto lvl1_
:lvl2
cls
echo. >config.txt
echo -2,5 >>config.txt
echo -2,4 >>config.txt
echo -2,3 >>config.txt
echo -2,2 >>config.txt
echo -2,6 >>config.txt
echo -2,7 >>config.txt
echo -2,8 >>config.txt
echo -2,9 >>config.txt
echo -2,10 >>config.txt
echo -2,11 >>config.txt
echo -2,12 >>config.txt
echo -2,13 >>config.txt
echo -2,14 >>config.txt
echo -3,2 >>config.txt
echo -4,3 >>config.txt
echo -4,4 >>config.txt
echo -4,5 >>config.txt
echo -4,6 >>config.txt
echo -4,7 >>config.txt
echo -4,8 >>config.txt
echo -4,9 >>config.txt
echo -4,10>>config.txt
echo -5,10 >>config.txt
echo -6,10 >>config.txt
echo -7,10 >>config.txt
echo -8,10 >>config.txt
echo -9,10 >>config.txt
echo -10,10 >>config.txt
echo -11,10 >>config.txt
echo -12,10 >>config.txt
echo -13,10 >>config.txt
echo -14,10 >>config.txt
echo -15,10 >>config.txt
echo -16,10 >>config.txt
echo -17,10 >>config.txt
echo -18,10 >>config.txt
echo -19,10 >>config.txt
echo -20,10 >>config.txt
echo -21,10 >>config.txt
echo -22,10 >>config.txt
echo -23,11 >>config.txt
echo -23,12 >>config.txt
echo -23,13 >>config.txt
echo -3,14 >>config.txt
echo -4,14 >>config.txt
echo -5,14 >>config.txt
echo -6,14 >>config.txt
echo -7,14 >>config.txt
echo -8,14 >>config.txt
echo -9,14 >>config.txt
echo -10,14 >>config.txt
echo -11,14 >>config.txt
echo -12,14 >>config.txt
echo -13,14 >>config.txt
echo -14,14 >>config.txt
echo -15,14 >>config.txt
echo -16,14 >>config.txt
echo -17,14 >>config.txt
echo -18,14 >>config.txt
echo -19,14 >>config.txt
echo -20,14 >>config.txt
echo -21,14 >>config.txt
echo -22,14 >>config.txt
echo -4,12 >>config.txt
echo -5,12 >>config.txt
echo -6,12 >>config.txt
echo -7,12 >>config.txt
echo -8,12 >>config.txt
echo -9,12 >>config.txt
echo -10,12 >>config.txt
echo -11,12 >>config.txt
echo -12,12 >>config.txt
echo -13,12 >>config.txt
echo -14,12 >>config.txt
echo -15,12 >>config.txt
echo -16,12 >>config.txt
echo -17,12 >>config.txt
echo -18,12 >>config.txt
echo -19,12 >>config.txt
echo -20,12 >>config.txt
echo -20,13 >>config.txt
::INICIAR MUNDO
title Nivel 2
colous 14 0 1,1 "LOADING..."
colous 7 7 2,2 "   "
colous 7 7 2,3 " "
colous 7 7 4,3 " "
colous 7 7 2,4 " "
colous 7 7 4,4 " "
colous 7 7 2,5 " "
colous 7 7 4,5 " "
colous 7 7 2,6 " "
colous 7 7 4,6 " "
colous 7 7 2,7 " "
colous 7 7 4,7 " "
colous 7 7 2,8 " "
colous 7 7 4,8 " "
colous 7 7 2,9 " "
colous 7 7 4,9 " "
colous 7 7 2,10 " "
colous 7 7 4,10 "                    "
colous 7 7 2,11 " "
colous 7 7 2,12 " "
colous 7 7 4,12 " "
colous 7 7 2,13 " "
colous 7 7 2,14 "                   "
colous 7 7 4,12 "                 "
colous 7 7 20,13 " "
colous 7 7 23,11 " "
colous 7 7 23,12 " "
colous 7 7 23,13 " "
colous 7 7 23,14 " "
colous 7 7 21,14 "  "
colous 0 6 21,13 " "
set llavex=19
set llavey=13
colous 3 0 %llavex%,%llavey% "I"
set llave=%llavex%%llavey%
set door=19,11
colous 0 3 %door% " "
set x=3
set y=3
colous 14 0 10,3 "para Abrir la puerta, Agarra la llave( )"
colous 3 0 48,3 "I"
colous 0 0 1,1 "LOADING..."
colous 0 3 %door% " "
set doorE=closed
set beforex=1
set beforey=1
:lvl2_
set coordenada=%x%%y%
if %coordenada%==%llave% (
colous 0 0 %door% " "
set doorE=open
)
colous 2 2 %x%,%y% " "
colous 0 0 %beforex%,%beforey% " "
colous 2 2 %x%,%y% " "
colous 7 0 30,30 "%x% %y%"
colous readkey
call :movimiento
::COLISIÓNES
find "-%x%,%y%" "config.txt">nul
if %errorlevel%==0 (
set x=%beforex%
set y=%beforey%)
if %doorE%==closed (
if %x%==19 (
if %y%==11 (
set x=%beforex%
set y=%beforey%
)
)
)
if %x%==21 (
if %y%==13 (
goto lvl3
)
)
goto lvl2_
:lvl3
cls
title Nivel 3
colous 14 0 1,1 "LOADING..."
::AÑADIR COLISIONES
echo. >config.txt
echo -5,4 >>config.txt
echo -4,5 >>config.txt
echo -6,5 >>config.txt
echo -7,5 >>config.txt
echo -8,5 >>config.txt
echo -9,5 >>config.txt
echo -10,5 >>config.txt
echo -11,5 >>config.txt
echo -12,5 >>config.txt
echo -13,5 >>config.txt
echo -14,5 >>config.txt
echo -15,5 >>config.txt
echo -16,5 >>config.txt
echo -17,5 >>config.txt
echo -18,5 >>config.txt
echo -19,5 >>config.txt
echo -20,5 >>config.txt
echo -21,5 >>config.txt
echo -22,5 >>config.txt
echo -23,5 >>config.txt
echo -24,5 >>config.txt
echo -25,5 >>config.txt
echo -26,5 >>config.txt
echo -27,5 >>config.txt
echo -28,5 >>config.txt
echo -29,5 >>config.txt
echo -30,5 >>config.txt
echo -31,5 >>config.txt
echo -32,5 >>config.txt
echo -33,6 >>config.txt
echo -33,7 >>config.txt
echo -33,8 >>config.txt
echo -33,9 >>config.txt
echo -33,10 >>config.txt
echo -33,11 >>config.txt
echo -33,12 >>config.txt
echo -33,13 >>config.txt
echo -33,14 >>config.txt
echo -33,15 >>config.txt
echo -31,7 >>config.txt
echo -30,7 >>config.txt
echo -29,7 >>config.txt
echo -28,7 >>config.txt
echo -27,7 >>config.txt
echo -26,7 >>config.txt
echo -25,7 >>config.txt
echo -24,7 >>config.txt
echo -23,7 >>config.txt
echo -22,7 >>config.txt
echo -21,7 >>config.txt
echo -20,7 >>config.txt
echo -19,7 >>config.txt
echo -18,7 >>config.txt
echo -17,7 >>config.txt
echo -16,7 >>config.txt
echo -15,7 >>config.txt
echo -14,7 >>config.txt
echo -13,7 >>config.txt
echo -12,7 >>config.txt
echo -11,7 >>config.txt
echo -10,7 >>config.txt
echo -9,7 >>config.txt
echo -8,7 >>config.txt
echo -7,7 >>config.txt
echo -6,7 >>config.txt
echo -4,6 >>config.txt
echo -4,7 >>config.txt
echo -4,8 >>config.txt
echo -4,9 >>config.txt
echo -4,10 >>config.txt
echo -4,11 >>config.txt
echo -4,12 >>config.txt
echo -5,13 >>config.txt
echo -6,13 >>config.txt
echo -7,13 >>config.txt
echo -8,13 >>config.txt
echo -9,13 >>config.txt
echo -10,13 >>config.txt
echo -11,13 >>config.txt
echo -12,13 >>config.txt
echo -13,13 >>config.txt
echo -14,13 >>config.txt
echo -15,13 >>config.txt
echo -16,13 >>config.txt
echo -17,13 >>config.txt
echo -17,14 >>config.txt
echo -17,15 >>config.txt
echo -19,16 >>config.txt
echo -20,16 >>config.txt
echo -21,16 >>config.txt
echo -22,16 >>config.txt
echo -23,16 >>config.txt
echo -24,16 >>config.txt
echo -25,16 >>config.txt
echo -26,16 >>config.txt
echo -27,16 >>config.txt
echo -28,16 >>config.txt
echo -29,16 >>config.txt
echo -30,16 >>config.txt
echo -31,16 >>config.txt
echo -32,16 >>config.txt
echo -31,14 >>config.txt
echo -31,13 >>config.txt
echo -31,12 >>config.txt
echo -31,11 >>config.txt
echo -31,10 >>config.txt
echo -31,9 >>config.txt
echo -28,14 >>config.txt
echo -29,14 >>config.txt
echo -29,13 >>config.txt
echo -29,12 >>config.txt
echo -29,11 >>config.txt
echo -29,10 >>config.txt
echo -29,9 >>config.txt
echo -28,9 >>config.txt
echo -27,9 >>config.txt
echo -26,9 >>config.txt
echo -25,9 >>config.txt
echo -24,9 >>config.txt
echo -23,9 >>config.txt
echo -22,9 >>config.txt
echo -21,9 >>config.txt
echo -20,9 >>config.txt
echo -19,9 >>config.txt
echo -18,9 >>config.txt
echo -17,9 >>config.txt
echo -16,9 >>config.txt
echo -15,9 >>config.txt
echo -14,9 >>config.txt
echo -13,9 >>config.txt
echo -12,9 >>config.txt
echo -11,9 >>config.txt
echo -10,9 >>config.txt
echo -9,9 >>config.txt
echo -8,9 >>config.txt
echo -7,9 >>config.txt
echo -6,9 >>config.txt
echo -6,10 >>config.txt
echo -6,11 >>config.txt
echo -7,11 >>config.txt
echo -8,11 >>config.txt
echo -9,11 >>config.txt
echo -10,11 >>config.txt
echo -11,11 >>config.txt
echo -12,11 >>config.txt
echo -13,11 >>config.txt
echo -14,11 >>config.txt
echo -15,11 >>config.txt
echo -16,11 >>config.txt
echo -17,11 >>config.txt
echo -18,11 >>config.txt
echo -19,11 >>config.txt
echo -20,11 >>config.txt
echo -21,11 >>config.txt
echo -22,11 >>config.txt
echo -23,11 >>config.txt
echo -24,11 >>config.txt
echo -25,11 >>config.txt
echo -26,11 >>config.txt
echo -26,12 >>config.txt
echo -26,13 >>config.txt
echo -26,14 >>config.txt
::PINTAR MUNDO
colous 7 7 4,4 "   "
colous 7 7 4,5 " "
colous 7 7 6,5 "                            "
colous 7 7 4,6 " "
colous 7 7 4,7 " "
colous 7 7 6,7 "                            "
colous 7 7 33,6 " "
colous 0 0 32,7 " "
colous 7 7 4,8 " "
colous 7 7 4,9 " "
colous 7 7 4,10 " "
colous 7 7 4,11 " "
colous 7 7 4,12 " "
colous 7 7 4,13 "             "
colous 7 7 6,9 "                        "
colous 7 7 6,10 " "
colous 7 7 6,11 "        "
colous 7 7 33,9 " "
colous 7 7 33,8 " "
colous 7 7 33,10 " "
colous 7 7 33,11 " "
colous 7 7 31,9 " "
colous 7 7 31,10 " "
colous 7 7 31,11 " "
colous 7 7 31,12 " "
colous 7 7 31,13 " "
colous 7 7 31,14 " "
colous 7 7 33,12 " "
colous 7 7 33,13 " "
colous 7 7 33,14 " "
colous 7 7 33,15 " "
colous 7 7 33,16 " "
colous 7 7 32,16 " "
colous 7 7 31,16 " "
colous 7 7 30,16 " "
colous 7 7 29,16 " "
colous 7 7 29,14 " "
colous 7 7 28,16 " "
colous 7 7 27,16 " "
colous 7 7 19,16 "        "
colous 7 7 17,16 " "
colous 7 7 17,15 " "
colous 7 7 17,14 " "
colous 7 7 17,13 " "
colous 7 7 29,13 " "
colous 7 7 29,12 " "
colous 7 7 29,11 " "
colous 7 7 29,10 " "
colous 7 7 29,9 " "
colous 7 7 28,14 " "
colous 7 7 26,14 " "
colous 7 7 26,13 " "
colous 7 7 26,12 " "
colous 7 7 26,11 " "
colous 7 7 14,11 "            "
colous 0 6 18,16 " "
colous 0 0 1,1 "LOADING..."
set x=5
set y=5
set beforex=1
set beforey=1
set llavex=30
set llavey=8
set llave=%llavex%%llavey%
set llavex_=7
set llavey_=10
set llave_=%llavex_%%llavey_%
set doorx=27
set doory=14
set door=%doorx%%doory%
set doorx_=18
set doory_=15
set door_=%doorx_%%doory_%
colous 3 3 %doorx_%,%doory_% " "
colous 4 4 %doorx%,%doory% " "
colous 4 0 %llavex%,%llavey% "I"
colous 3 0 %llavex_%,%llavey_% "I"
set doorE=closed
set doorE_=closed
:lvl3_
set coordenada=%x%%y%
if %coordenada%==1816 (
goto lvl4
)
if %coordenada%==%llave% (
set doorE=open
colous 0 0 %doorx%,%doory% " "
)
if %coordenada%==%llave_% (
set doorE_=open
colous 0 0 %doorx_%,%doory_% " "
)
)
if %doorE%==closed (
if %x%==27 (
if %y%==14 (
set x=%beforex%
set y=%beforey%
)
)
)
if %doorE_%==closed (
if %x%==%doorx_% (
if %y%==%doory_% (
set x=%beforex%
set y=%beforey%
)
)
)
colous 2 2 %x%,%y% " "
colous 0 0 %beforex%,%beforey% " "
colous 2 2 %x%,%y% " "
colous 7 0 30,30 "%x% %y%"
colous readkey
CALL :movimiento
find "-%x%,%y%" "config.txt">nul
if %errorlevel%==0 (
set x=%beforex%
set y=%beforey%)
goto lvl3_



:lvl4
cls
title Nivel 4

echo.
echo. >configuracion.txt
if exist "config.txt" (
del config.txt )
colous 14 0 1,1 "LOADING..."

if exist "coordenadas.txt" (
del coordenadas.txt )

call :pared 2 3
call :pared 3 3
call :pared 2 4
call :pared 4 3
call :pared 5 3
call :pared 6 3
call :pared 7 3
call :pared 8 3
call :pared 9 3
call :pared 10 3
call :pared 2 5
call :pared 2 6
call :pared 2 7
call :pared 2 8
call :pared 2 9
call :pared 4 5
call :pared 4 6
call :pared 4 7
call :pared 4 8
call :pared 4 9
call :pared 11 3
call :pared 12 3
call :pared 13 3
call :pared 14 3
call :pared 15 3
call :pared 15 4
call :pared 15 5
call :pared 15 6
call :pared 15 7
call :pared 15 8
call :pared 15 9
call :pared 15 10
call :pared 2 10
call :pared 4 10
call :pared 15 11
call :pared 4 11
call :pared 2 11
call :pared 15 12
call :pared 4 12
call :pared 2 12
call :pared 15 13
call :pared 4 13
call :pared 2 13
call :pared 5 5
call :pared 6 5
call :pared 7 5
call :pared 8 5
call :pared 10 5
call :pared 11 5
call :pared 12 5
call :pared 13 5
call :pared 13 6
call :pared 13 7
call :pared 13 8
call :pared 13 8
call :pared 13 10
call :pared 13 12
call :pared 13 13
call :pared 7 8
call :pared 8 8
call :pared 9 8
call :pared 10 8
call :pared 7 9
call :pared 10 9
call :pared 10 10
call :pared 7 11
call :pared 10 11
call :pared 7 12
call :pared 8 12
call :pared 9 12
call :pared 10 12
call :pared 2 14
call :pared 2 15
call :pared 3 15
call :pared 4 15
call :pared 5 15
call :pared 7 15
call :pared 8 15
call :pared 9 15
call :pared 10 15
call :pared 11 15
call :pared 12 15
call :pared 13 15
call :pared 14 15
call :pared 15 14
call :pared 15 15
call :pared 5 16
call :pared 7 16
call :pared 5 17
call :pared 7 17
call :pared 5 18
call :pared 5 19
call :pared 6 19
call :pared 7 19
call :pared 8 19
call :pared 9 19
call :pared 10 19
call :pared 13 19
call :pared 14 19
call :pared 15 19
call :pared 15 18
call :pared 15 17
call :pared 15 16
call :pared 11 21
call :pared 12 21
call :pared 13 21
call :pared 15 20
call :pared 15 21
call :pared 12 22
call :pared 12 23
call :pared 13 23
call :pared 14 23
call :pared 15 23
call :pared 13 11
call :pared 14 11
call :pared 9 21
call :pared 9 22
call :pared 9 23
call :pared 10 23
call :pared 8 21
call :pared 6 21
call :pared 5 21
call :pared 4 21
call :pared 3 21
call :pared 2 21
call :pared 2 20
call :pared 2 19
call :pared 2 18
call :pared 2 17
call :pared 2 16
call :pared 7 23
call :pared 6 23
call :pared 5 23
call :pared 4 23
call :pared 2 23
call :pared 2 22
call :pared 4 24
call :pared 4 25
call :pared 4 26
call :pared 2 26
call :pared 2 25
call :pared 2 24
call :pared 2 27
call :pared 2 28
call :pared 3 28
call :pared 4 28
call :pared 5 28
call :pared 6 28
call :pared 7 28
call :pared 8 28
call :pared 9 28
call :pared 10 24
call :pared 10 25
call :pared 9 25
call :pared 8 25
call :pared 7 25
call :pared 6 25
call :pared 6 26
call :pared 7 26
call :pared 8 26
call :pared 9 26
call :pared 10 26
call :pared 10 28
call :pared 12 27
call :pared 12 26
call :pared 12 25
call :pared 11 25
call :pared 12 28
call :pared 10 29
call :pared 10 30
call :pared 11 30
call :pared 12 30
call :pared 13 25
call :pared 14 25
call :pared 16 25
call :pared 16 24
call :pared 16 23
call :pared 17 23
call :pared 18 23
call :pared 19 23
call :pared 18 25
call :pared 18 26
call :pared 18 27
call :pared 17 27
call :pared 16 27
call :pared 15 27
call :pared 14 27
call :pared 13 27
call :pared 13 28
call :pared 13 30
call :pared 14 30
call :pared 15 30
call :pared 16 30
call :pared 16 29
call :pared 17 29
call :pared 18 29
call :pared 19 29
call :pared 20 29
call :pared 21 29
call :pared 22 29
call :pared 20 27
call :pared 21 27
call :pared 22 27
call :pared 22 26
call :pared 22 25
call :pared 21 25
call :pared 20 25
call :pared 19 25
call :pared 21 24
call :pared 21 23
call :pared 21 22
call :pared 21 21
call :pared 19 21
call :pared 18 21
call :pared 17 21
call :pared 17 22
call :pared 17 19
call :pared 18 19
call :pared 17 18
call :pared 17 17
call :pared 17 16
call :pared 16 14
call :pared 17 14
call :pared 17 20
call :pared 19 19
call :pared 20 19
call :pared 21 19
call :pared 22 19
call :pared 23 21
call :pared 23 19
call :pared 24 19
call :pared 24 21
call :pared 23 22
call :pared 23 23
call :pared 24 23
call :pared 24 24
call :pared 24 25
call :pared 24 27
call :pared 23 27
call :pared 25 27
call :pared 26 27
call :pared 26 26
call :pared 26 25
call :pared 26 24
call :pared 26 22
call :pared 26 21
call :pared 25 21
call :pared 28 21
call :pared 28 20
call :pared 28 19
call :pared 27 19
call :pared 26 19
call :pared 26 20
call :pared 28 23
call :pared 28 24
call :pared 28 25
call :pared 28 26
call :pared 28 28
call :pared 27 28
call :pared 26 28
call :pared 25 28
call :pared 24 28
call :pared 24 30
call :pared 23 30
call :pared 22 30
call :pared 25 30
call :pared 26 30
call :pared 27 30
call :pared 28 30
call :pared 29 30
call :pared 30 30
call :pared 30 29
call :pared 31 29
call :pared 28 27
call :pared 29 27
call :pared 30 27
call :pared 32 29
call :pared 32 28
call :pared 32 27
call :pared 32 25
call :pared 31 25
call :pared 30 25
call :pared 29 23
call :pared 30 23
call :pared 31 23
call :pared 33 25
call :pared 34 25
call :pared 35 25
call :pared 34 27
call :pared 35 27
call :pared 36 27
call :pared 38 27
call :pared 38 28
call :pared 36 28
call :pared 34 28
call :pared 31 30
call :pared 32 30
call :pared 33 30
call :pared 34 30
call :pared 35 30
call :pared 36 30
call :pared 36 29
call :pared 37 30
call :pared 38 30
call :pared 39 30
call :pared 40 30
call :pared 41 30
call :pared 42 30
call :pared 43 30
call :pared 43 29
call :pared 43 28
call :pared 43 27
call :pared 43 26
call :pared 41 26
call :pared 41 27
call :pared 41 28
call :pared 40 28
call :pared 39 28
call :pared 30 21
call :pared 31 21
call :pared 30 20
call :pared 30 18
call :pared 31 18
call :pared 32 18
call :pared 28 17
call :pared 27 17
call :pared 26 17
call :pared 27 18
call :pared 32 19
call :pared 32 21
call :pared 32 23
call :pared 33 23
call :pared 34 23
call :pared 35 23
call :pared 36 23
call :pared 36 23
call :pared 36 25
call :pared 37 25
call :pared 38 25
call :pared 39 25
call :pared 41 25
call :pared 41 24
call :pared 41 23
call :pared 40 23
call :pared 39 23
call :pared 38 23
call :pared 40 22
call :pared 40 21
call :pared 39 21
call :pared 38 21
call :pared 37 21
call :pared 36 21
call :pared 35 21
call :pared 34 21
call :pared 33 21
call :pared 33 19
call :pared 34 19
call :pared 35 19
call :pared 37 19
call :pared 37 20
call :pared 37 18
call :pared 37 17
call :pared 36 17
call :pared 35 17
call :pared 34 17
call :pared 34 16
call :pared 33 16
call :pared 32 16
call :pared 30 16
call :pared 30 15
call :pared 28 15
call :pared 28 16
call :pared 27 16
call :pared 26 16
call :pared 26 15
call :pared 27 15
call :pared 37 18
call :pared 37 17
call :pared 36 17
call :pared 35 17
call :pared 34 17
call :pared 34 16
call :pared 33 16
call :pared 32 16
call :pared 30 16
call :pared 30 15
call :pared 28 15
call :pared 28 16
call :pared 27 16
call :pared 26 16
call :pared 26 15
call :pared 27 15
call :pared 32 14
call :pared 33 14
call :pared 34 14
call :pared 35 14
call :pared 36 14
call :pared 36 15
call :pared 37 15
call :pared 38 15
call :pared 39 15
call :pared 39 16
call :pared 39 17
call :pared 39 18
call :pared 39 19
call :pared 40 19
call :pared 41 20
call :pared 42 22
call :pared 43 24
call :pared 43 25
call :pared 37 18
call :pared 37 17
call :pared 36 17
call :pared 35 17
call :pared 34 17
call :pared 34 16
call :pared 33 16
call :pared 32 16
call :pared 30 16
call :pared 30 15
call :pared 28 15
call :pared 28 16
call :pared 27 16
call :pared 26 16
call :pared 26 15
call :pared 27 15
call :pared 32 14
call :pared 33 14
call :pared 34 14
call :pared 35 14
call :pared 36 14
call :pared 36 15
call :pared 37 15
call :pared 38 15
call :pared 39 15
call :pared 39 16
call :pared 39 17
call :pared 39 18
call :pared 39 19
call :pared 40 19
call :pared 42 22
call :pared 43 24
call :pared 43 25
call :pared 44 24
call :pared 44 23
call :pared 44 22
call :pared 44 20
call :pared 43 20
call :pared 43 19
call :pared 43 18
call :pared 43 17
call :pared 42 17
call :pared 41 17
call :pared 37 18
call :pared 37 17
call :pared 36 17
call :pared 35 17
call :pared 34 17
call :pared 34 16
call :pared 33 16
call :pared 32 16
call :pared 30 16
call :pared 30 15
call :pared 28 15
call :pared 28 16
call :pared 27 16
call :pared 26 16
call :pared 26 15
call :pared 27 15
call :pared 32 14
call :pared 33 14
call :pared 34 14
call :pared 35 14
call :pared 36 14
call :pared 36 15
call :pared 37 15
call :pared 38 15
call :pared 39 15
call :pared 39 16
call :pared 39 17
call :pared 39 18
call :pared 39 19
call :pared 40 19
call :pared 41 19
call :pared 41 21
call :pared 41 22
call :pared 43 24
call :pared 43 25
call :pared 44 24
call :pared 44 23
call :pared 44 22
call :pared 44 20
call :pared 43 20
call :pared 43 19
call :pared 43 18
call :pared 43 17
call :pared 42 17
call :pared 41 17
call :pared 45 20
call :pared 46 20
call :pared 46 21
call :pared 46 22
call :pared 46 23
call :pared 45 23
call :pared 41 16
call :pared 41 15
call :pared 41 14
call :pared 41 13
call :pared 40 13
call :pared 39 13
call :pared 38 13
call :pared 37 13
call :pared 36 13
call :pared 32 13
call :pared 31 13
call :pared 30 13
call :pared 29 13
call :pared 28 13
call :pared 27 13
call :pared 26 13
call :pared 26 14
call :pared 25 14
call :pared 25 17
call :pared 24 17
call :pared 23 17
call :pared 21 17
call :pared 20 17
call :pared 19 17
call :pared 19 16
call :pared 19 15
call :pared 19 14
call :pared 18 14
call :pared 20 14
call :pared 21 14
call :pared 22 14
call :pared 23 14
call :pared 24 14
call :pared 25 14
call :pared 26 14
colous 0 0 1,1 "LOADING..."

set x=9
set y=10
set beforex=1
set beforey=2
colous 2 2 %x%,%y% " "

::MORADA
set llavex=18
set llavey=22
set llave=%llavex%%llavey%
colous 5 0 %llavex%,%llavey% "I"
set doorx=5
set doory=20
set doorE=closed
colous 0 5 %doorx%,%doory% " "

::ROJA
set llavex_=3
set llavey_=16
set llave_=%llavex_%%llavey_%
colous 4 0 %llavex_%,%llavey_% "I"
set doorx_=22
set doory_=17
set doorE_=closed
colous 0 4 %doorx_%,%doory_% " "

::AZUL CLARO
set llavex__=24
set llavey__=16
set llave__=%llavex__%%llavey__%
colous 3 0 %llavex__%,%llavey__% "I"
set doorx__=25
set doory__=22
set doorE__=closed
colous 0 3 %doorx__%,%doory__% " "

::AZUL OSCURO
set llavex___=24
set llavey___=22
set llave___=%llavex___%%llavey___%
colous 1 0 %llavex___%,%llavey___% "I"
set doorx___=27
set doory___=21
set doorE___=closed
colous 0 1 %doorx___%,%doory___% " "

colous 6 6 27,20 " "
:lvl4_
set coordenada=%x%%y%

::LLAVES
if %coordenada%==%llave% (
set doorE=open
colous 0 0 %doorx%,%doory% " "
)
if %coordenada%==%llave_% (
set doorE_=open
colous 0 0 %doorx_%,%doory_% " "
)
if %coordenada%==%llave__% (
set doorE__=open
colous 0 0 %doorx__%,%doory__% " "
)
if %coordenada%==%llave___% (
set doorE___=open
colous 0 0 %doorx___%,%doory___% " "
)
:PUERTAS
if %doorE%==closed (
if %x%==5 (
if %y%==20 (
set x=%beforex%
set y=%beforey%
)
)
)
if %doorE_%==closed (
if %x%==22 (
if %y%==17 (
set x=%beforex%
set y=%beforey%
)
)
)
if %doorE__%==closed (
if %x%==25 (
if %y%==22 (
set x=%beforex%
set y=%beforey%
)
)
)
if %doorE___%==closed (
if %x%==27 (
if %y%==21 (
set x=%beforex%
set y=%beforey%
)
)
)

if %x%==27 (
if %y%==20 (
goto end
)
)

colous 2 2 %x%,%y% " "
colous 0 0 %beforex%,%beforey% " "
colous 2 2 %x%,%y% " "

colous readkey
call :movimiento

find "-%x%-%y%" "configuracion.txt" >nul
if %errorlevel%==0 (
set x=%beforex%
set y=%beforey%
)
colous 7 0 50,30 "%x% %y%"
goto lvl4_

:end
cls
echo.
echo Eso ha sido Todo (hasta ahora). Esta es solo una prueba de Mi juego
echo MAZE[Laberinto en ingles], Que he estado desarrollando. Espero que te
echo haya Gustado!
echo.
timeout/t 5 /nobreak>Nul
pause>nul
exit


El code no es muy largo, Pero creo que se habría podido fácilmente simplificar si Hubiese usado BatBox.  :rolleyes:
Pero aunque los que sepan me digan que no, yo sé muy bien que existe el lado oscuro del sol. – El lado soleado de la calle

.:Xx4NG3LxX:.

Jajajajaja muy bueno tu code, mucho ingenio. Yo pensé que nadie se iba animar....
"Quizá Batch no sea un lenguaje de programación, pero no obstante deja de ser útil. Asi que no anden diciendo «Que ganas de perder el tiempo»"