anchor.diff:      CG := fCombatGroups[K];
   
       // Opacity
  -    Op1 := $30;
  -    Op2 := $50;
  +    Op1 := $20;
  +    Op2 := $30;
       if (gMySpectator.Selected is TKMUnitGroup) AND (gMySpectator.Selected = CG.Group) then
       begin
         //Col1 := gMySpectator.Hand.FlagColor;
  
positive.code:   begin
      if (fTargetGroup <> nil) then
      begin
        fTargetAim := GetTargetUnitPosition();
        // New target is out of range -> wait for supervisor to update target group to the closest
        if KMDistanceSqr(fTargetAim,Position) > Sqr(Group.GetAliveMember.GetFightMaxRange) then
  
negative.code:     procedure Load(LoadStream: TKMemoryStream);
      procedure SyncLoad();
  
      property CG: TObjectList<TKMCombatGroup> read fCombatGroups;
      property Count: Integer read GetCount;
      property CombatGroup[aGroup: TKMUnitGroup]: TKMCombatGroup read GetCombatGroup;
  
  