home *** CD-ROM | disk | FTP | other *** search
/ The CDPD Public Domain Collection for CDTV 4 / CDPD_IV.bin / fish / 911-930 / ff926 / jcgraph / rexx / sizex.rex < prev    next >
OS/2 REXX Batch file  |  1994-05-04  |  476b  |  20 lines
  1. /* SizeX.rex */
  2. /* --------- */
  3. /* Description: Ask for X axis font size and set it accordingly. No     */
  4. /*              validation is done on the value entered , so, be        */
  5. /*              careful.                                                */
  6.  
  7. options results
  8.  
  9. address 'JCGRAPH'
  10.  
  11. 'GetTypeValue 20'
  12. FontSize=result
  13.  
  14. 'requestnumber Enter X axis font size please. Actual font size is:' FontSize
  15.  
  16. FontSize=result
  17.  
  18. if RC == 0 then do
  19.   'SetTypeValue 20 ' FontSize
  20. end