WebSVN – wimsdev – Diff – /trunk/wims/src/Misc/canvasdraw/canvasdraw.c

     for(i=0;i<MAX_INT;i++){int_data[i]=0;double_data[i]=0;}
     int use_parametric = FALSE;/* will be reset after parametric plotting */
     int use_axis = FALSE;
     int use_axis_numbering = FALSE;
     int use_pan_and_zoom = FALSE;
+    int use_js_math = FALSE; /* if true add js-function to convert math_function --> javascript math_function */
+    int use_js_plot = FALSE; /* if true , let js-engine plot the curve */
     int line_width = 1;
     int decimals = 2;
     int precision = 100; /* 10 = 1;100=2;1000=3 decimal display for mouse coordinates or grid coordinate */
     int use_userdraw = FALSE; /* flag to indicate user interaction: incompatible with "drag & drop" code !! */
     int drag_type = -1;/* 0,1,2 : xy,x,y */
 var x_strings = null;\
 var y_strings = null;\
 var use_pan_and_zoom = 0;\
 var x_use_snap_to_grid = 0;\
 var y_use_snap_to_grid = 0;\
+var use_jsmath = 0;\
 var xstart = 0;\
 var ystart = 0",canvas_root_id,xsize,ysize,canvas_root_id,canvas_root_id,canvas_root_id,canvas_root_id,canvas_root_id);
 /* default add the drag code : nearly always used ...*/
 add_drag_code(js_include_file,DRAG_CANVAS,canvas_root_id);
             break;
              fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,16,%s,[%d],[%d],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%.1f,\"%s\",%d,\"%s\",%d,%s));\n",click_cnt,onclick,drag_type,eval_levelcurve(xsize,ysize,fun1,xmin,xmax,ymin,ymax,plot_steps,precision,double_data[c]),line_width,line_width,line_width,stroke_color,stroke_opacity,fill_color,fill_opacity,use_filled,use_dashed,dashtype[0],dashtype[1],use_rotate,angle,flytext,font_size,font_family,use_affine,affine_matrix);
              click_cnt++;
+            }
             reset();
             break;
-        case TRACE_JSMATH:
+        case TRACE_JSCURVE:
         /*
-         @trace_jsmath some_javascript_math_function
+         @trace_jscurve some_math_function
          @will use a crosshair to trace the jsmath curve
          @two inputfields will display the current x/y-values (numerical evaluation by javascript)
          @default labels 'x' and 'y'<br />the commands 'xlabel some_x_axis_name' and 'ylabel some_y_axis_name' will set the label for the input fields
          @use linewidth,strokecolor,crosshairsize to adjust the corsshair.
-         @example: trace_jsmath Math.pow(x,2)+4*x+16
-         @example: trace_jsmath Math.sin(Math.pow(x,Math.Pi))+Math.sqrt(x)
-         @no check is done on the validity of your function and/or syntax<br />use error console to debug any errors...
+         @the client browser will convert your math function to javascript math.<br />use parenthesis and rawmath : use 2*x in stead of 2x etc etc<br />no check is done on the validity of your function and/or syntax<br />use error console to debug any errors...
         */
             if( js_function[DRAW_CROSSHAIRS] != 1 ){ js_function[DRAW_CROSSHAIRS] = 1;}
             if( js_function[DRAW_LINES] != 1 ){ js_function[DRAW_LINES] = 1;}
+            if( use_js_math == FALSE){
+                add_to_js_math(js_include_file);
+                use_js_math = TRUE;
+            }
             add_trace_js_mouse(js_include_file,TRACE_CANVAS,canvas_root_id,stroke_color,get_string(infile,1),font_size,stroke_opacity,line_width,crosshair_size);
             break;
         case JSMATH:
         /*
-            @jsmath some_javascript_math_function
+            @jsmath some_math_function
             @will calculate an y-value from a userinput x-value and draws a crosshair on these coordinates.
             @default labels 'x' and 'y'<br />the commands 'xlabel some_x_axis_name' and 'ylabel some_y_axis_name' will set the label for the input fields
-            @example: jsmath Math.pow(x,2)+4*x+16
+            @example: jsmath sin(x^2)
-            @example: jsmath Math.sin(Math.pow(x,Math.Pi))+Math.sqrt(x)
-            @no check is done on the validity of your function and/or syntax<br />use error console to debug any errors...
+            @the client browser will convert your math function to javascript math.<br />use parenthesis and rawmath : use 2*x in stead of 2x etc etc<br />no check is done on the validity of your function and/or syntax<br />use error console to debug any errors...
         */
             if( js_function[DRAW_CROSSHAIRS] != 1 ){ js_function[DRAW_CROSSHAIRS] = 1;}
