//
//修正战斗中怪物无法点击错误.
MapMonCr = Array(0,0)
//
//用于保存到达目的地途经地图的数组变量
Dim DecPlaceArr
//
place = "樱舞仙境"
fighting=0
//战半中?
LastFightingOperREC=Array(0,0)
//前个战斗操作记录LastFightingOperREC=Array(战斗标记,操作时间)
FightingCount = 0
EliteFightingCount = 0
EliteMonster=0
//精英怪物
FrontHpLow=0
CharacherHpLow=0
FrontMpLow=0
CharacherMpLow=0
Bhplow=0
Bmplow=0
BackHpLow=0
PetHpLow=0
BackMpLow=0
PetMpLow=0
petdeath=0
PetIsDeathB=0
//另一记录宠物死亡变量
PetHpIsZero=0
PetHpPositionY=0
PetHpPositionX=0
CharacherHpPositionY=0
CharacherHpPositionX=0
HpPosUnknow=Array(0,0)
//长时间不能检测到战斗中的生命条,重新查找位置
LastMonsterHpPos=Array(0,0)
reref=0
notexit=0
FindMonsterLoop=0
MoveMapCount=0
//调整小地图次数统计
TimeOutRefreshTimeArray=Array(0,0,60000)
//防卡刷新数组-记录前后两个时间
MiniMapColorS=Array(0,0)
LastDebugKey=0
FHPMiss=0
BHPMiss=0
//
SetWaitColor=Array("c6cbff",10000,588,289,0)
PetFidelity=100
//
If Not(IsNumeric(usemagic))
    usemagic=1
EndIf 
If Not(IsNumeric(SecondMagic))
    SecondMagic=0
EndIf 
If Not(IsNumeric(debugon))
    debugon=0
EndIf 
If Not(IsNumeric(petusemagic))
    petusemagic=0
EndIf 
If Not(IsNumeric(petusemagic))
    petusemagic=0
EndIf 
If Not(IsNumeric(petdefense))
    petdefense=1
EndIf 
If Not(IsNumeric(TreatPet))
    TreatPet=5
EndIf 
If Not(IsNumeric(TreatSelf))
    TreatSelf=5
EndIf 
If Not(IsNumeric(newwindow))
    newwindow=1
EndIf 
If Not(IsNumeric(pethppercent))
    pethppercent=45
EndIf 
If Not(IsNumeric(petmppercent))
    petmppercent=10
EndIf 
If Not(IsNumeric(hppercent))
    hppercent=50
EndIf 
If Not(IsNumeric(mppercent))
    mppercent=10
EndIf 
If Not(IsNumeric(Bhppercent))
    Bhppercent=0
EndIf 
If Not(IsNumeric(Bmppercent))
    Bmppercent=0
EndIf 
If Not(IsNumeric(CharacherAtFont))
    CharacherAtFont=1
EndIf