幻灵私服账号添加ver1.1.bat

:: 幻灵私服账号添加Bat工具 Ver1.1 :: 本程序只为幻灵私服添加账号使用 :: Code by Duckyの復活（QQ:462363） :: 转载请保留版权

:: 幻灵私服账号添加Bat工具 Ver1.1
:: 本程序只为幻灵私服添加账号使用
:: Code by Duckyの復活（QQ:462363）
:: 转载请保留版权，谢谢合作！

:: ----------------------------------
:: -    此处为默认变量设置起始区    -
:: ----------------------------------
:: 1、默认服务器地址
@Set D_Host=127.0.0.1
:: 2、默认服务器端口
@Set D_Port=3306
:: 3、默认服务器账号
@Set D_User=root
:: 4、默认服务器密码
@Set D_Pass=123456
:: 5、默认服务器数据库
@Set D_Data=hlyx
:: 6、默认服务器路径
@Set D_Path=D:\HlyxServer\MySQL3.23.36\bin\mysql.exe
:: ----------------------------------
:: -    此处为默认变量设置结束区    -
:: ----------------------------------

:: 设置系统变量
@echo off
color 0a
mode con lines=25
setlocal enabledelayedexpansion

goto :ReadIni

:: 设置服务器信息
:SetHost
Cls
set Host=
set Port=
set User=
set Pass=
set Data=
set Accept=

Echo 本程序只为幻灵私服添加账号使用
Echo Code by Duckyの復活（QQ:462363）
Echo.
Echo.
Echo                       ----------------------------------
Echo                       -      输入MySQL服务器信息       -
Echo                       ----------------------------------
set /p "Host=请输入IP地址（回车默认%D_Host%）："
set /p "Port=请输入端口号（回车默认%D_Port%）："
set /p "User=请输入用户名（回车默认%D_User%）："
set /p "Pass=请输入密码（回车默认%D_Pass%）："
set /p "Data=请输入数据库（回车默认%D_Data%）："
if not defined Host set Host=%D_Host%
if not defined Port set Port=%D_Port%
if not defined User set User=%D_User%
if not defined Pass set Pass=%D_Pass%
if not defined Data set Data=%D_Data%
echo.
echo IP地址：%Host%
echo 端口号：%Port%
echo 用户名：%User%
echo 密  码：%Pass%
echo 数据库：%Data%
echo.
set /p "Accept=以上信息是否正确（ [Enter] / N ）？"
if not defined Accept set Accept=y
if %Accept% == n goto :SetHost
if %Accept% == n goto :SetHost

:: 设置账号信息
:AddAccount
Set U_User=
Set U_Pass=
Set U_Accept=
Echo.
Echo.
Echo                       ----------------------------------
Echo                       -         输入账号信息           -
Echo                       ----------------------------------
set /p "U_User=请输入需要添加的玩家账号："
set /p "U_Pass=请输入需要添加的玩家密码："
if not defined U_User Echo 必须输入账号！ &&goto :AddAccount
if not defined U_Pass Echo 必须输入密码！ &&goto :AddAccount
Echo.
echo 用户账号：%U_User%
echo 用户密码：%U_Pass%
set /p "U_Accept=以上信息是否正确(回车 或 n)？"
if not defined U_Accept set U_Accept=y
if %U_Accept% == n goto :AddAccount
if %U_Accept% == N goto :AddAccount

:: 添加账号
Set A_Accept=
%D_Path% -T -H --host=%Host% --port=%Port% --user=%User% --password=%Pass% --database=%Data% -e "insert into account (name,password,pointtime) values ('%U_User%','%U_Pass%','20091231')"
@Echo. >> %0.log
@Echo. >> %0.log
@Echo 添加时间：%Date% %Time% >> %0.log
@Echo 添加账号：%U_User%,%U_Pass% >> %0.log
@Echo SQL 语句：%D_Path% -T -H --host=%Host% --port=%Port% --user=%User% --password=%Pass% --database=%Data% -e "insert into account (name,password,pointtime) values ('%U_User%','%U_Pass%','20091231')" >> %0.log
Echo.
Echo.
set /p "A_Accept=是否继续添加账号(回车 或 n)？"
if not defined A_Accept set A_Accept=y
if %A_Accept% == y goto :AddAccount
if %A_Accept% == Y goto :AddAccount

:: 作者的话
Cls
Echo 本程序只为幻灵私服添加账号使用
Echo Code by Duckyの復活（QQ:462363）
Echo.
Echo.
Echo                       ----------------------------------
Echo                       -            作者的话            -
Echo                       ----------------------------------
Echo.
Echo                       感谢各位使用本软件
Echo                       往后本人会继续开发幻灵相关的工具
Echo                       而且都是以开源的形式
Echo                       希望大家多多支持
Echo                       也希望能吸引更多高手一齐来研究
Echo                       通过游戏提高自己的技术
Echo                       
Echo.
Echo.
Echo.
@pause
goto :End

:: 检测MySQL控制器是否存在
:CheckMySQL
Cls
echo.
echo.
echo.
echo.
echo                        正在检测MySQL控制器
echo                       ┏─────────────┓
echo                       │ ▉▉▉                25%%│
echo                       ┗─────────────┛
echo.
ping -n 2 127.1>nul
Cls
echo.
echo.
echo.
echo.
echo                        正在检测MySQL控制器
echo                       ┏─────────────┓
echo                       │ ▉▉▉▉▉▉          50%%│
echo                       ┗─────────────┛
echo.
ping -n 2 127.1>nul
Cls
echo.
echo.
echo.
echo.
echo                        正在检测MySQL控制器
echo                       ┏─────────────┓
echo                       │ ▉▉▉▉▉▉▉▉▉    75%%│
echo                       ┗─────────────┛
echo.
ping -n 1 127.1>nul
cls
echo.
echo.
echo.
echo.
echo                        正在检测MySQL控制器
echo                       ┏─────────────┓
echo                       │ ▉▉▉▉▉▉▉▉▉▉ 100%%│
echo                       ┗─────────────┛
echo.
ping -n 1 127.1>nul
if exist %D_Path% (
color 0a
echo                        MySQL控制器检测通过. 
Echo.
pause
goto :SetHost
) else (
color 0c
Echo Error: MySQL控制器错误！
Echo Path:  %D_Path% 错误或不存在！

Echo.
Echo 请输入MySQL控制器mysql.exe完整路径
set /p "D_Path=（提示：可以把mysql.exe拖进本窗口）："
goto :CheckMySQL
)

:: 检测server.ini是否存在，并读取
:ReadIni
if exist server.ini (
for /f "tokens=*" %%c in (server.ini) do (
    ::if !num!==0 set one=%%c
	if !num!==0 set D_Host=%%c
	if !num!==1 set D_Port=%%c
	if !num!==2 set D_User=%%c
	if !num!==3 set D_Pass=%%c
	if !num!==4 set D_Data=%%c
	if !num!==5 set D_Path=%%c
    set /a num+=1
   )
)

goto :CheckMySQL

:End
exit