+            if( use_js_math == FALSE){
+                add_to_js_math(js_include_file);
+                use_js_math = TRUE;
+            }
             add_calc_y(js_include_file,canvas_root_id,get_string(infile,1));
             break;
+        case JSCURVE:
+        /*
+         @jscurve color,formula(x)
+         @your function will be plotted by the javascript engine of the client browser.
+         @use parenthesis and rawmath : use 2*x in stead of 2x ; use 2^(sin(x))...etc etc<br />use error console to debug any errors...
+         @no validity check is done by wims.
+         @zooming & panning are implemented :<br />use command 'zoom color' for mouse driven zooming<br />or use keyword 'setlimits' for inputfields setting xmin/xmax, ymin/ymax
+         @use command 'trace_jscurve formula(x)` for tracing
+         @use commmand 'jsmath  formula(x)` for calculating and displaying indiviual points on the curve
+         @can not be set draggable / onclick (yet)
+         @commands plotjump / plotstep are not active for 'jscurve'
+        */
+            stroke_color = get_color(infile,0);
+            if( use_js_math == FALSE){/* add this stuff only once...*/
+                add_to_js_math(js_include_file);
+                use_js_math = TRUE;
+            }
+            if( use_js_plot == FALSE){
+                use_js_plot = TRUE;
+                add_jsplot(js_include_file,canvas_root_id); /* this plots the function on JSPLOT_CANVAS */
+            }
+            temp = get_string_argument(infile,1);
+            string_length = snprintf(NULL,0,  "jsplot(%d,\"%s\",%d,\"%s\",%.2f,%d,%d,%d); ",JSPLOT_CANVAS+use_js_plot,temp,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
+            check_string_length(string_length);tmp_buffer = my_newmem(string_length+1);
+            snprintf(tmp_buffer,string_length,"jsplot(%d,\"%s\",%d,\"%s\",%.2f,%d,%d,%d); ",JSPLOT_CANVAS+use_js_plot,temp,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
+            add_to_buffer(tmp_buffer);
+            use_js_plot++; /* we need to create multiple canvasses, so we may zoom and pan ?? */
+        break;
         case CURVE:
         /*
          @curve color,formula(x)
          @plot color,formula(x)
          @use command trange before command curve / plot  (trange -pi,pi)<br />curve color,formula1(t),formula2(t)
          @use command "plotsteps" to increase / decrease the amount of plotted points (default 150)
          @may be set draggable / onclick
         */
             if( use_parametric == TRUE ){ /* parametric color,fun1(t),fun2(t)*/
                 use_parametric = FALSE;
                 stroke_color = get_color(infile,0);
                 char *fun1 = get_string_argument(infile,0);
                 char *fun2 = get_string_argument(infile,1);
                 if( strlen(fun1) == 0 || strlen(fun2) == 0 ){canvas_error("parametric functions are NOT OK !");}
                 fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,%d,%s,[%d],[%d],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%.1f,\"%s\",%d,\"%s\",%d,%s));\n",click_cnt,onclick,drag_type,animation_type,eval_parametric(xsize,ysize,fun1,fun2,xmin,xmax,ymin,ymax,tmin,tmax,plot_steps,precision),2*line_width,2*line_width,line_width,stroke_color,stroke_opacity,fill_color,fill_opacity,use_filled,use_dashed,dashtype[0],dashtype[1],use_rotate,angle,flytext,font_size,font_family,use_affine,affine_matrix);
                 click_cnt++;
             for(i = 0; i < 5 ;i++){
                 switch(i){
                     case 0: stroke_color = get_color(infile,0);break;/* font_color == stroke_color name or hex color */
                     case 1: double_data[0] = get_real(infile,0);break; /* x */
                     case 2: double_data[1] = get_real(infile,0);break; /* y */
                     case 3: fly_font = get_string_argument(infile,0);
                             if(strcmp(fly_font,"giant") == 0){
                                 font_size = (int)(font_size + 24);
                             }
                             else
                             {
                                 if(strcmp(fly_font,"huge") == 0){
                                     font_size = (int)(font_size + 14);
                                 }
                                 else
                                 {
                                     if(strcmp(fly_font,"large") == 0){
                                         font_size = (int)(font_size + 6);
                                         }
                                         else
                                         {
                                             if(strcmp(fly_font,"small") == 0){
                                                 font_size = (int)(font_size - 4);
                                                 if(font_size<0){font_size = 8;}
                                         }
                                     }
                                 }
                             }
                             break; /* font_size ! */
                     case 4:
                         temp = get_string_argument(infile,1);
                         decimals = find_number_of_digits(precision);
                         fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,14,[%.*f],[%.*f],[30],[30],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%d,\"%s\",%d,\"%s\",%d,%s));\n",click_cnt,onclick,drag_type,decimals,double_data[0],decimals,double_data[1],line_width,stroke_color,stroke_opacity,stroke_color,stroke_opacity,0,0,0,0,0,0,temp,font_size,font_family,use_affine,affine_matrix);
                         click_cnt++;reset();break;
                     default:break;
                 }
+            }
             break;
         case FLY_TEXTUP:
         /*
          @ textup fontcolor,x,y,font,text_string
                     case 4:
                             temp = get_string_argument(infile,1);
                             string_length = snprintf(NULL,0,  "draw_inputs(%d,%d,%d,%d,%d,%d,\"%s\",\"%s\");\n",canvas_root_id,input_cnt,int_data[0],int_data[1],int_data[2],int_data[3],input_style,temp);
                             check_string_length(string_length);tmp_buffer = my_newmem(string_length+1);
                             snprintf(tmp_buffer,string_length,"draw_inputs(%d,%d,%d,%d,%d,%d,\"%s\",\"%s\");\n",canvas_root_id,input_cnt,int_data[0],int_data[1],int_data[2],int_data[3],input_style,temp);
                             add_to_buffer(tmp_buffer);
                             input_cnt++;break;
                     default: break;
+                }
+            }
             if(reply_format < 1 ){reply_format = 15;}
             reset();
             break;
         case SETLIMITS:
         /*
             @setlimits
             @keyword : if set, it will produce 4 inputfields for 'xmin,xmax,ymin,ymax' and an 'ok' button
             @may be used for inputfield based zooming / panning
+            @use command xlabel / ylabel to change text from xmin to 'xlabel'min etc
             @note:the input value will not be checked on validity
         */
             add_setlimits(js_include_file,canvas_root_id);
             /* add_setlimits provides 'fprintf(js_include_file,"use_pan_and_zoom = 1;");' */
             use_pan_and_zoom = TRUE;
   }\
  };\
 };\
 this.read_canvas = read_canvas;\n\
 <!-- end function 4 read_canvas() -->");
     break;
     /*
         attention: we reset userdraw_x / userdraw_y  : because  userdraw_x = [][] userdraw_y = [][]
         used for userdraw multiple paths
     */
     case 5: fprintf(js_include_file,"\
 \n<!-- begin function 5 read_canvas() -->\n\
 function read_canvas(){\
  var p = 0;\
  var reply = \"\";\
  for(p = 0; p < userdraw_x.length;p++){\
   if(userdraw_x[p] != null ){\
    reply = reply + userdraw_x[p]+\"\\n\"+userdraw_y[p]+\"\\n\";\
   };\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  userdraw_x = [];userdraw_y = [];\
  if( document.getElementById(\"canvas_input0\") || document.getElementById(\"mathml0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply;\
   }\
  };\
 };\
 this.read_canvas = rdad_canvas;\n\
 <!-- end function 5 read_canvas() -->");
     break;
     /*
    reply = reply + tmp_x + \"\\n\" + tmp_y +\"\\n\";\
   };\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  userdraw_x = [];userdraw_y = [];\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply;\
   }\
  };\
 };\
 this.read_canvas = read_canvas;\n\
 <!-- end function 6 read_canvas() -->");
     break;
     case 7: fprintf(js_include_file,"\
 \n<!-- begin function 7 read_canvas() -->\n\
 function read_canvas(){\
  var reply = new Array();\
  var p = 0;\
  while(userdraw_x[p]){\
   reply[p] = userdraw_x[p] +\":\" + userdraw_y[p];\
   p++;\
  };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply+\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply+\"\\n\"+input_reply;\
   }\
  };\
 function read_canvas(){\
  var reply = new Array();\
  var p = 0;\
  while(userdraw_x[p]){\
   reply[p] = px2x(userdraw_x[p]) +\":\" + px2y(userdraw_y[p]);\
   p++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") || document.getElementById(\"mathml0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply;\
   }\
 function read_canvas(){\
  var reply = new Array();\
  var p = 0;\
  while(userdraw_x[p]){\
   reply[p] = px2x(userdraw_x[p]) +\":\" + px2y(userdraw_y[p]) +\":\" + userdraw_radius[p];\
   p++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
 function read_canvas(){\
  var reply = \"\";\
  var p = 0;\
  for(p = 0; p< userdraw_x.lenght;p = p+2){\
   if(userdraw_x[p] != null){\
     reply = reply + userdraw_x[p] +\",\" + userdraw_y[p] +\",\" + userdraw_x[p+1] +\",\" + userdraw_y[p+1] +\"\\n\" ;\
   };\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text\
   }\
   else\
   {\
    return reply;\
   }\
  };\
 };\
 this.read_canvas = read_canvas;\n\
 <!-- end function 12 read_canvas() -->");
     break;
     case 13: fprintf(js_include_file,"\
 \n<!-- begin function 13 read_canvas() -->\n\
 function read_canvas(){\
  var reply = new Array();\
  var p = 0;var i = 0;\
  while(userdraw_x[p]){\
   reply[i] = px2x(userdraw_x[p]) +\":\" + px2y(userdraw_y[p]) +\":\" + px2x(userdraw_x[p+1]) +\":\" + px2y(userdraw_y[p+1]);\
   p = p+2;i++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") ){\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
  var reply = new Array();\
  var p = 0;var i = 0;\
  while(userdraw_x[p]){\
   reply[i] = userdraw_x[p] +\":\" + userdraw_y[p] +\":\" + userdraw_x[p+1] +\":\" + userdraw_y[p+1];\
   p = p+2;i++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  this.read_canvas = read_canvas;\n\
 <!-- end function 14 read_canvas() -->");
     break;
     case 15: fprintf(js_include_file,"\
 \n<!-- begin function 15  read_canvas() -->\n\
 function read_canvas(){\
  var input_reply = new Array();\
  var p = 0;\
  if( document.getElementById(\"canvas_input0\")){\
   var t = 0;\
   while(document.getElementById(\"canvas_input\"+t)){\
    if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
     input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
     p++;\
    };\
    t++;\
   };\
  };\
  if( typeof userdraw_text != 'undefined' ){\
    return input_reply +\"\\n\"+userdraw_text;\
  }\
  else\
 this.read_canvas = read_canvas;\n\
 <!-- end function 17 read_canvas() -->");
     break;
     case 18: fprintf(js_include_file,"\
 \n<!-- begin function 18 read_canvas() -->\n\
 function read_canvas(){\
  var p = 0;\
  var reply = new Array();\
  var name;\
  var t = true;\
  while(t){\
   try{ name = eval('clocks'+p);\
   reply[p] = parseInt((name.H+name.M/60+name.S/3600)%%12)+\":\"+parseInt((name.M + name.S/60)%%60)+\":\"+(name.S)%%60;p++}catch(e){t=false;};\
    return reply_x+\"\\n\"+reply_y+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply_x+\"\\n\"+reply_y;\
   };\
  };\
 };\
 this.read_canvas = read_canvas;\n\
 <!-- end function 23 read_canvas() -->");
     break;
         *xsnaptogrid="xsnaptogrid",
         *ysnaptogrid="ysnaptogrid",
         *userinput_xy="userinput_xy",
         *usertextarea_xy="usertextarea_xy",
         *jsmath="jsmath",
-        *trace_jsmath="trace_jsmath",
+        *trace_jscurve="trace_jscurve",
         *setlimits="setlimits",
+        *jscurve="jscurve",
+        *jsplot="jsplot",
         *sgraph="sgraph";
         while(((c = getc(infile)) != EOF)&&(c!='\n')&&(c!=',')&&(c!='=')&&(c!='\r')){
             if( i == 0 && (c == ' ' || c == '\t') ){
         continue; /* white spaces or tabs allowed before first command identifier */
+        }
         if( strcmp(input_type, jsmath) == 0 ){
         free(input_type);
         return JSMATH;
+        }
-        if( strcmp(input_type, trace_jsmath) == 0 ){
+        if( strcmp(input_type, trace_jscurve) == 0 ){
+        free(input_type);
+        return TRACE_JSCURVE;
+        }
+        if( strcmp(input_type, jscurve) == 0  ||  strcmp(input_type, jsplot) == 0 ){
         free(input_type);
-        return TRACE_JSMATH;
+        return JSCURVE;
+        }
         if( strcmp(input_type, setlimits) == 0 ){
         free(input_type);
         return SETLIMITS;
+        }

Subversion Repositories wimsdev

(root)/trunk/wims/src/Misc/canvasdraw/canvasdraw.c – Rev 7856 → 7858