Source   : ArmorKerriganProcessing.psc
Modified : 2013-09-21 10:45:13
Compiled : 2013-09-21 10:45:16
User     : FLX
Computer : FLX-PC
/;
scriptName ArmorKerriganProcessing extends ObjectReference

;-- Properties --------------------------------------
faction property DLC1PlayerVampireLordFaction auto
faction property HunterFaction auto
message property ArmorKerriganDangerMessage auto
formlist property DLC1VampireHateFactions auto
keyword property Vampire auto
race property DLC1VampireBeastRace auto
armor property ArmorKerriganFull auto

;-- Variables ---------------------------------------

;-- Functions ---------------------------------------

Bool function ConfirmVampireCondition(Actor actorToCheck)

       if actorToCheck.GetRace() == DLC1VampireBeastRace
           return true
       endIf
       if actorToCheck.HasKeyword(Vampire)
           return true
       endIf
       if actorToCheck.GetItemCount(ArmorKerriganFull as form) > 0
           ArmorKerriganDangerMessage.Show(0.000000, 0.000000, 0.000000, 0.000000, 0.000000, 0.000000, 0.000000, 0.000000, 0.000000)
           actorToCheck.DamageAV("Health", actorToCheck.GetBaseAV("Health") / 3 as Float)
           actorToCheck.UnequipItem(ArmorKerriganFull as form, false, false)
           actorToCheck.DropObject(ArmorKerriganFull as form, 1)
       endIf
       return false
endFunction

function OnUnequipped(Actor akActor)

       if akActor != game.GetPlayer()
           return    
       endIf
       if akActor.GetActorBase().GetRace() == DLC1VampireBeastRace
           return    
       endIf
       if !akActor.IsInFaction(DLC1PlayerVampireLordFaction)
           return    
       endIf
       akActor.RemoveFromFaction(DLC1PlayerVampireLordFaction)
       akActor.SetAttackActorOnSight(false)
       HunterFaction.SetPlayerEnemy(false)
       Int cfIndex = 0
       while cfIndex < DLC1VampireHateFactions.GetSize()
           (DLC1VampireHateFactions.GetAt(cfIndex) as faction).SetPlayerEnemy(false)
           cfIndex += 1
       endWhile
       game.SetPlayerReportCrime(true)
endFunction

function OnEquipped(Actor akActor)

       if !self.ConfirmVampireCondition(akActor)
           return    
       endIf
       if akActor != game.GetPlayer()
           return    
       endIf
       if akActor.GetActorBase().GetRace() == DLC1VampireBeastRace
           return    
       endIf
       game.SendWereWolfTransformation()
       akActor.SetAttackActorOnSight(true)
       akActor.AddToFaction(DLC1PlayerVampireLordFaction)
       Int cfIndex = 0
       while cfIndex < DLC1VampireHateFactions.GetSize()
           (DLC1VampireHateFactions.GetAt(cfIndex) as faction).SetPlayerEnemy(true)
           cfIndex += 1
       endWhile
       HunterFaction.SetPlayerEnemy(true)
       game.SetPlayerReportCrime(false)
endFunction