home *** CD-ROM | disk | FTP | other *** search
/ Fresh Fish 7 / FreshFishVol7.bin / bbs / gfx / jcgraph-1.21.lha / JcGraph / Rexx / SizeX.rex < prev    next >
OS/2 REXX Batch file  |  1992-10-05  |  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