anchor.diff:    if Sender = Button_School_Train then
     begin
       // Right click - fill queue with same units
  -    if (ssRight in Shift) or (ssShift in Shift) then
  +    if RMB_SHIFT_STATES * Shift <> [] then
         gGame.GameInputProcess.CmdHouse(gicHouseSchoolTrain, school, School_Order[fLastSchoolUnit], 10)
       else if (ssLeft in Shift) then
       begin
  
positive.code:   HOUSE_FLAG_TEX_ID_FRAME = 5;
    HOUSE_ORDER_ROW_MOUSEWHEEL_STEP = 5;
  
    SCHOOL_CH_ORDER_TO_0_SHIFT = ssCtrl; // Shift state to change Unit order in queue to 0 in School
    SCHOOL_CH_ORDER_TO_1_SHIFT = ssAlt;  // Shift state to change Unit order in queue to 1 in School
  
  
negative.code:     Exit;
    school := TKMHouseSchool(gMySpectator.Selected);
  
    if (RMB_SHIFT_STATES * Shift <> []) and (Sender = Button_School_Left) then
      fLastSchoolUnit := 0;
    if (RMB_SHIFT_STATES * Shift <> []) and (Sender = Button_School_Right) then
      fLastSchoolUnit := High(School_Order);
  
    if (Sender = Button_School_Left) and (fLastSchoolUnit > 0) then
  