I can't make the Special Power Commandset Upgrade Work. Codes Below.

CODE
;------------------------------------------------------------------------------
Object Boss_SpecialPowersHolderObject

  VisionRange         = 0
  ShroudClearingRange = 0

  DisplayName       = OBJECT:Selector
  Side = Boss
  EditorSorting     = SYSTEM
  CommandSet = Boss_SpecialPowersCommandSet

; *** ENGINEERING Parameters ***
  RadarPriority = NOT_ON_RADAR
  KindOf        = PRELOAD VEHICLE CLICK_THROUGH NO_COLLIDE AIRCRAFT DRONE

  ArmorSet
    Conditions        = None
    Armor             = InvulnerableAllArmor
    DamageFX          = EmptyDamageFX
  End
  MaxSimultaneousOfType = 1

  Body = ImmortalBody ModuleTag_01
    MaxHealth = 1
    InitialHealth = 1
  End
  Behavior = PhysicsBehavior ModuleTag_04
    Mass = 500.0
  End
  Behavior = DestroyDie ModuleTag_08
    DeathTypes = ALL
  End
  Behavior = AIUpdateInterface ModuleTag_09
  End
  Locomotor = SET_NORMAL SpecialPowersHolderObjectLocomotor
  Behavior           = OCLSpecialPower ModuleTag_SpecialPower01
    SpecialPowerTemplate = SpecialPowerChangeCommandset
    OCL                  = OCL_SpecialPowerHolder
  End

  Geometry = CYLINDER
  GeometryMajorRadius = 1.0
  GeometryMinorRadius = 1.0
  GeometryHeight = 1.0
  GeometryIsSmall = Yes
End


CODE
;-----------------------------------------------------------------
Object SpecialPowerCommandSetObject

; *** ART Parameters ***
  SelectPortrait = SSCIA
  ButtonImage    = SSCIA

  VisionRange         = 0
  ShroudClearingRange = 0

  DisplayName = OBJECT:Selector

; *** ENGINEERING Parameters ***
  EditorSorting = SYSTEM

; *** ENGINEERING Parameters ***
  RadarPriority = NOT_ON_RADAR
  KindOf = PRELOAD SELECTABLE CLICK_THROUGH DRONE

  Body = ActiveBody ModuleTag_02
    MaxHealth       = 1.0
    InitialHealth   = 1.0
  End

  Behavior = AIUpdateInterface ModuleTag_03
  End

  Behavior = PhysicsBehavior ModuleTag_05
    Mass = 500.0
  End

  Locomotor = SET_NORMAL BattleMasterLocomotor

  Behavior = DestroyDie ModuleTag_08
    DeathTypes = ALL
  End

  Behavior = LifetimeUpdate ModuleTag_033
    MinLifetime = 120
    MaxLifetime = 120
  End

  Geometry = BOX
  GeometryMajorRadius = 1.0
  GeometryMinorRadius = 1.0
  GeometryHeight = 1
  GeometryIsSmall = Yes
End


CODE
;-----------------------------------------------------
ObjectCreationList OCL_SpecialPowerHolder
  CreateObject
    ObjectNames = SpecialPowerCommandSetObject
    Count = 1
  End
End


CODE
CommandButton Boss_SelectSpecialPowersFromShortcut
  Command           = SPECIAL_POWER_FROM_SHORTCUT;SELECT_ALL_UNITS_OF_TYPE SELECT_ALL_UNITS_OF_TYPE SPECIAL_POWER_CONSTRUCT_FROM_SHORTCUT
;Options           = NEED_SPECIAL_POWER_SCIENCE
  Object            = Boss_SpecialPowersHolderObject
  TextLabel         = CONTROLBAR:SelectSpecialPowers
  ButtonImage       = SSCIA
  ButtonBorderType  = ACTION
  DescriptLabel     = CONTROLBAR:ToolTipSelectSpecialPowers
End


CODE
CommandSet SpecialPowerShortcutBoss
  1 = Command_DefectorFromShortcut
  2 = Boss_SelectSpecialPowersFromShortcut
  7 = Command_FireParticleUplinkCannonFromShortcut
  8 = Boss_Command_ScudStormFromShortcut
  9 = Boss_Command_ArtilleryCannonFromShortcut
10 = Command_NeutronMissileFromShortcut
11 = Boss_Command_MOABFromShortcut
END


CODE
CommandSet Boss_SpecialPowersCommandSet
  1 = Command_SatelliteStrikeFromShortcut
  2 = Command_ArtilleryBarrageFromShortcut
  3 = Command_SneakAttackFromShortcut
  6 = Command_SpectreGunshipFromShortcut
END