home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #3 / NN_1993_3.iso / spool / fj / os / misc / 534 next >
Encoding:
Internet Message Format  |  1993-01-24  |  9.7 KB
  1. Path: sparky!uunet!ccut!news.u-tokyo.ac.jp!yayoi!tansei1!emizuno
  2. From: monaka@pleiades.sci.isas.ac.jp (Masaki Muranaka)
  3. Newsgroups: fj.os.misc
  4. Subject: Extended-plot lib.
  5. Keywords: plot JUGplot
  6. Message-ID: <3985@tansei1.tansei.cc.u-tokyo.ac.jp>
  7. Date: 24 Jan 93 06:09:04 GMT
  8. Sender: news@tansei.cc.u-tokyo.ac.jp
  9. Distribution: fj
  10. Organization: Computer Centre, University of Tokyo
  11. Lines: 213
  12.  
  13. $B$*$R$5$7$V$j$G$9!#$b$J$+(J(monaka@pleiades.sci.isas.ac.jp)$B$G$9!#(J
  14.  
  15. $B:rG/Kv$K$+$1@<$@$13]$1$F$$$?(Jextended-plot$B$N$*OC$G$9!#(J
  16.  
  17.   $B;d$,Ds>'$9$k(Jextended-plot$B$O!"(JJUGplot$B$H$$$&L>A0$K$7$h$&$H;W$$$^$9!#(J
  18. JUnet Graphics plot $B$NN,$G$9!#8=:_$N(Jversion$B$r(J0.001$B$H$7$^$9!#(J
  19.  
  20.   $B2?=h$+$i<j$r$D$1$h$&$+LB$C$?5s$26g!"$^$:!V=@Fp$J:BI87O!W$K4X$9$k(J
  21. $BDj5A$H!"?7$7$$(Jlibplot.a$B$NFbMF$+$i;O$a$h$&$H;W$$$^$9!#(J
  22.  
  23. $BL50UL#$J:.Mp$rHr$1$k$?$a!"EvJ,$N4V!"(JJUGplot$B$K4X$9$k5-;v$r(J
  24. $BB>$N%M%C%H$KE>:\$9$k$3$H$r6X;_$7$^$9!#(J
  25.  
  26. **********************************************************************
  27. JUGplot$B$N6u4V35G0$K$D$$$F(J
  28.  
  29. JUGplot$B$K$O!"J*M}6u4V!"4pAC6u4V!"IA2h6u4V$N#3<oN`$N6u4V35G0$,$"$j$^$9!#(J
  30. $B0J2<$K=P$F$/$k(J x, y$B$O!"$$$:$l$b@0?t$G$9!#(J
  31.  
  32. $BJ*M}6u4V(J $B!':BI87O$rI=<($9$k%G%P%$%9$K0MB8$9$k6u4V$G$9!#(J
  33.            $B$?$H$($P!"(JPC9801 normal mode display$B$NJ*M}86E@$O!"(J
  34.            $B%G%#%9%W%l%$$N:8>e$K$"$j!"$3$l$rBX$($k;v$O=PMh$^$;$s!#(J
  35.            $B$^$?!"(Jy$B$NCM$O2<$K9T$/$HA}2C$7!"(Jx$B$NCM$O1&$K9T$/$HA}2C$9$k(J
  36.            $B$H8@$&$3$H$bJQ$($i$l$^$;$s!#(J
  37.            $BJ*M}6u4V$O!"(J
  38.                -32768<x<32768, -32768<y<32768
  39.            $BHO0O$r;}$A$^$9$,!"<B:]$KI=<($G$-$kHO0O$O%G%P%$%9$K0MB8$7$^$9!#(J
  40.            $B$?$H$($P!"(JPC9801 normal mode display$B$N>l9g!"(J
  41.            $B$I$N$h$&$JHO0O$NJ*M}6u4V$G$"$C$F$b!"(J0<=x<640, 0<=y<400
  42.            $B$NHO0O$7$+I=<($G$-$J$$$H$$$&$3$H$G$9!#(J
  43.  
  44. $B4pAC6u4V(J $B!'J*M}6u4V$N>e$KB8:_$9$k6u4V$G$9!#(J
  45.            $BJ*M}6u4V>e$NE@$r86E@$H$7!J$3$NE@$r4pAC86E@$H$$$&!K!"6u4V$NHO0O$O(J
  46.            -32768<x<32768, -32768<y<32768
  47.            $B$G$9!#$7$+$7!"I=<($9$k%G%P%$%9$NG=NO$r1[$($?ItJ,$NIA2h$OI=<($5$l(J
  48.            $B$^$;$s$7!"HsI=<(It$NIA2hFbMF$,J]B8$5$l$k$H$$$&J]>Z$b$"$j$^$;$s!#(J
  49.  
  50. $BIA2h6u4V(J $B!'4pAC6u4V>e$NG$0U$NE@$r86E@$H$9$k!J$3$NE@$rIA2h86E@$H$$$&!K6u4V$G$9!#(J
  51.            $BIA2h6u4V$NHO0O$H$7$F$O!"(J                
  52.            -32768<x<32768, -32768<y<32768
  53.            $B$NG!2?$J$k@0?t$r@_Dj$7$F$b9=$$$^$;$s!#(J
  54.            $B$7$+$7!"I=<($9$k%G%P%$%9$NG=NO$r1[$($?ItJ,$d!"4pAC6u4V$NHO0O(J
  55.            $B$r1[$($kIA2h$OI=<($5$l$^$;$s$7!"HsI=<(It$NIA2hFbMF$,J]B8$5$l$k(J
  56.            $B$H$$$&J]>Z$b$"$j$^$;$s!#(J
  57. **********************************************************************
  58.   $B:#$N$H$3$m!":BI8<4$NJ?9T0\F0$,=PMh$k$@$1$G$9$,!"$=$NB>$N:BI87O$K$D$$$F$O(J
  59. $B3'$5$s$N8fMWK><!Bh$G9M$($F9T$-$?$$$H;W$$$^$9!#(J
  60.  
  61.  $B$3$N35G0$NF3F~$NMxE@$O!"$^$:!"Ii?t$N:BI8$,4X$o$k;~$G$b%W%m%0%i%`$,(J
  62. $B$9$C$-$j$HI=<($G$-$k$3$H$,5s$,$i$l$^$9!#(J
  63. $B!J:G=i$K4pAC86E@(J or $BIA2h86E@$r$:$i$;$PNI$$$@$1$G$9!K(J
  64.  $B$=$l$H!"(Jwindow system$B9=C[$N2DG=@-$,5s$2$i$l$^$9!#(JJUGplot$B$N%i%$%V%i%j!<(J
  65. $B$OJ#?t$NIA2h6u4V$,F1;~$K@_Dj$G$-$k$h$&$J9=B$$K$J$C$F$$$^$9!#!J$b$A$m$s(J
  66. $B%W%m%H%3%k$d%I%i%$%P!<$b$=$&$$$&9=B$$K$J$j$^$9!#!KJ8;z$b=q$1$^$9!#(J
  67. $B4JC1$J?^7A$b=q$1$^$9!#$"$H$O!"(Jbitmap$B$,$"$l$P$H$j$"$($:9=C[2DG=$G$7$g$&!#(J
  68. bitmap$B$O!"<!$N(Jversion$B$GH/I=$9$kM=Dj$G$9!#(J
  69.  
  70.  
  71.  $B0J2<$K?7$7$$(Jlibplot.a$B$NFbMF$r<($7$^$9!#(J
  72. $B=i$a$F$G$9$+$i!"K\2H(J plot$B$d(JGNU graphics$B$N8_494X?t$b:\$;$F$"$j$^$9!#(J
  73. $B$3$3$K:\$;$?4X?t$NB>$K$3$s$J4X?t$,M_$7$$(J   $B$H$+!"(J
  74. $B$3$N4X?tL>$O!"B>$N%i%$%V%i%j!<$G;H$o$l$F$$$k$+$iBLL\$@$h!"(J   $B$H$+!"(J
  75. $B0U8+$,$"$j$^$7$?$i(Jfollow$B$r$*4j$$$7$^$9!#(J(_o_)
  76.  
  77. **********************************************************************
  78. **********************************************************************
  79. **********************************************************************
  80.  
  81. JUGplot$BFH<+$N3HD%4X?t$G$9!#(J
  82.  
  83. ------------------------------
  84. int allerase( void )
  85. $BJ*M}6u4V>e$NA4$F$NIA2hJ*$r>C5n$7$^$9!#(J
  86. ------------------------------
  87. int allreset( void )
  88. $BJ*M}6u4V$r=i4|2=$7$^$9!#(J
  89. ------------------------------
  90. int root( short x, short y )
  91. $B4pAC6u4V$N86E@:BI8$rJ*M}6u4V>e$NE@(J(x, y)$B$K<h$j$^$9!#(J
  92. ------------------------------
  93. WIND openwin()
  94. $B?7$7$$IA2h6u4V$r@_Dj$7$^$9!#(J
  95. $BJVCM$OIA2h6u4V$N(JID$B$H$7$F=EMW$K$J$j$^$9!#(J
  96. ------------------------------
  97. int selwin( WIND win )
  98. $BIA2h6u4V$,B??tB8:_$9$k>l9g!"$3$l$+$iIA2h$9$k6u4V$r!"$3$l$G;XDj$7$^$9!#(J
  99. win$B$K$O!";XDj$9$kIA2h6u4V$r3+$/;~$KMQ$$$?(Jopenwin$B4X?t$NJVCM$rBeF~$7$^$9!#(J
  100. ------------------------------
  101. int closewin( WIND win )
  102. win$B$G<($5$l$?IA2h6u4V$r2rJ|$7$^$9!#(J
  103. $B$3$N$H$-!"2rJ|$9$kIA2h6u4V$K$h$C$F1F6A$r<u$1$?B>$NIA2h6u4V$N:FIA2h$O(J
  104. $B8=(Jversion$B$G$O9T$J$o$l$^$;$s!#(J
  105. ------------------------------
  106. int pallette( int red, int green, int blue )
  107. $BI=<($9$k%G%P%$%9$K%Q%l%C%H$N5!G=$,$D$$$F$$$k;~!"$=$N?'$r;XDj$7$^$9!#(J
  108. ------------------------------
  109. WIND $B9=B$BN(J
  110. $BIA2h6u4V$N>pJs$,F~$C$F$$$k9=B$BN$G$9!#(J
  111. **********************************************************************
  112. **********************************************************************
  113. **********************************************************************
  114.  
  115. JUGplot$B$N4X?t72$N$&$A!"(JGNU-graphics$B$G3HD%$5$l$?(Jplot$B$H8_49@-$N$"$k4X?t$G$9!#(J
  116.  
  117. ------------------------------
  118. color( int red, int green, int blue )
  119. $B8=:_%"%/%F%#%V$JIA2h6u4V$NIA2h?'$r7hDj$7$^$9!#(J
  120. $BO@M}E*$K$O(J (65536)^3 $B$N?'$,I=<($G$-$k$3$H$K$J$j$^$9!#(J
  121. $B!t(J $B$,!"$=$s$J%^%7%s$O(JJUGplot$B$J$I;H$o$J$$$G$7$g$&!#(J
  122. red = green = blue = 65535    $B$N;~!"=cGr(J
  123. red = green = blue =     0    $B$N;~!"=c9u(J
  124. red = 65535, green = blue = 0 $B$N;~!"=c@V(J
  125. green = 65535, red = blue = 0 $B$N;~!"=cNP(J
  126. blue = 65535, red = green = 0 $B$N;~!"=c@D(J
  127. $B$K$J$j$^$9!#(J
  128. ------------------------------
  129. fontname( char fontname[] )
  130. $B8=:_%"%/%F%#%V$JIA2h6u4V$N%U%)%s%H%M!<%`$r;XDj$7$^$9!#(J
  131. fontname$B$K$O0J2<$N%U%)%s%H$,;XDj$G$-$^$9!#(J
  132. courier-bold
  133. courier-boldblique
  134. courier-oblique
  135. courier
  136. helvetica-bold
  137. helvetica-boldblique
  138. helvetica-oblique
  139. helvetica
  140. symbol
  141. times-bold
  142. times-bolditalic
  143. times-italic
  144. times-roman
  145. $B$?$@$7!"%I%i%$%P!<$K$h$C$F$OK>$_DL$j$N%U%)%s%H$,F@$i$l$J$$>l9g$,$"$j$^$9!#(J
  146. ------------------------------
  147. fintsize( int size )
  148. $B8=:_%"%/%F%#%V$JIA2h6u4V$N%U%)%s%H$NBg$-$5$r(J size/72 [inch]$B$K;XDj$7$^$9!#(J
  149. $B$?$@$7!"%I%i%$%P!<$K$h$C$F$OK>$_DL$j$N%U%)%s%H$,F@$i$l$J$$>l9g$,$"$j$^$9!#(J
  150. ------------------------------
  151. alabel( int x, int y, char label[] )
  152. $BIA2hJ?LL>e$NE@(J(x, y)$B$+$i(Jlabel$B$GI=$5$l$?J8;zNs$rI=<($7$^$9!#(J
  153. $B%Z%s$OJ8;zNs$N:G8e$K$$$-$^$9!#(J
  154. ------------------------------
  155. fill( int level )
  156. space$B4X?t$G;XDj$7$?IA2h6u4V$r(Jlevel $B$G;XDj$7$?%0%l!<%9%1!<%k$G(J
  157. $BEI$jDY$7$^$9!#(J
  158. level = 1 $B$G9u!"(Jlevel$B$,Bg$-$/$J$k$K$D$l$F%0%l!<$,Gv$/$J$j(Jlevel = 0xFFFF
  159. $B$GGr$K$J$j$^$9!#(Jlevel = 0 $B$N;~$O2?$b$7$^$;$s!#(J
  160. **********************************************************************
  161. **********************************************************************
  162. **********************************************************************
  163.  
  164. JUGplot$B$N!"(Jplot(3X)$B$H8_49@-$N$"$k4X?t72$G$9!#(J
  165. $B:BI8$OA4$FIA2h:BI8$G$9!#$^$?!"(Jlabel$B$GIA$+$l$kJ8;z$O(Jfont$B4X?t$N(J
  166. $B1F6A$r<u$1$^$9!#(J
  167.  
  168. ------------------------------
  169. int openpl( void )
  170. $B=q$-9~$_%G%P%$%9$r%*!<%W%s$7$^$9!#(J
  171. $B$"$i$f$k(Jplot$BL?Na$NA0$KI,$:<B9T$5$l$J$1$l$P$J$i$J$$L?Na$G$9!#(J
  172. ------------------------------
  173. int erase( void )
  174. space$B4X?t$G;XDj$5$l$?NN0h$r=i4|2=$7$^$9!#(J
  175. ------------------------------
  176. int label( char s[] )
  177. $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
  178. $B$G$J$1$l$P$J$j$^$;$s!#IA2h8e$b%Z%s$N0LCV$OJQ$o$j$^$;$s!#(J
  179. ------------------------------
  180. int line( short x1, short y1, short x2, short y2 )
  181. $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
  182. ------------------------------
  183. int circle( short x, short y, short r )
  184. $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
  185. ------------------------------
  186. int arc( short x, short y, short x0, short y0, short x1, short y1 )
  187. $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
  188. $B%Z%s$N0LCV$O(J(x, y)$B$H$J$j$^$9!#(J
  189. ------------------------------
  190. int move( short x, short y )
  191. $B%Z%s$N0LCV$r(J(x, y)$B$KJQ99$7$^$9!#(J
  192. ------------------------------
  193. int cont( short x, short y )
  194. $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
  195. ------------------------------
  196. int point( short x, short y )
  197. $B:BI8(J(x, y)$B$KE@$rBG$A$^$9!#%Z%s$N0LCV$O(J(x, y)$B$K$J$j$^$9!#(J
  198. ------------------------------
  199. int linemod( char mode[] )
  200. $BD>@~$NIA2h%Q%?!<%s$r;XDj$7$^$9!#(Jmode $B$K$O!"8=:_0J2<$N$h$&$J%Q%?!<%s$,(J
  201. $B;XDj$G$-$^$9!#(J
  202. solid
  203. longdashed
  204. disconnected
  205. dotdashed
  206. dotted
  207. shortdashed
  208. ------------------------------
  209. int space( short x0, short y0, short x1, short y1 )
  210. $BIA2h6u4V$N9-$5$r;XDj$7$^$9!#(J
  211. $BIA2h6u4V$O:8>e(J(x0, y0)$B!"1&2<(J(x1, y1)$B$ND9J}7A$K$J$j$^$9!#(J
  212. ------------------------------
  213. int closepl( void )
  214. $BIA2h%G%P%$%9$r%/%m!<%:$7$^$9!#(J
  215. $B%W%m%0%i%`=*N;A0$KI,$:$3$N4X?t$r<B9T$7$F2<$5$$!#(J
  216. ------------------------------
  217.  
  218. **********************************************************************
  219. **********************************************************************
  220. **********************************************************************
  221.  
  222. $B$^$:$O!"$3$s$J$H$3$m$+$i(J(^^;
  223.  
  224. MONMON   $BM8Cf(J $B2m<y(J       monaka@pleiades.sci.isas.ac.jp      MONMON
  225. MONMON                                                       MONMON
  226.