home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / WordProcessors / FWDSK8.DMS / in.adf / FWMacros.lha / Magnify_Down < prev    next >
Encoding:
Text File  |  1996-01-05  |  615 b   |  22 lines
  1. /* ============================================ */
  2. /*  FINAL WRITER AREXX MACRO                    */
  3. /*  View_Down - Decrease the view magnification */
  4. /*  $VER: View_Down 3.1 (5.1.96)                */
  5. /* ============================================ */
  6.  
  7. Options Results
  8.  
  9. Status View
  10. curview = Result
  11.  
  12. Select
  13.    WHEN curview = "400" THEN View "200"
  14.    WHEN curview >= "200" THEN View "150"
  15.    WHEN curview >= "150" THEN View "125"
  16.    WHEN curview >= "125" THEN View "100"
  17.    WHEN curview >= "100" THEN View "75"
  18.    WHEN curview >= "75"  THEN View "50"
  19.    WHEN curview >= "50"  THEN View "25"
  20.    OTHERWISE EXIT
  21. END
  22.