//Perth the Adept
/////////////////

IF
   Global("DeSpawnItem","AR1605",0)
   Exists("ppcowled")
THEN
   RESPONSE #100
      SetGlobal("DeSpawnItem","AR1605",1)
      GiveItemCreate("DeITM027","ppcowled",0,0,0) // Tragla's Doom
      ActionOverride("ppcowled",FillSlot(SLOT_WEAPON))
      ActionOverride("ppcowled",SelectWeaponAbility(SLOT_WEAPON,0))
      Continue()
END
