anchor.diff:    end;
   
     //Worker class - builds everything in game
  -  TKMUnitWorker = class(TKMUnit)
  +  TKMUnitWorker = class(TKMCivilUnit)
     public
       procedure BuildHouse(aHouse: TKMHouse; aIndex: Integer);
       procedure BuildHouseRepair(aHouse: TKMHouse; aIndex: Integer);
  
positive.code: 
    fThought := th_None;
  
    if fCondition < UNIT_MIN_CONDITION then
    begin
      HInn := gHands[fOwner].FindInn(fCurrPosition,Self,not fVisible);
      if HInn <> nil then
  
negative.code: uses
    Classes, Math, SysUtils, KromUtils, Types,
    KM_CommonClasses, KM_Defaults, KM_Points, KM_CommonUtils,
    KM_Terrain, KM_ResHouses, KM_ResWares, KM_Houses, KM_HouseSchool, KM_HouseBarracks, KM_HouseInn;
  
  //Memo on directives:
  //Dynamic - declared and used (overriden) occasionally
  