anchor.diff:          KMUnit.IsExchanging := (fHouse.DoorwayUse > 1);
       end;
       
  -    fHasStarted:=true;
  +    fHasStarted := true;
     end;
   
   
  
positive.code:       procedure IncDoorway;
        procedure DecDoorway;
        function ValidTileToGo(aLocX, aLocY:word; aUnit:TKMUnit):boolean; //using X,Y looks more clear
      public
        constructor Create(aAction: TUnitActionType; aDirection:TGoInDirection; aHouse:TKMHouse);
        constructor Load(LoadStream:TKMemoryStream); override;
  
negative.code:       if (fTerrain.Land[fStreet.Y,fStreet.X].IsUnit <> nil) then
        begin
          fWaitingForPush := true;
          fHasStarted := true;
          exit; //Wait until our push request is dealt with before we move out
        end;
  
        WalkOut(KMUnit); //All checks done so unit can walk out now
      end;
  
      if fUsingDoorway then
  