anchor.diff:    UT: TKMUnitType;
     iPlayerAI: TKMHandAI;
     ChooseLoc: TKMChooseLoc;
  -  attackPos: TKMAttackPosition;
  +  groupOrder: TKMMissionScriptGroupOrder;
   begin
     Result := False; //Set it right from the start. There are several Exit points below
   
  
positive.code:   KM_AI, KM_AIDefensePos,
    KM_Resource, KM_ResHouses, KM_ResUnits, KM_ResWares,
    KM_CommonClasses, KM_CommonTypes, KM_Terrain,
    KM_HandTypes,
    KM_UnitGroupTypes;
  
  
  type
  
negative.code: 
  procedure TKMMissionParserStandard.Init(aMode: TKMMissionParsingMode);
  begin
    fGroupOrders := TList<TKMMissionScriptGroupOrder>.Create;
    fParsingMode := aMode;
    fDefaultLocation := 0;
  end;
  