anchor.diff:  //* Version: 7000+
   //* Sets whether player A shares his beacons with player B.
   //* Sharing can still only happen between allied players, but this command lets you disable allies from sharing.
  -//* aCompliment: Both ways
  -procedure TKMScriptActions.PlayerShareBeacons(aPlayer1, aPlayer2: Word; aCompliment, aShare: Boolean);
  +//* aBothWays: share in both ways
  +procedure TKMScriptActions.PlayerShareBeacons(aPlayer1, aPlayer2: Word; aBothWays, aShare: Boolean);
   begin
     try
       if  InRange(aPlayer1, 0, gHands.Count - 1)
  
positive.code: 
  //* Version: 7000+
  //* Sets field age if tile is corn field, or adds finished field and sets its age if tile is empty, and returns true if this was successfully done
  //* aStage = 0..6, sets the field growth stage. 0 = empty field; 6 = corn has been cut; according to CORN_STAGES_COUNT
  //* aRandomAge sets FieldAge to random, according to specified stage. Makes fields more realistic
  function TKMScriptActions.GiveFieldAged(aPlayer, X, Y: Word; aStage: Byte; aRandomAge: Boolean): Boolean;
  begin
  
negative.code: 
  //* Version: 6222
  //* Stops playing a looped sound that was previously started with either Actions.PlayWAVLooped or Actions.PlayWAVAtLocationLooped.
  //* aSoundIndex: value that was returned by either of those functions when the looped sound was started.
  procedure TKMScriptActions.StopLoopedWAV(aSoundIndex: Integer);
  begin
    try
      gScriptSounds.RemoveLoopSound(aSoundIndex);
    except
      gScriptEvents.ExceptionOutsideScript := True; //Don't blame script for this exception
      raise;
  