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

                     fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,4,[%.*f,%.*f],[%.*f,%.*f],[30,30],[30,30],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%.1f,\"%s\",%d,\"%s\",%d,%s,%d,%d));\n",click_cnt,onclick,drag_type,decimals,double_data[0],decimals,double_data[2],decimals,double_data[1],decimals,double_data[3],line_width,stroke_color,stroke_opacity,stroke_color,stroke_opacity,0,use_dashed,dashtype[0],dashtype[1],use_rotate,angle,flytext,font_size,font_family,use_affine,affine_matrix,slider,slider_cnt);
                     click_cnt++;reset();
                     break;
+                }
+            }
+            break;
+        case HALFLINE:
+        /*
+        @ demiline x1,y1,x2,y2,color
+        @ alternative : halfline
+        @ draws a halfline starting in (x1:y1) and through (x2:y2) in color 'color' (colorname or hex)
+        @ may be set draggable / onclick
+        */
+            for(i=0;i<5;i++){
+                switch(i){
+                    case 0: double_data[0]= get_real(infile,0);break; /* x-values */
+                    case 1: double_data[1]= get_real(infile,0);break; /* y-values */
+                    case 2: double_data[10]= get_real(infile,0);break; /* x-values */
+                    case 3: double_data[11]= get_real(infile,0);break; /* y-values */
+                    case 4: stroke_color=get_color(infile,1);/* name or hex color */
+                    if(double_data[0] == double_data[10]){ /* vertical halfline */
+                        if(double_data[1] < double_data[11]){
+                         double_data[3] = ymax + 1000;
+                        }
+                        else
+                        {
+                         double_data[3] = ymin - 1000;
+                        }
+                        double_data[2] = double_data[0];
+                    }
+                    else
+                    { /* horizontal halfline*/
+                     if( double_data[1] == double_data[11] ){
+                      if( double_data[0] < double_data[10] ){
+                        double_data[2] = xmax + 1000; /* halfline to the right */
+                      }
+                      else
+                      {
+                        double_data[2] = xmin - 1000; /* halfline to the left */
+                      }
+                      double_data[3] = double_data[1];
+                     }
+                     else
+                     {
+                      /* any other halfline */
+                      /* slope */
+                      double_data[12] = (double_data[11] - double_data[1])/(double_data[10] - double_data[0]);
+                      /* const */
+                      double_data[13] = double_data[1] - double_data[12]*double_data[0];
+                      if( double_data[0] < double_data[10] ){
+                       double_data[2] = double_data[2] + 1000;
+                      }
+                      else
+                      {
+                       double_data[2] = double_data[2] - 1000;
+                      }
+                      double_data[3] = double_data[12]*double_data[2] + double_data[13];
+                     }
+                    }
+                    decimals = find_number_of_digits(precision);
+                    fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,18,[%.*f,%.*f],[%.*f,%.*f],[30,30],[30,30],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%.1f,\"%s\",%d,\"%s\",%d,%s,%d,%d));\n",click_cnt,onclick,drag_type,decimals,double_data[0],decimals,double_data[2],decimals,double_data[1],decimals,double_data[3],line_width,stroke_color,stroke_opacity,stroke_color,stroke_opacity,0,use_dashed,dashtype[0],dashtype[1],use_rotate,angle,flytext,font_size,font_family,use_affine,affine_matrix,slider,slider_cnt);
+                    click_cnt++;reset();
+                    break;
+                }
+            }
             break;
         case HLINE:
         /*
         @ hline x,y,color
         @ draw a horizontal line through point (x:y) in color 'color'
         @ vline x,y,color
         @ draw a vertical line through point (x:y) in color 'color'
         @ may be set draggable / onclick
         */
             for(i=0;i<3;i++) {
                 switch(i){
                     case 0: double_data[0] = get_real(infile,0);break; /* x-values */
                     case 1: double_data[1] = get_real(infile,0);break; /* y-values */
                     case 2: stroke_color=get_color(infile,1);/* name or hex color */
                         double_data[2] = double_data[0];
                         decimals = find_number_of_digits(precision);
                     break;
+                }
+            }
             break;
         case SQUARE:
         /*
         @ square x,y,side (px) ,color
         @ draw a square with left top corner (x:y) with side 'side' in color 'color'
         @ use command 'fsquare x,y,side,color' for a filled square
         @ use command/keyword  'filled' before command 'square x,y,side,color'
         @ use command 'fillcolor color' before 'fsquare' to set the fill colour.
                     case 2:double_data[2] = get_real(infile,0);break; /* x-values */
                     case 3:double_data[3] = get_real(infile,0);break; /* y-values */
                     case 4:stroke_color = get_color(infile,1);/* name or hex color */
                         decimals = find_number_of_digits(precision);
                         fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,1,[%.*f,%.*f,%.*f,%.*f],[%.*f,%.*f,%.*f,%.*f],[%d],[%d],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%.1f,\"%s\",%d,\"%s\",%d,%s,%d,%d));\n",click_cnt,onclick,drag_type,decimals,double_data[0],decimals,double_data[2],decimals,double_data[2],decimals,double_data[0],decimals,double_data[1],decimals,double_data[1],decimals,double_data[3],decimals,double_data[3],line_width,line_width,line_width,stroke_color,stroke_opacity,stroke_color,fill_opacity,use_filled,use_dashed,dashtype[0],dashtype[1],use_rotate,angle,flytext,font_size,font_family,use_affine,affine_matrix,slider,slider_cnt);
                         click_cnt++;reset();
                         break;
