- //
- //修正战斗中怪物无法点击错误.
- 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
- //
- 如果表达式 (Not(IsNumeric(usemagic))) 为真,则
- usemagic=1
- 条件结束
- 如果表达式 (Not(IsNumeric(SecondMagic))) 为真,则
- SecondMagic=0
- 条件结束
- 如果表达式 (Not(IsNumeric(debugon))) 为真,则
- debugon=0
- 条件结束
- 如果表达式 (Not(IsNumeric(petusemagic))) 为真,则
- petusemagic=0
- 条件结束
- 如果表达式 (Not(IsNumeric(petusemagic))) 为真,则
- petusemagic=0
- 条件结束
- 如果表达式 (Not(IsNumeric(petdefense))) 为真,则
- petdefense=1
- 条件结束
- 如果表达式 (Not(IsNumeric(TreatPet))) 为真,则
- TreatPet=5
- 条件结束
- 如果表达式 (Not(IsNumeric(TreatSelf))) 为真,则
- TreatSelf=5
- 条件结束
- 如果表达式 (Not(IsNumeric(newwindow))) 为真,则
- newwindow=1
- 条件结束
- 如果表达式 (Not(IsNumeric(pethppercent))) 为真,则
- pethppercent=45
- 条件结束
- 如果表达式 (Not(IsNumeric(petmppercent))) 为真,则
- petmppercent=10
- 条件结束
- 如果表达式 (Not(IsNumeric(hppercent))) 为真,则
- hppercent=50
- 条件结束
- 如果表达式 (Not(IsNumeric(mppercent))) 为真,则
- mppercent=10
- 条件结束
- 如果表达式 (Not(IsNumeric(Bhppercent))) 为真,则
- Bhppercent=0
- 条件结束
- 如果表达式 (Not(IsNumeric(Bmppercent))) 为真,则
- Bmppercent=0
- 条件结束
- 如果表达式 (Not(IsNumeric(CharacherAtFont))) 为真,则
- CharacherAtFont=1
- 条件结束