@echo off
SetLocal EnableDelayedExpansion
title Start
color a

:loginsta
cls
echo Username
set /p username=
set un=%username%

if /i not "%un%" == "M4rc" (
	if /i not "%un%" == "T1m" (
		set un=ERROR
	)
)
call :login%un%

:loginERROR
cls
echo Account %username% not found. Retry.
pause >nul
goto loginsta

:errorp
cls
echo Das Passwort stimmt nicht, versuche es nochmal!
pause
goto login%un%

:loginM4rc
cls
echo Willkommen M4rc, bitte dein Passwort eingeben.
set /p password=
set pw=%password%

if /i not "%pw%" == "2512" (
	goto errorp
)
call :startadmin

:startadmin
cls
echo Willkommen im Hauptmenue %username%.
choice /c LEP /n /m "Was willst du machen [l]ogout / [e]xit / [p]asswort wechseln"
if %errorlevel%== 1 goto logout
if %errorlevel%== 2 goto exit
if %errorlevel%== 3 goto password

:password
cls
choice /c JN /n /m "Willst du wirklich dein Passwort wechseln ([j]a / [n]ein)"
if %errorlevel%== 1 goto passj
if %errorlevel%== 2 goto loginsta

:passj
echo Altes Passwort eingeben!
set /p oldpassword=
if %oldpassword%== %password% goto passjj

:passjj
echo Neues Passwort eingeben:
set /p newpassword=
goto startadmin

:logout
goto loginsta