anchor.diff:  unit KM_UnitActionStay;
   interface
  -uses Classes, KM_Defaults, KromUtils, KM_Utils, KM_CommonTypes, KM_Player, KM_Units, SysUtils, Math;
  -
  +uses Classes, KM_Defaults, KromUtils, KM_Utils, KM_CommonTypes, KM_Units, SysUtils, Math;
   
   {Stay in place for set time}
   type
  -  TUnitActionStay = class(TUnitAction)
  +TUnitActionStay = class(TUnitAction)
     private
       StayStill:boolean;
       TimeToStay:integer;
  
positive.code:   end
    else
    begin
      KMUnit.AnimStep:=StillFrame;
      IsStepDone:=true;
    end;
  
    dec(TimeToStay);
  
negative.code: end;
  
  
  
  
  end.
  