I'm trying to make a helmet that allows the player to adjust their bow zoom by pressing the 'k' key.
Here's the script attached to the helmet:

Scriptname PCKP_AdjustableBow extends ObjectReference Perk Property BowZoom1 autoPerk Property BowZoom2 autoPerk Property BowZoom3 autoPerk Property BowZoom4 autoPerk Property BowZoom5 autoPerk Property BowZoom6 autoActor Property PlayerREF autoevent OnEquipped(Actor akActor)if akActor==PlayerREF  RegisterForKey(37)endIfendEventevent OnUnequipped(Actor akActor)if akActor == PlayerREF  UnregisterForKey(37)endIfendEventEvent OnKeyDown(Int KeyCode);Debug.Trace("A registered key has been pressed")If KeyCode == 37  if PlayerREF.HasPerk(BowZoom1)==false   PlayerREF.addPerk(BowZoom1)  elseIf PlayerRef.HasPerk(BowZoom2)==false   PlayerREF.addPerk(BowZoom2)  elseIf PlayerRef.HasPerk(BowZoom3)==false   PlayerREF.addPerk(BowZoom3)  elseIf PlayerRef.HasPerk(BowZoom4)==false   PlayerREF.addPerk(BowZoom4)  elseIf PlayerRef.HasPerk(BowZoom5)==false   PlayerREF.addPerk(BowZoom5)  elseIf PlayerRef.HasPerk(BowZoom6)==false   PlayerREF.addPerk(BowZoom6)  else   PlayerREF.RemovePerk(BowZoom1)   PlayerREF.RemovePerk(BowZoom2)   PlayerREF.RemovePerk(BowZoom3)   PlayerREF.RemovePerk(BowZoom4)   PlayerREF.RemovePerk(BowZoom5)   PlayerREF.RemovePerk(BowZoom6)  endIf    ;Debug.Trace("K is registered and has been pressed")EndIfEndEvent

The BowZoom perks are all Modify Bow Zoom entry point perks that are Set Value = http://forums.bethsoft.com/topic/1445194-adjustable-bow-zoom-question/.50, .40, .30, etc.

I think this is the correct way to set them up, as Eagle Eye does the same thing at a value of .60

Unfortunately, nothing is happening when I use the helmet. Like, at all.