"
This site http://java.com/ is experiencing technical difficulty. We are aware of the issue and are working as quick as possible to correct the issue.

We apologize for any inconvenience this may have caused.

To speak with an Oracle sales representative: 1.800.ORACLE1.

To contact Oracle Corporate Headquarters from anywhere in the world: 1.650.506.7000.

To get technical support in the United States: 1.800.633.0738.
 

 

Incident Number: 18.93024a17.1603556246.2c9e6d9
"

::3214789852:: "privado" 
@ECHO OFF
@mode con cols=60 lines=20
color 0e
<"FKey.bat" set/p "linea="
set contador=0
for %%a in (%linea%) do (
set a=%%a
call :lol
)

set clave=%clave:~2,999999%
set clave=%clave:~-999999,-2%
set carpeta=%carpeta:~1,999999%
set carpeta=%carpeta:~-999999,-1%

title Folder Privado
if EXIST "Control Panel.{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}" goto UNLOCK
if NOT EXIST "%carpeta%" goto MDLOCKER
:CONFIRM
cls
echo elige una opcion
echo.
echo B [Bloquear]
echo D [Cambiar Clave]
echo F [Cambiar Carpeta]
echo S [Salir]
echo.
echo.
choice /c bsdf /n >nul
if %errorlevel%==1 goto LOCK
if %errorlevel%==2 exit
if %errorlevel%==3 goto CP
if %errorlevel%==4 goto CF
echo Invalid choice.
goto CONFIRM
:LOCK
ren "%carpeta%" "Control Panel.{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}"
attrib +h +s "Control Panel.{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}"
echo Folder locked
goto unlock
:UNLOCK
cls
echo Escribe la contrase¤a para desbloquear carpeta
set/p "pass=>"
if NOT %pass%==%clave% goto FAIL
attrib -h -s "Control Panel.{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}"
ren "Control Panel.{2559a1f2-21d7-11d4-bdaf-00c04f60b9f0}" "%carpeta%"
echo Folder Unlocked successfully
goto confirm
:FAIL
echo Clave invalida
goto unlock
:MDLOCKER
md "%carpeta%"
goto confirm
:cp
cls
echo.
echo Seguro que quieres cambiar la clave?
echo.
echo [S/N]
echo.
choice /c sn /n >nul
if %errorlevel%==1 (goto cp_) else (goto confirm)
:cp_
cls
echo.
echo  Clave Antigua: %clave%
echo.
set/p clave=Nueva Clave : 
(
echo w
echo 1
echo ::%clave%:: "%carpeta%"
echo e ) | edlin /b Fkey.bat
del FKEY.BAK
ren "FKEY.bat" "FKey.bat"
goto confirm

:lol
set/a contador+=1
if %contador%==1 (set clave=%a%)
if %contador%==2 (set carpeta=%a%)
goto :EOF

:cf
cls
echo.
echo Seguro que quieres cambiar la carpeta?
echo.
echo [S/N]
echo.
choice /c sn /n >nul
if %errorlevel%==1 (goto cf_) else (goto confirm)

:cf_
cls
echo.
echo  Carpeta Antigua: %carpeta%
echo.
set/p carpeta=Nueva Carpeta : 
(
echo w
echo 1
echo ::%clave%:: "%carpeta%"
echo e ) | edlin /b Fkey.bat
del FKEY.BAK
ren "FKEY.bat" "FKey.bat"
goto confirm

@echo off
title .:: Change Size by EddyW (3D1) ::.

set s=%3

if /i %s%==l (goto LucidaF)
if /i %s%==t (goto TerminalF)
pause>nul
cls
exit
:LucidaF
Reg export HKCU\Console BackupScreen.reg>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FaceName /t REG_SZ /d "Lucida Console" /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontFamily /t REG_DWORD /d 54 /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontSize /t REG_DWORD /d %200000 /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontWeight /t REG_DWORD /d 400 /f>nul
start /max cmd /c %1>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FaceName /f>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontFamily /f>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontSize /f>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontWeight /f>nul
Reg import BackupScreen.reg>nul
Del /Q BackupScreen.reg>nul
cls
exit
:TerminalF
Reg export HKCU\Console BackupScreen.reg>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FaceName /t REG_SZ /d "Terminal" /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontFamily /t REG_DWORD /d 48 /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontSize /t REG_DWORD /d %293220 /f>nul
Reg add HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontWeight /t REG_DWORD /d 400 /f>nul
start /max cmd /c %1>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FaceName /f>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontFamily /f>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontSize /f>nul
Reg delete HKCU\Console\%%SystemRoot%%_system32_cmd.exe /v FontWeight /f>nul
Reg import BackupScreen.reg>nul
Del /Q BackupScreen.reg>nul
cls
exit

@echo off
set ruta=toga.txt
Start /MIN size.bat modulo.bat 1 L
echo %ruta%>modulo

@echo off
@mode con cols=1000 lines=30000
color 70
<"modulo" set/p "ruta="
title Imagen
del modulo
cls
type "%ruta%"
pause>nul

@echo off
color 0b
title %username%
:inicio
echo.
echo Introduce tu ID.
echo.
set/p id=ID : 
find /n "%id%" "lista.txt" >lol
if %errorlevel%==1 (
cls
echo.
echo Oh no. Parece que la ID que has escrito, No existe.
goto inicio
)
(
echo 1d
echo 1d
echo e ) | edlin lol
<"lol" set/p "linea="
set linea=%linea:~3,9999%
set id=%linea:~0,5%
set a=%linea:~6,5%
set b=%linea:~12,5%
del LOL.bak
del LOL
cls
echo DE: %linea%
echo.
echo ID: %id%
echo Grupo A: %a%
echo Grupo B: %b%
pause>nul

@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