begin
  case textrec(l).mode of
   1 ;
  end;
end.