ScriptName VmpNPCVampScriptref Selfref animalshort BPAmountshort doonceBPshort doonceDeathfloat timershort playerrankshort vamprankshort stagefloat disablecounterBegin OnLoad set self to GetSelf set dooncedeath to 0 set timer to 3;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;NOTE: BP is now loaded as a leveled Item;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;Powers are loaded up via a script on this activator;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; VmpNpcPowersLoaderExp.enable VmpNpcPowersLoaderExp.Activate self 1; VmpNpcPowersLoaderExp.disableEndBegin GameModeSet Self to GetSelf if dooncedeath == 1;&& (GetItemCount VmpBloodPower == 0) && (GetItemCount VmpIngredVampBlood == 0) if timer > 0 set timer to timer - GetSecondsPassed else if ( Stage == -1 ) Return endif; Tweak DisableCounter and its checks to adjust effect lengths.... if ( GetAV Health <= 1 && Stage == 0 ) additem VmpDeadVampireSkeleton 1 additem VmpDeadVampireSkull 1 PlayMagicShaderVisuals effectAtronachFlame playsound VmpVampireDeadSound playsound VmpVampireHiss Self.ForceAV Health 0 Set Stage to 1 set DisableCounter to 12 endif if ( Self.GetDead == 1 ) Set DisableCounter to ( DisableCounter - GetSecondsPassed ) if ( Stage == 1 ) if ( DisableCounter <= 10 ); Burning effect gets replaced by the "Blade" effect set stage to 2 equipitem VmpDeadVampireSkeleton 1 equipitem VmpDeadVampireSkull 1 StopMagicShaderVisuals effectAtronachFlame PlayMagicShaderVisuals VmpDeadShaderFire endif elseif ( stage == 2 ); This determines when the "Blade" effect gets replaced by the smoldering effect.... if ( DisableCounter <= 9 ) StopMagicShaderVisuals VmpDeadShaderFire PlayMagicShaderVisuals VmpDeadShaderSmoke set stage to 3 endif; This shuts off the smoking effect... ( So they don't smoke forever... ) elseif ( stage == 3 ) if ( DisableCounter <= 0 ) StopMagicShaderVisuals VmpDeadShaderSmoke Set Stage to -1 Return endif endif endif set dooncedeath to 0 endif endifEndBegin OnDeath set BPAmount to GetItemCount VmpNPCBloodPower RemoveItem VmpNPCBloodPower BPAmount AddItem VmpBaseCorpseBloodDrainMarker 1;;;This step is assumed by off blood drain script! set playerrank to Player.GetFactionRank VmpFactionVampires if GetInFaction VmpFactionVampires == 1 set vamprank to Self.GetFactionRank VmpFactionVampires else set vamprank to Self.GetFactionRank VmpFactionRenegade endif;;;Convert remaining BP to BP the player can use (if PC is a vampire) if Player.IsSpellTarget VmpBaseVampirism AddItem VmpBloodPower BPAmount set DoonceDeath to 1 else AddItem VmpIngredVampBlood BPAmount set DoonceDeath to 1 endifEnd