Subversion Repositories wimsdev

Rev

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