home *** CD-ROM | disk | FTP | other *** search
/ Global Amiga Experience / globalamigaexperience.iso / compressed / text_dtp / stylusdemo.lha / Stylus_Demo / REXX / ToggleRulers.pvrx < prev    next >
Encoding:
Text File  |  1991-07-16  |  321 b   |  16 lines
  1. /* ToggleRulers.pvrx---toggles rulers on or off.
  2.    Copyright © 1991 by Stylus, Inc. */
  3.    
  4.  
  5. /* Always do this for a ProVector AREXX macro */
  6. 'Lock'
  7. if RC ~= 0 then exit
  8.  
  9. 'GetScreenFormat' Var
  10. if Var.Rulers=True then Var.Rulers=False
  11. else Var.Rulers=True
  12. 'SetScreenFormat' Var
  13.  
  14. /* All done!  Unlock ProVector */
  15. 'UnLock'
  16.