Advanced Batch OS Speedcoding

@echo off
title Batch OS - Speedcoding
mode con: lines=25 cols=75

:boot
cls
color 0a
echo Batch OS - Speedcoding booting up...
timeout /t 3 /nobreak >nul

:verify_logon
if exist log.txt goto :logon
if not exist log.txt goto :make_logon

:logon
<log.txt (
set /p username=
set /p password=
)
cls
echo Please type your username and your password.
echo.
set /p user=Username :
if not %user% == %username% goto :logon
echo.
set /p pass=Password :
if %pass% == %password% goto :desktop
goto :logon

:make_logon
cls
echo Please set your new username/password.
echo.
set /p user=Username :
echo.
set /p pass=Password :
(
echo %user%
echo %pass%
) >log.txt
goto :logon

:desktop
cls
color 0a
::Hide cursor
batbox /h 0
::Up line and Down line
for /l %%a in (1,1,73) do (
batbox /g %%a 0 /c 0xaa /d "0"
batbox /g %%a 24 /c 0xaa /d "0"
)
::Draw a start button
for /l %%a in (1,1,7) do (
batbox /g %%a 24 /c 0x11 /d "0"
)
batbox /g 2 24 /c 0x10 /d "Start"
::Draw the time
batbox /g 63 0 /c 0xA0 /d "%time%"

::go to the clic funtion
goto :clic_desk

:clic_desk
for /f "tokens=1,2,3 delims=:" %%a in ('batbox /m') do (
set X=%%a
set Y=%%b
set C=%%c
)

::verify if user clicked on start
for /l %%a in (1,1,7) do (
    if %X% == %%a if %Y% == 24 goto :start
)

goto :clic_desk

:start
::draw the menu
for /l %%a in (23,-1,13) do (
batbox /g 1 %%a /c 0x11 /d "000000000000"
)
::draw the title of the menu
batbox /g 5 13 /c 0xC1 /d "MENU"
::draw some option
batbox /g 1 14 /c 0x10 /d "About..."
batbox /g 1 15 /c 0x10 /d "Restart"
batbox /g 1 16 /c 0x10 /d "Exit"
::go to click function for start menu
goto :clic_start

:clic_start
for /f "tokens=1,2,3 delims=:" %%a in ('batbox /m') do (
set X=%%a
set Y=%%b
set C=%%c
)

::verify if user clicked on start a new time
for /l %%a in (1,1,7) do (
    if %X% == %%a if %Y% == 24 goto :desktop
)

::verify if user clicked on about
for /l %%a in (1,1,7) do (
    if %X% == %%a if %Y% == 14 goto :about
)

::verify if user clicked on restart
for /l %%a in (1,1,7) do (
    if %X% == %%a if %Y% == 15 goto :boot
)

::verify if user clicked on exit
for /l %%a in (1,1,7) do (
    if %X% == %%a if %Y% == 16 exit
)

goto :clic_start

:about
cls
color 0a
::Up line and Down line
for /l %%a in (1,1,73) do (
batbox /g %%a 0 /c 0xaa /d "0"
batbox /g %%a 24 /c 0xaa /d "0"
)
::Draw text
batbox /g 1 2 /c 0x0a /d "Batch OS - SpeedCoding"
batbox /g 1 3 /c 0x0a /d "By D3nX"
batbox /g 1 4 /c 0x0a /d "A fully open source Batch OS"
batbox /g 1 5 /c 0x0a /d "Version : 1.0"
batbox /g 1 7 /c 0x0a /d "Press a key to return desktop..."
pause >Nul
goto :desktop