home *** CD-ROM | disk | FTP | other *** search
/ The Datafile PD-CD 5 / DATAFILE_PDCD5.iso / utilities / s1 / spice / !Nutmeg / script / QBpltDraw < prev    next >
Encoding:
Text File  |  1992-11-16  |  557 b   |  24 lines
  1. unset echo
  2.  
  3. ifdef   'plot_dash'  pref nodash 0
  4. ifundef 'plot_dash'  pref nodash 1
  5.  
  6. ifdef   'plot_cols'  unset monochrome
  7. ifundef 'plot_cols'  set   monochrome
  8.  
  9. * convert string to real:
  10. set xprecision = 0$(plot_xprec)
  11. set yprecision = 0$(plot_yprec)
  12.  
  13. set a = $(plot_vecs) 
  14. ifdef plot_xrang 'set a = $(a) xl $(plot_xmin) $(plot_xmax)'
  15. ifdef plot_yrang 'set a = $(a) yl $(plot_ymin) $(plot_ymax)'
  16. ifdef plot_indic 'set a = $(a) xindices $(plot_indlo) $(plot_indhi)'
  17. ifdef plot_vs    'set a = $(a) vs $(plot_vecvs)'
  18.  
  19. echo plot $(a)
  20. plot $(a)
  21.  
  22. unset a
  23. set echo
  24.