Changeset 5702 for trunk/Ohana/src/opihi/cmd.data

Timestamp:

Dec 5, 2005, 4:01:47 PM (21 years ago)

Author:

eugene

Message:

minor fixes, added sizes, object types

File:

• trunk/Ohana/src/opihi/cmd.data/vload.c (modified) (5 diffs)

trunk/Ohana/src/opihi/cmd.data/vload.c

@@ -1 +1 @@
 # include "data.h"
+
+# define NPTYPE 3
+static char ptype[NPTYPE][8] = {"BOX", "LINE", "CIRCLE"};
 
 int vload (int argc, char **argv) {
@@ -5 +8 @@
   int i, N, n, Nline;
   int Ximage, Nimage;
-  double dx, dy;
-  char *buffer;
+  double dx, dy, size;
+  char *buffer, *type;
   Vector *vecx, *vecy;
   
@@ -16 +19 @@
   }
   if (!GetImage (&Ximage, &Nimage)) return (FALSE);
+
+  type = ptype[0];
+  if ((N = get_argument (argc, argv, "-type"))) {
+    remove_argument (N, &argc, argv);
+    for (i = 0; i < NPTYPE; i++) {
+      if (!strcasecmp (argv[N], ptype[i])) {
+        type = ptype[i];
+        break;
+      }
+    }
+    if (i == NPTYPE) {
+      fprintf (stderr, "unknown Kii point type %s\n", argv[N]);
+      return (FALSE);
+    }
+    remove_argument (N, &argc, argv);
+  }
+
+  size = 1.0;
+  if ((N = get_argument (argc, argv, "-size"))) {
+    remove_argument (N, &argc, argv);
+    size = fabs(atof (argv[N]));
+    remove_argument (N, &argc, argv);
+  }
 
   if (argc != 4) {
@@ -38 +64 @@
   SendGraphCommand (Ximage, 16, "OVER %9d ", n);
 
-  dx = dy = 1.0;
+  if (type == ptype[2]) {
+    dx = dy = size / 2;
+  } else {
+    dx = dy = size;
+  }    
   for (i = 0; i < vecx[0].Nelements; i++) {
-    snprintf (&buffer[Nline*128], 128, "%15s %20.10f %20.10f %20.10f %20.10f ", "BOX", 
+    snprintf (&buffer[Nline*128], 128, "%15s %20.10f %20.10f %20.10f %20.10f ", type, 
               vecx[0].elements[i]+0.5, vecy[0].elements[i]+0.5, dx, dy);
     Nline ++;
@@ -56 +86 @@
 
   free (buffer);
-  fprintf (stderr, "loaded %d objects\n", n);
-
   return (TRUE);
 }