anchor.diff:      {ftRanged,ftRanged,       //utCatapult, utBallista,}
     );
   begin
  -  Assert(fUnitType in [Low(WarriorFightType)..High(WarriorFightType)]);
  -  Result := WarriorFightType[fUnitType];
  +  Assert(fUnitType in [Low(WARRIOR_FIGHT_TYPE)..High(WARRIOR_FIGHT_TYPE)]);
  +  Result := WARRIOR_FIGHT_TYPE[fUnitType];
   end;
   
   
  
positive.code: //Animals don't have team and thus are rendered in their own prefered clors
  function TKMUnitSpec.GetMinimapColor: Cardinal;
  const
    MMColor: array[TKMUnitType] of Cardinal = (
      0,0,0,0,0,0,0,0,0,0,
      0,0,0,0,0,0,0,0,0,0,
      0,0,0,0,0,0,0,0,0,0,
      $B0B0B0,$B08000,$B08000,$80B0B0,$00B0B0,$B080B0,$00B000,$80B0B0); //Exact colors can be tweaked
  begin
    Result := MMColor[fUnitType] or $FF000000;
  end;
  
  
  
negative.code: 
  function TKMUnitSpec.SupportsAction(aAct: TKMUnitActionType): Boolean;
  const
    UNIT_SUPPOSTED_ACTIONS: array [TKMUnitType] of TKMUnitActionTypeSet = (
      [], [], //None, Any
      [uaWalk, uaDie, uaEat, uaWalkArm], //Serf
      [uaWalk, uaWork, uaDie, uaWork1, uaEat..uaWalkTool2],
  