:: 幻灵私服账号添加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