@echo off
title 模拟用户登录
echo 加载...
if not exist "Data" goto ce
set ci=100
cls
:back
title 登入
cls
:backcls
echo 登入
echo 输入用户名
echo 默认管理员为Admin
set /p name=
if "%name%"=="" goto back
cls
set ci=99
:fanc
cls
echo 读取中...%ci%/1100
set /a ci=%ci%+1
for /f "delims=" %%i in (Data\user%ci%) do set names=%%i
for /f "delims=" %%i in (Data\%names%\usercontrol) do set control=%%i
set cuo=100
if "%name%"=="%names%" goto next
cls
if "%ci%"=="1100" echo 查无此人 & goto backcls
goto fanc
:next
for /f "delims=" %%i in (Data\%names%\password) do set namespassword=%%i
cls
if "%control%"=="Admin" echo 管理员%names%，您好！
if "%control%"=="User" echo 用户%names%，您好！
if "%control%"=="Guide" echo 来宾%names%，您好！
if "%cuo%"=="103" exit
echo 密码：
echo 默认管理员密码password
set /p password=
if "%password%"=="%namespassword%" goto start
set /a cuo=%cuo%+1
goto next
:start
title 主界面
cls
echo 主界面
echo 1. 1.txt
echo 2.管理用户
echo 3.重置
set /p choose=
goto jianquan

:jianquan
cls
if "%choose%"=="1" goto c
if "%choose%"=="2" goto start
if "%choose%"=="3" goto r
goto start

:r
if not "%control%"=="Admin" goto start
cls
echo 确定吗？
echo 任意键重置.
pause
rd /s /q Data
exit


:c
cls
if "%control%"=="Admin" start Data\1.txt
if "%control%"=="User" copy Data\1.txt Data\cache.txt
if "%control%"=="User" echo 你输入的更改将不会保存。>Data\cache.txt
if "%control%"=="User" start Data\cache.txt
if "%control%"=="Guide" for /f "delims=" %%i in (Data\1.txt) do set nc=%%i
cls
if "%control%"=="Guide" echo %nc%
pause
del /s /q Data\cache.txt
goto start

:ce
cls
md Data
md Data\Admin
echo Admin>Data\user100
echo Admin>Data\Admin\usercontrol
echo ---->Data\1.txt
echo password>Data\Admin\password
goto back
复制代码

@echo off
title 模拟用户登录
echo 加载...
if not exist "Data" goto ce
set ci=100
cls
:back
title 登入
cls
:backcls
echo 登入
echo 输入用户名
set /p name=
if "%name%"=="" goto back
cls
findstr "%name%" Data\User.ini
if %errorlevel% equ 0 goto fanc
goto back
:fanc
set cuo=100
set namespassword=no
:next
for /f "delims=" %%i in (Data\User%name%Control.ini) do set control=%%i
if "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\User%name%Password.ini) do set namespassword=%%i
if "%cuo%"=="103" goto er
cls
echo 密码：
set /p password=
if "%namespassword%"=="" goto er
if "%password%"=="%namespassword%" goto start
set /a cuo=%cuo%+1
goto next
:er
cls
echo 用户名或密码错误。
pause
exit
:start
title 主界面
cls
echo 主界面
echo 1. 1.txt
echo 2.管理用户（目前只支持创建）
echo 3.重置
echo 4.新增功能与已知问题
echo v.0.2 模拟登录注册用户
set /p choose=
goto jianquan

:jianquan
cls
if "%choose%"=="1" goto c
if "%choose%"=="2" goto cuser
if "%choose%"=="3" goto r
if "%choose%"=="4" goto q
goto start

:q
title 新增功能与已知问题
cls
echo ----------2022/04/15----------v.0.1
echo 基本服务。
echo ----------2022/04/16----------v.0.2
echo 重构用户存储方式。
echo 支持创建用户。
echo bug修复
echo ------------------------------
pause
goto start

:r
if not "%control%"=="Admin" goto start
cls
echo 确定吗？
echo 任意键重置.
pause
rd /s /q Data
exit

:c
cls
if "%control%"=="Admin" start Data\1.txt
if "%control%"=="User" copy Data\1.txt Data\cache.txt
if "%control%"=="User" echo 你输入的更改将不会保存。>>Data\cache.txt
if "%control%"=="User" start Data\cache.txt
if not "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\1.txt) do set text=%%i
cls
echo %text%
pause
del /s /q Data\cache.txt
goto start

:ce
cls
md Data
echo Admin>Data\User.ini
echo Admin>Data\UserAdminControl.ini
echo ---->Data\1.txt
echo password>Data\UserAdminPassword.ini
cls
echo 默认管理员为Admin
echo 密码password
echo 任意键代表您已经阅读密码。
pause>nul
goto back

