bow animation wont work cause of script

[kastano]

Hallo

I was looking at an old mod of mine http://www.nexusmods.com/oblivion/mods/43370/?

the slingshot is a bow and when it unequips (instead of going at the back of the player)a belt model is equiped (all controled by a quest script so it works only for player)

Now i created two scripts (object scripts) one for the slingshot and one for the belt so it can be standalone (no quest script needed)

The scripts seem to work fine but the bowmorph animation dont play on npcs (it works for the player and the scripts work for both player and npcs)

- if i dettouch the script the animation plays

else the animation plays only for the player

any hint?

here are the scripts but i dont think that is the cause

 

scn aaaslingshotbelt

short wt
short wio
ref shooter
ref sling
ref alterweapon
float fQuestDelayTime

begin onequip

set sling to getself
set shooter to getcontainer
shooter.removeitemNS AAASlingShot 1

end

begin gamemode

set fQuestDelayTime to 1

set wio to shooter.IsWeaponOut

if wio == 1
if shooter.GetEquipped AAASfentonaseath
if shooter.GetItemCount AAASlingShot == 0
shooter.AdditemNS AAASlingShot 1
Endif
if shooter.GetItemCount AAASlingShot >= 1
shooter.EquipItemNS AAASlingShot
shooter.removeitemNS AAASfentonaseath 1
;set belteqquiped to 0



Endif
Endif

Endif

if wio == 0
shooter.UNEquipItemSilent AAASlingShot

Endif
end


begin onunequip
if shooter.GetItemCount AAASlingShot == 0
shooter.Additem AAASlingShot 1
shooter.RemoveMe
else
shooter.RemoveMe

Endif
end

 

 

 

scn aaaSlingshotObScript




short wio
short onhold
short belteqquiped

ref shooter
ref sling


float fQuestDelayTime
begin onequip
set sling to getself
set shooter to getcontainer
shooter.removeitem AAASfentonaseath 1
end
begin gamemode
set fQuestDelayTime to 1
set shooter to getcontainer ;;;;;;;;;;;;;;;
set wio to shooter.IsWeaponOut
if wio == 1
if shooter.GetEquipped AAASfentonaseath
if shooter.GetItemCount AAASlingShot >= 1
shooter.EquipItem AAASlingShot
shooter.removeitemNS AAASfentonaseath 1
set belteqquiped to 0
Endif
Endif
;set phase to 0
Endif

if wio == 0 && shooter.GetEquipped AAASlingShot
shooter.UnequipItemSilent AAASlingShot
if shooter.GetItemCount AAASfentonaseath == 0
shooter.AdditemNS AAASfentonaseath 1
endif
shooter.EquipItemNS AAASfentonaseath

Endif

End