WebSVN – wimsdev – Diff – /trunk/wims/src/Flydraw/objects.c

       gdImageLine(image,pm->p[0],pm->p[1],pm->p[i],pm->p[i+1],pm->color[0]);
       if(vimg_enable) vimg_line(scale_buf[0],scale_buf[1],
                           scale_buf[i],scale_buf[i+1]);
+    }
+}
+/* crosshair */
+void obj_crosshair(objparm *pm)
+{
+    scale(pm->pd,pm->p,2);
+    gdImageLine(image,pm->p[0]+width2,pm->p[1]+width2,pm->p[0]-width2,pm->p[1]-width2,pm->color[0]);
+    gdImageLine(image,pm->p[0]-width2,pm->p[1]+width2,pm->p[0]+width2,pm->p[1]-width2,pm->color[0]);
+}
+/* crosshairs */
+void obj_crosshairs(objparm *pm)
+{
+    int i, n;
+    n=(pm->pcnt)/2;
+    scale(pm->pd,pm->p,n);
+    for(i=0;i<2*n;i+=2) {
+      gdImageLine(image,pm->p[i]+width2,pm->p[i+1]+width2,pm->p[i]-width2,pm->p[i+1]-width2,pm->color[0]);
+      gdImageLine(image,pm->p[i]-width2,pm->p[i+1]+width2,pm->p[i]+width2,pm->p[i+1]-width2,pm->color[0]);
+   }
+}
 /* segments */
 void obj_lines(objparm *pm)
+{
     int i, n;
     n=(pm->pcnt)/2;
     scale(pm->pd,pm->p,n);
     for(i=2;i<2*n;i+=2)
     for(i1=0;i1<n1;i1++) {
       xi1=rint(i1*xv1)+pm->p[0]; yi1=rint(i1*yv1)+pm->p[1];
       for(i2=0;i2<n2;i2++) {
           xi2=i2*xv2+xi1;yi2=i2*yv2+yi1;
           gdImageSetPixel(image,xi2,yi2,pm->color[0]);
       }
+    }
+}
 /* arc */
 void obj_arc(objparm *pm)
 {
     scale(pm->pd,pm->p,1);
     pm->p[2]=rint(pm->pd[2]*xscale); pm->p[3]=rint(pm->pd[3]*yscale);
     gdImageArc(image,pm->p[0],pm->p[1],pm->p[2],pm->p[3],
              pm->pd[4],pm->pd[5],pm->color[0]);
     if(vimg_enable) vimg_arc(scale_buf[0],scale_buf[1],
 .5*pm->pd[2],0.5*pm->pd[3],pm->pd[4],pm->pd[5]);
 }
 /* Ellipse: centre 0,1, width 2, hight 3, color 4,5,6 */
 void obj_ellipse(objparm *pm)
+{
     scale(pm->pd,pm->p,1);
     pm->p[2]=rint(pm->pd[2]*xscale); pm->p[3]=rint(pm->pd[3]*yscale);
     if(pm->fill) {
       gdImageArc(image,pm->p[0],pm->p[1],pm->p[2],pm->p[3],0,360,
                color_bounder);
       patchgdImageFillToBorder(image,pm->p[0],pm->p[1],
                       color_bounder,pm->color[0]);
     }
     gdImageArc(image,pm->p[0],pm->p[1],pm->p[2],pm->p[3],0,360,pm->color[0]);
     if(vimg_enable) vimg_ellipse(scale_buf[0],scale_buf[1],0.5*pm->pd[2],0.5*pm->pd[3]);
+}
 /* Circle */
 /* flood fill */
 void obj_fill(objparm *pm)
+{
     scale(pm->pd,pm->p,1);
     patchgdImageFill(image,pm->p[0],pm->p[1],pm->color[0]);
 }
 /* flood fill to border*/
 void obj_fillb(objparm *pm)
+{
     scale(pm->pd,pm->p,1);
     patchgdImageFillToBorder(image,pm->p[0],pm->p[1],pm->color[0],pm->color[1]);
 }
 gdImagePtr himg;
 int makehatchimage(int x, int y, int px, int py, int col)
+{
           if(width>1) {
             gdImageLine(himg,-ax,ay-1,-1,0,c);
             gdImageLine(himg,ax,ay-1,2*ax-1,0,c);
             gdImageLine(himg,0,-1,ax-1,-ay,c);
             gdImageLine(himg,0,2*ay-1,ax-1,ay,c);
           }
           break;
+      }
       case 1: {
           gdImageLine(himg,0,0,ax-1,ay-1,c);
           if(width>1) {
           break;
+      }
       case 2: gdImageLine(himg,0,ay/2,ax-1,ay/2,c); break;
       case 3: gdImageLine(himg,ax/2,0,ax/2,ay-1,c); break;
+    }
     gdImageSetTile(image,himg);
     patchgdImageFill(image,pm->p[0],pm->p[1],gdTiled);
     gdImageDestroy(himg);
     if(tiled) gdImageSetTile(image,tileimg);
+}
 /* flood fill with grid */
 void obj_gridfill(objparm *pm)
 {
     int nx,ny, c;
     scale(pm->pd,pm->p,1);
     nx=pm->pd[2]; ny=pm->pd[3]; nx=abs(nx); ny=abs(ny);
     if(nx==0 && ny==0) {fly_error("bad grid size"); return;}
     c=makehatchimage(nx,ny,pm->p[0],pm->p[1],pm->color[0]);
     gdImageLine(himg,0,ny/2,nx-1,ny/2,c); gdImageLine(himg,nx/2,0,nx/2,ny-1,c);
     gdImageSetTile(image,himg);
     patchgdImageFill(image,pm->p[0],pm->p[1],gdTiled);
     gdImageDestroy(himg);
     if(tiled) gdImageSetTile(image,tileimg);
+}
 /* flood fill with double hatching */
 void obj_diafill(objparm *pm)
+{
     scale(pm->pd,pm->p,1);
     nx=pm->pd[2]; ny=pm->pd[3]; nx=abs(nx); ny=abs(ny);
     if(nx==0 && ny==0) {fly_error("bad grid size"); return;}
     c=makehatchimage(nx,ny,pm->p[0],pm->p[1],pm->color[0]);
     gdImageLine(himg,0,0,nx-1,ny-1,c); gdImageLine(himg,0,ny-1,nx-1,0,c);
     gdImageSetTile(image,himg);
     patchgdImageFill(image,pm->p[0],pm->p[1],gdTiled);
     gdImageDestroy(himg);
     if(tiled) gdImageSetTile(image,tileimg);
+}
 /* flood fill with double hatching */
 void obj_dotfill(objparm *pm)
+{
     gdImageDestroy(insimg);
+}
 /* copy an image file, with resizing */
 void obj_copyresize(objparm *pm)
 {
     char *pp;
     FILE *inf;
     gdImagePtr insimg;
     pp=find_word_start(pm->str);*find_word_end(pp)=0;
     inf=open4read(pp);
     if(inf==NULL) {
       fly_error("file_not_found"); return;
 /* set linewidth */
 void obj_linewidth(objparm *pm)
+{
     if(pm->pd[0]<1 || pm->pd[0]>255) fly_error("bad_parms");
     else width=pm->pd[0];
+}
+/* set crosshairsize */
+void obj_crosshairsize(objparm *pm)
+{
+    if(pm->pd[0]<1 || pm->pd[0]>255) fly_error("bad_parms");
+    else width2=pm->pd[0];
+}
 /* set x range */
 void obj_xrange(objparm *pm)
+{

Subversion Repositories wimsdev

(root)/trunk/wims/src/Flydraw/objects.c – Rev 8195 → 8414