Changeset 13479 for trunk/Ohana/src/relastro

Timestamp:

May 22, 2007, 12:23:09 PM (19 years ago)

Author:

eugene

Message:

upgrading to kapa 2.0 API, upgrades to dvo user interface

File:

• trunk/Ohana/src/relastro/src/plotstuff.c (modified) (5 diffs)

trunk/Ohana/src/relastro/src/plotstuff.c

@@ -21 +21 @@
 int open_graph (int N) {
 
-  Xgraph[N] = KiiOpen ("kapa", NULL);
+  char name[100];
+
+  sprintf (name, "gastro [%d]", N);
+  Xgraph[N] = KapaOpen ("kapa", name);
+
   if (Xgraph[N] < 0) {
     fprintf (stderr, "error starting kapa\n");
@@ -59 +63 @@
   if (Xgraph[N] < 1) if (!open_graph(N)) return;
 
-  KapaClear (Xgraph[N], TRUE);
+  KapaClearSections (Xgraph[N]);
 
-  KiiSendCommand (Xgraph[N], 4, "PLOT");
-  
-  /* send Xgraph the plot details */
-  KiiSendMessage (Xgraph[N], "%8d %8d %d %d %d %d %d %f %f", 
-                  Npts, graphmode[0].style, 
-                  graphmode[0].ptype, graphmode[0].ltype, 
-                  graphmode[0].etype, graphmode[0].ebar, graphmode[0].color, 
-                  graphmode[0].lweight, graphmode[0].size);
-  KiiSendMessage (Xgraph[N], "%g %g %g %g", 
-                  graphmode[0].xmin, graphmode[0].xmax, 
-                  graphmode[0].ymin, graphmode[0].ymax);
-
+  KapaPrepPlot (Xgraph[N], Npts, graphmode);
   return;
 }
@@ -83 +76 @@
 }
 
-void PlotVector (int Npts, double *vect, int mode, int N) {
+void PlotVector (int Npts, double *vect, int mode, int N, char *type) {
 
   float *values;
@@ -95 +88 @@
   }
 
-  Nbytes = Npts * sizeof (float);
-  write (Xgraph[N], values, Nbytes);
+  KapaPlotVector (Xgraph[N], Npts, values, type);
   free (values);
   return;
@@ -123 +115 @@
 
   PrepPlotting (N, graphdata, 0);
-  PlotVector (N, xlist, 0, 0);
-  PlotVector (N, ylist, 1, 0);
+  PlotVector (N, xlist, 0, 0, "x");
+  PlotVector (N, ylist, 1, 0, "y");
   if (label != NULL) PlotLabel (label, 0);
   DonePlotting (graphdata, 0);