home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 January / Chip_1997-01_cd.bin / ms95 / disk23 / dir08 / f008860.res < prev    next >
Text File  |  1996-04-02  |  483b  |  23 lines
  1. ;                     HILITE.UCM    
  2.  
  3. ;   Will highlight all elements satisfying the current fence criteria.
  4. ;   May be used to display those elements selected by the current database
  5. ;   search filter. (DS=)
  6.  
  7.     msg 'cfHILITE'
  8.  
  9.     tst fence eq 0,exituc
  10.     key 'fence locate'
  11.  
  12. nextel:
  13.     pnt
  14.     tst relerr ne 0, exituc        ; did not find an element 
  15.     key 'display hilite'
  16.     go nextel
  17.  
  18. exituc:
  19.     key 'noecho'
  20.     key 'echo'    
  21.     msg 'stHILITE EXITED'
  22.     end    
  23.