+                }
+            }
             break;
         case POLYLINE:
         /*
             break;
         case ARROW:
         /*
         @ arrow x1,y1,x2,y2,h,color
         @ draw a single headed arrow/vector from (x1:y1) to (x2:y2)<br />with arrowhead size h in px and in color 'color'
         @ use command 'linewidth int' to adjust thickness of the arrow
         @ may be set draggable / onclick
         */
             for(i=0;i<6;i++){
                 switch(i){
                     case 0: double_data[0] = get_real(infile,0);break; /* x */
                     case 1: double_data[1] = get_real(infile,0);break; /* y */
                     case 2: double_data[2] = get_real(infile,0);break; /* x */
                     case 3: double_data[3] = get_real(infile,0);break; /* y */
                     case 4: arrow_head = (int) get_real(infile,0);break;/* h */
                     case 5: stroke_color = get_color(infile,1);/* name or hex color */
                         decimals = find_number_of_digits(precision);
                         fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,8,[%.*f,%.*f],[%.*f,%.*f],[%d,%d],[%d,%d],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%.1f,\"%s\",%d,\"%s\",%d,%s,%d,%d));\n",click_cnt,onclick,drag_type,decimals,double_data[0],decimals,double_data[2],decimals,double_data[1],decimals,double_data[3],arrow_head,arrow_head,arrow_head,arrow_head,line_width,stroke_color,stroke_opacity,stroke_color,stroke_opacity,0,use_dashed,dashtype[0],dashtype[1],use_rotate,angle,flytext,font_size,font_family,use_affine,affine_matrix,slider,slider_cnt);
                         click_cnt++;
                         reset();
                         break;
+                }
+            }
             break;
         case USERDRAW:
         /*
         @ userdraw object_type,color
-        @ implemented object_type: <ul><li>point</li><li>points</li><li>crosshair</li><li>crosshairs</li><li>line</li><li>lines</li><li>vline</li><li>vlines</li><li>hline</li><li>hlines</li><li>segment</li><li>segments</li><li>polyline</li><li>circle</li><li>circles</li><li>arrow</li><li>arrow2 (double arrow)</li><li>arrows</li><li>arrows2 (double arrows)</li><li>triangle</li><li>polygon</li><li>poly[3-9]</li><li>rect</li><li>roundrect</li><li>rects</li><li>roundrects</li><li>freehandline</li><li>freehandlines</li><li>path</li><li>paths</li><li>text</li><li>arc</li><li>arcs</li><li>input<br/>place a single inputfield on 'canvas'<br />use commands 'inputstyle' for css styling: use command 'linewidth' for adjusting the input field size (default 1)</li><li>inputs<br/>place multiple inputfield : placing inputfields on top of each other is not possible</li></ul>
+        @ implemented object_type: <ul><li>point</li><li>points</li><li>crosshair</li><li>crosshairs</li><li>line</li><li>lines</li><li>vline</li><li>vlines</li><li>hline</li><li>hlines</li><li>demiline</li><li>demilines</li><li>segment</li><li>segments</li><li>polyline</li><li>circle</li><li>circles</li><li>arrow</li><li>arrow2 (double arrow)</li><li>arrows</li><li>arrows2 (double arrows)</li><li>triangle</li><li>polygon</li><li>poly[3-9]</li><li>rect</li><li>roundrect</li><li>rects</li><li>roundrects</li><li>freehandline</li><li>freehandlines</li><li>path</li><li>paths</li><li>text</li><li>arc</li><li>arcs</li><li>input<br/>place a single inputfield on 'canvas'<br />use commands 'inputstyle' for css styling: use command 'linewidth' for adjusting the input field size (default 1)</li><li>inputs<br/>place multiple inputfield : placing inputfields on top of each other is not possible</li></ul>
         @ note: mouselisteners are only active if "$status != done " (eg only drawing in an active/non-finished exercise) <br /> to overrule use command/keyword "status" (no arguments required)
         @ note: object_type text: Any string or multiple strings may be placed anywhere on the canvas.<br />while typing the background of every typed char will be lightblue..."backspace / delete / esc" will remove typed text.<br />You will need to hit "enter" to add the text to the array "userdraw_txt()" : lightblue background will disappear<br />Placing the cursor somewhere on a typed text and hitting "delete/backspace/esc" , a confirm will popup asking to delete the selected text.This text will be removed from the "userdraw_txt()" answer array.<br />Use commands 'fontsize' and 'fontfamily' to control the text appearance
         @ note: object_type polygone: Will be finished (the object is closed) when clicked on the first point of the polygone again.
         @ note: all objects will be removed -after a javascript confirm box- when clicked on an object point with middle or right mouse butten (e.g. event.which != 1 : all buttons but left)
         @ use command "filled", "opacity int,int"  and "fillcolor color" to trigger coloured filling of fillable objects
+                }
                 add_js_circles(js_include_file,1,draw_type,line_width,line_width,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
+            }
             else
             if( strcmp(draw_type,"circles") == 0 ){
                 if( js_function[DRAW_CIRCLES] != 1 ){ js_function[DRAW_CIRCLES] = 1;}
                 if(reply_format == 0){reply_format = 10;}
                 /* 9 = x1:y1:r1,x2:y2:r2,x3:y3:r3,x4:y4:r3...x_n:y_n:r_n in x/y-range */
                 add_js_circles(js_include_file,2,draw_type,line_width,line_width,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 1){
                     add_input_xyr(js_include_file,canvas_root_id);
+                }
+            }
             else
             if(strcmp(draw_type,"crosshair") == 0 ){
                 if( js_function[DRAW_CROSSHAIRS] != 1 ){ js_function[DRAW_CROSSHAIRS] = 1;}
                 if(reply_format == 0){reply_format = 8;}
                 /* 7 = x1:y1,x2:y2,x3:y3,x4:y4...x_n:y_n in x/y-range */
                 add_js_crosshairs(js_include_file,1,draw_type,line_width,crosshair_size ,stroke_color,stroke_opacity);
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 1){
                     add_input_crosshair(js_include_file,1);
             else
             if(strcmp(draw_type,"freehandline") == 0 ){
                 if( js_function[DRAW_PATHS] != 1 ){ js_function[DRAW_PATHS] = 1;}
                 if(reply_format == 0){reply_format = 6;}
                 add_js_paths(js_include_file,1,draw_type,line_width,0,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
             }
             else
             if(strcmp(draw_type,"freehandlines") == 0 ){
                 if( js_function[DRAW_PATHS] != 1 ){ js_function[DRAW_PATHS] = 1;}
                 if(reply_format == 0){reply_format = 6;}
                 add_js_paths(js_include_file,2,draw_type,line_width,0,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             else
             if(strcmp(draw_type,"path") == 0 ){
                 if( js_function[DRAW_PATHS] != 1 ){ js_function[DRAW_PATHS] = 1;}
                 if(reply_format == 0){reply_format = 6;}
                 add_js_paths(js_include_file,1,draw_type,line_width,1,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
             }
             else
             if(strcmp(draw_type,"paths") == 0 ){
                 if( js_function[DRAW_PATHS] != 1 ){ js_function[DRAW_PATHS] = 1;}
                 if(reply_format == 0){reply_format = 6;}
                 add_js_paths(js_include_file,2,draw_type,line_width,1,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
             }
             else
             if(strcmp(draw_type,"arrows") == 0 ){
                 if( js_function[DRAW_ARROWS] != 1 ){ js_function[DRAW_ARROWS] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_arrows(js_include_file,2,draw_type,line_width,1,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1],arrow_head);
                 if(use_input_xy == 1){
+                }
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             else
             if(strcmp(draw_type,"arrows2") == 0 ){
                 if( js_function[DRAW_ARROWS] != 1 ){ js_function[DRAW_ARROWS] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_arrows(js_include_file,2,draw_type,line_width,2,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1],arrow_head);
                 if(use_input_xy == 1){
                     add_input_arrow(js_include_file,1);
                     add_input_x1y1x2y2(js_include_file,canvas_root_id);
                 if( js_function[DRAW_ARROWS] != 1 ){ js_function[DRAW_ARROWS] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_arrows(js_include_file,1,draw_type,line_width,1,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1],arrow_head);
                 if(use_input_xy == 1){
                     add_input_arrow(js_include_file,1);
                     add_input_x1y1x2y2(js_include_file,canvas_root_id);
                 }
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             else
             if(strcmp(draw_type,"polygon") == 0){
                 if( js_function[DRAW_PATHS] != 1 ){ js_function[DRAW_PATHS] = 1;}
                 if(reply_format == 0){reply_format = 2;}
             else
             if(strcmp(draw_type,"triangle") == 0){
                 if( js_function[DRAW_PATHS] != 1 ){ js_function[DRAW_PATHS] = 1;}
                 if(reply_format == 0){reply_format = 2;}
                 add_js_poly(js_include_file,3,draw_type,line_width,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
             }
             else
             if( strcmp(draw_type,"hline") == 0 ){
                 if( js_function[DRAW_LINES] != 1 ){ js_function[DRAW_LINES] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_hlines(js_include_file,1,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             else
             if( strcmp(draw_type,"hlines") == 0 ){
                 if( js_function[DRAW_LINES] != 1 ){ js_function[DRAW_LINES] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_hlines(js_include_file,2,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
             }
             else
             if( strcmp(draw_type,"vline") == 0 ){
                 if( js_function[DRAW_LINES] != 1 ){ js_function[DRAW_LINES] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_hlines(js_include_file,3,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             else
             if( strcmp(draw_type,"vlines") == 0 ){
                 if( js_function[DRAW_LINES] != 1 ){ js_function[DRAW_LINES] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_hlines(js_include_file,4,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             if( strcmp(draw_type,"line") == 0 ){
                 if( js_function[DRAW_CIRCLES] != 1 ){ js_function[DRAW_CIRCLES] = 1;}
                 if( js_function[DRAW_LINES] != 1 ){ js_function[DRAW_LINES] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_lines(js_include_file,1,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if( use_input_xy == 1 ){
                     add_input_line(js_include_file,1);
                     add_input_x1y1x2y2(js_include_file,canvas_root_id);
+                }
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
                 if( js_function[DRAW_LINES] != 1 ){ js_function[DRAW_LINES] = 1;}
                 if(reply_format == 0){reply_format = 11;}
                 add_js_lines(js_include_file,2,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if( use_input_xy == 1 ){
                     add_input_line(js_include_file,2);
+                    add_input_x1y1x2y2(js_include_file,canvas_root_id);
+                }
+                if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
+            else
+            if( strcmp(draw_type,"demilines") == 0 || strcmp(draw_type,"demilines") == 0 ){
+                if( js_function[DRAW_CIRCLES] != 1 ){ js_function[DRAW_CIRCLES] = 1;}
+                if( js_function[DRAW_DEMILINES] != 1 ){ js_function[DRAW_DEMILINES] = 1;}
+                if(reply_format == 0){reply_format = 11;}
+                add_js_demilines(js_include_file,2,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
+                if( use_input_xy == 1 ){
+                    add_input_demiline(js_include_file,2);
+                    add_input_x1y1x2y2(js_include_file,canvas_root_id);
+                }
+                if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
+            else
+            if( strcmp(draw_type,"demiline") == 0 || strcmp(draw_type,"demilines") == 0 ){
+                if( js_function[DRAW_CIRCLES] != 1 ){ js_function[DRAW_CIRCLES] = 1;}
+                if( js_function[DRAW_DEMILINES] != 1 ){ js_function[DRAW_DEMILINES] = 1;}
+                if(reply_format == 0){reply_format = 11;}
+                add_js_demilines(js_include_file,1,draw_type,line_width,stroke_color,stroke_opacity,use_dashed,dashtype[0],dashtype[1]);
+                if( use_input_xy == 1 ){
+                    add_input_demiline(js_include_file,1);
                     add_input_x1y1x2y2(js_include_file,canvas_root_id);
+                }
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             else
             else
             if( strcmp(draw_type,"rect") == 0){
                 if( js_function[DRAW_RECTS] != 1 ){ js_function[DRAW_RECTS] = 1;}
                 if(reply_format == 0){reply_format = 2;}
                 add_js_rect(js_include_file,1,0,draw_type,line_width,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype[0],dashtype[1]);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
+            }
             else
             if( strcmp(draw_type,"roundrect") == 0){
                 if( js_function[DRAW_ROUNDRECTS] != 1 ){ js_function[DRAW_ROUNDRECTS] = 1;}
                 if(reply_format == 0){reply_format = 2;}
             else
             if( strcmp(draw_type,"inputs") == 0){
                 if( js_function[DRAW_INPUTS] != 1 ){ js_function[DRAW_INPUTS] = 1;}
                 if(reply_format == 0){reply_format = 27;}
                 add_js_inputs(js_include_file,canvas_root_id,2,input_cnt,input_style,line_width);
                 if(use_input_xy == 1){ canvas_error("userinput_xy not yet implemented for this userdraw type !");}
                 if(use_input_xy == 2){ canvas_error("usertextarea_xy not yet implemented for this userdraw type !");}
             }
             else
             if( strcmp(draw_type,"input") == 0){
                 if( js_function[DRAW_INPUTS] != 1 ){ js_function[DRAW_INPUTS] = 1;}
                 if(reply_format == 0){reply_format = 27;}
                 add_js_inputs(js_include_file,canvas_root_id,1,input_cnt,input_style,line_width);
             i = 0;
             done = FALSE;
             while( !done ){
              double_data[i] = get_real(infile,1);
              i++;
             }
             for(c = 0 ; c < i; c++){
              fprintf(js_include_file,"dragstuff.addShape(new Shape(%d,%d,%d,16,%s,[%d],[%d],%d,\"%s\",%.2f,\"%s\",%.2f,%d,%d,%d,%d,%d,%.1f,\"%s\",%d,\"%s\",%d,%s,%d,%d));\n",click_cnt,onclick,drag_type,eval_levelcurve(xsize,ysize,fun1,xmin,xmax,ymin,ymax,plot_steps,precision,double_data[c]),line_width,line_width,line_width,stroke_color,stroke_opacity,fill_color,fill_opacity,use_filled,use_dashed,dashtype[0],dashtype[1],use_rotate,angle,flytext,font_size,font_family,use_affine,affine_matrix,slider,slider_cnt);
              click_cnt++;
+            }
             reset();
                             if(strstr(temp,"mathml0") != NULL){
                              if(reply_format == 0 ){reply_format = 16;} /* no other reply type is defined */
+                            }
                             break;
                     default:break;
                 }
             }
             reset();
             break;
         case HTTP:
         /*
          @http x1,y1,x2,y2,http://some_adress.com
          @an active html-page will be displayed in an "iframe" rectangle left top (x1:y1) , right bottom (x2:y2)
          @do not use interactivity (or mouse) if the mouse needs to be active in the iframe
                     case 4: int_data[4]=(int)(get_real(infile,0));break;/* x2 --> width  */
                     case 5: int_data[5]=(int)(get_real(infile,0)) ;break;/* y2 --> height */
                     case 6: URL = get_string(infile,1);
                             int_data[6] = int_data[4] - int_data[2];/* swidth & width (if not scaling )*/
                             int_data[7] = int_data[5] - int_data[3];/* sheight & height (if not scaling )*/
                             if( drag_type > -1 ){
                                 if( js_function[DRAG_EXTERNAL_IMAGE] != 1 ){ js_function[DRAG_EXTERNAL_IMAGE] = 1;}
                                 if(reply_format == 0 ){reply_format = 20;}
                                 string_length = snprintf(NULL,0,"drag_external_image(\"%s\",%d,%d,%d,%d,%d,%d,%d,%d,%d,%d);\n",URL,int_data[2],int_data[3],int_data[6],int_data[7],int_data[0],int_data[1],int_data[6],int_data[7],ext_img_cnt,1);
                                 check_string_length(string_length);tmp_buffer = my_newmem(string_length+1);
                                 snprintf(tmp_buffer,string_length,"drag_external_image(\"%s\",%d,%d,%d,%d,%d,%d,%d,%d,%d,%d);\n",URL,int_data[2],int_data[3],int_data[6],int_data[7],int_data[0],int_data[1],int_data[6],int_data[7],ext_img_cnt,1);
                                 drag_type = -1;
    reply = reply + tmp_x + \"\\n\" + tmp_y +\"\\n\";\
   };\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  userdraw_x = [];userdraw_y = [];\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
  while(userdraw_x[p]){\
   reply[p] = userdraw_x[p] +\":\" + userdraw_y[p];\
   p++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") ){\
-  var p = 0;var input_reply = new Array();\
-  if( document.getElementById(\"canvas_input0\")){\
-   var t = 0;\
-   while(document.getElementById(\"canvas_input\"+t)){\
-    if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
-     input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
-     p++;\
-    };\
-    t++;\
-   };\
-  };\
-  if( typeof userdraw_text != 'undefined' ){\
-   return reply+\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
-  }\
-  else\
-  {\
-   return reply+\"\\n\"+input_reply;\
-  }\
- }\
- else\
- {\
-  if( typeof userdraw_text != 'undefined' ){\
-   return reply+\"\\n\"+userdraw_text;\
-  }\
-  else\
-  {\
-   return reply;\
-  }\
- };\
-};\n\
-<!-- end function 7 read_canvas() -->");
-    break;
-    case 8: fprintf(js_include_file,"\
-\n<!-- begin function 8 read_canvas() -->\n\
-read_canvas = function(){\
- var reply = new Array();\
- var p = 0;\
- var prec = %d;\
- while(userdraw_x[p]){\
-  reply[p] = (Math.round(prec*(px2x(userdraw_x[p]))))/prec +\":\" + (Math.round(prec*(px2y(userdraw_y[p]))))/prec;\
-  p++;\
- };\
- if(p == 0){alert(\"nothing drawn...\");return;};\
- if( document.getElementById(\"canvas_input0\") || document.getElementById(\"mathml0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
-   return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
+   return reply+\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
-   return reply +\"\\n\"+input_reply;\
+   return reply+\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
+   return reply+\"\\n\"+userdraw_text;\
+  }\
+  else\
+  {\
+   return reply;\
+  }\
+ };\
+};\n\
+<!-- end function 7 read_canvas() -->");
+    break;
+    case 8: fprintf(js_include_file,"\
+\n<!-- begin function 8 read_canvas() -->\n\
+read_canvas = function(){\
+ var reply = new Array();\
+ var p = 0;\
+ var prec = %d;\
+ while(userdraw_x[p]){\
+  reply[p] = (Math.round(prec*(px2x(userdraw_x[p]))))/prec +\":\" + (Math.round(prec*(px2y(userdraw_y[p]))))/prec;\
+  p++;\
+ };\
+ if(p == 0){alert(\"nothing drawn...\");return;};\
+ if( document.getElementById(\"canvas_input0\") || document.getElementById(\"mathml0\") ){\
+  var p = 0;var input_reply = new Array();\
+  if( document.getElementById(\"canvas_input0\")){\
+   var t = 0;\
+   while(document.getElementById(\"canvas_input\"+t)){\
+    if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
+     input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
+     p++;\
+    };\
+    t++;\
+   };\
+  };\
+  if( typeof userdraw_text != 'undefined' ){\
+   return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
+  }\
+  else\
+  {\
+   return reply +\"\\n\"+input_reply;\
+  }\
+ }\
+ else\
+ {\
+  if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply;\
   }\
  };\
  set_reply_precision();\
  var reply = new Array();\
  var p = 0;\
  while(userdraw_x[p]){\
   reply[p] = userdraw_x[p] +\":\" + userdraw_y[p] + \":\" + userdraw_radius[p];\
   p++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply;\
   }\
  };\
 };\n\
     break;
     case 10: fprintf(js_include_file,"\
 \n<!-- begin function 10 read_canvas() -->\n\
 read_canvas = function(){\
  var reply = new Array();\
  var p = 0;\
  var prec = %d;\
  while(userdraw_x[p]){\
   reply[p] = (Math.round(prec*(px2x(userdraw_x[p]))))/prec +\":\" + (Math.round(prec*(px2y(userdraw_y[p]))))/prec +\":\" + (Math.round(prec*userdraw_radius[p]))/prec;\
   p++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
   reply = reply + (Math.round(prec*(px2x(userdraw_x[p]))))/prec +\",\" + (Math.round(prec*(px2y(userdraw_y[p]))))/prec +\",\" + (Math.round(prec*(px2x(userdraw_x[p+1]))))/prec +\",\" + (Math.round(prec*(px2y(userdraw_y[p+1]))))/prec +\"\\n\" ;\
   p = p+2;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") || document.getElementById(\"mathml0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply;\
   }\
  };\
 };\n\
 <!-- end function 11 read_canvas() -->",reply_precision);
     break;
     case 12: fprintf(js_include_file,"\
 \n<!-- begin function 12 read_canvas() -->\n\
 read_canvas = function(){\
  set_reply_precision();\
  var reply = \"\";\
  var p = 0;\
  for(p = 0; p< userdraw_x.lenght;p = p+2){\
   if(userdraw_x[p] != null){\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text\
   }\
   else\
   {\
    return reply;\
   }\
  };\
 };\n\
 <!-- end function 12 read_canvas() -->");
     break;
     case 13: fprintf(js_include_file,"\
 \n<!-- begin function 13 read_canvas() -->\n\
 read_canvas = function(){\
  var reply = new Array();\
  var p = 0;var i = 0;\
  var prec = %d;\
  while(userdraw_x[p]){\
   reply[i] = (Math.round(prec*(px2x(userdraw_x[p]))))/prec +\":\" + (Math.round(prec*(px2y(userdraw_y[p]))))/prec +\":\" + (Math.round(prec*(px2x(userdraw_x[p+1]))))/prec +\":\" + (Math.round(prec*(px2y(userdraw_y[p+1]))))/prec;\
   p = p+2;i++;\
  };\
  if(p == 0){alert(\"nothing drawn...\");return;};\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply +\"\\n\"+input_reply;\
   }\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text\
   }\
   else\
   {\
    return reply;\
   }\
  for(var p = 0 ; p < lu ; p++){\
   reply[idx] = (Math.round(prec*(px2x(userdraw_x[p]))))/prec;idx++;\
   reply[idx] = (Math.round(prec*(px2y(userdraw_y[p]))))/prec;idx++;\
  };\
  if( document.getElementById(\"canvas_input0\") ){\
   var p = 0;var input_reply = new Array();\
   if( document.getElementById(\"canvas_input0\")){\
    var t = 0;\
    while(document.getElementById(\"canvas_input\"+t)){\
     if( ! document.getElementById(\"canvas_input\"+t).getAttribute(\"readonly\")){\
      input_reply[p] = document.getElementById(\"canvas_input\"+t).value;\
      p++;\
     };\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
  }\
  else\
  {\
   if( typeof userdraw_text != 'undefined' ){\
    return reply +\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply;\
   }\
  };\
 };\n\
     t++;\
    };\
   };\
   if( typeof userdraw_text != 'undefined' ){\
    return reply_x+\"\\n\"+reply_y+\"\\n\"+input_reply+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply_x+\"\\n\"+reply_y+\"\\n\"+input_reply;\
   }\
  }\
  else\
    return reply_x+\"\\n\"+reply_y+\"\\n\"+userdraw_text;\
   }\
   else\
   {\
    return reply_x+\"\\n\"+reply_y;\
   };\
  };\
 };\n\
 <!-- end function 23 read_canvas() -->",reply_precision);
     break;
     case 24: fprintf(js_include_file,"\n\
 <!-- begin function 24  read_canvas() -->\n\
 read_canvas = function(){\
  if( userdraw_radius.length < 1){alert(\"nothing drawn...\");return;}\
  var lu = userdraw_radius.length;\
  var prec = %d;\
  var angle_reply = new Array(lu);\
  for(var p = 0 ; p < lu ; p++){\
   angle_reply[p] = (Math.round(prec*(userdraw_radius[p])))/prec;\
  };\
  return angle_reply;\
 };\n\
 <!-- end function 26 read_canvas() -->",reply_precision);
       dragxy(evt);\
      };\
     };\
    };\
   };\
  }\
  else\
  {\
   selected_image = null;\
  };\
 };",canvas_root_id);
 };",canvas_root_id);
     break;
     case DRAW_GRIDFILL:/* not used for userdraw */
 fprintf(js_include_file,"\n<!-- draw gridfill -->\n\
 var draw_gridfill = function(canvas_type,x0,y0,dx,dy,linewidth,color,opacity,xsize,ysize){\
  var obj;\
  if( document.getElementById(\"wims_canvas%d\"+canvas_type) ){\
   obj = document.getElementById(\"wims_canvas%d\"+canvas_type);\
  }\
  else\
  {\
   obj = create_canvas%d(canvas_type,xsize,ysize);\
  };\
  var ctx = obj.getContext(\"2d\");\
  var x,y;\
     break;
     case DRAW_IMAGEFILL:/* not  used for userdraw */
 fprintf(js_include_file,"\n<!-- draw imagefill -->\n\
 var draw_imagefill = function(canvas_type,x0,y0,URL,xsize,ysize){\
  var obj;\
  if( document.getElementById(\"wims_canvas%d\"+canvas_type) ){\
   obj = document.getElementById(\"wims_canvas%d\"+canvas_type);\
  }\
  else\
  {\
   obj = create_canvas%d(canvas_type,xsize,ysize);\
  var img = new Image();\
  img.src = URL;\
  img.onload = function(){\
   if( (img.width > xsize-x0) && (img.height > ysize-y0) ){\
     ctx.drawImage(img,x0,y0,xsize,ysize);\
   }\
   else\
   {\
     var repeat = \"repeat\";\
     if(img.width > xsize - x0){\
         repeat = \"repeat-y\";\
     break;
     case DRAW_DOTFILL:/* not  used for userdraw */
 fprintf(js_include_file,"\n<!-- draw dotfill -->\n\
 var draw_dotfill = function(canvas_type,x0,y0,dx,dy,radius,color,opacity,xsize,ysize){\
  var obj;\
  if( document.getElementById(\"wims_canvas%d\"+canvas_type) ){\
   obj = document.getElementById(\"wims_canvas%d\"+canvas_type);\
  }\
  else\
  {\
   obj = create_canvas%d(canvas_type,xsize,ysize);\
     break;
     case DRAW_DIAMONDFILL:/* not used for userdraw */
 fprintf(js_include_file,"\n<!-- draw hatch fill -->\n\
 var draw_diamondfill = function(canvas_type,x0,y0,dx,dy,linewidth,stroke_color,stroke_opacity,xsize,ysize){\
   var obj;\
  if( document.getElementById(\"wims_canvas%d\"+canvas_type) ){\
   obj = document.getElementById(\"wims_canvas%d\"+canvas_type);\
  }\
  else\
  {\
   obj = create_canvas%d(canvas_type,xsize,ysize);\
  };\
  var ctx = obj.getContext(\"2d\");\
  var x;\
  var y;\
  ctx.save();\
  ctx.lineWidth = linewidth;\
  ctx.strokeStyle=\"rgba(\"+stroke_color+\",\"+stroke_opacity+\")\";\
  y = ysize;\
  for( x = x0 ; x < xsize ; x = x + dx ){\
   ctx.moveTo(x,y0);\
   ctx.lineTo(xsize,y);\
   y = y - dy;\
  };\
  };\
  ctx.stroke();\
  ctx.restore();\
  return;\
  }",canvas_root_id,canvas_root_id,canvas_root_id);
     break;
     case DRAW_HATCHFILL:/* not used for userdraw */
 fprintf(js_include_file,"\n<!-- draw hatch fill -->\n\
 var draw_hatchfill = function(canvas_type,x0,y0,dx,dy,linewidth,stroke_color,stroke_opacity,xsize,ysize){\
   var obj;\
  };",canvas_root_id,canvas_root_id,canvas_root_id);
     break;
     case DRAW_CIRCLES:/*  used for userdraw */
 fprintf(js_include_file,"\n<!-- draw circles -->\n\
 var draw_circles = function(ctx,x_points,y_points,radius,line_width,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype0,dashtype1,use_rotate,angle,use_affine,affine_matrix){\
  ctx.save();\
  if(use_affine == 1 ){ctx.translate(affine_matrix[4],affine_matrix[5]);}\
  if(use_rotate == 1 ){ctx.rotate(angle*Math.PI/180);}\
  ctx.lineWidth = line_width;\
  for(var p = 0 ; p < x_points.length ; p++ ){\
   ctx.beginPath();\
   ctx.arc(x_points[p],y_points[p],radius[p],0,2*Math.PI,false);\
   ctx.closePath();\
   if(use_dashed == 1){if(ctx.setLineDash){ctx.setLineDash([dashtype0,dashtype1]);}else{ctx.mozDash = [dashtype0,dashtype1];};};\
   if(use_filled == 1){ctx.fillStyle = \"rgba(\"+fill_color+\",\"+fill_opacity+\")\";ctx.fill();}\
   ctx.strokeStyle=\"rgba(\"+stroke_color+\",\"+stroke_opacity+\")\";\
   ctx.stroke();\
  }\
  ctx.restore();\
  return;\
 };");
     break;
     case DRAW_POLYLINE:/* user for userdraw : draw lines through points */
 fprintf(js_include_file,"\n<!-- draw polyline -->\n\
 var draw_polyline = function(ctx,x_points,y_points,line_width,stroke_color,stroke_opacity,use_dashed,dashtype0,dashtype1,use_rotate,angle,use_affine,affine_matrix){\
  ctx.save();\
  if(use_affine == 1 ){ctx.translate(affine_matrix[4],affine_matrix[5]);}\
  if(use_rotate == 1 ){ctx.rotate(angle*Math.PI/180);}\
  ctx.lineWidth = line_width;\
  ctx.strokeStyle=\"rgba(\"+stroke_color+\",\"+stroke_opacity+\")\";\
  if(use_dashed == 1){if(ctx.setLineDash){ctx.setLineDash([dashtype0,dashtype1]);}else{ctx.mozDash = [dashtype0,dashtype1];};};\
  ctx.clearRect(0,0,xsize,ysize);\
  ctx.beginPath();\
  for(var p = 0 ; p < x_points.length-1 ; p++ ){\
   ctx.moveTo(x_points[p],y_points[p]);\
  }\
  ctx.closePath();\
  ctx.stroke();\
  ctx.fillStyle =\"rgba(\"+stroke_color+\",\"+stroke_opacity+\")\";\
  for(var p = 0 ; p < x_points.length ; p++ ){\
   ctx.beginPath();\
   ctx.arc(x_points[p],y_points[p],line_width,0,2*Math.PI,false);\
   ctx.closePath();ctx.fill();ctx.stroke();\
  };\
  ctx.restore();\
  return;\
  if(use_dashed == 1){if(ctx.setLineDash){ctx.setLineDash([dashtype0,dashtype1]);}else{ctx.mozDash = [dashtype0,dashtype1];};};\
  for(var p = 0 ; p < x_points.length ; p = p+2 ){\
   ctx.beginPath();\
   ctx.moveTo(x_points[p],y_points[p]);\
   ctx.lineTo(x_points[p+1],y_points[p+1]);\
   ctx.closePath();\
   ctx.stroke();\
   }\
   ctx.restore();\
   return;\
  };");
  var Y1 = y1 - (x1)*(y2 - y1)/(x2 - x1);\
  var Y2 = y1 + (xsize - x1)*(y2 - y1)/(x2 - x1);\
  return [0,Y1,xsize,Y2];\
 };\
 var draw_lines = function(ctx,x_points,y_points,line_width,stroke_color,stroke_opacity,use_dashed,dashtype0,dashtype1,use_rotate,angle,use_affine,affine_matrix){\
  ctx.save();\
  var line = new Array(4);\
  if(use_affine == 1 ){ctx.translate(affine_matrix[4],affine_matrix[5]);}\
  if(use_rotate == 1 ){ctx.rotate(angle*Math.PI/180);}\
  ctx.lineWidth = line_width;\
  ctx.strokeStyle=\"rgba(\"+stroke_color+\",\"+stroke_opacity+\")\";\
  if(use_dashed == 1){if(ctx.setLineDash){ctx.setLineDash([dashtype0,dashtype1]);}else{ctx.mozDash = [dashtype0,dashtype1];};};\
  for(var p = 0 ; p < x_points.length ; p = p+2 ){\
   line = calc_line(x_points[p],x_points[p+1],y_points[p],y_points[p+1]);\
+  ctx.beginPath();\
+  ctx.moveTo(line[0],line[1]);\
+  ctx.lineTo(line[2],line[3]);\
+  ctx.closePath();\
+  ctx.stroke();\
+  }\
+  ctx.restore();\
+  return;\
+ };");
+    break;
+    case DRAW_DEMILINES:/*  used for userdraw */
+fprintf(js_include_file,"\n<!-- draw demilines -->\n\
+function find_inf_point(x1,y1,x2,y2){\
+ if(x1<x2+2 && x1>x2-2){if(y1<y2){return [x1,y1,x1,ysize];}else{return [x1,0,x1,y1];};};\
+ var rc = (y2 - y1)/(x2 - x1);var q = y1 - (x1)*rc;\
+ if( x1 < x2 ){ return [x1,y1,xsize,rc*xsize+q];}else{return [x1,y1,0,q];};\
+};\
+var draw_demilines = function(ctx,x_points,y_points,line_width,stroke_color,stroke_opacity,use_dashed,dashtype0,dashtype1,use_rotate,angle,use_affine,affine_matrix){\
+ ctx.save();\
+ if(use_affine == 1 ){ctx.translate(affine_matrix[4],affine_matrix[5]);}\
+ if(use_rotate == 1 ){ctx.rotate(angle*Math.PI/180);}\
+ ctx.lineWidth = line_width;\
+ ctx.strokeStyle=\"rgba(\"+stroke_color+\",\"+stroke_opacity+\")\";\
+ if(use_dashed == 1){if(ctx.setLineDash){ctx.setLineDash([dashtype0,dashtype1]);}else{ctx.mozDash = [dashtype0,dashtype1];};};\
+ var pair = new Array(4);\
+ for(var p = 0 ; p < x_points.length ; p = p+2 ){\
+  pair = find_inf_point(x_points[p],y_points[p],x_points[p+1],y_points[p+1]);\
   ctx.beginPath();\
-  ctx.moveTo(line[0],line[1]);\
+  ctx.moveTo(pair[0],pair[1]);\
-  ctx.lineTo(line[2],line[3]);\
+  ctx.lineTo(pair[2],pair[3]);\
   ctx.closePath();\
   ctx.stroke();\
   }\
   ctx.restore();\
   return;\
     break;
     case DRAW_PATHS: /*  used for userdraw */
 fprintf(js_include_file,"\n<!-- draw paths -->\n\
 var draw_paths = function(ctx,x_points,y_points,line_width,closed_path,stroke_color,stroke_opacity,use_filled,fill_color,fill_opacity,use_dashed,dashtype0,use_rotate,angle,use_affine,affine_matrix){\
  ctx.save();\
  if(use_affine == 1 ){ctx.translate(affine_matrix[4],affine_matrix[5]);}\
  if(use_rotate == 1 ){ctx.rotate(angle*Math.PI/180);}\
  ctx.lineWidth = line_width;\
  ctx.lineJoin = \"round\";\
  ctx.strokeStyle=\"rgba(\"+stroke_color+\",\"+stroke_opacity+\")\";\
  ctx.beginPath();\
  ctx.moveTo(x_points[0],y_points[0]);\
   else\
   {\
    ctx.fillText(num,x - 0.5*txtsize,zero_y+2*font_size);\
   }\
   num = num + xmajor;\
  };\
  ctx.stroke();\
  ctx.closePath();\
  ctx.lineWidth = 1;\
  ctx.beginPath();\
  for(var x = zero_x+snor_x ; x < xsize;x = x + step_x){\
    ctx.moveTo(x,zero_y);\
   ctx.lineTo(p,ysize);\
  };\
  for(var p = zero_x ; p > 0; p = p - x2step){\
   ctx.moveTo(p,0);\
   ctx.lineTo(p,ysize);\
  };\
  for(var p = zero_y ; p < ysize; p = p + y2step){\
   ctx.moveTo(0,p);\
   ctx.lineTo(xsize,p);\
  };\
  for(var p = zero_y ; p > 0; p = p - y2step){\
   ctx.moveTo(0,p);\
   ctx.lineTo(xsize,p);\
  };\
  ctx.stroke();\
  ctx.closePath();\
  ctx.beginPath();\
  ctx.lineWidth = 2*line_width;\
  ctx.strokeStyle = axis_color;\
  ctx.moveTo(0,zero_y);\
  ctx.lineTo(xsize,zero_y);\
  ctx.moveTo(zero_x,0);\
  ctx.lineTo(zero_x,ysize);\
  ctx.stroke();\
  for(var p = zero_y ; p > 0; p = p - ystep){\
   ctx.moveTo(zero_x-tics_length,p);\
   ctx.lineTo(zero_x+tics_length,p);\
  };\
  for(var p = zero_x ; p < xsize; p = p + x2step){\
   ctx.moveTo(p,zero_y-0.5*tics_length);\
   ctx.lineTo(p,zero_y+0.5*tics_length);\
  };\
  for(var p = zero_x ; p > 0; p = p - x2step){\
   ctx.moveTo(p,zero_y-0.5*tics_length);\
   ctx.lineTo(p,zero_y+0.5*tics_length);\
  {\
   skip = 1;cnt = px2x(zero_x);\
   prec = Math.log(precision)/(Math.log(10));\
   var y_basis;if(f_y == 1){ y_basis = ysize }else{ y_basis = zero_y + 1.4*font_size;};\
   for( var p = zero_x ; p < xsize ; p = p+xstep){\
    if(skip == 0 ){\
     disp_cnt = cnt.toFixed(prec);\
     corr = ctx.measureText(disp_cnt).width;\
     skip = parseInt(1.2*corr/xstep);\
     ctx.fillText(disp_cnt,p-0.5*corr,y_basis);\
    }\
    else\
    {\
     skip--;\
    };\
    cnt = cnt + xmajor;\
   };\
   cnt = px2x(zero_x);skip = 1;\
    if(skip == 0 ){\
     disp_cnt = cnt.toFixed(prec);\
     corr = ctx.measureText(disp_cnt).width;\
     skip = parseInt(1.2*corr/xstep);\
     ctx.fillText(disp_cnt,p-0.5*corr,y_basis);\
    }\
    else\
    {\
     skip--;\
    };\
    cnt = cnt - xmajor;\
   };\
  };\
  if( y_strings != null ){\
         *centerstring="centerstring",
         *xunit="xunit",
         *yunit="yunit",
         *slider="slider",
         *killslider="killslider",
-        *angle="angle";
+        *angle="angle",
+        *halfline="halfline",
+        *demiline="demiline";
         while(((c = getc(infile)) != EOF)&&(c!='\n')&&(c!=',')&&(c!='=')&&(c!='\r')){
             if( i == 0 && (c == ' ' || c == '\t') ){
         continue; /* white spaces or tabs allowed before first command identifier */
+            }
         return YUNIT;
+        }
         if( strcmp(input_type, angle) == 0 ){
         free(input_type);
         return ANGLE;
+        }
+        if( strcmp(input_type, halfline) == 0 || strcmp(input_type, demiline) == 0  ){
+        free(input_type);
+        return HALFLINE;
+        }
         free(input_type);
         ungetc(c,infile);
         return 0;
+}

Subversion Repositories wimsdev

(root)/trunk/wims/src/Misc/canvasdraw/canvasdraw.c – Rev 8225 → 8244