home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0010 - 0019 / ibm0010-0019 / ibm0010.tar / ibm0010 / CADKEY_C.ZIP / CADKEY14.ZIP / CDL / SC.CDL < prev    next >
Encoding:
Text File  |  1989-04-03  |  103 b   |  5 lines
  1. auto -1
  2. getflt "Enter scale factor for the view ports (0.5) =>", 0.5, sc
  3. scale sc,,, -1
  4. redraw -1
  5.