Code to Login/register program???

@echo off
setlocal enabledelayexpansion
FOR /l %%G in (1, 1, 4000) do (
                    cls
					echo.
                    echo     Connecting, step %%G
)
echo Loading Done, Press any key
pause
:progstart
cls
color f0
echo Hello, And Welcome to the beta Access.bat. Please read the info, it would be helpful.
echo Anyway, here's your list of options:
echo 1) Login/Register
echo 2) Info
echo 3) Enter as guest.
echo 4) Exit
set /p prstart=Choice Nr.:
if %prstart% equ 1 goto acorno
if %prstart% equ 2 goto info
if %prstart% equ 3 goto gueststart
if %prstart% equ 4 exit
if %prstart% neq 1 goto progstart
:info
cls
color f0
echo This is the beta version. This program allows you to make an account (has also a maximum of 4 slots plus me, the normal-set user. It will soon be able to allow you to edit texts and publish them in the batch file, and to exchange information.
pause
goto progstart
:acorno
echo (L)ogin or (R)egister (Write in capitals)
set /p acorno=
:Accessu
cls
color 07
echo ENTER Slot Nr.: 1, 2, 3, or 4
set /p accu=Slot:
if %accu% equ 1 goto sl1log
if %accu% equ 2 goto sl2log
if %accu% equ 3 goto sl3log
if %accu% equ 4 goto sl4log
if %accu% neq 1 goto Guest
goto Guest
:sl1log
cls
if exist sl1.bat (
    call sl1.bat
	echo Data loaded
	)
if not exist sl1.bat goto Guest
echo ENTER PASSWORD, if no account. write noac
set /p accp1=
cls
if %accp% equ %sl1pass% (
FOR /l %%M in (1, 1, 2000) (
                cls
                echo.
	            echo.
				echo                       =================
				echo                       X           //  X
				echo                       X          //   X
				echo                       X  _      //    X
				echo                       X  \\    //     X
				echo                       X   \\  //      X
				echo                       X    \\//       X
				echo                       =================
				echo                        ACCESS  GRANTED
				goto home))
if %accp% equ noac goto Guest
if %accp% neq sl1pass (
                echo.
                echo.
                echo                        XXXXXXXXXXXXXXXXX
                echo                        X\\           //X
				echo                        X  \\      //   X
				echo                        X     \\//      X
				echo                        X     //\\      X
				echo                        X  //      \\   X
				echo                        X//           \\X
				echo                        XXXXXXXXXXXXXXXXX
				echo                          ACCESS DENIED
				goto Guest)
pause
exit
:sl2log
cls
call sl2.bat
pause
exit
:sl3log
cls
call sl3.bat
pause
exit
:sl4log
cls
call sl4.bat
pause
exit
:Guest
cls
color 0b
echo You apparently don't have an account yet!
echo 1) Ask For Account (soon)
echo 2) Retry Signing In
echo 3) Quit
set /p guest=Program
if %guest% equ 1 goto askac
if %guest% equ 2 goto progstart
if %guest% equ 3 goto leave
if %guest% neq 1 goto Guest
pause
exit
:dispn
cls
echo.
echo Users:
echo lliws
pause
goto guest
:askac
cls
echo                PROFILE CREATION
echo 1) Slot 1
echo 2) Slot 2
echo 3) Slot 3
echo 4) Slot 4
echo Tip:Remember your slot Nr., you will need it for login.
echo.
echo.
set /p slotc= Slot Nr.
if %slotc% equ 1 goto sl1reg
if %slotc% equ 2 goto sl2reg
if %slotc% equ 3 goto sl3reg
if %slotc% equ 4 goto sl4reg
if %slotc% neq 1 echo Please write 1, 2, 3, or 4.
goto askac
:sl1reg
cls
if exist sl1.bat goto sl1exist
if not exist sl1.bat goto sl1first
pause
exit
:sl1exist
call sl1.bat
echo This slot is already used, do you want to overwrite? y/n
set/p sl1ovr
    if %sl1ovr% equ y (
	    echo Write the Slot1 pass first or bk to undo. You will be redirected to profile creation if the entry is wrong
		set /p sl1vrf=Pass:
		if %sl1vrf% equ %sl1pass% goto sl1passtrue
		if %sl1vrf% neq %sl1pass% goto askac
		:sl1passtrue
	    del sl1.bat
	    echo what do you want your pass to be?
		set /p sl1pass'=Slot:1 Pass:
		echo set sl1pass=sl1pass'>sl1.bat
		goto Accessu)
	if %sl1ovr% equ no goto askac
:sl1first
echo what do you want your pass to be?
set /p sl1pass1=Slot:1 Pass:
echo set sl1pass=%sl1pass1%>sl1.bat
goto Accessu
:home
cls
color 07
echo Hello
pause
exit
:leave
cls
echo                               ARE YOU SURE YOU WANT TO LEAVE?
echo                                           [Y/N]
set /p leave=Leaving?
if %leave% equ y exit
if %leave% equ n goto Guest
if %leave% equ yes exit
if %leave% equ no goto Guest
if %leave% neq y goto leave
pause
exit