anchor.diff:      Button_Barracks_Train.Hint := gResTexts[TX_HOUSE_BARRACKS_TRAIN_DISABLED_HINT];
   
     if fLastBarracksUnit < High(Barracks_Order) then
  -    Image_Barracks_Right.TexID := gRes.Units[Barracks_Order[fLastBarracksUnit+1]].GUIScroll;
  +    Image_Barracks_Right.TexID := gRes.Units[Barracks_Order[fLastBarracksUnit + 1]].GUIScroll;
   end;
   
   
  
positive.code:     Panel_House_Common.Childs[I].Hide;
  
    //Now show only what we need
    RowRes := 1; Line := 0; Base := 2;
            
    //Show Demand
    Label_Common_Demand_WS.Show;
    Label_Common_Demand_WS.Top := Base + Line*LINE_HEIGHT+6;
    Inc(Line);
  
    for I := 1 to 2 do
  
negative.code:   I: Byte;
    School: TKMHouseSchool;
  begin
    if gMySpectator.Selected = nil then
      Exit;
    if not (gMySpectator.Selected is TKMHouseSchool) then
      Exit;
    School := TKMHouseSchool(gMySpectator.Selected);
  
    if (ssRight in Shift) and (Sender = Button_School_Left) then
      fLastSchoolUnit := 0;
    if (ssRight in Shift) and (Sender = Button_School_Right) then
      fLastSchoolUnit := High(School_Order);
  
    if (Sender = Button_School_Left) and (fLastSchoolUnit > 0) then
      Dec(fLastSchoolUnit);
    if (Sender = Button_School_Right) and (fLastSchoolUnit < High(School_Order)) then
      Inc(fLastSchoolUnit);
  
    if Sender = Button_School_Train then
    begin
  