anchor.diff:  end;
   
   
  -procedure TKMGamePlayInterface.MessageIssue(aKind: TKMMessageKind; aText: string);
  +procedure TKMGamePlayInterface.MessageIssue(aKind: TKMMessageKind; aText: UnicodeString);
   begin
     fMessageList.Add(aKind, aText, KMPoint(0,0));
     Message_UpdateStack;
  
positive.code:     destructor Destroy; override;
      procedure ShowUnitInfo(Sender: TKMUnit; aAskDismiss:boolean=false);
      procedure ShowGroupInfo(Sender: TKMUnitGroup);
      procedure MessageIssue(aKind: TKMMessageKind; aText: string); overload;
      procedure MessageIssue(aKind: TKMMessageKind; aText: string; aLoc: TKMPoint); overload;
      procedure SetMenuState(aTactic: Boolean);
      procedure ShowClock(aSpeed: Single);
      procedure ShowPlayMore(DoShow:boolean; Msg: TGameResultMsg);
      procedure ShowMPPlayMore(Msg: TGameResultMsg);
      procedure ShowNetworkLag(aShow: Boolean; aPlayers: TKMByteArray; IsHost: Boolean);
      procedure SetScriptedOverlay(aText: string);
      procedure AppendScriptedOverlay(aText: string);
      procedure ReleaseDirectionSelector;
      procedure SetChatText(const aString: string);
      procedure SetChatMessages(const aString: string);
      procedure ChatMessage(const aData: UnicodeString);
      procedure WarriorCommanderDied(DeadID, NewID: Cardinal);
      procedure AlliesOnPlayerSetup(Sender: TObject);
  
negative.code: end;
  
  
  procedure TKMGamePlayInterface.SetScriptedOverlay(aText: UnicodeString);
  begin
    Label_ScriptedOverlay.Caption := aText;
  end;
  
  
  procedure TKMGamePlayInterface.AppendScriptedOverlay(aText: UnicodeString);
  begin
    Label_ScriptedOverlay.Caption := Label_ScriptedOverlay.Caption + aText;
  end;
  