home *** CD-ROM | disk | FTP | other *** search
/ ProfitPress Mega CDROM2 …eeware (MSDOS)(1992)(Eng) / ProfitPress-MegaCDROM2.B6I / MAGAZINE / MISC / DBMS9107.ZIP / AQUA2 < prev    next >
Encoding:
Text File  |  1991-05-28  |  656 b   |  16 lines
  1.  
  2. LISTING 2
  3.  
  4.       //───── draw arrows if data off to left or right  
  5.       if b:leftvisible > 1                              
  6.          @ maxrow(), 0 say chr(17) + chr(196)           
  7.       else                                              
  8.          @ maxrow(), 0 say space(2)                     
  9.       endif                                             
  10.       if b:rightvisible < b:colCount                    
  11.          @ maxrow(), maxcol() - 1 say chr(196) + chr(16)
  12.       else                                              
  13.          @ maxrow(), maxcol() - 1 say space(2)          
  14.       endif                                             
  15.  
  16.