:cuser
title 创建用户
if not "%control%"=="Admin" goto start
cls
echo 创建用户
echo 权限：
echo 1.管理员
echo 2.用户
echo 3.来宾
set /p num=
if "%num%"=="1" set qx=管理员
if "%num%"=="1" goto cusers
if "%num%"=="2" set qx=用户
if "%num%"=="2" goto cusers
if "%num%"=="3" set qx=来宾
if "%num%"=="3" goto cusers
goto cuser
:cusers
cls
echo 创建一个%qx%用户
echo 用户名：
set /p o=
if "%o%"=="" goto cusers
echo %o%>>Data\User.ini
if "%qx%"=="管理员" echo Admin>Data\User%o%Control.ini
if "%qx%"=="用户" echo User>Data\User%o%Control.ini
if "%qx%"=="来宾" echo Guide>Data\User%o%Control.ini & goto cuserw
:cuserp
cls
echo 创建%o%用户的密码
set /p pass=
if "%pass%"=="" goto cuserp
echo %pass%>Data\User%o%Password.ini
:cuserw
cls
echo 恭喜！
echo 用户创建已完成。
echo 重新启动以应用。
pause
exit
复制代码

@echo off
title 模拟用户登录
echo 加载...
if not exist "Data" goto ce
set ci=100
cls
:back
title 登入
cls
:backcls
echo 登入
echo 输入用户名
set /p name=
if "%name%"=="" goto back
cls
findstr "%name%" Data\s.ini
if not %errorlevel% equ 0 goto fanc
findstr "%name%" Data\User.ini
if %errorlevel% equ 0 goto fanc
goto back
:fanc
set cuo=100
set namespassword=no
:next
for /f "delims=" %%i in (Data\User%name%Control.ini) do set control=%%i
if "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\User%name%Password.ini) do set namespassword=%%i
if "%cuo%"=="103" goto er
cls
echo 密码：
set /p password=
if "%namespassword%"=="" goto er
if "%password%"=="%namespassword%" goto start
set /a cuo=%cuo%+1
goto next
:er
cls
echo 用户名或密码错误。
pause
exit
:start
title 主界面
cls
echo 模拟登录注册用户
echo 1. 1.txt
echo 2.管理用户（目前只支持创建）
echo 3.重置
echo 4.新增功能与已知问题
echo 5.删除用户
echo v.0.3 模拟登录注册用户
set /p choose=
goto jianquan

:jianquan
cls
if "%choose%"=="1" goto c
if "%choose%"=="2" goto cuser
if "%choose%"=="3" goto r
if "%choose%"=="4" goto q
if "%choose%"=="5" goto scuser
goto start

:scuser
if not "%control%"=="Admin" goto start
cls
echo 删除用户Preview
echo 你要删除什么用户？
echo tips:删除的用户信息会保留
echo 且长时间内可再次登录
set /p suser=
if "%suser%"=="" goto start
echo %suser%>>Data\s.ini
goto cuserw

:q
title 新增功能与已知问题
cls
echo ----------2022/04/15----------v.0.1
echo 基本服务。
echo ----------2022/04/16----------v.0.2
echo 重构用户存储方式。
echo 支持创建用户。
echo bug修复
echo ----------2022/04/18----------v.0.3
echo 支持删除用户
echo ------预计：2022/04/20-------v.0.4
echo 
pause
goto start

:r
if not "%control%"=="Admin" goto start
cls
echo 确定吗？
echo 任意键重置.
pause
rd /s /q Data
exit

:c
cls
if "%control%"=="Admin" start Data\1.txt
if "%control%"=="User" copy Data\1.txt Data\cache.txt
if "%control%"=="User" echo 你输入的更改将不会保存。>>Data\cache.txt
if "%control%"=="User" start Data\cache.txt
if not "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\1.txt) do set text=%%i
cls
echo %text%
pause
del /s /q Data\cache.txt
goto start

:ce
cls
md Data
echo Admin>Data\User.ini
echo Admin>Data\UserAdminControl.ini
echo ---->Data\1.txt
echo password>Data\UserAdminPassword.ini
cls
echo 默认管理员为Admin
echo 密码password
echo 任意键代表您已经阅读密码。
pause>nul
goto back

