anchor.diff:      procedure Stats_Fill(Sender:TObject);
       procedure Menu_Fill(Sender:TObject);
       procedure SetPause(aValue:boolean);
  -    procedure ShowDirectionCursor(Show:boolean; const aX: integer = 0; const aY: integer = 0; const Dir: TKMDirection = dir_NA);
  +    procedure DirectionCursorShow(X,Y: Integer; Dir:TKMDirection);
  +    procedure DirectionCursorHide;
     protected
       Panel_Main:TKMPanel;
         Image_Main1,Image_Main2,Image_Main3,Image_Main4,Image_Main5:TKMImage; //Toolbar background
  
positive.code:     Form1.ApplyCursorRestriction; //Reset the cursor restrictions from selecting direction
      SelectingTroopDirection := false;
      Screen.Cursor := c_Default; //Reset direction selection cursor when mouse released
      ShowDirectionCursor(false);
    end;
  end;
  
  
negative.code:     //Compare cursor position and decide which direction it is
      SelectedDirection := KMGetCursorDirection(DeltaX, DeltaY);
      //Update the cursor based on this direction and negate the offset
      DirectionCursorShow(X + DeltaX, Y + DeltaY, SelectedDirection);
      Screen.Cursor := c_Invisible; //Keep it invisible, just in case
      exit;
    end;
  