home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Usenet 1994 October
/
usenetsourcesnewsgroupsinfomagicoctober1994disk2.iso
/
misc
/
volume40
/
gnuplot
/
part32
< prev
next >
Wrap
Text File
|
1993-10-29
|
82KB
|
2,947 lines
Newsgroups: comp.sources.misc
From: woo@playfair.stanford.edu ("Alexander Woo")
Subject: v40i044: gnuplot - interactive function plotting utility, Part32/33
Message-ID: <1993Oct25.030538.2982@sparky.sterling.com>
X-Md4-Signature: 9d0f4ffaf56f15becf0ac4055172b405
Sender: kent@sparky.sterling.com (Kent Landfield)
Organization: Sterling Software
Date: Mon, 25 Oct 1993 03:05:38 GMT
Approved: kent@sparky.sterling.com
Submitted-by: woo@playfair.stanford.edu ("Alexander Woo")
Posting-number: Volume 40, Issue 44
Archive-name: gnuplot/part32
Environment: UNIX, MS-DOS, VMS
Supersedes: gnuplot3: Volume 24, Issue 23-48
#! /bin/sh
# This is a shell archive. Remove anything before this line, then feed it
# into a shell via "sh file" or similar. To overwrite existing files,
# type "sh file -c".
# Contents: gnuplot/0CONFIG gnuplot/Copyright gnuplot/README.3p1
# gnuplot/README.ami gnuplot/README.gnu gnuplot/README.nex
# gnuplot/README.win gnuplot/configure.in gnuplot/demo/animate.dem
# gnuplot/demo/electron.dem gnuplot/demo/errorbar.dem
# gnuplot/demo/hidden.dem gnuplot/demo/multimsh.dem
# gnuplot/demo/param.dem gnuplot/demo/polar.dem
# gnuplot/demo/scatter.dem gnuplot/demo/scatter2.dat
# gnuplot/demo/simple.dem gnuplot/demo/world.dem
# gnuplot/docs/checkdoc.c gnuplot/docs/doc2gih.c
# gnuplot/docs/doc2hlp.c gnuplot/docs/latextut/Makefile.in
# gnuplot/docs/latextut/eg3.dat gnuplot/docs/latextut/header.tex
# gnuplot/docs/toc_entr.sty gnuplot/help.h gnuplot/lineproc.mac
# gnuplot/makefile.vms gnuplot/os2/dialogs.h gnuplot/os2/makefile
# gnuplot/term/dxy.trm gnuplot/term/impcodes.h
# gnuplot/term/unixplot.trm gnuplot/term/xlib.trm gnuplot/version.c
# gnuplot/win/wcommon.h gnuplot/win/wresourc.h
# Wrapped by kent@sparky on Wed Oct 20 17:15:13 1993
PATH=/bin:/usr/bin:/usr/ucb:/usr/local/bin:/usr/lbin ; export PATH
echo If this archive is complete, you will see the following message:
echo ' "shar: End of archive 32 (of 33)."'
if test -f 'gnuplot/0CONFIG' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/0CONFIG'\"
else
echo shar: Extracting \"'gnuplot/0CONFIG'\" \(878 characters\)
sed "s/^X//" >'gnuplot/0CONFIG' <<'END_OF_FILE'
X***TEST FEATURE *******
XThis release of gnuplot contains test "configure" scripts. These have
Xnot been fully tested. We strongly recommend that you try to use
Xthe makefile corresponding to your system first.
X
X
X*** On Unix, you can use the GNU-style "configure" script and ignore
Xthe complex instructions below. Besides the standard GNU configure
Xoptions, this one accepts:
X--with-no-readline to disable fancy command-line editing
X--with-cwdrc to read a .gnuplot file in the current directory
X (security hole)
X--with-lasergnu to install the "lasergnu" shell script for printng a plot
XSee Makefile.in for further comments on options.
X*** There are some things the configure script doesn't know how to
Xdetect yet; see the FIXME lines in configure.in. If you figure out
Xhow to fix one of them, please send mail to djm@gnu.ai.mit.edu and
Xbug-gnuplot@dartmouth.edu telling how.
X
END_OF_FILE
if test 878 -ne `wc -c <'gnuplot/0CONFIG'`; then
echo shar: \"'gnuplot/0CONFIG'\" unpacked with wrong size!
fi
# end of 'gnuplot/0CONFIG'
fi
if test -f 'gnuplot/Copyright' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/Copyright'\"
else
echo shar: Extracting \"'gnuplot/Copyright'\" \(1089 characters\)
sed "s/^X//" >'gnuplot/Copyright' <<'END_OF_FILE'
X/*
X * Copyright (C) 1986 - 1993 Thomas Williams, Colin Kelley
X *
X * Permission to use, copy, and distribute this software and its
X * documentation for any purpose with or without fee is hereby granted,
X * provided that the above copyright notice appear in all copies and
X * that both that copyright notice and this permission notice appear
X * in supporting documentation.
X *
X * Permission to modify the software is granted, but not the right to
X * distribute the modified code. Modifications are to be distributed
X * as patches to released version.
X *
X * This software is provided "as is" without express or implied warranty.
X *
X *
X * AUTHORS
X *
X * Original Software:
X * Thomas Williams, Colin Kelley.
X *
X * Gnuplot 2.0 additions:
X * Russell Lang, Dave Kotz, John Campbell.
X *
X * Gnuplot 3.0 additions:
X * Gershon Elber and many others.
X *
X * Send your comments or suggestions to
X * info-gnuplot@dartmouth.edu.
X * This is a mailing list; to join it send a note to
X * info-gnuplot-request@dartmouth.edu.
X * Send bug reports to
X * bug-gnuplot@dartmouth.edu.
X */
END_OF_FILE
if test 1089 -ne `wc -c <'gnuplot/Copyright'`; then
echo shar: \"'gnuplot/Copyright'\" unpacked with wrong size!
fi
# end of 'gnuplot/Copyright'
fi
if test -f 'gnuplot/README.3p1' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/README.3p1'\"
else
echo shar: Extracting \"'gnuplot/README.3p1'\" \(1104 characters\)
sed "s/^X//" >'gnuplot/README.3p1' <<'END_OF_FILE'
XThis package provides the upgrade of gnuplot 3.0 to patch level 1.
XBelow are the contributers to this upgrade and the modifications made.
X
XThank you all
X
XGershon
X
X----------------------------------------------------------------------------
X
X* Subject: Y log / postscript eps fix
X Name: Russell Lang
X Email: rjl@monu1.cc.monash.edu.au
X
X* Subject: HP26 driver to lift text.
X Name: Bruce Lueckenhoff
X Email: luechen@cis.udel.edu
X
X* Subject: CRAY prt, UIUC coordinates.
X Name: Daniel Lewart
X Email: d-lewart@uiuc.edu
X
X* Subject: AI device
X Name: Ray Ghanbari
X Email: ray@mtl.mit.edu
X
X* Subject: HP_MOTIF on a Snake, X11 for Next
X Name: Alex Woo
X Email: woo@ra-next.arc.nasa.gov
X
X* Subject: Mod. to LaTeX for multiple curves/plots, complex atan function fix.
X Name: Ray Toy???
X Email: toy@soho.crd.ge.com
X
X* Subject: Fix the "splot 'file.dat'" with only z values.
X Name: Gershon Elber
X Email: gershon@gr.utah.edu
X
X* Subject: Underscore prefixed names.
X Name: Tom Tkacik
X Email: tkacik@hobbes.cs.gmr.com
X
X* Subject: Amiga port
X Name: Carsten Steger
X Email: stegerc@informatik.tu-muenchen.de
END_OF_FILE
if test 1104 -ne `wc -c <'gnuplot/README.3p1'`; then
echo shar: \"'gnuplot/README.3p1'\" unpacked with wrong size!
fi
# end of 'gnuplot/README.3p1'
fi
if test -f 'gnuplot/README.ami' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/README.ami'\"
else
echo shar: Extracting \"'gnuplot/README.ami'\" \(1920 characters\)
sed "s/^X//" >'gnuplot/README.ami' <<'END_OF_FILE'
XSOME NOTES ON GNUPLOT ON THE AMIGA ...
X
X
X
XEnvironment Variables:
X
X GNUFONT You can say "setenv GNUFONT <Fontname>/<Pointsize>" to get the
X font of your liking on the screen, e.g.:
X "setenv GNUFONT sapphire/14".
X Otherwise gnuplot will select the default-font you chose with
X "Preferences".
X
X GNUHELP Allows you to define a pathname for the gnuplot help file. For
X example, "setenv GNUHELP TEX:gnuplot.gih"
X
X GNUPLOT Your current directory is searched for the file ".gnuplot".
X If you say "setenv GNUPLOT <Path>" (without the filename!)
X gnuplot will look for it there.
X
X GNUTERM You can define a default driver with "setenv GNUTERM <driver>".
X A good choice is "setenv GNUTERM amiga" :^)
X
X SHELL If you don't like "NewShell" as your shell, you can say
X "setenv SHELL <Shell>".
X
X
XStack Size:
X
X A stack size of at least 25000 bytes should be used while running gnuplot.
X If you use recursive functions, e.g. like in "bivariat.dem", you will have
X to increase your stack size accordingly. Otherwise gnuplot will exit with
X a run time error.
X
X
X
X-------------------------- SAS/C 6.1 VERSION -----------------------------
X
X
XDefault paths/directories:
X
X Gnuplot looks for the file "gnuplot.gih" in your "S:"-directory unless you
X specify the full pathname including the filename via "setenv GNUHELP".
X
X
X
X
X--------------------------- AZTEC C VERSION ------------------------------
X
XDefault paths/directories:
X
X Gnuplot looks for the "gnuplot.gih" file in "GNUPLOT:docs/gnuplot.gih" if
X GNUHELP is not defined. This is defined in the makefile (makefile.ami).
X
X
XTerminal Drivers:
X
X The Aztec C version can now use the "amiga.trm" driver written by
X Carsten Steger. Under KS/WB 2.0, a custom screen will be used with a size
X specified by the Prefs/Overscan program.
X
END_OF_FILE
if test 1920 -ne `wc -c <'gnuplot/README.ami'`; then
echo shar: \"'gnuplot/README.ami'\" unpacked with wrong size!
fi
# end of 'gnuplot/README.ami'
fi
if test -f 'gnuplot/README.gnu' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/README.gnu'\"
else
echo shar: Extracting \"'gnuplot/README.gnu'\" \(1168 characters\)
sed "s/^X//" >'gnuplot/README.gnu' <<'END_OF_FILE'
XA note to former Gnutex users, from David Kotz (David.Kotz@Dartmouth.edu).
X--------------------------------------------------------------------------
X
XMay 30, 1991
X
XGNUTeX was merged with GNUPLOT beginning with GNUPLOT 2.0. Many
Xaspects of gnutex 1.6 made it into GNUPLOT 2.0. Unfortunately for
Xthose of us who have a lot of gnutex input files around, not
Xeverything from gnutex is supported by GNUPLOT. To help gnutex users
Xwith the process of adapting to GNUPLOT (and I recommend it), I have
Xincluded a section in the LaTeX/GNUPLOT tutorial (in ./docs/latextut/)
Xabout the differences, and written a translator program. Please read
Xthe LaTeX/GNUPLOT tutorial.
X
XThe translator was available as part of the GNUPLOT 2.0 release, but
Xhas been removed from the standard distribution of GNUPLOT. The
Xtranslator is now available for anonymous ftp from cs.duke.edu as
Xdist/sources/gnuplot/gnut2p.tar.Z. It has not changed since GNUPLOT
X2.01 (ie, GNUPLOT 2.0 patchlevel 1).
X
XUsers of gnutex that did not use the LaTeX driver will probably have
Xlittle difficulty adapting.
X
XPlease send all comments, complaints, and suggestions on this subject
Xto David.Kotz@Dartmouth.edu.
END_OF_FILE
if test 1168 -ne `wc -c <'gnuplot/README.gnu'`; then
echo shar: \"'gnuplot/README.gnu'\" unpacked with wrong size!
fi
# end of 'gnuplot/README.gnu'
fi
if test -f 'gnuplot/README.nex' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/README.nex'\"
else
echo shar: Extracting \"'gnuplot/README.nex'\" \(1428 characters\)
sed "s/^X//" >'gnuplot/README.nex' <<'END_OF_FILE'
X This directory contains version 2 of the additional files
Xyou'll need to get gnuplot3.0 to display it's postscript directly to a
Xwindow instead of going through the klunky process of writing the
Xpostscript to a file and launching Previewer to view the file. Note
Xthat all input is still done at the shell level! Fancier NeXTStep
Xinterfaces will be a future project.
X
X This version is faster and leaner than the old method. It
Xalso does not eat up swap space like the older version (this was
Xparticularly noticeable when doing animation-like plots). To do this
XI used DPS function calls instead of creating a NXImage and
Xcompositing the stream of commands. I based my code on the program
Xcalled "epsview" in the hackkit tar file on the archive servers.
X
X The next.trm (next terminal) is basically the post.trm
X(postscript terminal) with the fprintf replaced by DPSPrintf and
Xoutfile by the DPSContext d. You'll also see that I also used some
Xcode (with modifications) from David S. Joerg's MovieApp. Using the
XDPS functions enabled me to slim down the EpsViewer.[hm] and
XEPSView.[hm] files.
X
X No claim is made to code elegance or to it being a good example of
Xobjective-c coding. This is my first (well, second, sort of) objective-c
Xprogram. It seems to work for me. Any constructive criticism would be
Xappreciated. I can be reached at strobel@phast.phys.washington.edu
X
Xcheers!
X
Xnick strobel
END_OF_FILE
if test 1428 -ne `wc -c <'gnuplot/README.nex'`; then
echo shar: \"'gnuplot/README.nex'\" unpacked with wrong size!
fi
# end of 'gnuplot/README.nex'
fi
if test -f 'gnuplot/README.win' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/README.win'\"
else
echo shar: Extracting \"'gnuplot/README.win'\" \(1270 characters\)
sed "s/^X//" >'gnuplot/README.win' <<'END_OF_FILE'
XREADME file for MS Windows version of gnuplot.
X28th January 1993
X
XWindows gnuplot requires 4 files to run:
X WGNUPLOT.EXE Main program
X WGNUPLOT.DLL Graphics and Text window library
X WGNUPLOT.HLP Windows Help file
X WGNUPLOT.MNU Menu file
XThese 4 files must be in the same directory.
X
XMore information is available from gnuplot 'help set terminal windows'.
X
XWGNUPLOT runs in standard and enhanced modes.
X
XWindows 3.1 is preferred, but it will run under Windows 3.0
Xwith the following restrictions:
X1. COMMDLG.DLL and SHELL.DLL (available with Windows 3.1 or Borland C++ 3.1)
X must be in the windows directory.
X2. WGNUPLOT.HLP produced by Borland C++ 3.1 is in Windows 3.1 format.
X You need to use the WINHELP.EXE supplied with Borland C++ 3.1.
X3. WGNUPLOT won't run in real mode due to lack of memory.
X4. Truetype fonts are not available in the graph window.
X5. Drag-drop does not work.
X
XThe Borland makefile is makefile.win.
XWindows gnuplot has only been tested with Borland C++ 3.1.
XBefore making wgnuplot you will need to edit the TC = line
Xto specify the location of your compiler.
X
XThe Microsoft C 7.0 makefile is makefile.msw.
XThis version has had very little testing and currently crashes
Xif you set samples >= 2048.
X
END_OF_FILE
if test 1270 -ne `wc -c <'gnuplot/README.win'`; then
echo shar: \"'gnuplot/README.win'\" unpacked with wrong size!
fi
# end of 'gnuplot/README.win'
fi
if test -f 'gnuplot/configure.in' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/configure.in'\"
else
echo shar: Extracting \"'gnuplot/configure.in'\" \(2186 characters\)
sed "s/^X//" >'gnuplot/configure.in' <<'END_OF_FILE'
Xdnl Process this file with autoconf to produce a configure script.
Xdnl configure.in for gnuplot 3.5 on Unix.
Xdnl Send any mail about this file to David MacKenzie <djm@gnu.ai.mit.edu>.
Xdnl
XAC_INIT(graphics.c)
X
Xdnl Programs.
XAC_PROG_CC
XAC_PROG_INSTALL
X
Xdnl Optional features.
XAC_WITH(no-readline, , AC_DEFINE(READLINE))
XAC_WITH(cwdrc, , AC_DEFINE(NOCWDRC))
XAC_SUBST(LASERGNU)
XAC_WITH(lasergnu, LASERGNU=lasergnu_install, LASERGNU=lasergnu_noinstall)
X
Xdnl X Window System files.
XAC_SUBST(X_INCLUDES)
XAC_SUBST(X_LIBRARIES)
XAC_SUBST(PROGS)
XAC_FIND_X
Xif test -z "$x_includes" || test -z "$x_libraries"; then
X X_INCLUDES= X_LIBRARIES= PROGS=
Xelse
X X_INCLUDES="-I$x_includes" X_LIBRARIES="-L$x_libraries -lX11"
X PROGS=gnuplot_x11
X AC_DEFINE(X11)
Xfi
X
Xdnl Operating systems.
Xdnl FIXME AC_DEFINE(ISC22)
Xdnl FIXME AC_DEFINE(KSR)
Xecho checking for NeXT
XAC_PROGRAM_EGREP(yes,
X[#ifdef __NeXT__
X yes
X#endif
X], AC_DEFINE(NEXT) AC_DEFINE(NeXT))
Xecho checking for OSF/1
XAC_HEADER_CHECK(sys/bkmac.h, AC_DEFINE(OSF1) AC_DEFINE(_OSF_SOURCE))
Xecho checking for Solaris
XAC_HEADER_CHECK(libgenIO.h, AC_DEFINE(SOLARIS))
X
Xdnl Header files.
XAC_HEADER_CHECK(sys/bsdtypes.h, AC_DEFINE(BSD_TYPES))
XAC_HEADER_CHECK(sys/select.h, , AC_DEFINE(OLD_SELECT))
X
Xhave_hdr=
XAC_HEADER_CHECK(termios.h, AC_DEFINE(TERMIOS) have_hdr=1)
Xif test -z "$have_hdr"; then
X AC_HEADER_CHECK(sgtty.h, AC_DEFINE(SGTTY))
Xfi
X
Xdnl Functions.
Xdnl gamma is called lgamma on apollos.
XAC_FUNC_CHECK(lgamma, AC_DEFINE(GAMMA, lgamma), AC_DEFINE(GAMMA, gamma))
XAC_FUNC_CHECK(getcwd, AC_DEFINE(GETCWD))
XAC_FUNC_CHECK(memcpy, AC_DEFINE(MEMCPY))
XAC_FUNC_CHECK(memset, AC_DEFINE(MEMSET))
XAC_FUNC_CHECK(setlocale, AC_DEFINE(XPG3_LOCALE))
XAC_FUNC_CHECK(setlinebuf, AC_DEFINE(UNIX))
X
Xdnl On SVR3.
Xdnl FIXME AC_DEFINE(CRIPPLED_SELECT)
X
Xdnl Libraries.
Xdnl -lsocket is needed on SVR4.
XAC_HAVE_LIBRARY(socket, LIBS="$LIBS -lsocket")
X
Xdnl How do we detect the Ultrix X libraries?
Xdnl Or is it really a server (run-time) problem?
Xdnl FIXME AC_DEFINE(ULTRIX_KLUDGE)
X
Xdnl Define always.
Xdnl vfork is obsolete, and often broken.
XAC_DEFINE(NOVFORK)
Xdnl Some systems do not predefine this.
XAC_DEFINE(unix)
X
XAC_OUTPUT(Makefile docs/Makefile docs/latextut/Makefile)
END_OF_FILE
if test 2186 -ne `wc -c <'gnuplot/configure.in'`; then
echo shar: \"'gnuplot/configure.in'\" unpacked with wrong size!
fi
# end of 'gnuplot/configure.in'
fi
if test -f 'gnuplot/demo/animate.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/animate.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/animate.dem'\" \(818 characters\)
sed "s/^X//" >'gnuplot/demo/animate.dem' <<'END_OF_FILE'
X#
X# demo to rotate whale image
X# Where gnuplot.rot is a gnuplot command file containing something like
X#
X# zrot=(zrot+10)%360
X# set view xrot,zrot
X# replot
X# reread
X#
X# The 'reread' command causes the current gnu command file to be reset
X# to its starting point before further commands are read from it. Since
X# the 'reread' command is in 'gnuplot.rot', the above four commands are
X# repeated indefinitely, causing the image to rotate about the Z axis.
X#
Xset parametric
Xset hidden3d
Xset nokey
Xset xrange [0:8]
Xset yrange [-4:4]
Xset zrange [-2:2]
Xset data style line
Xset title "Demo of animation capability - Digitized Blue Whale"
Xxrot=60
Xzrot=0
Xsplot "whale.dat"
Xpause -1 "Under MS-DOS, a carriage return is needed to invoke reread"
Xload "gnuplot.rot"
Xset title ""
Xset autosc
Xset nohidden
Xset nopara
Xset key
END_OF_FILE
if test 818 -ne `wc -c <'gnuplot/demo/animate.dem'`; then
echo shar: \"'gnuplot/demo/animate.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/animate.dem'
fi
if test -f 'gnuplot/demo/electron.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/electron.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/electron.dem'\" \(2129 characters\)
sed "s/^X//" >'gnuplot/demo/electron.dem' <<'END_OF_FILE'
X#
X# $Id: electron.demo 3.38.2.6 1992/11/14 02:25:21 woo Exp $
X#
X# Electronics demo
X#
X# Bipolar Transistor (NPN) Mutual Characteristic
XIe(Vbe)=Ies*exp(Vbe/kT_q)
XIc(Vbe)=alpha*Ie(Vbe)+Ico
Xalpha = 0.99
XIes = 4e-14
XIco = 1e-09
XkT_q = 0.025
Xset dummy Vbe
Xset grid
Xset offsets
Xset nolog
Xset nopolar
Xset samples 160
Xset title "Mutual Characteristic of a Transistor"
Xset xlabel "Vbe (base emmitter voltage)"
Xset xrange [0 : 0.75]
Xset ylabel "Ic (collector current)"
Xset yrange [0 : 0.005]
Xset key .2,.0045
Xset format y "%.4f"
Xplot Ic(Vbe)
Xset format "%g"
X
Xpause -1 "Hit return to continue"
X
X# Junction Field Effect Transistor (JFET) Mutual Characteristic
X# drain current above pinch off
XIda(Vd)=Ido*(1-Vg/Vp)**2
X# drain current below pinch off
XIdb(Vd)=Ido*(2*Vd*(Vg-Vp)-Vd*Vd)/(Vp*Vp)
X# drain current
XId(Vd)= (Vd>Vg-Vp) ? Ida(Vd) : Idb(Vd)
X# drain current at zero gate voltage
XIdo = 2.5
X# pinch off voltage
XVp = -1.25
X# gate voltage
XVg = 0
Xset dummy Vd
Xset nogrid
Xset nokey
Xset offsets 0, 1, 0, 0
Xset title "JFET Mutual Characteristic"
Xset xlabel "Drain voltage Vd (V)"
Xset xrange [0 : 4]
Xset ylabel "Drain current Id (mA)"
Xset yrange [0 : 5]
Xset label "-0.5 Vp" at 4.1,0.625
Xset label "-0.25 Vp" at 4.1,1.4
Xset label "0" at 4.1,2.5
Xset label "Vg = 0.5 Vp" at 4.1,3.9
Xplot Vg=0.5*Vp,Id(Vd),Vg=0.25*Vp,Id(Vd),Vg=0,Id(Vd),Vg=-0.25*Vp,Id(Vd)
Xset nolabel
X
Xpause -1 "Hit return to continue"
X
X# amplitude frequency response
XA(jw) = ({0,1}*jw/({0,1}*jw+p1)) * (1/(1+{0,1}*jw/p2))
Xp1 = 10
Xp2 = 10000
Xset dummy jw
Xset grid
Xset key
Xset logscale xy
Xset offsets 0, 0, 0, 0
Xset title "Amplitude Frequency Response"
Xset xlabel "jw (radians)"
Xset xrange [1.1 : 90000.0]
Xset ylabel "magnitude of A(jw)"
Xset autoscale y
Xplot abs(A(jw))
X
Xpause -1 "Hit return to continue"
X
X# phase frequency response
Xset nolog y
Xset logscale x
Xset title "Phase Frequency Response"
Xset ylabel "Phase of A(jw) (degrees)"
Xplot 180/pi*arg(A(jw))
X
Xpause -1 "Hit return to continue"
X
X# undo what we've done
Xset dummy x
Xset nogrid
Xset offsets 0,0,0,0
Xset title ""
Xset ylabel ""
Xset xlabel ""
Xset xrange [-10:10]
Xset autoscale xy
Xset key
Xset format xy "%g"
Xset nolabel
Xset nolog
END_OF_FILE
if test 2129 -ne `wc -c <'gnuplot/demo/electron.dem'`; then
echo shar: \"'gnuplot/demo/electron.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/electron.dem'
fi
if test -f 'gnuplot/demo/errorbar.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/errorbar.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/errorbar.dem'\" \(1211 characters\)
sed "s/^X//" >'gnuplot/demo/errorbar.dem' <<'END_OF_FILE'
X#
X# $Id: errorbar.dem%v 3.38.2.114 1993/04/15 01:48:40 woo Exp woo $
X#
X# 31 Mar 1993 Modified by Daniel S. Lewart (d-lewart@uiuc.edu)
X#
Xset xrange [-3:65]
Xset yrange [ 4:14]
X
Xset title "Demonstration of error bars (both ylow and yhigh, default format)"
Xplot "err.dat" with errorbars
Xpause -1 "Hit return to continue"
X
X# this should look the same
Xset title "Demonstration of error bars (both ylow and yhigh)"
Xplot "err.dat" using 1:2:3:4 with errorbars
Xpause -1 "Hit return to continue"
X
Xset title "Demonstration of error bars (only ydelta)"
Xplot "err.dat" using 1:2:5 with errorbars
Xpause -1 "Hit return to continue"
X
Xset title "Plot data file twice to get lines and errorbars"
Xplot "err.dat" with lines, "err.dat" using 1:2:3:4 with errorbars
Xpause -1 "Hit return to continue"
X
Xset logscale y
Xset title "Demonstration of error bars (only ydelta) with y logscale"
Xplot [-3:65] [1:100] "err.dat" using 1:2:5 with errorbars
Xset nologscale y
Xpause -1 "Hit return to continue"
X
Xset logscale x
Xset title "Demonstration of error bars (only ydelta) with x logscale"
Xplot [1:100] [4:14] "err.dat" using 1:2:5 with errorbars
Xset nologscale x
Xpause -1 "Hit return to continue"
X
Xset autoscale
Xset nologscale
Xset title ""
END_OF_FILE
if test 1211 -ne `wc -c <'gnuplot/demo/errorbar.dem'`; then
echo shar: \"'gnuplot/demo/errorbar.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/errorbar.dem'
fi
if test -f 'gnuplot/demo/hidden.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/hidden.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/hidden.dem'\" \(1072 characters\)
sed "s/^X//" >'gnuplot/demo/hidden.dem' <<'END_OF_FILE'
X#
X# $Id: hidden.dem%v 3.38.2.61 1993/01/27 02:35:31 woo Exp woo $
X#
X#
Xset samples 20
Xset isosamples 20
Xset hidden3d
Xset title "Hidden line removal of explicit surfaces"
X
X
Xset xrange [-3:3]
Xset yrange [-2:2]
Xsplot 1 / (x*x + y*y + 1)
Xpause -1 "Hit return to continue (1)"
X
Xset xrange [-1:1]
Xset yrange [-1:1]
Xsplot x*y / (x**2 + y**2 + 0.1)
Xpause -1 "Hit return to continue (2)"
X
Xset view 70,45
Xset nocontour
Xset xrange [-3:3]
Xset yrange [-3:3]
Xsplot sin(x*x + y*y) / (x*x + y*y)
Xpause -1 "Hit return to continue (3)"
X
Xset view 60,30
Xset xrange [-3:3]
Xset yrange [-3:3]
Xsplot sin(x) * cos(y)
Xpause -1 "Hit return to continue (4)"
X
Xset view 75,230
Xset contour
Xreplot
Xpause -1 "Hit return to continue (5)"
X
Xset view 80,30,1,1
Xset data style lines
Xset autoscale
Xsplot "glass.dat" using 1
Xpause -1 "Hit return to continue (6)"
X
Xset view 50,
Xset grid
Xreplot
Xpause -1 "Hit return to continue (7)"
X
Xset nocontour
Xset nogrid
Xset nohidden3d
Xset samples 100
Xset isosamples 10
Xset view 60,30,1,1
Xset xrange [-10:10]
Xset yrange [-10:10]
Xset zrange [-10:10]
Xset auto
Xset title "" 0,0
X
X
END_OF_FILE
if test 1072 -ne `wc -c <'gnuplot/demo/hidden.dem'`; then
echo shar: \"'gnuplot/demo/hidden.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/hidden.dem'
fi
if test -f 'gnuplot/demo/multimsh.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/multimsh.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/multimsh.dem'\" \(1028 characters\)
sed "s/^X//" >'gnuplot/demo/multimsh.dem' <<'END_OF_FILE'
Xset parametric
Xset hidden3d
Xset nokey
Xset xrange [0:8]
Xset yrange [-4:4]
Xset zrange [-2:2]
Xset data style line
Xset title "Demo of multiple mesh per file capability - Digitized Blue Whale"
Xsplot "whale.dat"
Xpause -1 "Press Return"
Xset title "Demo of multiple mesh per file capability - Digitized Blue Whale"
Xset xlabel "Mesh or Network 0"
Xsplot "whale.dat" index 0
Xpause -1 "Press Return"
X
Xset xlabel "Mesh or Network 6"
Xsplot "whale.dat" index 6 using 3:2:1
Xpause -1 "Press Return"
X
Xset xlabel "Mesh or Network 12"
Xsplot "whale.dat" index 12 with points
Xpause -1 "Press Return"
X
Xset xlabel "Mesh or Network 13"
Xsplot "whale.dat" i 13
Xpause -1 "Press Return - A Loop over Indices could be done with reread"
X
X# #file "loop"
X# maxmsh = 16
X# ind = (ind + 1)%maxmsh
X# splot "whale.dat" i ind
X# reread "loop"
X
Xset xlabel "Mesh or Network 4"
Xsplot "whale.dat" i 4
Xpause -1 "Press Return"
X
Xset xlabel "Mesh or Network 5"
Xsplot "whale.dat" i 5
Xpause -1 "Press Return"
X
Xset title ""
Xset xlabel ""
Xset nohidden3d
Xset auto
Xset nopara
END_OF_FILE
if test 1028 -ne `wc -c <'gnuplot/demo/multimsh.dem'`; then
echo shar: \"'gnuplot/demo/multimsh.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/multimsh.dem'
fi
if test -f 'gnuplot/demo/param.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/param.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/param.dem'\" \(987 characters\)
sed "s/^X//" >'gnuplot/demo/param.dem' <<'END_OF_FILE'
X#
X# $Id: param.demo 3.38 1992/11/06 06:33:50 woo Exp $
X#
X# Show some of the new parametric capabilities.
X#
Xset parametric
Xset dummy t
Xset autoscale
Xset samples 160
Xset title ""
Xplot t,sin(t)/t title "t,sin(t)/t or sin(x)/x"
Xpause -1 "Hit return to continue"
X
Xplot sin(t)/t,t
Xpause -1 "Hit return to continue"
X
Xplot sin(t),cos(t)
Xpause -1 "Hit return to continue"
X
Xset xrange [-3:3]
Xset yrange [-3:3]
Xset title "Parametric Conic Sections"
Xplot -t,t,cos(t),cos(2*t),2*cos(t),sin(t),-cosh(t),sinh(t)
Xset title ""
Xpause -1 "Hit return to continue"
X
Xset xrange [-5:5]
Xset yrange [-5:5]
Xplot tan(t),t,t,tan(t)
Xpause -1 "Hit return to continue"
X
Xset trange [0.00001:3]
Xplot t,log(t),-t,log(t),sin(t),t**2,-sin(t),t**2
Xpause -1 "Hit return to continue"
X
Xset autoscale x
Xset yrange [-1.5:1.5]
Xset trange [0.0001:10*pi]
Xplot sin(t)/t,cos(t)/t
Xpause -1 "Hit return to continue"
X
X# undo what we've done above
Xset noparametric
Xset samples 160
Xset autoscale xy
Xset title ""
Xset offset 0,0,0,0
Xset key
END_OF_FILE
if test 987 -ne `wc -c <'gnuplot/demo/param.dem'`; then
echo shar: \"'gnuplot/demo/param.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/param.dem'
fi
if test -f 'gnuplot/demo/polar.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/polar.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/polar.dem'\" \(1063 characters\)
sed "s/^X//" >'gnuplot/demo/polar.dem' <<'END_OF_FILE'
X#
X# $Id: polar.dem%v 3.38.2.88 1993/03/04 01:47:16 woo Exp woo $
X#
X# Show some of the new polar capabilities.
X#
Xset noborder
Xset clip
Xset polar
Xset dummy x
Xset samples 160
Xset xrange [0:2*pi]
Xset title "Three circles (with aspect ratio distortion)"
Xplot .5,1,1.5
Xpause -1 "Hit return to continue"
Xset title ""
X
Xplot cos(2*x)
Xpause -1 "Hit return to continue"
X
Xplot 2*sqrt(cos(x)),-2*sqrt(cos(x))
Xpause -1 "Hit return to continue"
X
Xset offset pi/4,pi/4,0,0
Xplot sin(4*x),cos(4*x)
Xset offset 0,0,0,0
Xpause -1 "Hit return to continue"
X
Xset yrange [-5:5]
Xplot x/cos(3*x)
Xpause -1 "Hit return to continue"
Xset autoscale
X
Xplot 1-sin(x)
Xpause -1 "Hit return to continue"
X
Xset xrange [0:12*pi]
Xplot 2*x
Xpause -1 "Hit return to continue"
X
Xbutterfly(x)=exp(cos(x))-2*cos(4*x)+sin(x/12)**5
Xset samples 800
Xpause 0 "This is a big one (many samples), be patient..."
Xset title "Butterfly"
Xset nokey
Xplot butterfly(x)
Xpause -1 "Hit return to continue"
X
X# undo what we've done above
Xset nopolar
Xset samples 160
Xset autoscale xy
Xset title ""
Xset offset 0,0,0,0
Xset key
Xset border
END_OF_FILE
if test 1063 -ne `wc -c <'gnuplot/demo/polar.dem'`; then
echo shar: \"'gnuplot/demo/polar.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/polar.dem'
fi
if test -f 'gnuplot/demo/scatter.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/scatter.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/scatter.dem'\" \(1373 characters\)
sed "s/^X//" >'gnuplot/demo/scatter.dem' <<'END_OF_FILE'
X#
X# Simple demo to scatter data conversion to grid data.
X#
X
Xset title "Simple demo to scatter data conversion to grid data"
Xset nohidden3d
Xset ticslevel 0.5
Xset view 60,30
Xset autoscale
Xset parametric
Xset data style points
Xset xlabel "data style point - no dgrid"
Xsplot "hemisphr.dat"
Xpause -1 "Hit return to continue (1)"
X
Xset dgrid3d 10,10,1
Xset xlabel " data style lines, dgrid3d 10,10,1"
Xset data style lines
Xsplot "hemisphr.dat"
Xpause -1 "Hit return to continue (2)"
X
Xset dgrid3d ,,4
Xset xlabel " data style lines, dgrid3d ,,4 "
Xset data style lines
Xsplot "hemisphr.dat"
Xpause -1 "Hit return to continue (3)"
X
Xset dgrid3d ,,16
Xset xlabel " data style lines, dgrid3d ,,16"
Xset data style lines
Xsplot "hemisphr.dat"
Xpause -1 "Hit return to continue (4)"
X
Xset contour
Xset xlabel "data style lines, dgrid3d ,,16, contour"
Xsplot "hemisphr.dat"
Xpause -1 "Hit return to continue (5)"
X
Xset nodgrid3d
Xset data style points
Xset xlabel "data style points, nodgrid3d"
Xsplot "scatter2.dat"
Xpause -1 "Hit return to continue (6)"
X
Xset dgrid3d ,,1
Xset xlabel "data style lines, dgrid3d ,,1"
Xset data style lines
Xsplot "scatter2.dat"
Xpause -1 "Hit return to continue (7)"
X
Xset dgrid3d ,,4
Xset xlabel "data style lines, dgrid3d ,,4"
Xset data style lines
Xsplot "scatter2.dat"
Xpause -1 "Hit return to continue (8)"
X
Xset noparametric
Xset nodgrid3d
Xset nocontour
Xset title ""
Xset xlabel ""
END_OF_FILE
if test 1373 -ne `wc -c <'gnuplot/demo/scatter.dem'`; then
echo shar: \"'gnuplot/demo/scatter.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/scatter.dem'
fi
if test -f 'gnuplot/demo/scatter2.dat' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/scatter2.dat'\"
else
echo shar: Extracting \"'gnuplot/demo/scatter2.dat'\" \(1845 characters\)
sed "s/^X//" >'gnuplot/demo/scatter2.dat' <<'END_OF_FILE'
X25. 1.0 .99443
X25. 10.0 .9406
X25. 20.0 .8749
X25. 30.0 .8030
X25. 40.0 .7195
X25. 50.0 .6190
X25. 60.0 .4844
X25. 70.0 .3409
X25. 80.0 .3170
X25. 90.0 .3273
X25. 100.0 .3451
X25. 110.0 .3656
X25. 120.0 .3872
X25. 130.0 .4096
X25. 140.0 .4321
X25. 150.0 .4549
X25. 160.0 .4777
X25. 170.0 .5005
X25. 180.0 .5223
X25. 190.0 .5460
X25. 200.0 .5687
X25. 250.0 .6798
X25. 300.0 .7889
X25. 350.0 .8962
X25. 400.0 1.0015
X25. 450.0 1.1046
X25. 500.0 1.2063
X25. 600.0 1.4058
X25. 700.0 1.6008
X25. 800.0 1.7920
X
X50. 1.0 .99571
X50. 10.0 .9546
X50. 20.0 .9066
X50. 30.0 .8552
X50. 40.0 .8013
X50. 50.0 .7436
X50. 60.0 .6818
X50. 70.0 .6171
X50. 80.0 .5541
X50. 90.0 .5017
X50. 100.0 .4706
X50. 110.0 .4605
X50. 120.0 .4622
X50. 130.0 .4711
X50. 140.0 .4841
X50. 150.0 .4996
X50. 160.0 .5166
X50. 170.0 .5346
X50. 180.0 .5533
X50. 190.0 .5724
X50. 200.0 .5906
X50. 250.0 .6898
X50. 300.0 .7888
X50. 350.0 .8880
X50. 400.0 .9851
X50. 450.0 1.0813
X50. 500.0 1.1758
X50. 600.0 1.3615
X50. 700.0 1.5430
X50. 800.0 1.7208
X
X75. 1.0 .99661
X75. 10.0 .9647
X75. 20.0 .9283
X75. 30.0 .8904
X75. 40.0 .8518
X75. 50.0 .8124
X75. 60.0 .7723
X75. 70.0 .7323
X75. 80.0 .6934
X75. 90.0 .6572
X75. 100.0 .6255
X75. 110.0 .6012
X75. 120.0 .5847
X75. 130.0 .5756
X75. 140.0 .5731
X75. 150.0 .5770
X75. 160.0 .5839
X75. 170.0 .5937
X75. 180.0 .6055
X75. 190.0 .6188
X75. 200.0 .6333
X75. 250.0 .7149
X75. 300.0 .8027
X75. 350.0 .8916
X75. 400.0 .9802
X75. 450.0 1.0684
X75. 500.0 1.1560
X75. 600.0 1.3293
X75. 700.0 1.4995
X
X100. 1.0 .99727
X100. 10.0 .9720
X100. 20.0 .9438
X100. 30.0 .9153
X100. 40.0 .8866
X100. 50.0 .8579
X100. 60.0 .8295
X100. 70.0 .8017
X100. 80.0 .7749
X100. 90.0 .7497
X100. 100.0 .7268
X100. 110.0 .7074
X100. 120.0 .6913
X100. 130.0 .6793
X100. 140.0 .6712
X100. 150.0 .6668
X100. 160.0 .6657
X100. 170.0 .6679
X100. 180.0 .6728
X100. 190.0 .6801
X100. 200.0 .6889
X100. 250.0 .7494
X100. 300.0 .8233
X100. 350.0 .9027
X100. 400.0 .9839
X100. 450.0 1.0653
END_OF_FILE
if test 1845 -ne `wc -c <'gnuplot/demo/scatter2.dat'`; then
echo shar: \"'gnuplot/demo/scatter2.dat'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/scatter2.dat'
fi
if test -f 'gnuplot/demo/simple.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/simple.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/simple.dem'\" \(1229 characters\)
sed "s/^X//" >'gnuplot/demo/simple.dem' <<'END_OF_FILE'
X#
X# $Id: simple.dem%v 3.38.2.53 1993/01/21 01:20:04 woo Exp woo $
X#
X# Requires data files "[123].dat" from this directory,
X# so change current working directory to this directory before running.
X# gnuplot> set term <term-type>
X# gnuplot> load 'simple.dem'
X#
Xset samples 50
Xplot [-10:10] sin(x),atan(x),cos(atan(x))
Xpause -1 "Hit return to continue"
X
Xset samples 100
Xplot [-pi/2:pi] cos(x),-(sin(x) > sin(x+1) ? sin(x) : sin(x+1))
Xpause -1 "Hit return to continue"
X
Xset samples 200
Xplot [-3:5] asin(x),acos(x)
Xpause -1 "Hit return to continue"
X
Xplot [-30:20] besj0(x)*0.12e1 with impulses, (x**besj0(x))-2.5 with points
Xpause -1 "Hit return to continue"
X
Xset samples 400
Xplot [-10:10] real(sin(x)**besj0(x))
Xpause -1 "Hit return to continue"
X
Xplot [-5*pi:5*pi] [-5:5] real(tan(x)/atan(x)), 1/x
Xpause -1 "Hit return to continue"
X
Xset autoscale
Xset samples 800
Xplot [-30:20] sin(x*20)*atan(x)
Xpause -1 "Hit return to continue"
X
Xplot [-19:19] '1.dat'with impulses ,'2.dat' ,'3.dat' with lines
Xpause -1 "Hit return to continue"
Xf(x) = x/100
Xplot [-19:19] '1.dat'with impulses ,'2.dat' thru f(x) ,'3.dat' with lines
Xpause -1 "Hit return to continue"
X
X# undo what we have done above
Xset samples 160
Xset xrange [-10:10]
Xset autoscale xy
END_OF_FILE
if test 1229 -ne `wc -c <'gnuplot/demo/simple.dem'`; then
echo shar: \"'gnuplot/demo/simple.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/simple.dem'
fi
if test -f 'gnuplot/demo/world.dem' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/demo/world.dem'\"
else
echo shar: Extracting \"'gnuplot/demo/world.dem'\" \(1414 characters\)
sed "s/^X//" >'gnuplot/demo/world.dem' <<'END_OF_FILE'
X#
X# $Id: world.demo 3.38.2.6 1992/11/14 02:25:21 woo Exp $
X#
X#
Xset title "Gnuplot Correspondences"
Xset nokey
Xset noborder
Xset noyzeroaxis
Xset noxtics
Xset noytics
X#
X# plot world map and correspondent locations as a +
Xplot 'world.dat' with lines 3 4, 'world.cor' with points 1 2
Xset title ""
Xset key
Xset border
Xset yzeroaxis
Xset xtics
Xset ytics
Xpause -1 "Hit return to continue"
X#
X# plot a '3D version using spherical coordinate system' of the world.
Xset angles degrees
Xset title "3D version using spherical coordinate system"
Xset view 70,40,,2.0
Xset mapping spherical
Xset parametric
Xset samples 32
Xset isosamples 9
Xset urange [-pi/2:pi/2]
Xset vrange [0:2*pi]
Xsplot cos(u)*cos(v),cos(u)*sin(v),sin(u) with lines 5 6,\
X'world.dat' with lines 3 4, 'world.cor' with points 1 2
Xpause -1 "Hit return to continue"
X#
X# plot a '3D version using cylindrical coordinate system' of the world.
Xset title "3D version using cylindrical coordinate system"
Xset view 70,40,,2.0
Xset mapping cylindrical
Xset parametric
Xset samples 32
Xset isosamples 9
Xset urange [-pi:pi]
Xset vrange [-90:90]
Xsplot cos(u),sin(u),v with lines 5 6,\
X'world.dat' with lines 3 4, 'world.cor' with points 1 2
Xpause -1 "Hit return to continue"
X
X
X#
X# Clean up:
X#
Xset noparametric
Xset mapping cartesian
Xset angles radians
Xset samples 100
Xset isosamples 10
Xset view 60,30,1,1
Xset xrange [-10:10]
Xset yrange [-10:10]
Xset zrange [-10:10]
Xset auto
Xset title "" 0,0
END_OF_FILE
if test 1414 -ne `wc -c <'gnuplot/demo/world.dem'`; then
echo shar: \"'gnuplot/demo/world.dem'\" unpacked with wrong size!
fi
# end of 'gnuplot/demo/world.dem'
fi
if test -f 'gnuplot/docs/checkdoc.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/docs/checkdoc.c'\"
else
echo shar: Extracting \"'gnuplot/docs/checkdoc.c'\" \(1865 characters\)
sed "s/^X//" >'gnuplot/docs/checkdoc.c' <<'END_OF_FILE'
X#ifndef lint
Xstatic char *RCSid = "$Id: checkdoc.c%v 3.38.2.70 1993/02/08 02:19:29 woo Exp woo $";
X#endif
X
X
X/*
X * checkdoc -- check a doc file for correctness of first column.
X *
X * Prints out lines that have an illegal first character.
X * First character must be space, digit, or ?, @, #, %,
X * or line must be empty.
X *
X * usage: checkdoc [docfile]
X * Modified by Russell Lang from hlp2ms.c by Thomas Williams
X *
X * Original version by David Kotz used the following one line script!
X * sed -e '/^$/d' -e '/^[ 0-9?@#%]/d' gnuplot.doc
X *
X */
X
X#include <stdio.h>
X#include <ctype.h>
X
X#define MAX_LINE_LEN 256
X#define TRUE 1
X#define FALSE 0
X
Xmain(argc,argv)
Xint argc;
Xchar **argv;
X{
XFILE * infile;
X infile = stdin;
X if (argc > 2) {
X fprintf(stderr,"Usage: %s [infile]\n", argv[0]);
X exit(1);
X }
X if (argc == 2)
X if ( (infile = fopen(argv[1],"r")) == (FILE *)NULL) {
X fprintf(stderr,"%s: Can't open %s for reading\n",
X argv[0], argv[1]);
X exit(1);
X }
X
X convert(infile, stdout);
X exit(0);
X}
X
Xconvert(a,b)
X FILE *a,*b;
X{
X static char line[MAX_LINE_LEN];
X
X while (fgets(line,MAX_LINE_LEN,a)) {
X process_line(line, b);
X }
X}
X
Xprocess_line(line, b)
X char *line;
X FILE *b;
X{
X static long line_no=0;
X
X line_no++;
X
X switch(line[0]) { /* control character */
X case '?': { /* interactive help entry */
X break; /* ignore */
X }
X case '@': { /* start/end table */
X break; /* ignore */
X }
X case '#': { /* latex table entry */
X break; /* ignore */
X }
X case '%': { /* troff table entry */
X break; /* ignore */
X }
X case '\n': /* empty text line */
X case ' ': { /* normal text line */
X break;
X }
X default: {
X if (isdigit(line[0])) { /* start of section */
X /* ignore */
X } else
X fprintf(b, "%ld:%s", line_no, line); /* output bad line */
X break;
X }
X }
X}
X
END_OF_FILE
if test 1865 -ne `wc -c <'gnuplot/docs/checkdoc.c'`; then
echo shar: \"'gnuplot/docs/checkdoc.c'\" unpacked with wrong size!
fi
# end of 'gnuplot/docs/checkdoc.c'
fi
if test -f 'gnuplot/docs/doc2gih.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/docs/doc2gih.c'\"
else
echo shar: Extracting \"'gnuplot/docs/doc2gih.c'\" \(2132 characters\)
sed "s/^X//" >'gnuplot/docs/doc2gih.c' <<'END_OF_FILE'
X#ifndef lint
Xstatic char *RCSid = "$Id: doc2gih.c%v 3.38.2.70 1993/02/08 02:19:29 woo Exp woo $";
X#endif
X
X
X/*
X * doc2gih.c -- program to convert Gnuplot .DOC format to gnuplot
X * interactive help (.GIH) format.
X *
X * This involves stripping all lines with a leading digit or
X * a leading @, #, or %.
X * Modified by Russell Lang from hlp2ms.c by Thomas Williams
X *
X * usage: doc2gih [file.doc [file.gih]]
X *
X * Original version by David Kotz used the following one line script!
X * sed '/^[0-9@#%]/d' file.doc > file.gih
X */
X
X#include <stdio.h>
X#include <ctype.h>
X
X#define MAX_LINE_LEN 256
X#define TRUE 1
X#define FALSE 0
X
Xmain(argc,argv)
Xint argc;
Xchar **argv;
X{
XFILE * infile;
XFILE * outfile;
X infile = stdin;
X outfile = stdout;
X if (argc > 3) {
X fprintf(stderr,"Usage: %s [infile [outfile]]\n", argv[0]);
X exit(1);
X }
X if (argc >= 2)
X if ( (infile = fopen(argv[1],"r")) == (FILE *)NULL) {
X fprintf(stderr,"%s: Can't open %s for reading\n",
X argv[0], argv[1]);
X exit(1);
X }
X if (argc == 3)
X if ( (outfile = fopen(argv[2],"w")) == (FILE *)NULL) {
X fprintf(stderr,"%s: Can't open %s for writing\n",
X argv[0], argv[2]);
X }
X
X convert(infile,outfile);
X exit(0);
X}
X
X
Xconvert(a,b)
X FILE *a,*b;
X{
X static char line[MAX_LINE_LEN];
X
X while (fgets(line,MAX_LINE_LEN,a)) {
X process_line(line, b);
X }
X}
X
Xprocess_line(line, b)
X char *line;
X FILE *b;
X{
X static int line_count = 0;
X
X line_count++;
X
X switch(line[0]) { /* control character */
X case '?': { /* interactive help entry */
X (void) fputs(line,b);
X break;
X }
X case '@': { /* start/end table */
X break; /* ignore */
X }
X case '#': { /* latex table entry */
X break; /* ignore */
X }
X case '%': { /* troff table entry */
X break; /* ignore */
X }
X case '\n': /* empty text line */
X case ' ': { /* normal text line */
X (void) fputs(line,b);
X break;
X }
X default: {
X if (isdigit(line[0])) { /* start of section */
X /* ignore */
X } else
X fprintf(stderr, "unknown control code '%c' in column 1, line %d\n",
X line[0], line_count);
X break;
X }
X }
X}
X
END_OF_FILE
if test 2132 -ne `wc -c <'gnuplot/docs/doc2gih.c'`; then
echo shar: \"'gnuplot/docs/doc2gih.c'\" unpacked with wrong size!
fi
# end of 'gnuplot/docs/doc2gih.c'
fi
if test -f 'gnuplot/docs/doc2hlp.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/docs/doc2hlp.c'\"
else
echo shar: Extracting \"'gnuplot/docs/doc2hlp.c'\" \(2084 characters\)
sed "s/^X//" >'gnuplot/docs/doc2hlp.c' <<'END_OF_FILE'
X#ifndef lint
Xstatic char *RCSid = "$Id: doc2hlp.c 3.38.2.6 1992/11/14 02:25:48 woo Exp $";
X#endif
X
X
X/*
X * doc2hlp.c -- program to convert Gnuplot .DOC format to
X * VMS help (.HLP) format.
X *
X * This involves stripping all lines with a leading ?,
X * @, #, or %.
X * Modified by Russell Lang from hlp2ms.c by Thomas Williams
X *
X * usage: doc2hlp [file.doc [file.hlp]]
X *
X * Original version by David Kotz used the following one line script!
X * sed '/^[?@#%]/d' file.doc > file.hlp
X */
X
X#include <stdio.h>
X#include <ctype.h>
X
X#define MAX_LINE_LEN 256
X#define TRUE 1
X#define FALSE 0
X
Xmain(argc,argv)
Xint argc;
Xchar **argv;
X{
XFILE * infile;
XFILE * outfile;
X infile = stdin;
X outfile = stdout;
X if (argc > 3) {
X fprintf(stderr,"Usage: %s [infile [outfile]]\n", argv[0]);
X exit(1);
X }
X if (argc >= 2)
X if ( (infile = fopen(argv[1],"r")) == (FILE *)NULL) {
X fprintf(stderr,"%s: Can't open %s for reading\n",
X argv[0], argv[1]);
X exit(1);
X }
X if (argc == 3)
X if ( (outfile = fopen(argv[2],"w")) == (FILE *)NULL) {
X fprintf(stderr,"%s: Can't open %s for writing\n",
X argv[0], argv[2]);
X }
X
X convert(infile,outfile);
X exit(0);
X}
X
X
Xconvert(a,b)
X FILE *a,*b;
X{
X static char line[MAX_LINE_LEN];
X
X while (fgets(line,MAX_LINE_LEN,a)) {
X process_line(line, b);
X }
X}
X
Xprocess_line(line, b)
X char *line;
X FILE *b;
X{
X static int line_count = 0;
X
X line_count++;
X
X switch(line[0]) { /* control character */
X case '?': { /* interactive help entry */
X break; /* ignore */
X }
X case '@': { /* start/end table */
X break; /* ignore */
X }
X case '#': { /* latex table entry */
X break; /* ignore */
X }
X case '%': { /* troff table entry */
X break; /* ignore */
X }
X case '\n': /* empty text line */
X case ' ': { /* normal text line */
X (void) fputs(line,b);
X break;
X }
X default: {
X if (isdigit(line[0])) { /* start of section */
X (void) fputs(line,b);
X } else
X fprintf(stderr, "unknown control code '%c' in column 1, line %d\n",
X line[0], line_count);
X break;
X }
X }
X}
END_OF_FILE
if test 2084 -ne `wc -c <'gnuplot/docs/doc2hlp.c'`; then
echo shar: \"'gnuplot/docs/doc2hlp.c'\" unpacked with wrong size!
fi
# end of 'gnuplot/docs/doc2hlp.c'
fi
if test -f 'gnuplot/docs/latextut/Makefile.in' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/docs/latextut/Makefile.in'\"
else
echo shar: Extracting \"'gnuplot/docs/latextut/Makefile.in'\" \(759 characters\)
sed "s/^X//" >'gnuplot/docs/latextut/Makefile.in' <<'END_OF_FILE'
X# Makefile for gnuplot LaTeX tutorial
X# To make the manual from scratch, we run latex two times
X
X.NOEXPORT:
XSHELL = /bin/sh
X
Xsrcdir = @srcdir@
XVPATH = @srcdir@
X
Xprefix = /usr/local
Xexec_prefix = $(prefix)
Xbindir = $(exec_prefix)/bin
Xdatadir = $(prefix)/lib
Xmandir = $(prefix)/man
X
Xall: tutorial.dvi done
X
Xdone:
X latex tutorial
X echo > done
X
X# To touch it up after changes:
Xremake: tutorial.dvi
X
X# Always runs latex, e.g., to get labels right
Xforce:
X latex tutorial
X
Xtutorial.dvi: eg1.tex eg2.tex eg3.tex eg4.tex eg5.tex eg6.tex linepoin.tex \
X tutorial.tex header.tex
X latex tutorial
X rm -f done
X
X.SUFFIXES: .tex .plt
X
X.plt.tex:
X gnuplot $<
X
Xclean:
X rm -f *.log eg?.tex linepoin.tex
X
Xmostlyclean: clean
X
Xdistclean: clean
X rm -f Makefile
X
Xrealclean: distclean
END_OF_FILE
if test 759 -ne `wc -c <'gnuplot/docs/latextut/Makefile.in'`; then
echo shar: \"'gnuplot/docs/latextut/Makefile.in'\" unpacked with wrong size!
fi
# end of 'gnuplot/docs/latextut/Makefile.in'
fi
if test -f 'gnuplot/docs/latextut/eg3.dat' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/docs/latextut/eg3.dat'\"
else
echo shar: Extracting \"'gnuplot/docs/latextut/eg3.dat'\" \(781 characters\)
sed "s/^X//" >'gnuplot/docs/latextut/eg3.dat' <<'END_OF_FILE'
X-20.000000 -9.125028
X-19.000000 -9.109280
X-18.000000 -9.091787
X-17.000000 -9.072243
X-16.000000 -9.050265
X-15.000000 -9.025369
X-14.000000 -8.996933
X-13.000000 -8.964147
X-12.000000 -8.925931
X-11.000000 -8.880819
X-10.000000 -8.826766
X-9.000000 -8.760835
X-8.000000 -8.678648
X-7.000000 -8.573396
X-6.000000 -8.433886
X-5.000000 -8.240405
X-4.000000 -7.954906
X-3.000000 -7.494275
X-2.000000 -6.642892
X-1.000000 -4.712389
X0.000000 0.000000
X1.000000 4.712389
X2.000000 6.642892
X3.000000 7.494275
X4.000000 7.954906
X5.000000 8.240405
X6.000000 8.433886
X7.000000 8.573396
X8.000000 8.678648
X9.000000 8.760835
X10.000000 8.826766
X11.000000 8.880819
X12.000000 8.925931
X13.000000 8.964147
X14.000000 8.996933
X15.000000 9.025369
X16.000000 9.050265
X17.000000 9.072243
X18.000000 9.091787
X19.000000 9.109280
END_OF_FILE
if test 781 -ne `wc -c <'gnuplot/docs/latextut/eg3.dat'`; then
echo shar: \"'gnuplot/docs/latextut/eg3.dat'\" unpacked with wrong size!
fi
# end of 'gnuplot/docs/latextut/eg3.dat'
fi
if test -f 'gnuplot/docs/latextut/header.tex' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/docs/latextut/header.tex'\"
else
echo shar: Extracting \"'gnuplot/docs/latextut/header.tex'\" \(1677 characters\)
sed "s/^X//" >'gnuplot/docs/latextut/header.tex' <<'END_OF_FILE'
X%
X% Header file for tutorial.tex
X%
X
X% Spacing
X\newcommand{\singlespace}
X {\addtolength{\baselineskip}{-.333\baselineskip}}
X\newcommand{\doublespace}
X {\addtolength{\baselineskip}{.5\baselineskip}}
X
X% Spacing for the whole document
X\newcommand{\currentspace}{} % use this for single space
X% \newcommand{\currentspace}{\doubleespace} % use this for double space
X
X% Common abbreviations
X% (Remember to put '\ ' after if an interword space is
X% desired rather than end-of-sentence space. Same for '.etc)' ).
X\newcommand{\eg}{{\em e.g.}} % e.g.
X\newcommand{\ie}{{\em i.e.}} % i.e.
X\newcommand{\etc}{{\em etc.}} % etc.
X\newcommand{\vs}{{\em vs.}} % vs.
X\newcommand{\usec}{{$\mu$}sec} % microseconds
X
X% \boxfigure{pos}{wid}{text}: A figure with a box around it
X%
X% pos the usual figure placement arg: eg. htbp
X% wid the width of the figure, in some units: eg. 5in
X% text the contents of the figure, including picture/caption/label/etc
X%
X\newlength{\boxwidth}
X\newcommand{\boxfigure}[3]{
X \begin{figure}[#1]
X \setlength{\boxwidth}{#2}
X \addtolength{\boxwidth}{.1in}
X
X \centering
X \framebox[\boxwidth]{
X \begin{minipage}{#2}
X #3
X \end{minipage}
X }
X \end{figure}
X}
X
X% use \fullboxwidth for arg 2 of boxfigure to get box of size \textwidth
X
X% To show a syntax for a gnutex command
X\newenvironment{syntax}{\begin{quote}\tt}{\end{quote}}
X
X\documentstyle[titlepage,11pt]{article}
X
X% Margins
X\sloppy
X\setlength{\textwidth}{6.5in}
X\setlength{\textheight}{9in}
X\setlength{\topmargin}{-0.5in}
X\setlength{\oddsidemargin}{0pt}
X\setlength{\evensidemargin}{0pt}
X
X% see above
X\newlength{\fullboxwidth}
X\setlength{\fullboxwidth}{\textwidth}
X\addtolength{\fullboxwidth}{-0.1in}
X
END_OF_FILE
if test 1677 -ne `wc -c <'gnuplot/docs/latextut/header.tex'`; then
echo shar: \"'gnuplot/docs/latextut/header.tex'\" unpacked with wrong size!
fi
# end of 'gnuplot/docs/latextut/header.tex'
fi
if test -f 'gnuplot/docs/toc_entr.sty' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/docs/toc_entr.sty'\"
else
echo shar: Extracting \"'gnuplot/docs/toc_entr.sty'\" \(2075 characters\)
sed "s/^X//" >'gnuplot/docs/toc_entr.sty' <<'END_OF_FILE'
X%
X% $Id: toc_entry.sty 3.38.2.6 1992/11/14 02:25:48 woo Exp $
X%
X%
X%
X% TOC_ENTRY.STY of 13 Dec 90
X% written by Stefan Timphus
X%
X% Will produce the right space for sectionnumbers in the tableofcontents
X% Necessary for entries where the number for each kind of section
X% is greater 10 (e.g. "12.14.18 Sectionname")
X% When using the original definition the first letter of the sectionname
X% overwrites the last number of the sectionnumber
X%
X% call adjustments with command \adjustSTYLENAME
X%
X
X\typeout{`toc_entry.sty' 1.0 of 13 Dec 90}
X
X%
X% HERE ARE THE ORIGINAL DEFINITIONS
X%
X
X% article.sty
X%
X%\def\l@subsection{\@dottedtocline{2}{1.5em}{2.3em}}
X%\def\l@subsubsection{\@dottedtocline{3}{3.8em}{3.2em}}
X%\def\l@paragraph{\@dottedtocline{4}{7.0em}{4.1em}}
X%\def\l@subparagraph{\@dottedtocline{5}{10em}{5em}}
X
X% report.sty and book.sty
X%
X%\def\l@section{\@dottedtocline{1}{1.5em}{2.3em}}
X%\def\l@subsection{\@dottedtocline{2}{3.8em}{3.2em}}
X%\def\l@subsubsection{\@dottedtocline{3}{7.0em}{4.1em}}
X%\def\l@paragraph{\@dottedtocline{4}{10em}{5em}}
X%\def\l@subparagraph{\@dottedtocline{5}{12em}{6em}}
X
X%
X% MODIFICATIONS
X%
X
X\newlength{\twonum}
X \settowidth{\twonum}{99.99.}
X\newlength{\threenum}
X \settowidth{\threenum}{99.99.99.}
X\newlength{\fournum}
X \settowidth{\fournum}{99.99.99.99.}
X\newlength{\fivenum}
X \settowidth{\fivenum}{99.99.99.99.99.}
X\newlength{\sixnum}
X \settowidth{\sixnum}{99.99.99.99.99.99.}
X
X\newcommand{\adjustarticle}
X{\def\l@subsection{\@dottedtocline{2}{1.5em}{\twonum}}
X\def\l@subsubsection{\@dottedtocline{3}{4.0em}{\threenum}}
X\def\l@paragraph{\@dottedtocline{4}{7.8em}{\fournum}}
X\def\l@subparagraph{\@dottedtocline{5}{10.4em}{\fivenum}}}
X
X\newcommand{\adjustreport}
X{\def\l@section{\@dottedtocline{1}{1.5em}{\twonum}}
X\def\l@subsection{\@dottedtocline{2}{4.0em}{\threenum}}
X\def\l@subsubsection{\@dottedtocline{3}{7.8em}{\fournum}}
X\def\l@paragraph{\@dottedtocline{4}{10.4em}{\fivenum}}
X\def\l@subparagraph{\@dottedtocline{5}{12.6em}{\sixnum}}}
X
X\newcommand{\adjustbook}{\adjustreport}
X
X% end of TOC_ENTRY.STY
END_OF_FILE
if test 2075 -ne `wc -c <'gnuplot/docs/toc_entr.sty'`; then
echo shar: \"'gnuplot/docs/toc_entr.sty'\" unpacked with wrong size!
fi
# end of 'gnuplot/docs/toc_entr.sty'
fi
if test -f 'gnuplot/help.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/help.h'\"
else
echo shar: Extracting \"'gnuplot/help.h'\" \(2024 characters\)
sed "s/^X//" >'gnuplot/help.h' <<'END_OF_FILE'
X/*
X * $Id: help.h%v 3.50 1993/07/09 05:35:24 woo Exp $
X *
X */
X
X/* GNUPLOT - help.h */
X/*
X * Copyright (C) 1986 - 1993 Thomas Williams, Colin Kelley
X *
X * Permission to use, copy, and distribute this software and its
X * documentation for any purpose with or without fee is hereby granted,
X * provided that the above copyright notice appear in all copies and
X * that both that copyright notice and this permission notice appear
X * in supporting documentation.
X *
X * Permission to modify the software is granted, but not the right to
X * distribute the modified code. Modifications are to be distributed
X * as patches to released version.
X *
X * This software is provided "as is" without express or implied warranty.
X *
X *
X * AUTHORS
X *
X * Original Software:
X * Thomas Williams, Colin Kelley.
X *
X * Gnuplot 2.0 additions:
X * Russell Lang, Dave Kotz, John Campbell.
X *
X * Gnuplot 3.0 additions:
X * Gershon Elber and many others.
X *
X * There is a mailing list for gnuplot users. Note, however, that the
X * newsgroup
X * comp.graphics.gnuplot
X * is identical to the mailing list (they
X * both carry the same set of messages). We prefer that you read the
X * messages through that newsgroup, to subscribing to the mailing list.
X * (If you can read that newsgroup, and are already on the mailing list,
X * please send a message info-gnuplot-request@dartmouth.edu, asking to be
X * removed from the mailing list.)
X *
X * The address for mailing to list members is
X * info-gnuplot@dartmouth.edu
X * and for mailing administrative requests is
X * info-gnuplot-request@dartmouth.edu
X * The mailing list for bug reports is
X * bug-gnuplot@dartmouth.edu
X * The list of those interested in beta-test versions is
X * info-gnuplot-beta@dartmouth.edu
X */
X
X/* Exit status returned by help() */
X#define H_FOUND 0 /* found the keyword */
X#define H_NOTFOUND 1 /* didn't find the keyword */
X#define H_ERROR (-1) /* didn't find the help file */
X
Xextern void FreeHelp(); /* use this if you need memory */
END_OF_FILE
if test 2024 -ne `wc -c <'gnuplot/help.h'`; then
echo shar: \"'gnuplot/help.h'\" unpacked with wrong size!
fi
# end of 'gnuplot/help.h'
fi
if test -f 'gnuplot/lineproc.mac' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/lineproc.mac'\"
else
echo shar: Extracting \"'gnuplot/lineproc.mac'\" \(1980 characters\)
sed "s/^X//" >'gnuplot/lineproc.mac' <<'END_OF_FILE'
X; lineproc.mac
X; MASM macro definition for Bresenham line-drawing routine
X; Colin Kelley
X; January 13, 1987
X
X
XINCAX equ 40h ; for Self-Modifying Code
XINCBX equ 43h
XDECAX equ 48h
XDECBX equ 4bh
X
X; usage:
X; lineproc linename, pixelname
X;
X; where linemane is the name you want for the proc, and pixelname is the
X; name of the routine that linename is to call to set pixels
X;
X
Xlineproc macro linename, pixelname
Xbeginproc linename
X
X push bp
X mov bp,sp
X push si
X push di
X mov ax,[bp+X] ; x1
X mov bx,[bp+X+2] ; y1
X mov cx,[bp+X+4] ; x2
X mov si,[bp+X+6] ; y2
X
X cmp ax,cx ; x1,x2
X jne i19
X cmp bx,si ; y1,y2
X jne i19
X
X call pixelname
X
X jmp i28
Xi19:
X mov dx,ax ; dx,x1
X sub dx,cx ; x2
X jnc noabsx
X neg dx
Xnoabsx:
X mov di,bx ; dy,y1
X sub di,si ; y2
X jnc noabsy
X neg di ; dy
Xnoabsy:
X cmp dx,di ; dx,dy
X jb i21 ; go iterate y's
X;
X; iterate x's
X;
X cmp bx,si ; y1,y2
X jb forwardy
X mov byte ptr cs:yinc1,DECBX
X jmp short i22
Xforwardy:
X mov byte ptr cs:yinc1,INCBX
Xi22:
X cmp ax,cx ; x1,x2
X jae l20004
X mov byte ptr cs:xinc1,INCAX
X jmp short l20005
Xl20004:
X mov byte ptr cs:xinc1,DECAX
Xl20005:
X mov bp,dx ; sum,dx
X shr bp,1 ; sum
Xd23:
X cmp ax,cx ; x1,x2
X je i28 ; done
Xxinc1: inc ax ; may become inc or dec
X add bp,di ; sum,dy
X cmp bp,dx
X jb i27
X sub bp,dx ; sum,dx
Xyinc1: inc bx ; may become inc or dec
Xi27:
X call pixelname
X jmp short d23
X
X;
X; else iterate y's
X;
Xi21:
X cmp ax,cx ; x1,x2
X jae l20006
X mov byte ptr cs:xinc2,INCAX
X jmp short l20007
Xl20006:
X mov byte ptr cs:xinc2,DECAX
Xl20007:
X cmp bx,si ; y1,y2
X jb forwardy2
X mov byte ptr cs:yinc2,DECBX
X jmp short i29
Xforwardy2:
X mov byte ptr cs:yinc2,INCBX
Xi29:
X mov bp,di ; sum,dy
X shr bp,1 ; sum,1
Xd30:
X cmp bx,si ; y1,y2
X je i28
Xyinc2: inc bx ; may become inc or dec
X add bp,dx ; sum,dx
X cmp bp,di ; sum,dy
X jb i34
X sub bp,di ; sum,dy
Xxinc2: inc ax ; may become inc or dec
Xi34:
X call near ptr pixelname
X jmp short d30
X;
X; clean up and exit
X;
Xi28:
X pop di
X pop si
X pop bp
X ret
X
Xlinename endp
X endm
END_OF_FILE
if test 1980 -ne `wc -c <'gnuplot/lineproc.mac'`; then
echo shar: \"'gnuplot/lineproc.mac'\" unpacked with wrong size!
fi
# end of 'gnuplot/lineproc.mac'
fi
if test -f 'gnuplot/makefile.vms' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/makefile.vms'\"
else
echo shar: Extracting \"'gnuplot/makefile.vms'\" \(2094 characters\)
sed "s/^X//" >'gnuplot/makefile.vms' <<'END_OF_FILE'
X#
X# $Id: makefile.vms%v 3.50 1993/07/09 05:35:24 woo Exp $
X#
X#
X#
X# GNUPLOT Makefile
X# for VMS
X#
X# use with the MAKE that was posted by Tony Ivanov (tony@gvgpvd.GVG.TEK.COM)
X# in comp.os.vms on 5 December 1988
X#
X
X# NOOP NO Optimiser
XCFLAGS = /NOOP/define=(MEMSET)
X
X# /define=(<terminal>) in TERMFLAGS iff you wish to support <terminal>
X# see other terminal defines in term.h
X
XTERMFLAGS =
X
XOBJS = bitmap.obj,command.obj,contour.obj,eval.obj,graphics.obj,graph3d.obj, \
X internal.obj,misc.obj,parse.obj,plot.obj,scanner.obj,setshow.obj, \
X specfun.obj,standard.obj,term.obj,util.obj,version.obj
X
XCSOURCE1 = command.c setshow.c
XCSOURCE2 = help.c graphics.c graph3d.c internal.c
XCSOURCE3 = misc.c eval.c parse.c plot.c scanner.c standard.c
XCSOURCE4 = bitmap.c term.c util.c version.c
XCSOURCE5 = [.term]aed.trm [.term]cgi.trm [.term]dumb.trm [.term]dxf.trm [.term]dxy.trm \
X [.term]eepic.trm [.term]epson.trm [.term]fig.trm [.term]hp26.trm \
X [.term]hp2648.trm [.term]hpgl.trm [.term]hpljii.trm
XCSOURCE6 = [.term]impcodes.h [.term]imagen.trm [.term]object.h \
X [.term]iris4d.trm [.term]kyo.trm [.term]latex.trm [.term]pbm.trm \
X [.term]pc.trm
XCSOURCE7 = [.term]post.trm [.term]qms.trm [.term]regis.trm [.term]sun.trm \
X [.term]t410x.trm [.term]tek.trm [.term]unixpc.trm [.term]unixplot.trm \
X [.term]v384.trm [.term]x11.trm gnuplot_x11.c
XCSOURCE8 = contour.c specfun.c
X
Xall : gnuplot.exe gnuplot.hlp gnuplot.hlb
X
X
Xgnuplot.exe : $(OBJS)
X link /exe=gnuplot $(OBJS) ,linkopt.vms/opt
X
Xgnuplot.hlp : doc2hlp.exe [.docs]gnuplot.doc [.docs]doc2hlp.com
X $$@[.docs]doc2hlp.com
X
Xgnuplot.hlb : gnuplot.hlp
X library/create/help gnuplot.hlb gnuplot.hlp
X
Xdoc2hlp.exe: [.docs]doc2hlp.c
X cc [.docs]doc2hlp.c
X link doc2hlp,linkopt.vms/opt
X
Xterm.obj: term.h term.c $(CSOURCE5) $(CSOURCE6) $(CSOURCE7)
X $(CC) $(CFLAGS) $(TERMFLAGS) term.c
X
X$(OBJS): plot.h
X
Xcommand.obj help.obj misc.obj: help.h
X
Xcommand.obj graphics.obj graph3d.obj misc.obj plot.obj setshow.obj term.obj: setshow.h
X
Xbitmap.obj term.obj: bitmap.h
X
Xclean :
X purge/log
X del/log *.obj;*
END_OF_FILE
if test 2094 -ne `wc -c <'gnuplot/makefile.vms'`; then
echo shar: \"'gnuplot/makefile.vms'\" unpacked with wrong size!
fi
# end of 'gnuplot/makefile.vms'
fi
if test -f 'gnuplot/os2/dialogs.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/os2/dialogs.h'\"
else
echo shar: Extracting \"'gnuplot/os2/dialogs.h'\" \(2063 characters\)
sed "s/^X//" >'gnuplot/os2/dialogs.h' <<'END_OF_FILE'
X#define DIALOGS_H
X#define IDM_HELPINDEX 10004
X#define IDM_KEYSHELP 10003
X#define IDM_EXTENDEDHELP 10002
X#define IDM_HELPFORHELP 10001
X#define IDM_FILE 100
X#define IDM_PRINTSETUP 115
X#define IDM_PRINTPIC 111
X#define IDM_PRINT 101
X#define IDM_EXIT 102
X#define IDM_ABOUT 103
X#define IDM_FONTS 104
X#define IDM_SAVE 105
X#define IDM_COMMAND 300
X#define IDM_CONTINUE 400
X#define IDM_PAUSEOPT 120
X#define IDM_PAUSEDLG 121
X#define IDM_PAUSEBTN 122
X#define IDM_PAUSEGNU 123
X#define IDM_OPTIONS 200
X#define IDM_OPTIONMAIN 201
X#define IDM_COLOURS 206
X#define IDM_LINES 207
X#define IDM_LINES_THICK 208
X#define IDM_LINES_SOLID 209
X#define ID_ABOUT 10
X#define IDD_COLOURS 20
X#define IDD_PRINTQNAME 5106
X#define IDD_PRINTSETUP 5105
X#define IDD_PRINTPIC 5101
X#define ID_PRINT 5100
X#define ID_QPRINT 5000
X#define ID_QPRINTERS 5200
X#define IDD_QPRSLIST 5201
X#define IDD_QPRSSEL 5202
X#define IDD_QPRNAME 5009
X#define IDD_QPRFRAME 5008
X#define IDD_QPRTRACK 5007
X#define IDD_QPRSETPR 5006
X#define IDD_QPRXSIZE 5001
X#define IDD_QPRYSIZE 5002
X#define IDD_QPRXFRAC 5003
X#define IDD_QPRYFRAC 5004
X#define IDD_QPRBOX 5005
X#define IDD_FONTS 6000
X#define IDD_PAUSEBOX 3000
X#define IDD_PAUSETEXT 3001
X
X#define IDD_QUERYPRINT 2000
X#define IDD_QPTEXT 2001
X#define IDD_QPLISTBOX 2002
X#define IDD_QPJOBPROP 2005
X
X
X//#define DID_HELP 10
X//#define DID_CANCEL 2
X//#define DID_OK 1
X#define IDH_EXTENDED 905
X#define IDH_INDEX 904
X#define IDH_KEYS 903
X#define IDH_FOREXTENDED 902
X#define IDH_FORHELP 901
X
X#define IDD_PRINTNAME 5010
END_OF_FILE
if test 2063 -ne `wc -c <'gnuplot/os2/dialogs.h'`; then
echo shar: \"'gnuplot/os2/dialogs.h'\" unpacked with wrong size!
fi
# end of 'gnuplot/os2/dialogs.h'
fi
if test -f 'gnuplot/os2/makefile' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/os2/makefile'\"
else
echo shar: Extracting \"'gnuplot/os2/makefile'\" \(1166 characters\)
sed "s/^X//" >'gnuplot/os2/makefile' <<'END_OF_FILE'
X# makefile for 32-bit version of GnuplotPM driver
X# compiled using emx 0.8e
X# -- .c files have // style comments, so require some trickery in
X# -- order to compile
X# -- -x c++ treat as c++ ...
X# -- -U__cpluplus but don't use some defines in .h files
X# -- -E preprocess to strip comments ...
X# -- -o temp.i into temp file
X# -- $(C..temp.i then compile preprocessed file (whew)
X#
X
XCFLAGS= -c -Zomf -Zsys
XCC=gcc
XINCL=/emx/include
XOBJ=gnupmdrv.obj gclient.obj print.obj dialogs.obj
X
X.c.obj:
X $(CC) -U__cplusplus -x c++ -I $(INCL) -Ic:/toolkt20/c/os2h -E -o temp.i $*.c
X $(CC) $(CFLAGS) -o $*.obj temp.i
X del temp.i
X
Xgnupmdrv.exe: gnupmdrv.hlp gnupmdrv.res $(OBJ) gnupmdrv.def
X gcc -o gnupmdrv.exe -Zomf -Zsys $(OBJ) gnupmdrv.def -lsys -los2
X rc gnupmdrv.res gnupmdrv.exe
X
Xhelp: gnupmdrv.hlp
X
Xgnupmdrv.res : gnupmdrv.rc gnuplot.ico dialogs.h
X rc -r gnupmdrv
X
Xgnupmdrv.hlp: gnupmdrv.itl
X ipfcprep gnupmdrv.itl gnupmdrv.ii -D GENHELP
X gcc -E -o gnupmdrv.i -x c -DGENHELP gnupmdrv.ii
X ipfc gnupmdrv.i
X del gnupmdrv.ii
X del gnupmdrv.i
X
Xgnuplot.ico: gnuicon.uue
X uudecode gnuicon.uue
END_OF_FILE
if test 1166 -ne `wc -c <'gnuplot/os2/makefile'`; then
echo shar: \"'gnuplot/os2/makefile'\" unpacked with wrong size!
fi
# end of 'gnuplot/os2/makefile'
fi
if test -f 'gnuplot/term/dxy.trm' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/term/dxy.trm'\"
else
echo shar: Extracting \"'gnuplot/term/dxy.trm'\" \(2309 characters\)
sed "s/^X//" >'gnuplot/term/dxy.trm' <<'END_OF_FILE'
X/*
X * $Id: dxy.trm%v 3.50 1993/07/09 05:35:24 woo Exp $
X *
X */
X
X/* GNUPLOT - dxy.trm */
X/*
X * Copyright (C) 1990 - 1993
X *
X * Permission to use, copy, and distribute this software and its
X * documentation for any purpose with or without fee is hereby granted,
X * provided that the above copyright notice appear in all copies and
X * that both that copyright notice and this permission notice appear
X * in supporting documentation.
X *
X * Permission to modify the software is granted, but not the right to
X * distribute the modified code. Modifications are to be distributed
X * as patches to released version.
X *
X * This software is provided "as is" without express or implied warranty.
X *
X * This file is included by ../term.c.
X *
X * This terminal driver supports:
X * Roland DXY800A plotter
X *
X * AUTHORS
X * Martin Yii, eln557h@monu3.OZ
X * Further modified Jan 1990 by Russell Lang, rjl@monu1.cc.monash.oz
X *
X * send your comments or suggestions to (info-gnuplot@dartmouth.edu).
X *
X */
X
X#define DXY_XMAX 2470
X#define DXY_YMAX 1700
X
X#define DXY_XLAST (DXY_XMAX - 1)
X#define DXY_YLAST (DXY_XMAX - 1)
X
X#define DXY_VCHAR (56) /* double actual height of characters */
X#define DXY_HCHAR (28) /* actual width including spacing */
X#define DXY_VTIC (28)
X#define DXY_HTIC (28)
X
Xint dxy_angle = 0;
X
XDXY_init()
X{
X/*
X No initialisation sequences for DXY 800A
X*/
X}
X
X
XDXY_graphics()
X{
X /* HOME, Character size 3 */
X fprintf(outfile,"H\nS3\n");
X}
X
X
XDXY_text()
X{
X/*
X No sequences needed
X*/
X}
X
X
XDXY_linetype(linetype)
Xint linetype;
X{
X /* select pen */
X fprintf(outfile,"J%d\n",(linetype+2)%8+1);
X switch(linetype) {
X case -1 : /* use dotted line for axis */
X fprintf(outfile,"L1\nB50\n");
X break;
X default : /* use solid line for all others */
X fprintf(outfile,"L0\n");
X break;
X }
X}
X
X
XDXY_move(x,y)
Xint x,y;
X{
X fprintf(outfile,"M%d,%d\n",x,y);
X}
X
X
XDXY_vector(x,y)
Xint x,y;
X{
X fprintf(outfile,"D%d,%d\n",x,y);
X}
X
X
XDXY_put_text(x,y,str)
Xint x, y;
Xchar *str;
X{
X if (dxy_angle == 1 )
X /* vertical */
X DXY_move(x + DXY_VCHAR/4,y);
X else
X /* horiz */
X DXY_move(x,y - DXY_VCHAR/4);
X fprintf(outfile,"P%s\n",str);
X}
X
X
Xint DXY_text_angle(ang)
Xint ang;
X{
X dxy_angle = ang;
X fprintf(outfile,"Q%d\n",ang);
X return TRUE;
X}
X
X
XDXY_reset()
X{
X /* Home pen */
X fprintf(outfile,"H\n");
X}
X
END_OF_FILE
if test 2309 -ne `wc -c <'gnuplot/term/dxy.trm'`; then
echo shar: \"'gnuplot/term/dxy.trm'\" unpacked with wrong size!
fi
# end of 'gnuplot/term/dxy.trm'
fi
if test -f 'gnuplot/term/impcodes.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/term/impcodes.h'\"
else
echo shar: Extracting \"'gnuplot/term/impcodes.h'\" \(1357 characters\)
sed "s/^X//" >'gnuplot/term/impcodes.h' <<'END_OF_FILE'
X/*
X * $Id: impcodes.h%v 3.50 1993/07/09 05:35:24 woo Exp $
X */
X
X/*
X * Copyright (c) 1985 Regents of the University of California.
X * All rights reserved. The Berkeley software License Agreement
X * specifies the terms and conditions for redistribution.
X *
X * @(#)imPcodes.h 5.1 (Berkeley) 9/21/85
X */
X
X#define imP_SP 128
X#define imP_SP1 129
X#define imP_OLD_MMOVE 130
X#define imP_MPLUS 131
X#define imP_MMINUS 132
X#define imP_MMOVE 133
X#define imP_SMOVE 134
X
X#define imP_SET_ABS_H 135
X#define imP_SET_REL_H 136
X#define imP_SET_ABS_V 137
X#define imP_SET_REL_V 138
X
X#define imP_SRULE 192
X#define imP_BRULE 193
X
X#define imP_SET_HPOS 195
X#define imP_SET_VPOS 196
X#define imP_CRLF 197
X#define imP_SGLY 198
X#define imP_BGLY 199
X#define imP_DELG 200
X#define imP_DELC 201
X#define imP_DELF 202
X
X#define imP_SET_HV_SYSTEM 205
X#define imP_SET_ADV_DIRS 206
X#define imP_SET_FAMILY 207
X#define imP_SET_IL 208
X#define imP_SET_BOL 209
X#define imP_SET_SP 210
X#define imP_PUSH 211
X#define imP_POP 212
X#define imP_PAGE 213
X#define imP_SET_PUSH_MASK 214
X#define imP_ENDPAGE 219
X
X#define imP_CREATE_FAMILY_TABLE 221
X#define imP_CREATE_MAP 222
X
X#define imP_CREATE_PATH 230
X#define imP_SET_TEXTURE 231
X#define imP_SET_PEN 232
X#define imP_FILL_PATH 233
X#define imP_DRAW_PATH 234
X#define imP_BITMAP 235
X#define imP_SET_MAGN 236
X#define imP_SET_DRAW_PATTERN 237
X
X#define imP_EOF 255
X
X
END_OF_FILE
if test 1357 -ne `wc -c <'gnuplot/term/impcodes.h'`; then
echo shar: \"'gnuplot/term/impcodes.h'\" unpacked with wrong size!
fi
# end of 'gnuplot/term/impcodes.h'
fi
if test -f 'gnuplot/term/unixplot.trm' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/term/unixplot.trm'\"
else
echo shar: Extracting \"'gnuplot/term/unixplot.trm'\" \(2005 characters\)
sed "s/^X//" >'gnuplot/term/unixplot.trm' <<'END_OF_FILE'
X/*
X * $Id: unixplot.trm%v 3.50 1993/07/09 05:35:24 woo Exp $
X *
X */
X
X/* GNUPLOT -- unixplot.trm */
X/*
X * Copyright (C) 1990 - 1993
X *
X * Permission to use, copy, and distribute this software and its
X * documentation for any purpose with or without fee is hereby granted,
X * provided that the above copyright notice appear in all copies and
X * that both that copyright notice and this permission notice appear
X * in supporting documentation.
X *
X * Permission to modify the software is granted, but not the right to
X * distribute the modified code. Modifications are to be distributed
X * as patches to released version.
X *
X * This software is provided "as is" without express or implied warranty.
X *
X * This file is included by ../term.c.
X *
X * This terminal driver supports:
X * Unix plot(5) graphics language
X *
X * AUTHORS
X * Colin Kelley, Thomas Williams, Russell Lang
X *
X * send your comments or suggestions to (info-gnuplot@dartmouth.edu).
X *
X */
X
X/*
XUnixplot library writes to stdout. A fix was put in place by
X..!arizona!naucse!jdc to let set term and set output redirect
Xstdout. All other terminals write to outfile.
X*/
X
X#define UP_XMAX 4096
X#define UP_YMAX 4096
X
X#define UP_XLAST (UP_XMAX - 1)
X#define UP_YLAST (UP_YMAX - 1)
X
X#define UP_VCHAR (UP_YMAX/30) /* just a guess--no way to know this! */
X#define UP_HCHAR (UP_XMAX/60) /* just a guess--no way to know this! */
X#define UP_VTIC (UP_YMAX/80)
X#define UP_HTIC (UP_XMAX/80)
X
XUP_init()
X{
X openpl();
X space(0, 0, UP_XMAX, UP_YMAX);
X}
X
X
XUP_graphics()
X{
X erase();
X}
X
X
XUP_text()
X{
X}
X
X
XUP_linetype(linetype)
Xint linetype;
X{
Xstatic char *lt[2+5] = {"solid", "longdashed", "solid", "dotted","shortdashed",
X "dotdashed", "longdashed"};
X
X if (linetype >= 5)
X linetype %= 5;
X linemod(lt[linetype+2]);
X}
X
X
XUP_move(x,y)
Xunsigned int x,y;
X{
X move(x,y);
X}
X
X
XUP_vector(x,y)
Xunsigned int x,y;
X{
X cont(x,y);
X}
X
X
XUP_put_text(x,y,str)
Xunsigned int x,y;
Xchar str[];
X{
X UP_move(x+UP_HCHAR/2,y+UP_VCHAR/5);
X label(str);
X}
X
XUP_reset()
X{
X closepl();
X}
X
END_OF_FILE
if test 2005 -ne `wc -c <'gnuplot/term/unixplot.trm'`; then
echo shar: \"'gnuplot/term/unixplot.trm'\" unpacked with wrong size!
fi
# end of 'gnuplot/term/unixplot.trm'
fi
if test -f 'gnuplot/term/xlib.trm' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/term/xlib.trm'\"
else
echo shar: Extracting \"'gnuplot/term/xlib.trm'\" \(1139 characters\)
sed "s/^X//" >'gnuplot/term/xlib.trm' <<'END_OF_FILE'
X/*
X * $Id: xlib.trm%v 3.50 1993/07/09 05:35:24 woo Exp $
X */
X
X
X/*
X * xlib.trm - inboard terminal driver for X11 (dumps gnuplot_x11 commands)
X *
X * To be used with gnulib_x11.
X */
X
X#define Xlib_XMAX 4096
X#define Xlib_YMAX 4096
X
X/* approximations for typical font/screen sizes */
X#define Xlib_VCHAR (Xlib_YMAX/25)
X#define Xlib_HCHAR (Xlib_XMAX/100)
X#define Xlib_VTIC (Xlib_YMAX/100)
X#define Xlib_HTIC (Xlib_XMAX/150)
X
XXlib_init() { ; }
X
XXlib_graphics() { fprintf(outfile, "G\n"); }
X
XXlib_text()
X{
X fprintf(outfile, "E\n"); fflush(outfile);
X#ifdef ULTRIX_KLUDGE
X fprintf(outfile, "E\n"); fflush(outfile);
X#endif
X}
X
XXlib_reset() { fprintf(outfile, "R\n"); fflush(outfile); }
X
XXlib_move(x,y)
X unsigned int x,y;
X{
X fprintf(outfile, "M%04d%04d\n", x, y);
X}
X
XXlib_vector(x,y)
X unsigned int x,y;
X{
X fprintf(outfile, "V%04d%04d\n", x, y);
X}
X
XXlib_linetype(lt)
X int lt;
X{
X fprintf(outfile, "L%04d\n", lt);
X}
X
XXlib_put_text(x,y,str)
X unsigned int x,y;
X char str[];
X{
X fprintf(outfile, "T%04d%04d%s\n", x, y, str);
X}
X
XXlib_justify_text(mode)
X enum JUSTIFY mode;
X{
X fprintf(outfile, "J%04d\n", mode);
X return(TRUE);
X}
END_OF_FILE
if test 1139 -ne `wc -c <'gnuplot/term/xlib.trm'`; then
echo shar: \"'gnuplot/term/xlib.trm'\" unpacked with wrong size!
fi
# end of 'gnuplot/term/xlib.trm'
fi
if test -f 'gnuplot/version.c' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/version.c'\"
else
echo shar: Extracting \"'gnuplot/version.c'\" \(2261 characters\)
sed "s/^X//" >'gnuplot/version.c' <<'END_OF_FILE'
X/* GNUPLOT - version.c */
X/*
X * Copyright (C) 1986 - 1993 Thomas Williams, Colin Kelley
X *
X * Permission to use, copy, and distribute this software and its
X * documentation for any purpose with or without fee is hereby granted,
X * provided that the above copyright notice appear in all copies and
X * that both that copyright notice and this permission notice appear
X * in supporting documentation.
X *
X * Permission to modify the software is granted, but not the right to
X * distribute the modified code. Modifications are to be distributed
X * as patches to released version.
X *
X * This software is provided "as is" without express or implied warranty.
X *
X *
X * AUTHORS
X *
X * Original Software:
X * Thomas Williams, Colin Kelley.
X *
X * Gnuplot 2.0 additions:
X * Russell Lang, Dave Kotz, John Campbell.
X *
X * Gnuplot 3.0 additions:
X * Gershon Elber and many others.
X *
X * Gnuplot 3.4 additions:
X * Alex Woo and many others.
X *
X * There is a mailing list for gnuplot users. Note, however, that the
X * newsgroup
X * comp.graphics.gnuplot
X * is identical to the mailing list (they
X * both carry the same set of messages). We prefer that you read the
X * messages through that newsgroup, to subscribing to the mailing list.
X * (If you can read that newsgroup, and are already on the mailing list,
X * please send a message info-gnuplot-request@dartmouth.edu, asking to be
X * removed from the mailing list.)
X *
X * The address for mailing to list members is
X * info-gnuplot@dartmouth.edu
X * and for mailing administrative requests is
X * info-gnuplot-request@dartmouth.edu
X * The mailing list for bug reports is
X * bug-gnuplot@dartmouth.edu
X * The list of those interested in beta-test versions is
X * info-gnuplot-beta@dartmouth.edu
Xstatic char *RCSid = "$Id: version.c%v 3.50.1.17 1993/08/27 05:21:33 woo Exp woo $";
X */
X
Xchar version[] = "3.5 ";
Xchar patchlevel[] = "3.50.1.17, 27 Aug 93";
Xchar date[] = "Fri Aug 27 05:21:33 GMT 1993 ";
Xchar copyright[] = "Copyright(C) 1986 - 1993";
X
X
X/* override in Makefile */
X#ifndef CONTACT
X# define CONTACT "bug-gnuplot@dartmouth.edu"
X#endif
X#ifndef HELPMAIL
X# define HELPMAIL "info-gnuplot@dartmouth.edu"
X#endif
Xchar bug_email[] = CONTACT;
Xchar help_email[] = HELPMAIL;
END_OF_FILE
if test 2261 -ne `wc -c <'gnuplot/version.c'`; then
echo shar: \"'gnuplot/version.c'\" unpacked with wrong size!
fi
# end of 'gnuplot/version.c'
fi
if test -f 'gnuplot/win/wcommon.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/win/wcommon.h'\"
else
echo shar: Extracting \"'gnuplot/win/wcommon.h'\" \(2167 characters\)
sed "s/^X//" >'gnuplot/win/wcommon.h' <<'END_OF_FILE'
X/*
X * $Id: wcommon.h%v 3.50 1993/07/09 05:35:24 woo Exp $
X */
X
X/* GNUPLOT - wcommon.h */
X/*
X * Copyright (C) 1992 Maurice Castro, Russell Lang
X *
X * Permission to use, copy, and distribute this software and its
X * documentation for any purpose with or without fee is hereby granted,
X * provided that the above copyright notice appear in all copies and
X * that both that copyright notice and this permission notice appear
X * in supporting documentation.
X *
X * Permission to modify the software is granted, but not the right to
X * distribute the modified code. Modifications are to be distributed
X * as patches to released version.
X *
X * This software is provided "as is" without express or implied warranty.
X *
X *
X * AUTHORS
X *
X * Maurice Castro
X * Russell Lang
X *
X * Send your comments or suggestions to
X * info-gnuplot@dartmouth.edu.
X * This is a mailing list; to join it send a note to
X * info-gnuplot-request@dartmouth.edu.
X * Send bug reports to
X * bug-gnuplot@dartmouth.edu.
X */
X
X#if WINVER >= 0x030a
X#include <shellapi.h>
X#endif
X/* this file contains items that are internal to wgnuplot.dll */
X
X/* wgnuplib.c */
Xextern HINSTANCE hdllInstance;
Xextern LPSTR szParentClass;
Xextern LPSTR szTextClass;
Xextern LPSTR szPauseClass;
Xextern LPSTR szGraphClass;
Xextern LPSTR szAboutClass;
X
Xvoid NEAR * LocalAllocPtr(UINT flags, UINT size);
Xvoid LocalFreePtr(void NEAR *ptr);
XLPSTR GetInt(LPSTR str, LPINT pval);
X
X/* wtext.c */
Xvoid UpdateText(LPTW, int);
Xvoid CreateTextClass(LPTW lptw);
Xvoid NewLine(LPTW);
Xvoid TextPutStr(LPTW lptw, LPSTR str);
Xvoid WriteTextIni(LPTW lptw);
Xvoid ReadTextIni(LPTW lptw);
X#if WINVER >= 0x030a
Xvoid DragFunc(LPTW lptw, HDROP hdrop);
X#endif
X
X/* wmenu.c - Menu */
Xvoid SendMacro(LPTW lptw, UINT m);
Xvoid LoadMacros(LPTW lptw);
Xvoid CloseMacros(LPTW lptw);
X
X/* wprinter.c - Printer setup and dump */
XBOOL PrintSize(HDC printer, HWND hwnd, LPRECT lprect);
Xvoid PrintRegister(LPPRINT lpr);
Xvoid PrintUnregister(LPPRINT lpr);
X#if WINVER >= 0x030a
XBOOL CALLBACK _export PrintAbortProc(HDC hdcPrn, int code);
XBOOL CALLBACK _export PrintDlgProc(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam);
X#endif
X
X/* wgraph.c */
X
END_OF_FILE
if test 2167 -ne `wc -c <'gnuplot/win/wcommon.h'`; then
echo shar: \"'gnuplot/win/wcommon.h'\" unpacked with wrong size!
fi
# end of 'gnuplot/win/wcommon.h'
fi
if test -f 'gnuplot/win/wresourc.h' -a "${1}" != "-c" ; then
echo shar: Will not clobber existing file \"'gnuplot/win/wresourc.h'\"
else
echo shar: Extracting \"'gnuplot/win/wresourc.h'\" \(2321 characters\)
sed "s/^X//" >'gnuplot/win/wresourc.h' <<'END_OF_FILE'
X/*
X * $Id: wresourc.h%v 3.50.1.13 1993/08/19 03:21:26 woo Exp $
X */
X
X/* GNUPLOT - win/wresourc.h */
X/*
X * Copyright (C) 1992 Maurice Castro, Russell Lang
X *
X * Permission to use, copy, and distribute this software and its
X * documentation for any purpose with or without fee is hereby granted,
X * provided that the above copyright notice appear in all copies and
X * that both that copyright notice and this permission notice appear
X * in supporting documentation.
X *
X * Permission to modify the software is granted, but not the right to
X * distribute the modified code. Modifications are to be distributed
X * as patches to released version.
X *
X * This software is provided "as is" without express or implied warranty.
X *
X *
X * AUTHORS
X *
X * Maurice Castro
X * Russell Lang
X *
X * Send your comments or suggestions to
X * info-gnuplot@dartmouth.edu.
X * This is a mailing list; to join it send a note to
X * info-gnuplot-request@dartmouth.edu.
X * Send bug reports to
X * bug-gnuplot@dartmouth.edu.
X */
X
X/* This contains items internal to wgnuplot.dll
X that are used by the Resource Compiler */
X
X/* wmenu.c */
X#define ID_PROMPT 300
X#define ID_ANSWER 302
X#define NUMMENU 256
X
X/* wpause.c */
X
X/* wtext.c */
X#define AB_ICON 250
X#define AB_TEXT1 251
X#define AB_TEXT2 252
X#define AB_TEXT3 253
X
X/* wgraph.c */
X#define M_GRAPH_TO_TOP NUMMENU+1
X#define M_CHOOSE_FONT NUMMENU+2
X#define M_BACKGROUND NUMMENU+3
X#define M_COLOR NUMMENU+4
X#define M_COPY_CLIP NUMMENU+5
X#define M_LINESTYLE NUMMENU+6
X#define M_PRINT NUMMENU+7
X#define M_WRITEINI NUMMENU+8
X#define M_PASTE NUMMENU+9
X#define M_ABOUT NUMMENU+10
X#define M_REBUILDTOOLS NUMMENU+11
X/* wtext.c */
X#define M_SYSCOLORS NUMMENU+12
X
X/* wprinter.c */
X#define PSIZE_SBOX 100
X#define PSIZE_DEF 101
X#define PSIZE_OTHER 102
X#define PSIZE_DEFX 103
X#define PSIZE_DEFY 104
X#define PSIZE_X 105
X#define PSIZE_Y 106
X#define PSIZE_OFFBOX 107
X#define PSIZE_OFFX 108
X#define PSIZE_OFFY 109
X#define CANCEL_PCDONE 120
X#define SPOOL_PORT 121
X
X/* wgraph.c */
X/* line style dialog box */
X#define LS_LINENUM 200
X#define LS_MONOBOX 201
X#define LS_COLORBOX 202
X#define LS_MONOSTYLE 203
X#define LS_MONOWIDTH 204
X#define LS_CHOOSECOLOR 205
X#define LS_COLORSAMPLE 206
X#define LS_COLORSTYLE 207
X#define LS_COLORWIDTH 208
X#define LS_DEFAULT 209
X
END_OF_FILE
if test 2321 -ne `wc -c <'gnuplot/win/wresourc.h'`; then
echo shar: \"'gnuplot/win/wresourc.h'\" unpacked with wrong size!
fi
# end of 'gnuplot/win/wresourc.h'
fi
echo shar: End of archive 32 \(of 33\).
cp /dev/null ark32isdone
MISSING=""
for I in 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 ; do
if test ! -f ark${I}isdone ; then
MISSING="${MISSING} ${I}"
fi
done
if test "${MISSING}" = "" ; then
echo You have unpacked all 33 archives.
rm -f ark[1-9]isdone ark[1-9][0-9]isdone
else
echo You still must unpack the following archives:
echo " " ${MISSING}
fi
exit 0
exit 0 # Just in case...