Subversion Repositories wimsdev

Rev

Rev 15711 | Rev 16827 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed

  1. #include "canvasdraw.h"
  2. /* used multidraw primitives : identifier in canvasmultidraw.c is index of this array */
  3. static char multidraw_primitives[MAX_MULTI_PRIMITIVES][32] = {"point","points","circle","circles",
  4. "line","lines","segment","segments",
  5. "arrow","arrows","triangle","triangles",
  6. "closedpoly","text","rect","rects",
  7. "poly","polys","parallelogram","parallelograms",
  8. "images","curvedarrow","curvedarrows","curvedarrow2","curvedarrows2",
  9. "crosshair","crosshairs"};
  10. /*size of words "point","points",... == 6,7,..*/
  11. static int multidraw_primitives_length[MAX_MULTI_PRIMITIVES] = {7,6,8,7,6,5,9,8,7,6,10,9,11,5,6,5,6,5,15,14,7,14,13,13,12,10,11};
  12.  
  13. void add_js_multidraw(char *draw_types,char *table_css,int use_offset,int no_controls,int crosshair_size,int use_zoom){
  14.  int i=0;int p;int found = 0;
  15.  size_t L0 = 1 + snprintf(NULL,0,"%s",draw_types);
  16.  char *str = my_newmem(L0);snprintf(str,L0,"%s",draw_types);char *array[L0];
  17.  int user_nums[MAX_MULTI_PRIMITIVES]; /* we don't know the number of different draw primitives: so assume MAX */
  18.  int draw_nums[MAX_MULTI_PRIMITIVES];
  19.  for(i=0;i<MAX_MULTI_PRIMITIVES;i++){draw_nums[i] = -1;user_nums[i] = -1;}
  20. /* link the user given primitives to the internal indexes of the draw primitives */
  21.  int equal = -1; i = 0;
  22.  array[i] = strtok(str,",");
  23.  int polynum = -1;
  24.  char *pp;int safe=0;
  25.  while(array[i]!=NULL){
  26.   found = 0;
  27.   if( strstr(array[i],"poly") != NULL ){/* getting the numerical argument from: poly3...polys9 */
  28.    if( strstr(array[i],"closedpoly") == NULL && strstr(array[i],"polygon") == NULL){
  29.     pp = array[i];while( *pp ){safe++;
  30.     if(safe > MAX_MULTI_PRIMITIVES){break;}
  31.     if( isdigit(*pp) ){ polynum = atoi(pp);if( strstr( array[i],"polys") != NULL ) {array[i] = "polys";}else{ array[i] = "poly";}break;} else { pp++;}
  32.     }
  33.    }
  34.   }
  35.   for( p = 0 ; p < MAX_MULTI_PRIMITIVES; p++){
  36.   /* multidraw_primitives defined in canvasdraw.h */
  37.    equal = strncmp(multidraw_primitives[p],array[i],multidraw_primitives_length[p]);
  38.    if (equal == 0 ){
  39. /*    fprintf(stdout,"found %s i=%d p=%d<br />",multidraw_primitives[p],i,p);*/
  40.     draw_nums[p]= p;user_nums[p] = i;
  41.     found=1; break;
  42.    }
  43.   }
  44.   if( found == 0 ){canvas_error("unknown multidraw primitive found...typo?");}
  45.   array[++i] = strtok(NULL,",");
  46.  }
  47. /* multilabel is js-array */
  48.  if( no_controls != 1 ){ fprintf(js_include_file,"var inner_html=\"<table class='%s'>\";",table_css); }else{fprintf(js_include_file,"var inner_html = \"\";");}
  49.  
  50.  /* some default stuff */
  51.  fprintf(js_include_file,"\n/* multidraw  */\
  52. var canvas_userdraw = create_canvas%d(1000,xsize,ysize);var context_userdraw = canvas_userdraw.getContext(\"2d\");\
  53. var multidraw_object_cnt = 0;\
  54. var tooltip_div = document.getElementById(\"tooltip_placeholder_div%d\");\
  55. function multi_snap_check(x,y,snap){switch(snap){case 1:return [snap_to_x(x),snap_to_y(y)];break;case 2:return [snap_to_x(x),y];break;case 3:return [x,snap_to_y(y)];break;case 4:return snap_to_points(x,y);break;default: return [x,y];break;};};\
  56. function coord_split(coord){if(coord.indexOf(':') > 0 ){return coord.split(':');}else{if(coord.indexOf(';') > 0 ){return coord.split(';');}else{if(coord.indexOf(',') > 0 ){return coord.split(',');}else{alert(coord+'-- X : Y ');return;};};};};",canvas_root_id,canvas_root_id);
  57.  
  58.  
  59.  
  60. if( use_zoom == 1 ){/* only use zoom when command 'zoom color' is given before command 'multidraw' */
  61. fprintf(js_include_file,"forbidden_zone = [%d,%d];\
  62. function recalculate_multidraw(xmin0,xmax0,ymin0,ymax0){\
  63. function scale_xy(type,xy){var tmp_xmin = xmin;var tmp_xmax = xmax;var tmp_ymin = ymin;var tmp_ymax = ymax;xmin=xmin0;xmax=xmax0;ymin=ymin0;ymax=ymax0;if(type == 1 ){for(var p=0;p<xy.length;p++){xy[p] = px2x(xy[p]);};}else{for(var p=0;p<xy.length;p++){xy[p] = px2y(xy[p]);};};xmin = tmp_xmin;ymin = tmp_ymin;xmax = tmp_xmax;ymax = tmp_ymax;if(type == 1){for(var p=0;p<xy.length;p++){xy[p] = x2px(xy[p]);}}else{for(var p=0;p<xy.length;p++){xy[p] = y2px(xy[p]);};};return xy;};\
  64. function scale_multi_radius(r){for(var p = 0 ; p < r.length;p++ ){r[p] = zoom_xy[0]/xmin*r[p];};return r;};",xsize-115,ysize - 20);
  65.  
  66.  
  67.  for(i=0; i < MAX_MULTI_PRIMITIVES ; i++ ){
  68.   switch( draw_nums[i] ){
  69.    case -1        : break;
  70.    case 0 ... 1   :fprintf(js_include_file,"if( points_x && points_x.length > 0 ){points_x = scale_xy(1,points_x);points_y = scale_xy(1,points_y);draw_points();};");break;
  71.    case 2 ... 3   :fprintf(js_include_file,"if( circles_x && circles_x.length > 0 ){circles_x = scale_xy(1,circles_x);circles_y = scale_xy(1,circles_y);multi_radius = scale_multi_radius(multi_radius);draw_circles();};");break;
  72.    case 4 ... 5   :fprintf(js_include_file,"if( lines_x && lines_x.length > 0 ){lines_x = scale_xy(1,lines_x);lines_y = scale_xy(2,lines_y);draw_lines();};");break;
  73.    case 6 ... 7   :fprintf(js_include_file,"if( segments_x && segments_x.length > 0 ){segments_x = scale_xy(1,segments_x);segments_y = scale_xy(1,segments_y);draw_segments();};");break;
  74.    case 8 ... 9   :fprintf(js_include_file,"if( arrows_x && arrows_x.length > 0 ){arrows_x = scale_xy(1,arrows_x);arrows_y = scale_xy(2,arrows_y);draw_arrows();};");break;
  75.    case 10 ... 11 :fprintf(js_include_file,"if( triangles_x && triangles_x.length > 0 ){triangles_x = scale_xy(1,triangles_x);triangles_y = scale_xy(2,triangles_y);draw_triangles();};");break;
  76.    case 14 ... 15 :fprintf(js_include_file,"if( rects_x && rects_x.length > 0 ){rects_x = scale_xy(1,rects_x);rects_y = scale_xy(2,rects_y);draw_rects();};");break;
  77.    case 12        :fprintf(js_include_file,"if( closedpoly_x && closedpoly_x.length > 0 ){closedpoly_x = scale_xy(1,closedpoly_x);closedpoly_y = scale_xy(2,closedpoly_y);draw_closedpoly();};");break;
  78.    case 13        :fprintf(js_include_file,"if( text_x && text_x.length > 0 ){text_x = scale_xy(1,text_x);text_y = scale_xy(2,text_y);draw_text();};");break;
  79.    case 16 ... 17 :fprintf(js_include_file,"if( polys_x && polys_x.length > 0 ){polys_x = scale_xy(1,polys_x);polys_y = scale_xy(2,polys_y);draw_polys();};");break;
  80.    case 18 ... 18 :fprintf(js_include_file,"if( parallelogram_x && parallelogram_x.length > 0 ){parallelogram_x = scale_xy(1,parallelogram_x);parallelogram_y = scale_xy(2,parallelogram_y);draw_parallelogram();};");break;
  81.    case 20        :fprintf(js_include_file,"if( images_x && images_x.length > 0 ){images_x = scale_xy(1,images_x);images_y = scale_xy(2,images_y);draw_images();};");break;
  82.    case 21 ... 22 :fprintf(js_include_file,"if( curvedarrows_x && curvedarrows_x.length > 0 ){curvedarrows_x = scale_xy(1,curvedarrows_x);curvedarrows_y = scale_xy(2,curvedarrows_y);draw_curvedarrows();};");break;
  83.    case 23 ... 24 :fprintf(js_include_file,"if( curvedarrows2_x && curvedarrows2_x.length > 0 ){curvedarrows2_x = scale_xy(1,curvedarrows2_x);curvedarrows2_y = scale_xy(2,curvedarrows2_y);draw_curvedarrows2();};");break;
  84.    case 25 ... 26 :fprintf(js_include_file,"if( crosshairs_x && crosshairs_x.length > 0 ){crosshairs_x = scale_xy(1,crosshairs_x);crosshairs_y = scale_xy(1,crosshairs_y);draw_crosshairs();};");break;
  85.    default        : break;
  86.   }
  87.  }
  88.  fprintf(js_include_file," return;};");
  89. }
  90.  /* begin user_draw() */
  91.  fprintf(js_include_file,"function user_draw(evt){\
  92. if(evt.button == 3){clear_draw_area%d(userdraw_primitive,0);return;};\
  93. var mouse = getMouse(evt,canvas_userdraw);\
  94. var x = mouse.x;var y = mouse.y;\
  95. user_is_dragging = false;\
  96. if(x>forbidden_zone[0] && y>forbidden_zone[1]){console.log('drawing in zoom area...');return;};\
  97. switch(userdraw_primitive){",canvas_root_id);
  98.  for(i=0; i < MAX_MULTI_PRIMITIVES ; i++ ){
  99.   switch( draw_nums[i] ){
  100.    case -1: break;
  101.    case 0:fprintf(js_include_file,"case 0: points(x,y,0,0);break;");break;
  102.    case 1:fprintf(js_include_file,"case 1: points(x,y,0,1);break;");break;
  103.    case 2:fprintf(js_include_file,"case 2: circles(x,y,0,0);break;");break;
  104.    case 3:fprintf(js_include_file,"case 3: circles(x,y,0,1);break;");break;
  105.    case 4:fprintf(js_include_file,"case 4: lines(x,y,0,0);break;");break;
  106.    case 5:fprintf(js_include_file,"case 5: lines(x,y,0,1);break;");break;
  107.    case 6:fprintf(js_include_file,"case 6: segments(x,y,0,0);break;");break;
  108.    case 7:fprintf(js_include_file,"case 7: segments(x,y,0,1);break;");break;
  109.    case 8:fprintf(js_include_file,"case 8: arrows(x,y,0,0);break;");break;
  110.    case 9:fprintf(js_include_file,"case 9: arrows(x,y,0,1);break;");break;
  111.    case 10:fprintf(js_include_file,"case 10: triangles(x,y,0,0);break;");break;
  112.    case 11:fprintf(js_include_file,"case 11: triangles(x,y,0,1);break;");break;
  113.    case 12:fprintf(js_include_file,"case 12: closedpoly(x,y,0,0);break;");break;
  114.    case 13:fprintf(js_include_file,"case 13: text(x,y,0,1);break;");break;
  115.    case 14:fprintf(js_include_file,"case 14: rects(x,y,0,0);break;");break;
  116.    case 15:fprintf(js_include_file,"case 15: rects(x,y,0,1);break;");break;
  117.    case 16:fprintf(js_include_file,"case 16: polys(x,y,0,0);break;");break;
  118.    case 17:fprintf(js_include_file,"case 17: polys(x,y,0,1);break;");break;
  119.    case 18:fprintf(js_include_file,"case 18: parallelogram(x,y,0,0);break;");break;
  120.    case 19:fprintf(js_include_file,"case 19: parallelogram(x,y,0,1);break;");break;
  121.    case 20:fprintf(js_include_file,"case 20: images(x,y,0,1);break;");break;
  122.    case 21:fprintf(js_include_file,"case 21: curvedarrows(x,y,0,0);break;");break;
  123.    case 22:fprintf(js_include_file,"case 22: curvedarrows(x,y,0,1);break;");break;
  124.    case 23:fprintf(js_include_file,"case 23: curvedarrows2(x,y,0,0);break;");break;
  125.    case 24:fprintf(js_include_file,"case 24: curvedarrows2(x,y,0,1);break;");break;
  126.    case 25:fprintf(js_include_file,"case 25: crosshairs(x,y,0,0);break;");break;
  127.    case 26:fprintf(js_include_file,"case 26: crosshairs(x,y,0,1);break;");break;
  128.    default: break;
  129.   }
  130.  }
  131.  fprintf(js_include_file,"default:break;};return;};");
  132.  /* end user_draw()*/
  133.  
  134. /* should we use a fillpattern ? */
  135.  
  136.  /* begin user_drag() */
  137.  fprintf(js_include_file,"function user_drag(evt){\
  138. var mouse = getMouse(evt,canvas_userdraw);\
  139. var x = mouse.x;var y = mouse.y;\
  140. user_is_dragging = true;\
  141. if(x>forbidden_zone[0] && y>forbidden_zone[1]){console.log('drawing in zoom area...');return;};\
  142. switch(userdraw_primitive){");
  143.  for(i=0; i < MAX_MULTI_PRIMITIVES ; i++ ){
  144.   switch( draw_nums[i] ){
  145.    case -1: break;
  146.    case 0:fprintf(js_include_file,"case 0: break;");break;
  147.    case 1:fprintf(js_include_file,"case 1: break;");break;
  148.    case 2:fprintf(js_include_file,"case 2: circles(x,y,1,0);break;");break;
  149.    case 3:fprintf(js_include_file,"case 3: circles(x,y,1,1);break;");break;
  150.    case 4:fprintf(js_include_file,"case 4: lines(x,y,1,0);break;");break;
  151.    case 5:fprintf(js_include_file,"case 5: lines(x,y,1,1);break;");break;
  152.    case 6:fprintf(js_include_file,"case 6: segments(x,y,1,0);break;");break;
  153.    case 7:fprintf(js_include_file,"case 7: segments(x,y,1,1);break;");break;
  154.    case 8:fprintf(js_include_file,"case 8: arrows(x,y,1,0);break;");break;
  155.    case 9:fprintf(js_include_file,"case 9: arrows(x,y,1,1);break;");break;
  156.    case 10:fprintf(js_include_file,"case 10: triangles(x,y,1,0);break;");break;
  157.    case 11:fprintf(js_include_file,"case 11: triangles(x,y,1,1);break;");break;
  158.    case 12:fprintf(js_include_file,"case 12: closedpoly(x,y,1,0);break;");break;
  159.    case 13:fprintf(js_include_file,"case 13: break;");break;
  160.    case 14:fprintf(js_include_file,"case 14: rects(x,y,1,0);break;");break;
  161.    case 15:fprintf(js_include_file,"case 15: rects(x,y,1,1);break;");break;
  162.    case 16:fprintf(js_include_file,"case 16: polys(x,y,1,0);break;");break;
  163.    case 17:fprintf(js_include_file,"case 17: polys(x,y,1,1);break;");break;
  164.    case 18:fprintf(js_include_file,"case 18: parallelogram(x,y,1,0);break;");break;
  165.    case 19:fprintf(js_include_file,"case 19: parallelogram(x,y,1,1);break;");break;
  166.    case 20:fprintf(js_include_file,"case 20: images(x,y,1,1);break;");break;
  167.    case 21:fprintf(js_include_file,"case 21: curvedarrows(x,y,1,0);break;");break;
  168.    case 22:fprintf(js_include_file,"case 22: curvedarrows(x,y,1,1);break;");break;
  169.    case 23:fprintf(js_include_file,"case 23: curvedarrows2(x,y,1,0);break;");break;
  170.    case 24:fprintf(js_include_file,"case 24: curvedarrows2(x,y,1,1);break;");break;
  171.    case 25:fprintf(js_include_file,"case 25: break;");break;
  172.    case 26:fprintf(js_include_file,"case 26: break;");break;
  173.    default:break;
  174.   }
  175.  }
  176.  fprintf(js_include_file,"default:break; };return;};");
  177.  /* end user_drag() */
  178. /* 17/1/2021 corrected syntax issue signalled by Opera Presto : 'forbidden function user_drawstop(evt) declaration in statement'*/
  179. fprintf(js_include_file,"if(wims_status != \"done\"){\
  180. canvas_div.addEventListener('mousedown',user_draw,false);\
  181. canvas_div.addEventListener('mousemove',user_drag,false);\
  182. canvas_div.addEventListener('touchstart'  , function(e) { e.preventDefault(); user_draw(e.changedTouches[0]);},false);\
  183. canvas_div.addEventListener('touchmove'  , function(e) { e.preventDefault(); user_drag(e.changedTouches[0]);},false);\
  184. canvas_div.addEventListener('touchend'  , function(e) { e.preventDefault(); user_drawstop(e.changedTouches[0]);},false);\
  185. var user_is_dragging = false;\
  186. var user_drawstop = function(evt){\
  187.  if(!user_is_dragging){user_drag(evt);return;};\
  188.  if(user_is_dragging){user_draw(evt);return;};\
  189. };\
  190. };");
  191.  
  192. /* add all stuff needed ti draw the selected primitives... */
  193. int u;
  194.  for(u=0; u < MAX_MULTI_PRIMITIVES ; u++ ){
  195.   i = user_nums[u];
  196.   /*
  197.   u = index of technical draw primitive
  198.   i = index of user defined draw primitive
  199.   */
  200.   switch( draw_nums[u] ){
  201.   /* point/points */
  202.   case -1 : break;
  203.   case 0 ... 1:
  204.   fprintf(js_include_file,"function points(x,y,event_which,num){\
  205.   if(event_which == 1){ return; };\
  206.   var xy = multi_snap_check(x,y,points_snap);\
  207.   if( num == 0 ){\
  208.    points_x[0] = xy[0];\
  209.    points_y[0] = xy[1];\
  210.   }else{\
  211.    points_x.push(xy[0]);\
  212.    points_y.push(xy[1]);\
  213.   };\
  214.   draw_points();\
  215.  };\
  216.  function draw_points(){\
  217.   var radius = 2*(context_points.lineWidth);\
  218.   context_points.clearRect(0,0,xsize,ysize);\
  219.   for(var p = 0 ; p < points_x.length ; p++ ){\
  220.    context_points.beginPath();\
  221.    context_points.arc(points_x[p],points_y[p],radius,0,2*Math.PI,false);\
  222.    context_points.closePath();\
  223.    context_points.fill();\
  224.   };\
  225.  };\
  226.  var canvas_points = create_canvas%d(100%d,xsize,ysize);var context_points = canvas_points.getContext(\"2d\");\
  227.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  228.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  229.  context_points.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  230.  context_points.fillStyle = context_points.strokeStyle;\
  231.  context_points.lineWidth = multilinewidth[%d];if(multilinewidth[%d] %%2 == 1){ context_points.translate(0.5,0.5);};\
  232.  var points_x = new Array();var points_y = new Array();\
  233.  var points_snap = multisnaptogrid[%d];",canvas_root_id,i,i,i,i,i,i,i,i,i,i,i,i);
  234.   if( no_controls != 1){
  235.    fprintf(js_include_file,"\
  236.   inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  237.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td>(<input type='text' size='5' value='' id='input_points_x' />:<input type='text' size='5' value='' id='input_points_y' />)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_points_x,input_points_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  238.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  239.   }
  240.   else
  241.   {
  242.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  243.   }
  244.   break;
  245.  
  246.  
  247.   /* circle/circles */
  248.   case 2 ... 3 :
  249.   fprintf(js_include_file,"function circles(x,y,event_which,num){\
  250.   var xy = multi_snap_check(x,y,circles_snap);\
  251.   var last = circles_x.length - 1;\
  252.   var xc = circles_x[last];\
  253.   var yc = circles_y[last];\
  254.   if(event_which == 0){\
  255.    if( multidraw_object_cnt == 0 ){\
  256.     if( num  == 0 ){\
  257.       circles_x[0]=xy[0];circles_y[0]=xy[1];multi_radius[0]=4;\
  258.     }\
  259.     else\
  260.     {\
  261.       circles_x.push(xy[0]);circles_y.push(xy[1]);multi_radius.push(4);\
  262.     };\
  263.    };\
  264.    multidraw_object_cnt++;\
  265.   }\
  266.   else\
  267.   {\
  268.    if( multidraw_object_cnt == 1 ){\
  269.     multi_radius[last] = parseInt(Math.sqrt( (xy[0] - xc)*(xy[0] - xc) + (xy[1] - yc)*(xy[1] - yc) ));\
  270.    };\
  271.   };\
  272.   if( multidraw_object_cnt == 2 ){\
  273.    multidraw_object_cnt = 0;\
  274.    if( num == 0 ){\
  275.     circles_x = [];circles_y = [];\
  276.     circles_x[0] = xc;circles_y[0] = yc;\
  277.    };\
  278.   };\
  279.   draw_circles();\
  280.  };function draw_circles(){\
  281.   context_circles.clearRect(0,0,xsize,ysize);\
  282.   for(var p = 0 ; p < circles_x.length ; p++ ){\
  283.    context_circles.beginPath();\
  284.    context_circles.arc(circles_x[p],circles_y[p],multi_radius[p],0,2*Math.PI,false);\
  285.    context_circles.closePath();\
  286.    context_circles.fill();\
  287.    context_circles.stroke();\
  288.   };\
  289.   return;\
  290.  };var canvas_circles = create_canvas%d(100%d,xsize,ysize);var context_circles = canvas_circles.getContext(\"2d\");\
  291.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  292.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  293.  context_circles.lineWidth = multilinewidth[%d];\
  294.  if(multilinewidth[%d]%%2 == 1){ context_circles.translate(0.5,0.5);};\
  295.  context_circles.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  296.  if(multifill[%d] != 0 ){var my_fill_color=\"rgba(\"+multifillcolors[%d]+\",\"+multifillopacity[%d]+\")\";if( multifill[%d] > 1 ){context_circles.fillStyle = create_Pattern(0,0,parseInt(multifill[%d]),my_fill_color);}else{context_circles.fillStyle = my_fill_color;};}else{context_circles.fillStyle = \"rgba( 255,255,255,0)\";};\
  297.  if(multidash[%d] == 1 ){ if( context_circles.setLineDash ){context_circles.setLineDash([2,4]);}else{if(context_circles.mozDash){context_circles.mozDash = [2,4]};};};\
  298.  var circles_x = new Array();var circles_y = new Array();var multi_radius = new Array();\
  299.  var circles_snap = multisnaptogrid[%d];",canvas_root_id,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i);
  300.  
  301.   if(no_controls != 1 ){  /* for BPR...*/
  302.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  303.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td>M:(<input type='text' size='3' value='' id='input_circles_x' /> : <input type='text' size='3' value='' id='input_circles_y'/>) R:<input type='text' size='3' value='' id='input_circles_r'/></td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_circles_x,input_circles_y,input_circles_r);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  304.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  305.   }
  306.   else
  307.   {
  308.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  309.   }
  310.   break;
  311.   /* line/lines */
  312.   case 4 ... 5 :
  313.   fprintf(js_include_file,"function calc_lines(){\
  314.   var marge = 2;var len = lines_x.length;\
  315.   var tmp_x = new Array(len);\
  316.   var tmp_y = new Array(len);\
  317.   var pp;\
  318.   for(var p = 0 ; p < len ; p = p+2){\
  319.    pp = p+1;\
  320.    if(lines_x[p] < lines_x[pp]+marge && lines_x[p] > lines_x[pp]-marge){\
  321.     tmp_x[p] = lines_x[p];tmp_x[pp] = lines_x[pp];\
  322.     tmp_y[p] = 0;tmp_y[pp] = ysize;\
  323.    }\
  324.    else\
  325.    {\
  326.     if(lines_y[p] < lines_y[pp]+marge && lines_y[p] > lines_y[pp]-marge){\
  327.      tmp_x[p] = 0;tmp_x[pp] = xsize;\
  328.      tmp_y[p] = lines_y[p];tmp_y[pp] = lines_y[pp];\
  329.     }\
  330.     else\
  331.     {\
  332.      tmp_x[p] = 0;tmp_x[pp] = xsize;\
  333.      tmp_y[p] = lines_y[p] - (lines_x[p])*(lines_y[pp] - lines_y[p])/(lines_x[pp] - lines_x[p]);\
  334.      tmp_y[pp] = lines_y[p] + (xsize - lines_x[p])*(lines_y[pp] - lines_y[p])/(lines_x[pp] - lines_x[p]);\
  335.     };\
  336.    };\
  337.   };\
  338.   return {x:tmp_x,y:tmp_y};\
  339.  };function lines(x,y,event_which,num){\
  340.   var xy = multi_snap_check(x,y,lines_snap);\
  341.   if(event_which == 0){\
  342.    if( num == 0 && multidraw_object_cnt == 0 ){lines_x = [];lines_y = [];};\
  343.    lines_x.push(xy[0]);lines_y.push(xy[1]);\
  344.    multidraw_object_cnt++;\
  345.   }\
  346.   else\
  347.   {\
  348.    if( multidraw_object_cnt == 1 ){\
  349.     lines_x.push(xy[0]);lines_y.push(xy[1]);\
  350.     draw_lines();\
  351.     lines_x.pop();lines_y.pop();\
  352.    };\
  353.   };\
  354.   if( multidraw_object_cnt == 2 ){\
  355.    multidraw_object_cnt = 0;\
  356.    draw_lines();\
  357.   };\
  358.  };function draw_lines(){\
  359.   var len = lines_x.length;\
  360.   if( len %%2 == 0 ){\
  361.    var xy = calc_lines();\
  362.    context_lines.clearRect(0,0,xsize,ysize);\
  363.    for(var p = 0 ; p < len ; p = p+2 ){\
  364.     context_lines.beginPath();\
  365.     context_lines.moveTo(xy.x[p],xy.y[p]);\
  366.     context_lines.lineTo(xy.x[p+1],xy.y[p+1]);\
  367.     context_lines.closePath();\
  368.     context_lines.stroke();\
  369.    };\
  370.   };\
  371.   return;\
  372.  };var canvas_lines = create_canvas%d(100%d,xsize,ysize);var context_lines = canvas_lines.getContext(\"2d\");\
  373.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  374.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  375.  context_lines.lineWidth = multilinewidth[%d];if(multilinewidth[%d]%%2 == 1){ context_lines.translate(0.5,0.5);};\
  376.  context_lines.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  377.  if(multidash[%d] == 1 ){ if( context_lines.setLineDash ){context_lines.setLineDash([2,4]);}else{\
  378.  if(context_lines.mozDash){context_lines.mozDash = [2,4]};};};\
  379.  var lines_x = new Array();var lines_y = new Array();var lines_snap = multisnaptogrid[%d];",canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i);
  380.  
  381.   if( no_controls != 1 ){  /* for BPR...*/
  382.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  383.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td>(<input type='text' size='5' value='x1 : y1' id='input_lines_x' style='text-align:center;'/>) --- ( <input type='text' size='5' value='x2 : y2' id='input_lines_y' style='text-align:center;' /> )</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_lines_x,input_lines_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  384.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  385.   }
  386.   else
  387.   {
  388.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  389.   }
  390.   break;
  391.   /* segment/segments */
  392.   case 6 ... 7 :
  393.   fprintf(js_include_file,"function segments(x,y,event_which,num){\
  394.   var xy = multi_snap_check(x,y,segments_snap);\
  395.   if(event_which == 0){\
  396.    if( num == 0 && multidraw_object_cnt == 0 ){segments_x = [];segments_y = [];};\
  397.    segments_x.push(xy[0]);segments_y.push(xy[1]);\
  398.    multidraw_object_cnt++;\
  399.   }\
  400.   else\
  401.   {\
  402.    if( multidraw_object_cnt == 1 ){\
  403.     segments_x.push(xy[0]);segments_y.push(xy[1]);\
  404.     draw_segments();\
  405.     segments_x.pop();segments_y.pop();\
  406.    };\
  407.   };\
  408.   if( multidraw_object_cnt == 2 ){\
  409.    multidraw_object_cnt = 0;\
  410.    draw_segments();\
  411.   };\
  412.  };function draw_segments(){\
  413.   var len = segments_x.length;\
  414.   if( len%%2 == 0 ){\
  415.    context_segments.clearRect(0,0,xsize,ysize);\
  416.    for(var p = 0 ; p < len ; p = p+2 ){\
  417.     context_segments.beginPath();\
  418.     context_segments.moveTo(segments_x[p],segments_y[p]);\
  419.     context_segments.lineTo(segments_x[p+1],segments_y[p+1]);\
  420.     context_segments.closePath();\
  421.     context_segments.stroke();\
  422.    };\
  423.   };\
  424.   return;\
  425.  };var canvas_segments = create_canvas%d(100%d,xsize,ysize);var context_segments = canvas_segments.getContext(\"2d\");\
  426.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  427.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  428.  context_segments.lineWidth = multilinewidth[%d];\
  429.  if(multilinewidth[%d]%%2 == 1){ context_segments.translate(0.5,0.5);};\
  430.  context_segments.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  431.  if(multidash[%d] == 1 ){ if( context_segments.setLineDash ){context_segments.setLineDash([2,4]);}\
  432.  else{if(context_segments.mozDash){context_segments.mozDash = [2,4]};};};\
  433.  var segments_x = new Array();var segments_y = new Array();var segments_snap = multisnaptogrid[%d];",
  434.   canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i);
  435.  
  436.   if( no_controls != 1 ){  /* for BPR...*/
  437.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  438.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td>(<input type='text' size='5' value='x1 : y1' id='input_segments_x' style='text-align:center;' />) --- ( <input type='text' size='5' value='x2 : y2' id='input_segments_y' style='text-align:center;'/>)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_segments_x,input_segments_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  439.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  440.   }
  441.   else
  442.   {
  443.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  444.   }
  445.   break;
  446.   /* arrow/arrows */
  447.   case 8 ... 9 :
  448.   fprintf(js_include_file,"function arrows(x,y,event_which,num){\
  449.   var xy = multi_snap_check(x,y,arrows_snap);\
  450.   if(event_which == 0){\
  451.    if( num == 0 && multidraw_object_cnt == 0 ){arrows_x = [];arrows_y = [];};\
  452.    arrows_x.push(xy[0]);arrows_y.push(xy[1]);\
  453.    multidraw_object_cnt++;\
  454.   }\
  455.   else\
  456.   {\
  457.    if( multidraw_object_cnt == 1 ){\
  458.     arrows_x.push(xy[0]);arrows_y.push(xy[1]);\
  459.     draw_arrows();\
  460.     arrows_x.pop();arrows_y.pop();\
  461.    };\
  462.   };\
  463.   if( multidraw_object_cnt == 2 ){\
  464.    multidraw_object_cnt = 0;\
  465.    draw_arrows();\
  466.   };\
  467.  };function draw_arrows(){\
  468.   var len = arrows_x.length;\
  469.   var x1,y1,x2,y2,dx,dy,h;\
  470.   if( len%%2 == 0 ){\
  471.    context_arrows.clearRect(0,0,xsize,ysize);\
  472.    for(var p = 0 ; p < len ; p = p+2 ){\
  473.     x1 = arrows_x[p];y1 = arrows_y[p];x2 = arrows_x[p+1];y2 = arrows_y[p+1];dx = x2 - x1;dy = y2 - y1;\
  474.     h = Math.sqrt(dx*dx+dy*dy);\
  475.     context_arrows.save();\
  476.     context_arrows.setLineDash([]);\
  477.     context_arrows.translate(x2,y2);\
  478.     context_arrows.rotate(Math.atan2(dy,dx));\
  479.     context_arrows.beginPath();\
  480.     context_arrows.moveTo(0,0);\
  481.     context_arrows.lineTo(-1*arrow_head,-0.5*arrow_head);\
  482.     context_arrows.lineTo(-1*arrow_head, 0.5*arrow_head);\
  483.     context_arrows.closePath();\
  484.     context_arrows.fill();\
  485.     context_arrows.stroke();\
  486.     context_arrows.restore();\
  487.     context_arrows.beginPath();\
  488.     context_arrows.moveTo(x1,y1);\
  489.     context_arrows.lineTo(x2,y2);\
  490.     context_arrows.closePath();\
  491.     context_arrows.stroke();\
  492.    };\
  493.   };\
  494.   return;\
  495.  };var canvas_arrows = create_canvas%d(100%d,xsize,ysize);var context_arrows =  canvas_arrows.getContext(\"2d\");\
  496.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  497.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  498.  if(multidash[%d] == 1 ){ if( context_arrows.setLineDash ){context_arrows.setLineDash([2,4]);}else{if(context_arrows.mozDash){context_arrows.mozDash = [2,4]};};};\
  499.  context_arrows.lineWidth = multilinewidth[%d];if(multilinewidth[%d]%%2 == 1){ context_arrows.translate(0.5,0.5);};\
  500.  context_arrows.lineCap = \"round\";\
  501.  context_arrows.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  502.  context_arrows.fillStyle = context_arrows.strokeStyle;\
  503.  var arrows_x = new Array();var arrows_y = new Array();var arrows_snap = multisnaptogrid[%d];",
  504.   canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i);
  505.  
  506.   if( no_controls != 1 ){  /* for BPR...*/
  507.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  508.   if( multiuserinput[%d] == 1){inner_html+=\"<td>(<input type='text' size='5' value='x1 : y1' id='input_arrows_x' style='text-align:center;' /><b>) --- (</b> <input type='text' size='5' value='x2 : y2' id='input_arrows_y' style=';text-align:center;' />)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_arrows_x,input_arrows_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  509.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  510.   }
  511.   else
  512.   {
  513.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  514.   }
  515.   break;
  516.  
  517.   /* triangle/triangles */
  518.   case 10 ... 11:
  519.   fprintf(js_include_file,"function triangles(x,y,event_which,num){\
  520.   var xy = multi_snap_check(x,y,triangles_snap);\
  521.   var last = triangles_x.length - 1;\
  522.   if(event_which == 0){\
  523.    if(num == 0 && multidraw_object_cnt == 0){\
  524.     triangles_x = [];triangles_y = [];\
  525.     triangles_x[0] = xy[0];triangles_y[0] = xy[1];\
  526.    }\
  527.    else\
  528.    {\
  529.     triangles_x.push(xy[0]);triangles_y.push(xy[1]);\
  530.    };\
  531.    multidraw_object_cnt++;\
  532.   }\
  533.   else\
  534.   {\
  535.    if( multidraw_object_cnt < 3 ){\
  536.     triangles_x.push(xy[0]);triangles_y.push(xy[1]);\
  537.     draw_triangles();\
  538.     triangles_x.pop();triangles_y.pop();\
  539.    };\
  540.   };\
  541.   if( multidraw_object_cnt == 3 ){\
  542.    triangles_x.pop();triangles_y.pop();\
  543.    triangles_x.push(xy[0]);triangles_y.push(xy[1]);\
  544.    multidraw_object_cnt = 0;\
  545.    draw_triangles();\
  546.   };\
  547.  };function draw_triangles(){\
  548.   var len = triangles_x.length - 1;\
  549.   context_triangles.clearRect(0,0,xsize,ysize);\
  550.   for(var p = 0 ; p < len ; p = p+3){\
  551.    context_triangles.beginPath();\
  552.    context_triangles.moveTo(triangles_x[p],triangles_y[p]);\
  553.    for( var m = p+1 ;m < p+3 ; m++){\
  554.     context_triangles.lineTo(triangles_x[m],triangles_y[m]);\
  555.    };\
  556.    context_triangles.lineTo(triangles_x[p],triangles_y[p]);\
  557.    context_triangles.closePath();\
  558.    context_triangles.fill();\
  559.    context_triangles.stroke();\
  560.   };\
  561.   return;\
  562.  };var canvas_triangles = create_canvas%d(10%d,xsize,ysize);var context_triangles = canvas_triangles.getContext(\"2d\");\
  563.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2);};\
  564.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  565.  context_triangles.lineCap = \"round\";context_triangles.lineWidth = multilinewidth[%d];\
  566.  if(multilinewidth[%d]%%2 == 1){ context_triangles.translate(0.5,0.5);};\
  567.  context_triangles.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  568.  if(multifill[%d] != 0 ){var my_fill_color=\"rgba(\"+multifillcolors[%d]+\",\"+multifillopacity[%d]+\")\";if( multifill[%d] > 1 ){context_triangles.fillStyle = create_Pattern(0,0,parseInt(multifill[%d]),my_fill_color);}else{context_triangles.fillStyle = my_fill_color;};}else{context_triangles.fillStyle = \"rgba( 255,255,255,0)\";};\
  569.  if(multidash[%d] == 1 ){ if( context_triangles.setLineDash ){\
  570.  context_triangles.setLineDash([2,4]);}else{if(context_triangles.mozDash){context_triangles.mozDash = [2,4]};};};\
  571.  var triangles_x = new Array();var triangles_y = new Array();var triangles_snap = multisnaptogrid[%d];",
  572.   canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i);
  573.  
  574.   if(no_controls != 1 ){  /* for BPR...*/
  575.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  576.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td><b>(<input type='text' size='5' value='x1 : y1' id='input_triangles_x' />) -- (<input type='text' size='5' value='x2 : y2' id='input_triangles_y' />) -- (<input type='text' size='5' value='x3 : y3' id='input_triangles_r' />)</b></td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_triangles_x,input_triangles_y,input_triangles_r);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  577.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  578.   }
  579.   else
  580.   {
  581.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  582.   }
  583.   break;
  584.   /* closedpoly */
  585.   case 12 :
  586.   fprintf(js_include_file,"function check_closed(x1,y1,X,Y){\
  587.   var marge=10;\
  588.   var len = X.length-1;\
  589.   for(var p = 0 ; p < len ; p++){\
  590.    if(x1 < X[p] + marge && x1 > X[p] - marge ){\
  591.     if(y1 < Y[p] + marge && y1 > Y[p] - marge ){\
  592.      return 1;\
  593.     };\
  594.    };\
  595.   };\
  596.   return 0;\
  597.  };function closedpoly(x,y,event_which,num){\
  598.   var xy = multi_snap_check(x,y,closedpoly_snap);\
  599.   if(event_which == 0){\
  600.    if(multidraw_object_cnt == 0){\
  601.     closedpoly_x = [];closedpoly_y = [];\
  602.     closedpoly_x[0] = xy[0];closedpoly_y[0] = xy[1];\
  603.    }\
  604.    else\
  605.    {\
  606.     closedpoly_x.push(xy[0]);closedpoly_y.push(xy[1]);\
  607.    };\
  608.    multidraw_object_cnt++;\
  609.    if( multidraw_object_cnt > 2 ){\
  610.     if( check_closed(x,y,closedpoly_x,closedpoly_y) == 1){\
  611.      draw_closedpoly();\
  612.      multidraw_object_cnt = 0;\
  613.     };\
  614.    };\
  615.   }\
  616.   else\
  617.   {\
  618.    if( multidraw_object_cnt > 0 ){\
  619.     closedpoly_x.push(xy[0]);closedpoly_y.push(xy[1]);\
  620.     draw_closedpoly();\
  621.     closedpoly_x.pop();closedpoly_y.pop();\
  622.    };\
  623.   };\
  624.  };function draw_closedpoly(){\
  625.   var len = closedpoly_x.length;\
  626.   context_closedpoly.clearRect(0,0,xsize,ysize);\
  627.   var p = 0;\
  628.   context_closedpoly.beginPath();\
  629.   context_closedpoly.moveTo(closedpoly_x[0],closedpoly_y[0]);\
  630.   for(var p = 1 ; p < len ; p++){\
  631.    context_closedpoly.lineTo(closedpoly_x[p],closedpoly_y[p]);\
  632.   };\
  633.   context_closedpoly.lineTo(closedpoly_x[0],closedpoly_y[0]);\
  634.   context_closedpoly.closePath();\
  635.   context_closedpoly.fill();\
  636.   context_closedpoly.stroke();\
  637.   return;\
  638.  };var canvas_closedpoly = create_canvas%d(10%d,xsize,ysize);\
  639.  var context_closedpoly =  canvas_closedpoly.getContext(\"2d\");\
  640.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  641.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  642.  context_closedpoly.lineCap = \"round\";context_closedpoly.lineWidth = multilinewidth[%d];\
  643.  if(multilinewidth[%d]%%2 == 1){ context_closedpoly.translate(0.5,0.5);};context_closedpoly.lineCap = \"round\";\
  644.  context_closedpoly.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  645.  if(multifill[%d] != 0 ){var my_fill_color=\"rgba(\"+multifillcolors[%d]+\",\"+multifillopacity[%d]+\")\";if( multifill[%d] > 1 ){context_closedpoly.fillStyle = create_Pattern(0,0,parseInt(multifill[%d]),my_fill_color);}else{context_closedpoly.fillStyle = my_fill_color;};}else{context_closedpoly.fillStyle = \"rgba( 255,255,255,0)\";};\
  646.  if(multidash[%d] == 1 ){ if( context_closedpoly.setLineDash ){context_closedpoly.setLineDash([2,4]);}else{\
  647.  if(context_closedpoly.mozDash){context_closedpoly.mozDash = [2,4]};};};\
  648.  var closedpoly_x = new Array();var closedpoly_y = new Array();\
  649.  var closedpoly_snap = multisnaptogrid[%d];",
  650.   canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i);
  651.  
  652.   if( no_controls != 1 ){  /* for BPR...*/
  653.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  654.   if( multiuserinput[%d] == 1){inner_html+=\"<td>(<input type='text' size='5' value='x1:x2:x3:...' id='input_closedpoly_x' style='text-align:center;' /><b>) --- (</b> <input type='text' size='5' value='y1:y2:y3:...' id='input_closedpoly_y' style='text-align:center;'/>)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_closedpoly_x,input_closedpoly_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  655.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  656.   }
  657.   else
  658.   {
  659.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  660.   }
  661.   break;
  662.   /* text : always uses user input field !! */
  663.   case 13:
  664.   fprintf(js_include_file,"function text(x,y,event_which,num){\
  665.   if(event_which == 1){ return; };\
  666.   var xy = multi_snap_check(x,y,text_snap);\
  667.   if( num == 0 ){\
  668.    text_x[0] = xy[0];\
  669.    text_y[0] =xy[1];\
  670.   }else{\
  671.    text_x.push(xy[0]);\
  672.    text_y.push(xy[1]);\
  673.   };\
  674.   draw_text();\
  675.  };function conv_to_unicode(str){\
  676.   return str.replace(/\\u[\\dA-F]{4}/gi,function(match){\
  677.   return String.fromCharCode(parseInt(match.replace(/\\u/g,''), 16));});\
  678.  };function draw_text(){\
  679.   var half = 0;\
  680.   var height = 0.3 * (context_text.measureText('M').width);\
  681.   context_text.clearRect(0,0,xsize,ysize);\
  682.   for(var p = 0 ; p < text_x.length ; p++ ){\
  683.    if( typeof(text_abc[p]) === 'undefined'){\
  684.     var txt = conv_to_unicode(document.getElementById('input_text_r').value);\
  685.     text_abc.push(txt);\
  686.    };\
  687.    half = 0.5*( context_text.measureText(text_abc[p]).width );\
  688.    context_text.fillText(text_abc[p],text_x[p] - half,text_y[p] + height);\
  689.   };\
  690.  };var canvas_text = create_canvas%d(10%d,xsize,ysize);\
  691.  var context_text = canvas_text.getContext(\"2d\");\
  692.  context_text.font = multifont_family;\
  693.  context_text.fillStyle = \"rgba(\"+multifont_color+\",\"+multistrokeopacity[%d]+\")\";\
  694.  var text_snap = multisnaptogrid[%d];\
  695.  var text_x = new Array();var text_y = new Array(); var text_abc = new Array();",canvas_root_id,u,i,i);
  696.  
  697.   if( no_controls != 1 ){  /* for BPR...*/
  698.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt=0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td><td><input type='text' size='6' value='' id='input_text_r' />\";if( multiuserinput[%d] == 1){inner_html+=\"(<input type='text' size='2' value='x' id='input_text_x' style='text-align:center;' />:<input type='text' size='2' value='y' id='input_text_y' style='text-align:center;'/>)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_text_x,input_text_y,input_text_r);' value='OK' /></td>\";}else{inner_html+=\"</td>\";};",u,i,canvas_root_id,u,i,canvas_root_id,u);
  699.   }
  700.   else
  701.   {
  702.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  703.   }
  704.   fprintf(js_include_file,"inner_html+=\"</tr>\";");
  705.   break;
  706.   /* rect/rects */
  707.   case 14 ... 15 :
  708.   fprintf(js_include_file,"function rects(x,y,event_which,num){\
  709.   var xy = multi_snap_check(x,y,rects_snap);\
  710.   if(event_which == 0){\
  711.    if( num == 0 && multidraw_object_cnt == 0 ){rects_x = [];rects_y = [];};\
  712.    rects_x.push(xy[0]);rects_y.push(xy[1]);\
  713.    multidraw_object_cnt++;\
  714.   }\
  715.   else\
  716.   {\
  717.    if( multidraw_object_cnt == 1 ){\
  718.     rects_x.push(xy[0]);rects_y.push(xy[1]);\
  719.     draw_rects();\
  720.     rects_x.pop();rects_y.pop();\
  721.    };\
  722.   };\
  723.   if( multidraw_object_cnt == 2 ){\
  724.    multidraw_object_cnt = 0;\
  725.    draw_rects();\
  726.   };\
  727.  };function draw_rects(){\
  728.   var len = rects_x.length;\
  729.   if( len %%2 == 0 ){\
  730.    context_rects.clearRect(0,0,xsize,ysize);\
  731.    for(var p = 0 ; p < len ; p = p+2 ){\
  732.     context_rects.beginPath();\
  733.     context_rects.rect(rects_x[p],rects_y[p],rects_x[p+1]-rects_x[p],rects_y[p+1]-rects_y[p]);\
  734.     context_rects.closePath();\
  735.     context_rects.fill();\
  736.     context_rects.stroke();\
  737.    };\
  738.   };\
  739.   return;\
  740.  };var canvas_rects = create_canvas%d(10%d,xsize,ysize);var context_rects = canvas_rects.getContext(\"2d\");\
  741.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  742.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  743.  context_rects.lineWidth = multilinewidth[%d];if(multilinewidth[%d]%%2 == 1){ context_rects.translate(0.5,0.5);};\
  744.  context_rects.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  745.  if(multidash[%d] == 1 ){ if( context_rects.setlineDash ){context_rects.setlineDash([2,4]);}else{\
  746.  if(context_rects.mozDash){context_rects.mozDash = [2,4]};};};\
  747.  if(multifill[%d] != 0 ){var my_fill_color=\"rgba(\"+multifillcolors[%d]+\",\"+multifillopacity[%d]+\")\";if( multifill[%d] > 1 ){context_rects.fillStyle = create_Pattern(0,0,parseInt(multifill[%d]),my_fill_color);}else{context_rects.fillStyle = my_fill_color;};}else{context_rects.fillStyle = \"rgba( 255,255,255,0)\";};\
  748.  var rects_x = new Array();var rects_y = new Array();var rects_snap = multisnaptogrid[%d];",
  749.   canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i);
  750.  
  751.   if( no_controls != 1 ){
  752.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  753.   if( multiuserinput[%d] == 1){inner_html+=\"<td>(<input type='text' size='5' value='x1 : y1' id='input_rects_x' style='text-align:center;' />) --- (<input type='text' size='5' value='x2 : y2' id='input_rects_y' style='text-align:center;' />)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_rects_x,input_rects_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  754.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  755.   }
  756.   else
  757.   {
  758.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  759.   }
  760.   break;
  761.   /* poly/polys */
  762.   case 16 ... 17 :
  763.   fprintf(js_include_file,"var polynum = %d;function polys(x,y,event_which,num){\
  764.   var last = polys_x.length - 1;\
  765.   var xy = multi_snap_check(x,y,polys_snap);\
  766.   if(event_which == 0){\
  767.    if(num == 0 && multidraw_object_cnt == 0){\
  768.     polys_x = [];polys_y = [];\
  769.     polys_x[0] = xy[0];polys_y[0] = xy[1];\
  770.    }\
  771.    else\
  772.    {\
  773.     polys_x.push(xy[0]);polys_y.push(xy[1]);\
  774.    };\
  775.    multidraw_object_cnt++;\
  776.   }\
  777.   else\
  778.   {\
  779.    if( multidraw_object_cnt < polynum ){\
  780.     polys_x.push(xy[0]);polys_y.push(xy[1]);\
  781.     draw_polys();\
  782.     polys_x.pop();polys_y.pop();\
  783.    };\
  784.   };\
  785.   if( multidraw_object_cnt == polynum ){\
  786.    polys_x.pop();polys_y.pop();\
  787.    polys_x.push(xy[0]);polys_y.push(xy[1]);\
  788.    multidraw_object_cnt = 0;\
  789.    draw_polys();\
  790.   };\
  791.  };function draw_polys(){\
  792.   var len = polys_x.length - 1;\
  793.   context_polys.clearRect(0,0,xsize,ysize);\
  794.   for(var p = 0 ; p < len ; p = p+polynum){\
  795.    context_polys.beginPath();\
  796.    context_polys.moveTo(polys_x[p],polys_y[p]);\
  797.    for( var m = p+1 ;m < p+polynum ; m++){\
  798.     context_polys.lineTo(polys_x[m],polys_y[m]);\
  799.    };\
  800.    context_polys.lineTo(polys_x[p],polys_y[p]);\
  801.    context_polys.closePath();\
  802.    context_polys.fill();\
  803.    context_polys.stroke();\
  804.   };\
  805.   return;\
  806.  };var canvas_polys = create_canvas%d(10%d,xsize,ysize);var context_polys = canvas_polys.getContext(\"2d\");\
  807.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  808.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  809.  context_polys.lineCap = \"round\";context_polys.lineWidth = multilinewidth[%d];\
  810.  if(multilinewidth[%d]%%2 == 1){ context_polys.translate(0.5,0.5);};\
  811.  context_polys.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  812.  if(multifill[%d] != 0 ){var my_fill_color=\"rgba(\"+multifillcolors[%d]+\",\"+multifillopacity[%d]+\")\";if( multifill[%d] > 1 ){context_polys.fillStyle = create_Pattern(0,0,parseInt(multifill[%d]),my_fill_color);}else{context_polys.fillStyle = my_fill_color;};}else{context_polys.fillStyle = \"rgba( 255,255,255,0)\";};\
  813.  if(multidash[%d] == 1 ){ if( context_polys.setLineDash ){context_polys.setLineDash([2,4]);}\
  814.  else{if(context_polys.mozDash){context_polys.mozDash = [2,4]};};};\
  815.  var polys_x = new Array();var polys_y = new Array();\
  816.  var polys_snap = multisnaptogrid[%d];",
  817.   polynum,canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i);
  818.  
  819.   if( no_controls != 1 ){
  820.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  821.   if(multiuserinput[%d] == 1 ){inner_html+=\"<td>(<input type='text' size='8' value='x1,x2...x_n' id='input_polys_x' /> ---- <input type='text' size='8' value='y1,y2...y_n' id='input_polys_y' />)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_rects_x,input_rects_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  822.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  823.   }
  824.   else
  825.   {
  826.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  827.   }
  828.   break;
  829.   /* parallelogram/parallelograms */
  830.   case 18 ... 19:
  831.   fprintf(js_include_file,"function parallelogram(x,y,event_which,num){\
  832.   var l2 = parallelogram_x.length;\
  833.   var l1 = l2 - 1;var l0 = l2 - 2;\
  834.   var xy = multi_snap_check(x,y,parallelogram_snap);\
  835.   if(event_which == 0){\
  836.    if(multidraw_object_cnt == 0){\
  837.     if(num == 0){parallelogram_x = [];parallelogram_y = [];};\
  838.     parallelogram_x.push(xy[0]);parallelogram_y.push(xy[1]);\
  839.    }\
  840.    else\
  841.    {\
  842.     parallelogram_x.push(xy[0]);parallelogram_y.push(xy[1]);\
  843.     if(multidraw_object_cnt == 2){\
  844.      var xy = multi_snap_check(parallelogram_x[l2] - parallelogram_x[l1] + parallelogram_x[l0],parallelogram_y[l2] - parallelogram_y[l1] + parallelogram_y[l0],parallelogram_snap);\
  845.      parallelogram_x.push(xy[0]);\
  846.      parallelogram_y.push(xy[1]);\
  847.     };\
  848.    };\
  849.    multidraw_object_cnt++;\
  850.   }\
  851.   else\
  852.   {\
  853.    if(multidraw_object_cnt == 1){\
  854.     var xxyy = multi_snap_check(parallelogram_x[l1],parallelogram_y[l1],parallelogram_snap);\
  855.     parallelogram_x.push(xxyy[0]);\
  856.     parallelogram_y.push(xxyy[1]);\
  857.     parallelogram_x.push(xy[0]);\
  858.     parallelogram_y.push(xy[1]);\
  859.     draw_parallelogram();\
  860.     parallelogram_x.pop();parallelogram_y.pop();\
  861.     parallelogram_x.pop();parallelogram_y.pop();\
  862.    }\
  863.    else\
  864.    {\
  865.     if(multidraw_object_cnt == 2){\
  866.      var xxyy = multi_snap_check(parallelogram_x[l2]-parallelogram_x[l1] + parallelogram_x[l0],parallelogram_y[l2]-parallelogram_y[l1] + parallelogram_y[l0],parallelogram_snap);\
  867.      parallelogram_x.push(xy[0]);parallelogram_y.push(xy[1]);\
  868.      parallelogram_x.push(xxyy[0]);\
  869.      parallelogram_y.push(xxyy[1]);\
  870.      draw_parallelogram();\
  871.      parallelogram_x.pop();parallelogram_y.pop();\
  872.      parallelogram_x.pop();parallelogram_y.pop();\
  873.     };\
  874.    };\
  875.   };\
  876.   if( multidraw_object_cnt == 3 ){\
  877.    parallelogram_x.pop();parallelogram_y.pop();\
  878.    var xxyy = multi_snap_check(parallelogram_x[l2]-parallelogram_x[l1] + parallelogram_x[l0],parallelogram_y[l2]-parallelogram_y[l1] + parallelogram_y[l0],parallelogram_snap);\
  879.    parallelogram_x.push(xxyy[0]);\
  880.    parallelogram_y.push(xxyy[1]);\
  881.    parallelogram_x.push(xy[0]);parallelogram_y.push(xy[1]);\
  882.    parallelogram_x.pop();parallelogram_y.pop();\
  883.    multidraw_object_cnt = 0;\
  884.    draw_parallelogram();\
  885.   };\
  886.  };function draw_parallelogram(){\
  887.   var len = parallelogram_x.length-1;\
  888.   context_parallelogram.clearRect(0,0,xsize,ysize);\
  889.   for(var p = 0 ; p < len ; p = p+4){\
  890.    context_parallelogram.beginPath();\
  891.    context_parallelogram.moveTo(parallelogram_x[p],parallelogram_y[p]);\
  892.    for( var m = p+1 ;m < p+4 ; m++){\
  893.     context_parallelogram.lineTo(parallelogram_x[m],parallelogram_y[m]);\
  894.    };\
  895.    context_parallelogram.lineTo(parallelogram_x[p],parallelogram_y[p]);\
  896.    context_parallelogram.closePath();\
  897.    context_parallelogram.fill();\
  898.    context_parallelogram.stroke();\
  899.   };\
  900.   return;\
  901.  };var canvas_parallelogram = create_canvas%d(10%d,xsize,ysize);var context_parallelogram = canvas_parallelogram.getContext(\"2d\");\
  902.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2);};\
  903.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2);};\
  904.  context_parallelogram.lineCap = \"round\";context_parallelogram.lineWidth = multilinewidth[%d];\
  905.  if(multilinewidth[%d]%%2 == 1){ context_parallelogram.translate(0.5,0.5);};\
  906.  context_parallelogram.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  907.  if(multifill[%d] != 0 ){var my_fill_color=\"rgba(\"+multifillcolors[%d]+\",\"+multifillopacity[%d]+\")\";if( multifill[%d] > 1 ){context_parallelogram.fillStyle = create_Pattern(0,0,parseInt(multifill[%d]),my_fill_color);}else{context_parallelogram.fillStyle = my_fill_color;};}else{context_parallelogram.fillStyle = \"rgba( 255,255,255,0)\";};\
  908.  if(multidash[%d] == 1 ){ if( context_parallelogram.setLineDash ){context_parallelogram.setLineDash([2,4]);}\
  909.  else{if(context_parallelogram.mozDash){context_parallelogram.mozDash = [2,4]};};};\
  910.  var parallelogram_x = new Array();var parallelogram_y = new Array();var parallelogram_snap = multisnaptogrid[%d];",
  911.   canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i,i);
  912.  
  913.   if( no_controls != 1 ){
  914.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt=0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  915.   if(multiuserinput[%d] == 1 ){inner_html+=\"<td>(<input type='text' size='8' value='x1,x2...x_n' id='input_parallelogram_x' /> --- <input type='text' size='8' value='y1,y2...y_n' id='input_parallelogram_y' />)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_parallelogram_x,input_parallelogram_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  916.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  917.   }
  918.   else
  919.   {
  920.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  921.   }
  922.   break;
  923.   /*
  924.   images : identical ! to userdraw images,bogus_color
  925.   15/1/2021 : corrected long standing flaw regarding "centered" on external stuff
  926.   tested: bitmap,svg,TeX [tested KaTeX]
  927.   */
  928.   case 20:
  929.   fprintf(js_include_file,"var current_id = null;var external_div_cnt=0;\
  930.  function image_adjust(image,x,y){\
  931.   var centered = %d;\
  932.   var w = parseInt(image.width);var h = parseInt(image.height);\
  933.   if(w == 0 || h == 0 ){\
  934.    w = parseInt(window.getComputedStyle(image).width);\
  935.    h = parseInt(window.getComputedStyle(image).height);\
  936.   };\
  937.   switch(centered){\
  938.    case 0: return [x,y];break;\
  939.    case 1: return [x,parseInt(y-0.5*h)];break;\
  940.    case 2: return [parseInt(x+0.5*h),y];break;\
  941.    case 3: return [parseInt(x+0.5*h),parseInt(y-0.5*h)];break;\
  942.    case 4: return [parseInt(x-0.5*w),parseInt(y-0.5*h)];break;\
  943.    default: return [x,y];break;\
  944.   };\
  945.  };\
  946.  place_image_on_canvas = function(id){\
  947.   var thing = document.getElementById(id);\
  948.   var tag = thing.tagName;\
  949.   if(tag == 'SVG'){draw_mathml_svg(thing,id);return;};\
  950.   if(tag == 'DIV' || tag == 'SPAN' || tag == 'P' || tag == 'TD' || tag == 'TH'){draw_mathml_div(thing,id);return;};\
  951.   var src = thing.src;\
  952.   var image = new Image();\
  953.   image.src = src;\
  954.   image.id = 'placed_'+id;\
  955.   image.width = thing.width;\
  956.   image.height = thing.height;\
  957.   image.onload = function(){ current_id = id; };\
  958.   return;\
  959.  };\
  960.  function draw_mathml_div(thing,id){\
  961.   var fix_div = document.createElement('DIV');\
  962.   var new_id='placed_'+external_div_cnt+'_'+id;\
  963.   fix_div.setAttribute('id',new_id);\
  964.   var w = parseInt(thing.clientWidth);\
  965.   var h = parseInt(thing.clientHeight);\
  966.   fix_div.innerHTML = thing.innerHTML;\
  967.   fix_div.setAttribute('style','display:none;position;absolute;width:'+w+'px;height:'+h+'px');\
  968.   fix_div.width = w;fix_div.height = h;\
  969.   canvas_div.appendChild(fix_div);\
  970.   current_id = new_id;\
  971.   external_div_cnt++;\
  972.   return;\
  973.  };\
  974.  function draw_mathml_svg(thing,id){\
  975.   var fix_div = document.createElement('DIV');\
  976.   fix_div.setAttribute('style','display:none;position;relative');\
  977.   canvas_div.appendChild(fix_div);\
  978.   var image = new Image();\
  979.   var svg_string = new XMLSerializer().serializeToString(thing);\
  980.   var dom = self.URL || self.webkitURL || self;\
  981.   var svg = new Blob([svg_string], {type: \"image/svg+xml;charset=utf-8\"});\
  982.   var url = dom.createObjectURL(svg);\
  983.   image.src= url;\
  984.   image.id = 'placed_'+id;\
  985.   image.onload = function(){\
  986.    current_id = image.id;\
  987.    fix_div.innerHTML='<img src='+image.src+' id='+image.id+' alt=\"this should not happen today...!\"/>';\
  988.   };\
  989.   return;\
  990.  };\
  991.  function images(x,y,event_which,num){\
  992.   if(event_which == 1){ return;};\
  993.   if(num == 1 && current_id){\
  994.    var xy = multi_snap_check(x,y,images_snap);\
  995.    images_x.push(xy[0]);\
  996.    images_y.push(xy[1]);\
  997.    images_id.push(current_id);\
  998.    current_id = null;\
  999.   };\
  1000.   draw_images();\
  1001.  };\
  1002.  function draw_images(){\
  1003.   var xy;var img;var tag;\
  1004.   for(var i=0; i<2;i++){\
  1005.    for(var p = 0 ; p < images_x.length; p++){\
  1006.     if( images_id[p] ){\
  1007.      img = document.getElementById(images_id[p]);\
  1008.      tag = img.tagName;\
  1009.      xy = image_adjust(img,images_x[p],images_y[p]);\
  1010.      if( tag != 'IMG' ){\
  1011.       img.setAttribute('style','display:block;position:absolute;top:'+xy[1]+'px;left:'+xy[0]+'px;');\
  1012.      }else{\
  1013.       context_images.drawImage(img,xy[0],xy[1],img.width,img.height);\
  1014.      };\
  1015.     };\
  1016.    };\
  1017.   };\
  1018.  };\
  1019.  var canvas_images = create_canvas%d(10%d,xsize,ysize);\
  1020.  var context_images = canvas_images.getContext(\"2d\");\
  1021.  context_images.font = multifont_family;\
  1022.  context_images.fillStyle = \"rgba(\"+multifont_color+\",\"+multistrokeopacity[%d]+\")\";\
  1023.  var images_snap = multisnaptogrid[%d];\
  1024.  var images_x = new Array();var images_y = new Array();\
  1025.  var images_id = new Array();",use_offset,canvas_root_id,u,i,i);
  1026.   if( no_controls != 1  ){
  1027.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt=0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  1028.   if( typeof(imagepalette) === 'object' ){\
  1029.   inner_html+=\"<td><table class='%s'><tr>\";\
  1030.   for(var im=0; im < imagepalette.length; im++){\
  1031.   if( im %% 4 == 0 ){ inner_html+=\"</tr><tr>\";};\
  1032.   inner_html+=\"<td><img onclick='javascript:place_image_on_canvas(this.id);' src='\"+imagepalette[im]+\"' id='imagepalette_\"+im+\"' alt='none'/></td>\";};\
  1033.   inner_html+=\"</tr></table></td><td>&nbsp;</td></tr>\";}else{inner_html+=\"<td>&nbsp;</td><td>&nbsp;</td></tr>\";};",u,i,canvas_root_id,u,table_css);
  1034.   }
  1035.   else
  1036.   {
  1037.     fprintf(js_include_file,"inner_html+=\"</table>\";tooltip_div.innerHTML = inner_html;userdraw_primitive = %d;",u);
  1038.   }
  1039.   break;
  1040.   /* curvedarrow/curvedarrows */
  1041.   case 21 ... 22:
  1042.   fprintf(js_include_file,"function curvedarrows(x,y,event_which,num){\
  1043.   var xy = [x,y];\
  1044.   if(event_which == 0){\
  1045.     xy = multi_snap_check(x,y,curvedarrows_snap);\
  1046.     if(num == 0 && multidraw_object_cnt == 0){curvedarrows_x = [];curvedarrows_y = [];curvedarrows_x[0] = xy[0];curvedarrows_y[0] = xy[1];}\
  1047.    else{curvedarrows_x.push(xy[0]);curvedarrows_y.push(xy[1]);};multidraw_object_cnt++;\
  1048.   }\
  1049.   else\
  1050.   {\
  1051.    if( multidraw_object_cnt < 3 ){curvedarrows_x.push(xy[0]);curvedarrows_y.push(xy[1]);draw_curvedarrows();curvedarrows_x.pop();curvedarrows_y.pop();};\
  1052.    if( multidraw_object_cnt == 3 ){curvedarrows_x.pop();curvedarrows_y.pop();curvedarrows_x.push(xy[0]);curvedarrows_y.push(xy[1]);multidraw_object_cnt = 0;draw_curvedarrows();};\
  1053.   };\
  1054.  };function draw_curvedarrows(){\
  1055.   var len = curvedarrows_x.length;var x1,y1,x2,y2,x3,y3;\
  1056.   context_curvedarrows.clearRect(0,0,xsize,ysize);\
  1057.   for(var p = 0 ; p < len ; p = p+3){\
  1058.    x1 = curvedarrows_x[p];x2 = curvedarrows_x[p+1];x3 = curvedarrows_x[p+2];y1 = curvedarrows_y[p];y2 = curvedarrows_y[p+1];y3 = curvedarrows_y[p+2];\
  1059.    var angle1 = Math.atan2(x3 - x2,y3 - y2) + Math.PI;\
  1060.    context_curvedarrows.beginPath();\
  1061.    context_curvedarrows.moveTo(x1,y1);\
  1062.    context_curvedarrows.quadraticCurveTo(x3,y3,x2,y2);\
  1063.    context_curvedarrows.moveTo(x2 - (arrow_head * Math.sin(angle1 - Math.PI / 6)),y2 - (arrow_head * Math.cos(angle1 - Math.PI / 6)));\
  1064.    context_curvedarrows.lineTo(x2, y2);\
  1065.    context_curvedarrows.lineTo(x2 - (arrow_head * Math.sin(angle1 + Math.PI / 6)),y2 - (arrow_head * Math.cos(angle1 + Math.PI / 6)));\
  1066.    context_curvedarrows.stroke();\
  1067.    context_curvedarrows.closePath();\
  1068.   };\
  1069.   return;\
  1070.  };var canvas_curvedarrows = create_canvas%d(10%d,xsize,ysize);\
  1071.  var context_curvedarrows =  canvas_curvedarrows.getContext(\"2d\");\
  1072.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  1073.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  1074.  context_curvedarrows.lineWidth = multilinewidth[%d];\
  1075.  if(multilinewidth[%d]%%2 == 1){ context_curvedarrows.translate(0.5,0.5);};\
  1076.  context_curvedarrows.lineCap = \"round\";\
  1077.  context_curvedarrows.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  1078.  context_curvedarrows.fillStyle = context_curvedarrows.strokeStyle;\
  1079.  if(multidash[%d] == 1 ){ if( context_curvedarrows.setLineDash ){\
  1080.  context_curvedarrows.setLineDash([2,4]);}else{if(context_curvedarrows.mozDash){\
  1081.  context_curvedarrows.mozDash = [2,4]};};};\
  1082.  var curvedarrows_x = new Array();var curvedarrows_y = new Array();\
  1083.  var curvedarrows_snap = multisnaptogrid[%d];",
  1084.   canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i);
  1085.  
  1086.   if( no_controls != 1 ){
  1087.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  1088.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td><b>(<input type='text' size='5' value='x1 : y1' id='input_curvedarrows_x' />) -- (<input type='text' size='5' value='x2 : y2' id='input_curvedarrows_y' />) -- (<input type='text' size='5' value='x3 : y3' id='input_curvedarrows_r' />)</b></td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_curvedarrows_x,input_curvedarrows_y,input_curvedarrows_r);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  1089.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  1090.   }
  1091.   else
  1092.   {
  1093.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  1094.   }
  1095.   break;
  1096.   /* curvedarrow2/curvedarrows2 */
  1097.   case 23 ... 24:
  1098.   fprintf(js_include_file,"function curvedarrows2(x,y,event_which,num){\
  1099.   var xy=[x,y];\
  1100.   if(event_which == 0){\
  1101.     xy = multi_snap_check(x,y,curvedarrows2_snap);\
  1102.     if(num == 0 && multidraw_object_cnt == 0){curvedarrows2_x = [];curvedarrows2_y = [];curvedarrows2_x[0] = xy[0];curvedarrows2_y[0] = xy[1];}\
  1103.    else{curvedarrows2_x.push(xy[0]);curvedarrows2_y.push(xy[1]);};multidraw_object_cnt++;\
  1104.   }\
  1105.   else\
  1106.   {\
  1107.   if( multidraw_object_cnt < 3 ){curvedarrows2_x.push(xy[0]);curvedarrows2_y.push(xy[1]);draw_curvedarrows2();curvedarrows2_x.pop();curvedarrows2_y.pop();};\
  1108.   if( multidraw_object_cnt == 3 ){curvedarrows2_x.pop();curvedarrows2_y.pop();curvedarrows2_x.push(xy[0]);curvedarrows2_y.push(xy[1]);multidraw_object_cnt = 0;draw_curvedarrows2();};\
  1109.   };\
  1110.  };function draw_curvedarrows2(){\
  1111.   var len = curvedarrows2_x.length;var x1,y1,x2,y2,x3,y3;\
  1112.   context_curvedarrows2.clearRect(0,0,xsize,ysize);\
  1113.   for(var p = 0 ; p < len ; p = p+3){\
  1114.    x1 = curvedarrows2_x[p];x2 = curvedarrows2_x[p+1];x3 = curvedarrows2_x[p+2];y1 = curvedarrows2_y[p];y2 = curvedarrows2_y[p+1];y3 = curvedarrows2_y[p+2];\
  1115.    var angle1 = Math.atan2(x3 - x2,y3 - y2) + Math.PI;\
  1116.    var angle2 = Math.atan2(x3 - x1,y3 - y1) + Math.PI;\
  1117.    context_curvedarrows2.beginPath();\
  1118.    context_curvedarrows2.moveTo(x1,y1);\
  1119.    context_curvedarrows2.moveTo(x1 - (arrow_head * Math.sin(angle2 - Math.PI / 6)),y1 - (arrow_head * Math.cos(angle2 - Math.PI / 6)));\
  1120.    context_curvedarrows2.lineTo(x1, y1);\
  1121.    context_curvedarrows2.lineTo(x1 - (arrow_head * Math.sin(angle2 + Math.PI / 6)),y1 - (arrow_head * Math.cos(angle2 + Math.PI / 6)));\
  1122.    context_curvedarrows2.moveTo(x1,y1);\
  1123.    context_curvedarrows2.quadraticCurveTo(x3,y3,x2,y2);\
  1124.    context_curvedarrows2.moveTo(x2 - (arrow_head * Math.sin(angle1 - Math.PI / 6)),y2 - (arrow_head * Math.cos(angle1 - Math.PI / 6)));\
  1125.    context_curvedarrows2.lineTo(x2, y2);\
  1126.    context_curvedarrows2.lineTo(x2 - (arrow_head * Math.sin(angle1 + Math.PI / 6)),y2 - (arrow_head * Math.cos(angle1 + Math.PI / 6)));\
  1127.    context_curvedarrows2.stroke();\
  1128.    context_curvedarrows2.closePath();\
  1129.   };\
  1130.   return;\
  1131.  };var canvas_curvedarrows2 = create_canvas%d(10%d,xsize,ysize);\
  1132.  var context_curvedarrows2 =  canvas_curvedarrows2.getContext(\"2d\");\
  1133.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  1134.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  1135.  context_curvedarrows2.lineWidth = multilinewidth[%d];\
  1136.  if(multilinewidth[%d]%%2 == 1){ context_curvedarrows2.translate(0.5,0.5);};\
  1137.  context_curvedarrows2.lineCap = \"round\";\
  1138.  context_curvedarrows2.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  1139.  context_curvedarrows2.fillStyle = context_curvedarrows2.strokeStyle;\
  1140.  if(multidash[%d] == 1 ){ if( context_curvedarrows2.setLineDash ){\
  1141.  context_curvedarrows2.setLineDash([2,4]);}else{if(context_curvedarrows2.mozDash){\
  1142.  context_curvedarrows2.mozDash = [2,4]};};};\
  1143.  var curvedarrows2_x = new Array();var curvedarrows2_y = new Array();\
  1144.  var curvedarrows2_snap = multisnaptogrid[%d];",canvas_root_id,u,i,i,i,i,i,i,i,i,i,i,i,i);
  1145.  
  1146.   if( no_controls != 1 ){
  1147.    fprintf(js_include_file,"inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  1148.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td><b>(<input type='text' size='5' value='x1 : y1' id='input_curvedarrows2_x' />) -- (<input type='text' size='5' value='x2 : y2' id='input_curvedarrows2_y' />) -- (<input type='text' size='5' value='x3 : y3' id='input_curvedarrows2_r' />)</b></td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_curvedarrows2_x,input_curvedarrows2_y,input_curvedarrows2_r);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  1149.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  1150.   }
  1151.   else
  1152.   {
  1153.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  1154.   }
  1155.   break;
  1156.   case 25 ... 26:
  1157.   fprintf(js_include_file,"function crosshairs(x,y,event_which,num){\
  1158.   if(event_which == 1){ return; };\
  1159.   var xy = multi_snap_check(x,y,crosshairs_snap);\
  1160.   if( num == 0 ){\
  1161.    crosshairs_x[0] = xy[0];\
  1162.    crosshairs_y[0] = xy[1];\
  1163.   }else{\
  1164.    crosshairs_x.push(xy[0]);\
  1165.    crosshairs_y.push(xy[1]);\
  1166.   };\
  1167.   draw_crosshairs();\
  1168.  };\
  1169.  function draw_crosshairs(){\
  1170.   var crosshair_size = %d;\
  1171.   context_crosshairs.clearRect(0,0,xsize,ysize);\
  1172.   var x1,x2,y1,y2;\
  1173.   for(var p = 0 ; p < crosshairs_x.length ; p++ ){\
  1174.    x1 = crosshairs_x[p] - crosshair_size;\
  1175.    x2 = crosshairs_x[p] + crosshair_size;\
  1176.    y1 = crosshairs_y[p] - crosshair_size;\
  1177.    y2 = crosshairs_y[p] + crosshair_size;\
  1178.    context_crosshairs.beginPath();\
  1179.    context_crosshairs.moveTo(x1,y1);\
  1180.    context_crosshairs.lineTo(x2,y2);\
  1181.    context_crosshairs.closePath();\
  1182.    context_crosshairs.stroke();\
  1183.    context_crosshairs.beginPath();\
  1184.    context_crosshairs.moveTo(x2,y1);\
  1185.    context_crosshairs.lineTo(x1,y2);\
  1186.    context_crosshairs.closePath();\
  1187.    context_crosshairs.stroke();\
  1188.   };\
  1189.  };\
  1190.  var canvas_crosshairs = create_canvas%d(100%d,xsize,ysize);var context_crosshairs = canvas_crosshairs.getContext(\"2d\");\
  1191.  if( multistrokeopacity[%d] > 1 ){ multistrokeopacity[%d] = (0.0039215*multistrokeopacity[%d]).toFixed(2); };\
  1192.  if( multifillopacity[%d] > 1 ){ multifillopacity[%d] =  (0.0039215*multifillopacity[%d]).toFixed(2); };\
  1193.  context_crosshairs.strokeStyle = \"rgba(\"+multistrokecolors[%d]+\",\"+multistrokeopacity[%d]+\")\";\
  1194.  context_crosshairs.fillStyle = context_crosshairs.strokeStyle;\
  1195.  context_crosshairs.lineWidth = multilinewidth[%d];if(multilinewidth[%d] %%2 == 1){ context_crosshairs.translate(0.5,0.5);};\
  1196.  var crosshairs_x = new Array();var crosshairs_y = new Array();\
  1197.  var crosshairs_snap = multisnaptogrid[%d];",crosshair_size,canvas_root_id,i,i,i,i,i,i,i,i,i,i,i,i);
  1198.   if( no_controls != 1){
  1199.    fprintf(js_include_file,"\
  1200.   inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  1201.   if( multiuserinput[%d] == 1 ){inner_html+=\"<td>(<input type='text' size='5' value='' id='input_crosshairs_x' />:<input type='text' size='5' value='' id='input_crosshairs_y' />)</td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_crosshairs_x,input_crosshairs_y,null);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  1202.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  1203.   }
  1204.   else
  1205.   {
  1206.    fprintf(js_include_file,"userdraw_primitive = %d;",u);
  1207.   }
  1208.   break;
  1209.  
  1210.   /* einde switch */
  1211.   default : break;
  1212.   }
  1213.  } /* end for loop */
  1214.  
  1215.  /* id_z may be used for radius , text etc...e.g. no x-values,y-values, x&y-valuepairs*/
  1216.  fprintf(js_include_file,"update_draw_area%d = function(desc,id_x,id_y,id_z){\
  1217.  if( desc == 20 ){ draw_images();return;};\
  1218.  var x1,x2,x3,y1,y2,y3,z1,r,A,B,C;\
  1219.  x1 = id_x.value;y1 = id_y.value;if(id_z != null){z1 = id_z.value;};\
  1220.  if( (desc > 3 && desc < 12) || desc == 14 || desc == 15 ){A = coord_split(x1);B = coord_split(y1);if(A.length != 2 || B.length != 2){alert('coordinate mismatch');return;};x1 = x2px(safe_eval(A[0]));y1 = y2px(safe_eval(A[1]));x2 = x2px(safe_eval(B[0]));y2 = y2px(safe_eval(B[1]));if(desc == 10 || desc == 11 ){ C = coord_split(z1);x3 = x2px(safe_eval(C[0]));y3 = y2px(safe_eval(C[1]));};};\
  1221.  if( desc < 4 ){x1 = x2px(safe_eval(x1));y1 = y2px( safe_eval(y1));};\
  1222.  if( desc > 20 ){A = coord_split(x1);B = coord_split(y1);C = coord_split(z1);\
  1223.  if(A.length != 2 || B.length != 2 || C.length != 2){ alert('coordinate mismatch');return;};\
  1224.  x1 = x2px(safe_eval(A[0]));y1 = y2px(safe_eval(A[1]));\
  1225.  x2 = x2px(safe_eval(B[0]));y2 = y2px(safe_eval(B[1]));\
  1226.  x3 = x2px(safe_eval(C[0]));y3 = y2px(safe_eval(C[1]));};\
  1227.  switch(desc){",canvas_root_id);
  1228.  for(i=0 ; i < MAX_MULTI_PRIMITIVES ; i++ ){
  1229.   switch(draw_nums[i]){
  1230.    case -1: break;
  1231.    case 0: fprintf(js_include_file,"case 0:points(x1,y1,0,0);break;"); break;
  1232.    case 1: fprintf(js_include_file,"case 1:points(x1,y1,0,1);break;"); break;
  1233.    case 2: fprintf(js_include_file,"case 2:r = scale_x_radius(safe_eval(document.getElementById(id_z.id).value));multi_radius[0] = r;circles_x[0] = x1;circles_y[0] = y1;draw_circles();break;"); break;
  1234.    case 3: fprintf(js_include_file,"case 3:r = scale_x_radius(safe_eval(document.getElementById(id_z.id).value));multi_radius.push(r);circles_x.push(x1);circles_y.push(y1);draw_circles();break;"); break;
  1235.    case 4: fprintf(js_include_file,"case 4:lines_x[0] = x1;lines_x[1] = x2;lines_y[0] = y1;lines_y[1] = y2;calc_lines();draw_lines();break;"); break;
  1236.    case 5: fprintf(js_include_file,"case 5:lines_x.push(x1);lines_x.push(x2);lines_y.push(y1);lines_y.push(y2);calc_lines();draw_lines();break;"); break;
  1237.    case 6: fprintf(js_include_file,"case 6:segments_x[0] = x1;segments_x[1] = x2;segments_y[0] = y1;segments_y[1] = y2;draw_segments();break;"); break;
  1238.    case 7: fprintf(js_include_file,"case 7:segments_x.push(x1);segments_x.push(x2);segments_y.push(y1);segments_y.push(y2);draw_segments();break;"); break;
  1239.    case 8: fprintf(js_include_file,"case 8:arrows_x[0] = x1;arrows_x[1] = x2;arrows_y[0] = y1;arrows_y[1] = y2;draw_arrows();break;"); break;
  1240.    case 9: fprintf(js_include_file,"case 9:arrows_x.push(x1);arrows_x.push(x2);arrows_y.push(y1);arrows_y.push(y2);draw_arrows();break;"); break;
  1241.    case 10: fprintf(js_include_file,"case 10:triangles_x[0] = x1;triangles_x[1] = x2;triangles_x[2] = x3;triangles_y[0] = y1;triangles_y[1] = y2;triangles_y[2] = y3;draw_triangles();break;"); break;
  1242.    case 11: fprintf(js_include_file,"case 11:triangles_x.push(x1);triangles_x.push(x2);triangles_x.push(x3);triangles_y.push(y1);triangles_y.push(y2);triangles_y.push(y3);draw_triangles();break;"); break;
  1243.    case 12: fprintf(js_include_file,"case 12:A = coord_split(x1);B = coord_split(y1);var plus_len = A.length;if( plus_len != B.length){alert('mismatch between the number of x-values and  y-values');return;};for(var p = 0 ; p < plus_len ; p++){x1 = x2px(safe_eval(A[p]));y1 = y2px(safe_eval(B[p]));closedpoly_x.push(x1);closedpoly_y.push(y1);};x1 = x2px(safe_eval(A[0]));y1 = y2px(safe_eval(B[0]));closedpoly_x.push(x1);closedpoly_y.push(y1);draw_closedpoly();break;"); break;
  1244.    case 13: fprintf(js_include_file,"case 13:text_abc.push( document.getElementById(id_z.id).value);text(x2px(safe_eval(x1)),y2px(safe_eval(y1)),0,1);draw_text();break;"); break;
  1245.    case 14: fprintf(js_include_file,"case 14:rects_x[0] = x1;rects_x[1] = x2;rects_y[0] = y1;rects_y[1] = y2;draw_rects();break;"); break;
  1246.    case 15: fprintf(js_include_file,"case 15:rects_x.push(x1);rects_x.push(x2);rects_y.push(y1);rects_y.push(y2);draw_rects();break;"); break;
  1247.    case 16: fprintf(js_include_file,"case 16:polys_x[0] = x1;polys_x[1] = x2;polys_x[2] = x3;polys_y[0] = y1;polys_y[1] = y2;polys_y[2] = y3;draw_polys();break;"); break;
  1248.    case 17: fprintf(js_include_file,"case 17:polys_x.push(x1);polys_x.push(x2);polys_x.push(x3);polys_y.push(y1);polys_y.push(y2);polys_y.push(y3);draw_polys();break;"); break;
  1249.    case 18: fprintf(js_include_file,"case 18:parallelogram_x[0] = x1;parallelogram_x[1] = x2;parallelogram_x[2] = x3;parallelogram_y[0] = y1;parallelogram_y[1] = y2;parallelogram_y[2] = y3;draw_parallelogram();break;"); break;
  1250.    case 19: fprintf(js_include_file,"case 19:parallelogram_x.push(x1);parallelogram_x.push(x2);parallelogram_x.push(x3);parallelogram_y.push(y1);parallelogram_y.push(y2);parallelogram_y.push(y3);draw_parallelogram();break;"); break;
  1251.    case 20: fprintf(js_include_file,"case 20:draw_images();break;"); break;
  1252.    case 21: fprintf(js_include_file,"case 21:curvedarrows_x[0] = x1;curvedarrows_x[1] = x2;curvedarrows_x[2] = x3;curvedarrows_y[0] = y1;curvedarrows_y[1] = y2;curvedarrows_y[2] = y3;draw_curvedarrows();break;"); break;
  1253.    case 22: fprintf(js_include_file,"case 22:curvedarrows_x.push(x1);curvedarrows_x.push(x2);curvedarrows_x.push(x3);curvedarrows_y.push(y1);curvedarrows_y.push(y2);curvedarrows_y.push(y3);draw_curvedarrows();break;"); break;
  1254.    case 23: fprintf(js_include_file,"case 23:curvedarrows2_x[0] = x1;curvedarrows2_x[1] = x2;curvedarrows2_x[2] = x3;curvedarrows2_y[0] = y1;curvedarrows2_y[1] = y2;curvedarrows2_y[2] = y3;draw_curvedarrows2();break;"); break;
  1255.    case 24: fprintf(js_include_file,"case 24:curvedarrows2_x.push(x1);curvedarrows2_x.push(x2);curvedarrows2_x.push(x3);curvedarrows2_y.push(y1);curvedarrows2_y.push(y2);curvedarrows2_y.push(y3);draw_curvedarrows2();break;"); break;
  1256.    case 25: fprintf(js_include_file,"case 25:crosshairs(x1,y1,0,0);break;"); break;
  1257.    case 26: fprintf(js_include_file,"case 26:crosshairs(x1,y1,0,1);break;"); break;
  1258.    default:break;
  1259.   }
  1260.  }
  1261.  fprintf(js_include_file,"default: break;};return;};");
  1262.  
  1263.  /* begin clear_draw_area()*/
  1264.  fprintf(js_include_file,"clear_draw_area%d = function(type){switch(type){",canvas_root_id);
  1265.  for(i=0; i < MAX_MULTI_PRIMITIVES ; i++ ){
  1266.   switch( draw_nums[i] ){
  1267.    case -1: break;
  1268.    case 0: fprintf(js_include_file,"case 0:context_points.clearRect(0,0,xsize,ysize);points_x = [];points_y = [];break;");break;
  1269.    case 1: fprintf(js_include_file,"case 1:points_x.pop();points_y.pop();draw_points();break;");break;
  1270.    case 2: fprintf(js_include_file,"case 2:context_circles.clearRect(0,0,xsize,ysize);circles_x = [];circles_y = []; multi_radius = [];break;");break;
  1271.    case 3: fprintf(js_include_file,"case 3:circles_x.pop();circles_y.pop(); multi_radius.pop();draw_circles();break;");break;
  1272.    case 4: fprintf(js_include_file,"case 4:context_lines.clearRect(0,0,xsize,ysize);lines_x = [];lines_y = [];break;");break;
  1273.    case 5: fprintf(js_include_file,"case 5:lines_x.pop();lines_y.pop();lines_x.pop();lines_y.pop();draw_lines();break;");break;
  1274.    case 6: fprintf(js_include_file,"case 6:context_segments.clearRect(0,0,xsize,ysize);segments_x = [];segments_y = [];break;");break;
  1275.    case 7: fprintf(js_include_file,"case 7:segments_x.pop();segments_y.pop();segments_x.pop();segments_y.pop();draw_segments();break;");break;
  1276.    case 8: fprintf(js_include_file,"case 8:context_arrows.clearRect(0,0,xsize,ysize);arrows_x = [];arrows_y = [];break;");break;
  1277.    case 9: fprintf(js_include_file,"case 9:arrows_x.pop();arrows_y.pop();arrows_x.pop();arrows_y.pop();draw_arrows();break;");break;
  1278.    case 10:fprintf(js_include_file,"case 10:context_triangles.clearRect(0,0,xsize,ysize); triangles_x = [];triangles_y = [];break;");break;
  1279.    case 11:fprintf(js_include_file,"case 11:for(var p=0;p<3;p++){triangles_x.pop();triangles_y.pop();};draw_triangles();break;");break;
  1280.    case 12:fprintf(js_include_file,"case 12:context_closedpoly.clearRect(0,0,xsize,ysize);closedpoly_x = [];closedpoly_y = [];break;");break;
  1281.    case 13:fprintf(js_include_file,"case 13:context_text.clearRect(0,0,xsize,ysize);text_x.pop();text_y.pop();text_abc.pop();draw_text();break;");break;
  1282.    case 14:fprintf(js_include_file,"case 14:context_rects.clearRect(0,0,xsize,ysize);rects_x = [];rects_y = [];break;");break;
  1283.    case 15:fprintf(js_include_file,"case 15:rects_x.pop();rects_y.pop();rects_x.pop();rects_y.pop();draw_rects();break;");break;
  1284.    case 16:fprintf(js_include_file,"case 16:context_polys.clearRect(0,0,xsize,ysize); polys_x = [];polys_y = [];break;");break;
  1285.    case 17:fprintf(js_include_file,"case 17:for(var p=0;p<polynum;p++){polys_x.pop();polys_y.pop();};draw_polys();break;");break;
  1286.    case 18:fprintf(js_include_file,"case 18:context_parallelogram.clearRect(0,0,xsize,ysize); parallelogram_x = [];parallelogram_y = [];break;");break;
  1287.    case 19:fprintf(js_include_file,"case 19:for(var p = 0; p < 4;p++){ parallelogram_x.pop();parallelogram_y.pop();};draw_parallelogram();break;");break;
  1288.    case 20:fprintf(js_include_file,"case 20:context_images.clearRect(0,0,xsize,ysize);var len = images_id.length;if( len == 0 ){return;};var img = document.getElementById(images_id[len-1]);if( img.tagName == 'DIV' ){ img.innerHTML=null;};images_x.pop();images_y.pop();images_id.pop();draw_images();break;");break;
  1289.    case 21:fprintf(js_include_file,"case 21:context_curvedarrows.clearRect(0,0,xsize,ysize);curvedarrows_x = [];curvedarrows_y = [];break;");break;
  1290.    case 22:fprintf(js_include_file,"case 22:curvedarrows_x.pop();curvedarrows_y.pop();curvedarrows_x.pop();curvedarrows_y.pop();curvedarrows_x.pop();curvedarrows_y.pop();draw_curvedarrows();break;");break;
  1291.    case 23:fprintf(js_include_file,"case 23:context_curvedarrows2.clearRect(0,0,xsize,ysize);curvedarrows2_x = [];curvedarrows2_y = [];break;");break;
  1292.    case 24:fprintf(js_include_file,"case 24:curvedarrows2_x.pop();curvedarrows2_y.pop();curvedarrows2_x.pop();curvedarrows2_y.pop();curvedarrows2_x.pop();curvedarrows2_y.pop();draw_curvedarrows2();break;");break;
  1293.    case 25:fprintf(js_include_file,"case 25:context_crosshairs.clearRect(0,0,xsize,ysize);crosshairs_x = [];crosshairs_y = [];break;");break;
  1294.    case 26:fprintf(js_include_file,"case 26:crosshairs_x.pop();crosshairs_y.pop();draw_crosshairs();break;");break;
  1295.    default:break;
  1296.   }
  1297.  }
  1298.  fprintf(js_include_file,"};return;};");
  1299.  /* end clear_draw_area();*/
  1300.  
  1301.  
  1302.  /* add </table> is button controls are needed */
  1303.  if( no_controls != 1 ){fprintf(js_include_file,"inner_html+=\"</table>\";tooltip_div.innerHTML = inner_html;"); }
  1304.  free(str);
  1305.  
  1306. }
  1307. /* end 'void add_js_multidraw()' */
  1308.  
  1309.  
  1310. /*  if( desc >20 ){A = coord_split(x1);B = coord_split(y1);C = coord_split(z1);if(A.length != 2 || B.length != 2 || C.length != 2 ){alert('coordinate mismatch');return;};x1 = x2px(safe_eval(A[0]));y1 = y2px(safe_eval(A[1]));x2 = x2px(safe_eval(B[0]));y2 = y2px(safe_eval(B[1]));x3 = x2px(safe_eval(C[0]));y3 = y2px(safe_eval(C[1]));};};};\
  1311.  
  1312.  
  1313.  
  1314.    inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  1315.    if( multiuserinput[%d] == '1' ){inner_html+=\"<td><b>(<input type='text' size='5' value='x1 : y1' id='input_curvedarrows2_x' />) -- (<input type='text' size='5' value='x2 : y2' id='input_curvedarrows2_y' />) -- (<input type='text' size='5' value='x3 : y3' id='input_curvedarrows2_r' />)</b></td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_curvedarrows2_x,input_curvedarrows2_y,input_curvedarrows2_r);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  1316.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  1317.  
  1318.  
  1319.    inner_html+=\"<tr><td><input type='button' onclick='javascript:userdraw_primitive=%d;multidraw_object_cnt = 0;' value='\"+multilabel[%d]+\"' /></td><td><input type='button' onclick='javascript:clear_draw_area%d(%d);' value='delete' /></td>\";\
  1320.    if( multiuserinput[%d] == '1' ){inner_html+=\"<td><b>(<input type='text' size='5' value='x1 : y1' id='input_curvedarrows_x' />) -- (<input type='text' size='5' value='x2 : y2' id='input_curvedarrows_y' />) -- (<input type='text' size='5' value='x3 : y3' id='input_curvedarrows_r' />)</b></td><td><input type='button' id='canvasdraw_ok_button' onclick='javascript:update_draw_area%d(%d,input_curvedarrows_x,input_curvedarrows_y,input_curvedarrows_r);' value='OK' /></td></tr>\";}else{inner_html+=\"</tr>\";};",
  1321.    u,i,canvas_root_id,u,i,canvas_root_id,u);
  1322.  
  1323.  
  1324.  
  1325. */
  1326.  
  1327.