Soul Reverse Zero _ 修改方式

阿J

把紅字的部分移除, 就可以一直放技能了~


Public Overridable Function CanAction(Optional isMatching As Boolean=False) AsBoolean
    Dim flag As Boolean = True
    flag = flag And Not Me.IsActionNow
    If Not isMatching Then
        flag = flag And Not Me.IsSeal
        If Me.kind = ActioNBAse.KIND.ACTION OrElse Me.kind = ActionBase.KIND.[CLASS] Then
            flag = flag And (Me.coolDownCount <= 0F)
        End If
    End If
    If Me.myChar IsNot Nothing Then
        flag = flag And Me.myChar.IsAvailable()
        flag = flag And (Me.myChar.BattleTarget IsNot Nothing)
        If Not isMatching Then
            flag = flag And Not Me.myChar.IsBlow
            flag = flag And Not Me.myChar.IsStun
            flag = flag And (Me.myChar.BelongFormation.FormState = FormationController.FORMATION_STATE.BATTLE)
            flag = flag And (Me.myChar.DefaultTarget IsNot Nothing)
            flag = flag And Not Me.myChar.IsClassSkillNow()
        End If
    End If
    Return flag
End Function

希望各位能幫點個評分+個GP! 讓我有更多發帖的動力!!