If Not(IsNumeric(EliteMonsterEscape))
EliteMonsterEscape=0
EndIf
If Not(IsNumeric(AutoGoToPlace))
AutoGoToPlace=0
EndIf
//If Not(IsNumeric(Leader))
// Leader=0
//EndIf
//-------------------------------------------
If Not(Bhppercent>=0 Or Bhppercent<=90)
Bhppercent = 90
EndIf
If Not(Bmppercent>=0 Or Bmppercent<=90)
Bmppercent = 90
EndIf
If Not(usemagic>=0 Or usemagic<=9)
usemagic = 0
EndIf
If Not(SecondMagic>=0 Or SecondMagic<=9)
SecondMagic = 0
EndIf
If Not(petusemagic>=0 Or petusemagic<=9)
petusemagic = 0
EndIf
If Not(TreatPet>=0 Or TreatPet<=9)
TreatPet = 5
EndIf
If Not(TreatSelf>=0 Or TreatSelf<=9)
TreatSelf = 5
EndIf
VBS hppercent=CInt(hppercent*48/100)
VBS mppercent=CInt(mppercent*48/100)
VBS pethppercent=CInt(pethppercent*48/100)
VBS petmppercent=CInt(petmppercent*48/100)
VBS Bhppercent=CInt(Bhppercent*85/100)
VBS Bmppercent=CInt(Bmppercent*85/100)
If CharacherAtFont<=0
HpMpTmpVar=hppercent
hppercent=pethppercent
pethppercent=HpMpTmpVar
HpMpTmpVar=mppercent
mppercent=petmppercent
petmppercent=HpMpTmpVar
EndIf
LoginURL=Replace(LoginURL,"""","")
place=Replace(place,"""","")
CharacherAI=Replace(CharacherAI,"""","")
//------------------
//文字识别部分变量,只用于识别防挂机验证
FontVal = 0
SetFontx=543
SetFonty=366
SetFontCount=3
//Gosub 识别10号宋体字
VInputValue=9
//------------------
//
//
//
//
//==============∨∨∨DEBUG∨∨∨==============
//debugon=350 MsgBox显示到达目的地途经地图
//debugon=300 MsgBox显示什么地方
If debugon=116
//DEBUG-F5刷新测试
rere=999
Gosub 防卡刷新
Gosub 防卡刷新重置
EndIf
If debugon=117
Gosub 调整游戏登录的窗口位置
Gosub 登录游戏
EndIf
If debugon=300
Gosub 什么地方Sub
EndIf
//Gosub 宠物忠诚回复
//Gosub 检查是否战斗
//
//==============∧∧∧DEBUG∧∧∧==============
//
//======================∧∧∧初始设置∧∧∧======================
//
//-------------------------------------------------------------
IfColor 503,561,6b6d31,2
IfColor 485,621,73beff,2
//游戏登录界面
Gosub 登录游戏
Else
Delay 1000
EndIf
Else
Delay 1000
EndIf
//特殊!
//-------------------------------------------------------------
//打开游戏窗口,或调整进入游戏后的窗口位置
Gosub 调整魔力学堂窗口位置Sub
//打开显示状态窗口