:cuser
title 创建用户
if not "%control%"=="Admin" goto start
cls
echo 创建用户
echo 权限：
echo 1.管理员
echo 2.用户
echo 3.来宾
set /p num=
if "%num%"=="1" set qx=管理员
if "%num%"=="1" goto cusers
if "%num%"=="2" set qx=用户
if "%num%"=="2" goto cusers
if "%num%"=="3" set qx=来宾
if "%num%"=="3" goto cusers
goto cuser
:cusers
cls
echo 创建一个%qx%用户
echo 用户名：
set /p o=
if "%o%"=="" goto cusers
echo %o%>>Data\User.ini
if "%qx%"=="管理员" echo Admin>Data\User%o%Control.ini
if "%qx%"=="用户" echo User>Data\User%o%Control.ini
if "%qx%"=="来宾" echo Guide>Data\User%o%Control.ini & goto cuserw
:cuserp
cls
echo 创建%o%用户的密码
set /p pass=
if "%pass%"=="" goto cuserp
echo %pass%>Data\User%o%Password.ini
:cuserw
cls
echo 恭喜！
echo 用户操作已完成。
echo 重新启动以应用。
pause
exit
复制代码

@echo off
title 模拟登录注册用户
echo 加载...
if not exist "Data" goto ce
set ci=100
cls
:back
title 登入
cls
:backcls
echo 登入
echo 输入用户名
set /p name=
if "%name%"=="" goto back
cls
:fanc
set cuo=100
set namespassword=no
:next
for /f "delims=" %%i in (Data\User%name%Control.ini) do set control=%%i
if "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\User%name%Password.ini) do set namespassword=%%i
if "%cuo%"=="103" goto er
cls
echo 密码：
set /p password=
if "%namespassword%"=="" goto er
if "%password%"=="%namespassword%" goto start
set /a cuo=%cuo%+1
goto next
:er
cls
echo 用户名或密码错误。
pause
exit
:start
title 主界面
cls
echo 模拟登录注册用户
echo 1. 1.txt
echo 2.管理用户（目前只支持创建）
echo 3.重置
echo 4.新增功能与已知问题
echo v.0.4 模拟登录注册用户
set /p choose=
goto jianquan

:jianquan
cls
if "%choose%"=="1" goto c
if "%choose%"=="2" goto cuser
if "%choose%"=="3" goto r
if "%choose%"=="4" goto q
goto start

:q
title 新增功能与已知问题
cls
echo ----------2022/04/15----------v.0.1
echo 基本服务。
echo ----------2022/04/16----------v.0.2
echo 重构用户存储方式。
echo 支持创建用户。
echo bug修复
echo ----------2022/04/18----------v.0.3
echo 支持删除用户
echo ----------2022/04/26----------v.0.4
echo 
echo 删除"删除用户"
echo ---------------------------------
pause
goto start

:r
title Reset
if not "%control%"=="Admin" goto start
cls
echo Sure?
echo pause any key to reset.
pause
rd /s /q Data
exit

:c
cls
if "%control%"=="Admin" start Data\1.txt
if "%control%"=="User" copy Data\1.txt Data\cache.txt
if "%control%"=="User" echo 你输入的更改将不会保存。>>Data\cache.txt
if "%control%"=="User" start Data\cache.txt
if not "%control%"=="Guide " goto start
for /f "delims=" %%i in (Data\1.txt) do set text=%%i
cls
echo %text%
pause
del /s /q Data\cache.txt
goto start

:ce
cls
md Data
set uad=y
set control=Admin
:cuser
title 创建用户
if not "%control%"=="Admin" goto start
if "%uad%"=="y" set qx=管理员
if "%uad%"=="y" goto cusers
cls
echo 创建用户
echo 权限：
echo 1.管理员
echo 2.用户
echo 3.来宾
set /p num=
if "%num%"=="1" set qx=管理员
if "%num%"=="1" goto cusers
if "%num%"=="2" set qx=用户
if "%num%"=="2" goto cusers
if "%num%"=="3" set qx=来宾
if "%num%"=="3" goto cusers
goto cuser
:cusers
cls
echo 创建一个%qx%用户
echo 用户名：
set /p o=
if "%o%"=="" goto cusers
echo %o%>>Data\User.ini
if "%qx%"=="管理员" echo Admin>Data\User%o%Control.ini
if "%qx%"=="用户" echo User>Data\User%o%Control.ini
if "%qx%"=="来宾" echo Guide>Data\User%o%Control.ini & goto cuserw
:cuserp
cls
echo 创建%o%用户的密码
set /p pass=
if "%pass%"=="" goto cuserp
echo %pass%>Data\User%o%Password.ini
:cuserw
cls
echo 恭喜！
if "%uad%"=="y" (echo 初始化已完成。) else (echo 用户操作已完成。)
echo 重新启动以应用。
pause
exit
复制代码