PROGRAM   WindLim ;
USES   CRT ;

BEGIN
   ClrScr ;

   Window ( 10,2  ,  35,10 );

   TextBackGround ( Blue );
   ClrScr ;

   Write ( 'Left column = ' );
   WriteLn ( Lo(WindMin)+1 );

   Write ( 'Top line = ' );
   WriteLn ( Hi(WindMin)+1 );

   WriteLn ;

   Write ( 'Right column = ' );
   WriteLn ( Lo(WindMax)+1 );

   Write ( 'Bottom line = ' );
   WriteLn ( Hi(WindMax)+1 );

   WriteLn ;
   WriteLn ( 'Press [Enter], to Quit' );
   ReadLn ;
END.
