From: monaka@pleiades.sci.isas.ac.jp (Masaki Muranaka)
Newsgroups: fj.os.misc
Subject: Extended-plot lib.
Keywords: plot JUGplot
Date: 24 Jan 93 06:09:04 GMT
Distribution: fj
Organization: Computer Centre, University of Tokyo

$B$*$R$5$7$V$j$G$9!#$b$J$+(J(monaka@pleiades.sci.isas.ac.jp)$B$G$9!#(J

$B:rG/Kv$K$+$1@<$@$13]$1$F$$$?(Jextended-plot$B$N$*OC$G$9!#(J

  $B;d$,Ds>'$9$k(Jextended-plot$B$O!"(JJUGplot$B$H$$$&L>A0$K$7$h$&$H;W$$$^$9!#(J
JUnet Graphics plot $B$NN,$G$9!#8=:_$N(Jversion$B$r(J0.001$B$H$7$^$9!#(J

  $B2?=h$+$i<j$r$D$1$h$&$+LB$C$?5s$26g!"$^$:!V=@Fp$J:BI87O!W$K4X$9$k(J
$BDj5A$H!"?7$7$$(Jlibplot.a$B$NFbMF$+$i;O$a$h$&$H;W$$$^$9!#(J

$BL50UL#$J:.Mp$rHr$1$k$?$a!"EvJ,$N4V!"(JJUGplot$B$K4X$9$k5-;v$r(J
$BB>$N%M%C%H$KE>:\$9$k$3$H$r6X;_$7$^$9!#(J

**********************************************************************
JUGplot$B$N6u4V35G0$K$D$$$F(J

JUGplot$B$K$O!"J*M}6u4V!"4pAC6u4V!"IA2h6u4V$N#3<oN`$N6u4V35G0$,$"$j$^$9!#(J
$B0J2<$K=P$F$/$k(J x, y$B$O!"$$$:$l$b@0?t$G$9!#(J

$BJ*M}6u4V(J $B!':BI87O$rI=<($9$k%G%P%$%9$K0MB8$9$k6u4V$G$9!#(J
           $B$?$H$($P!"(JPC9801 normal mode display$B$NJ*M}86E@$O!"(J
           $B%G%#%9%W%l%$$N:8>e$K$"$j!"$3$l$rBX$($k;v$O=PMh$^$;$s!#(J
           $B$^$?!"(Jy$B$NCM$O2<$K9T$/$HA}2C$7!"(Jx$B$NCM$O1&$K9T$/$HA}2C$9$k(J
           $B$H8@$&$3$H$bJQ$($i$l$^$;$s!#(J
           $BJ*M}6u4V$O!"(J
               -32768<x<32768, -32768<y<32768
           $BHO0O$r;}$A$^$9$,!"<B:]$KI=<($G$-$kHO0O$O%G%P%$%9$K0MB8$7$^$9!#(J
           $B$?$H$($P!"(JPC9801 normal mode display$B$N>l9g!"(J
           $B$I$N$h$&$JHO0O$NJ*M}6u4V$G$"$C$F$b!"(J0<=x<640, 0<=y<400
           $B$NHO0O$7$+I=<($G$-$J$$$H$$$&$3$H$G$9!#(J

$B4pAC6u4V(J $B!'J*M}6u4V$N>e$KB8:_$9$k6u4V$G$9!#(J
           $BJ*M}6u4V>e$NE@$r86E@$H$7!J$3$NE@$r4pAC86E@$H$$$&!K!"6u4V$NHO0O$O(J
           -32768<x<32768, -32768<y<32768
           $B$G$9!#$7$+$7!"I=<($9$k%G%P%$%9$NG=NO$r1[$($?ItJ,$NIA2h$OI=<($5$l(J
           $B$^$;$s$7!"HsI=<(It$NIA2hFbMF$,J]B8$5$l$k$H$$$&J]>Z$b$"$j$^$;$s!#(J

$BIA2h6u4V(J $B!'4pAC6u4V>e$NG$0U$NE@$r86E@$H$9$k!J$3$NE@$rIA2h86E@$H$$$&!K6u4V$G$9!#(J
           $BIA2h6u4V$NHO0O$H$7$F$O!"(J                
           -32768<x<32768, -32768<y<32768
           $B$NG!2?$J$k@0?t$r@_Dj$7$F$b9=$$$^$;$s!#(J
           $B$7$+$7!"I=<($9$k%G%P%$%9$NG=NO$r1[$($?ItJ,$d!"4pAC6u4V$NHO0O(J
           $B$r1[$($kIA2h$OI=<($5$l$^$;$s$7!"HsI=<(It$NIA2hFbMF$,J]B8$5$l$k(J
           $B$H$$$&J]>Z$b$"$j$^$;$s!#(J
**********************************************************************
  $B:#$N$H$3$m!":BI8<4$NJ?9T0\F0$,=PMh$k$@$1$G$9$,!"$=$NB>$N:BI87O$K$D$$$F$O(J
$B3'$5$s$N8fMWK><!Bh$G9M$($F9T$-$?$$$H;W$$$^$9!#(J

 $B$3$N35G0$NF3F~$NMxE@$O!"$^$:!"Ii?t$N:BI8$,4X$o$k;~$G$b%W%m%0%i%`$,(J
$B$9$C$-$j$HI=<($G$-$k$3$H$,5s$,$i$l$^$9!#(J
$B!J:G=i$K4pAC86E@(J or $BIA2h86E@$r$:$i$;$PNI$$$@$1$G$9!K(J
 $B$=$l$H!"(Jwindow system$B9=C[$N2DG=@-$,5s$2$i$l$^$9!#(JJUGplot$B$N%i%$%V%i%j!<(J
$B$OJ#?t$NIA2h6u4V$,F1;~$K@_Dj$G$-$k$h$&$J9=B$$K$J$C$F$$$^$9!#!J$b$A$m$s(J
$B%W%m%H%3%k$d%I%i%$%P!<$b$=$&$$$&9=B$$K$J$j$^$9!#!KJ8;z$b=q$1$^$9!#(J
$B4JC1$J?^7A$b=q$1$^$9!#$"$H$O!"(Jbitmap$B$,$"$l$P$H$j$"$($:9=C[2DG=$G$7$g$&!#(J
bitmap$B$O!"<!$N(Jversion$B$GH/I=$9$kM=Dj$G$9!#(J


 $B0J2<$K?7$7$$(Jlibplot.a$B$NFbMF$r<($7$^$9!#(J
$B=i$a$F$G$9$+$i!"K\2H(J plot$B$d(JGNU graphics$B$N8_494X?t$b:\$;$F$"$j$^$9!#(J
$B$3$3$K:\$;$?4X?t$NB>$K$3$s$J4X?t$,M_$7$$(J   $B$H$+!"(J
$B$3$N4X?tL>$O!"B>$N%i%$%V%i%j!<$G;H$o$l$F$$$k$+$iBLL\$@$h!"(J   $B$H$+!"(J
$B0U8+$,$"$j$^$7$?$i(Jfollow$B$r$*4j$$$7$^$9!#(J(_o_)

**********************************************************************
**********************************************************************
**********************************************************************

JUGplot$BFH<+$N3HD%4X?t$G$9!#(J

------------------------------
int allerase( void )
$BJ*M}6u4V>e$NA4$F$NIA2hJ*$r>C5n$7$^$9!#(J
------------------------------
int allreset( void )
$BJ*M}6u4V$r=i4|2=$7$^$9!#(J
------------------------------
int root( short x, short y )
$B4pAC6u4V$N86E@:BI8$rJ*M}6u4V>e$NE@(J(x, y)$B$K<h$j$^$9!#(J
------------------------------
WIND openwin()
$B?7$7$$IA2h6u4V$r@_Dj$7$^$9!#(J
$BJVCM$OIA2h6u4V$N(JID$B$H$7$F=EMW$K$J$j$^$9!#(J
------------------------------
int selwin( WIND win )
$BIA2h6u4V$,B??tB8:_$9$k>l9g!"$3$l$+$iIA2h$9$k6u4V$r!"$3$l$G;XDj$7$^$9!#(J
win$B$K$O!";XDj$9$kIA2h6u4V$r3+$/;~$KMQ$$$?(Jopenwin$B4X?t$NJVCM$rBeF~$7$^$9!#(J
------------------------------
int closewin( WIND win )
win$B$G<($5$l$?IA2h6u4V$r2rJ|$7$^$9!#(J
$B$3$N$H$-!"2rJ|$9$kIA2h6u4V$K$h$C$F1F6A$r<u$1$?B>$NIA2h6u4V$N:FIA2h$O(J
$B8=(Jversion$B$G$O9T$J$o$l$^$;$s!#(J
------------------------------
int pallette( int red, int green, int blue )
$BI=<($9$k%G%P%$%9$K%Q%l%C%H$N5!G=$,$D$$$F$$$k;~!"$=$N?'$r;XDj$7$^$9!#(J
------------------------------
WIND $B9=B$BN(J
$BIA2h6u4V$N>pJs$,F~$C$F$$$k9=B$BN$G$9!#(J
**********************************************************************
**********************************************************************
**********************************************************************

JUGplot$B$N4X?t72$N$&$A!"(JGNU-graphics$B$G3HD%$5$l$?(Jplot$B$H8_49@-$N$"$k4X?t$G$9!#(J

------------------------------
color( int red, int green, int blue )
$B8=:_%"%/%F%#%V$JIA2h6u4V$NIA2h?'$r7hDj$7$^$9!#(J
$BO@M}E*$K$O(J (65536)^3 $B$N?'$,I=<($G$-$k$3$H$K$J$j$^$9!#(J
$B!t(J $B$,!"$=$s$J%^%7%s$O(JJUGplot$B$J$I;H$o$J$$$G$7$g$&!#(J
red = green = blue = 65535    $B$N;~!"=cGr(J
red = green = blue =     0    $B$N;~!"=c9u(J
red = 65535, green = blue = 0 $B$N;~!"=c@V(J
green = 65535, red = blue = 0 $B$N;~!"=cNP(J
blue = 65535, red = green = 0 $B$N;~!"=c@D(J
$B$K$J$j$^$9!#(J
------------------------------
fontname( char fontname[] )
$B8=:_%"%/%F%#%V$JIA2h6u4V$N%U%)%s%H%M!<%`$r;XDj$7$^$9!#(J
fontname$B$K$O0J2<$N%U%)%s%H$,;XDj$G$-$^$9!#(J
courier-bold
courier-boldblique
courier-oblique
courier
helvetica-bold
helvetica-boldblique
helvetica-oblique
helvetica
symbol
times-bold
times-bolditalic
times-italic
times-roman
$B$?$@$7!"%I%i%$%P!<$K$h$C$F$OK>$_DL$j$N%U%)%s%H$,F@$i$l$J$$>l9g$,$"$j$^$9!#(J
------------------------------
fintsize( int size )
$B8=:_%"%/%F%#%V$JIA2h6u4V$N%U%)%s%H$NBg$-$5$r(J size/72 [inch]$B$K;XDj$7$^$9!#(J
$B$?$@$7!"%I%i%$%P!<$K$h$C$F$OK>$_DL$j$N%U%)%s%H$,F@$i$l$J$$>l9g$,$"$j$^$9!#(J
------------------------------
alabel( int x, int y, char label[] )
$BIA2hJ?LL>e$NE@(J(x, y)$B$+$i(Jlabel$B$GI=$5$l$?J8;zNs$rI=<($7$^$9!#(J
$B%Z%s$OJ8;zNs$N:G8e$K$$$-$^$9!#(J
------------------------------
fill( int level )
space$B4X?t$G;XDj$7$?IA2h6u4V$r(Jlevel $B$G;XDj$7$?%0%l!<%9%1!<%k$G(J
$BEI$jDY$7$^$9!#(J
level = 1 $B$G9u!"(Jlevel$B$,Bg$-$/$J$k$K$D$l$F%0%l!<$,Gv$/$J$j(Jlevel = 0xFFFF
$B$GGr$K$J$j$^$9!#(Jlevel = 0 $B$N;~$O2?$b$7$^$;$s!#(J
**********************************************************************
**********************************************************************
**********************************************************************

JUGplot$B$N!"(Jplot(3X)$B$H8_49@-$N$"$k4X?t72$G$9!#(J
$B:BI8$OA4$FIA2h:BI8$G$9!#$^$?!"(Jlabel$B$GIA$+$l$kJ8;z$O(Jfont$B4X?t$N(J
$B1F6A$r<u$1$^$9!#(J

------------------------------
int openpl( void )
$B=q$-9~$_%G%P%$%9$r%*!<%W%s$7$^$9!#(J
$B$"$i$f$k(Jplot$BL?Na$NA0$KI,$:<B9T$5$l$J$1$l$P$J$i$J$$L?Na$G$9!#(J
------------------------------
int erase( void )
space$B4X?t$G;XDj$5$l$?NN0h$r=i4|2=$7$^$9!#(J
------------------------------
int label( char s[] )
$B%Z%s$N0LCV$+$i!"(Js[]$B$G<($5$l$kJ8;z$rIA$-$^$9!#(Js[]$B$N=*$j$O$+$J$i$:(Jnewline$BJ8;z(J
$B$G$J$1$l$P$J$j$^$;$s!#IA2h8e$b%Z%s$N0LCV$OJQ$o$j$^$;$s!#(J
------------------------------
int line( short x1, short y1, short x2, short y2 )
$B:BI8(J(x1, y1)$B$+$i(J(x2, y2)$B$KD>@~$r0z$-$^$9!#%Z%s$N0LCV$O(J(x2, y2)$B$K$J$j$^$9!#(J
------------------------------
int circle( short x, short y, short r )
$BCf?4:BI8(J(x, y)$BH>7B(Jr$B$N1_$rIA$-$^$9!#%Z%s$N0LCV$O(J(x, y)$B$H$J$j$^$9!#(J
------------------------------
int arc( short x, short y, short x0, short y0, short x1, short y1 )
$BCf?4:BI8(J(x, y)$B!"IA2h3+;OE@(J(x0, y0)$B!"IA2h=*N;E@(J(x1, y1)$B$N1_8L$rIA$-$^$9!#(J
$B%Z%s$N0LCV$O(J(x, y)$B$H$J$j$^$9!#(J
------------------------------
int move( short x, short y )
$B%Z%s$N0LCV$r(J(x, y)$B$KJQ99$7$^$9!#(J
------------------------------
int cont( short x, short y )
$B8=:_$N%Z%s$N0LCV$+$i(J(x, y)$B$KD>@~$r0z$-$^$9!#%Z%s$N0LCV$O(J(x, y)$B$K$J$j$^$9!#(J
------------------------------
int point( short x, short y )
$B:BI8(J(x, y)$B$KE@$rBG$A$^$9!#%Z%s$N0LCV$O(J(x, y)$B$K$J$j$^$9!#(J
------------------------------
int linemod( char mode[] )
$BD>@~$NIA2h%Q%?!<%s$r;XDj$7$^$9!#(Jmode $B$K$O!"8=:_0J2<$N$h$&$J%Q%?!<%s$,(J
$B;XDj$G$-$^$9!#(J
solid
longdashed
disconnected
dotdashed
dotted
shortdashed
------------------------------
int space( short x0, short y0, short x1, short y1 )
$BIA2h6u4V$N9-$5$r;XDj$7$^$9!#(J
$BIA2h6u4V$O:8>e(J(x0, y0)$B!"1&2<(J(x1, y1)$B$ND9J}7A$K$J$j$^$9!#(J
------------------------------
int closepl( void )
$BIA2h%G%P%$%9$r%/%m!<%:$7$^$9!#(J
$B%W%m%0%i%`=*N;A0$KI,$:$3$N4X?t$r<B9T$7$F2<$5$$!#(J
------------------------------

**********************************************************************
**********************************************************************
**********************************************************************

$B$^$:$O!"$3$s$J$H$3$m$+$i(J(^^;

MONMON   $BM8Cf(J $B2m<y(J       monaka@pleiades.sci.isas.ac.jp      MONMON
MONMON                                                       MONMON
Newsgroups: fj.os.misc,fj.sys.ibmpc