Return to edgepath.c CVS log

Up to [CSRG BSD Unix] / 40BSD / cmd / cifplot

Annotation of 40BSD/cmd/cifplot/edgepath.c, revision 1.1.1.1

1.1       root        1: /*******************************************************************
                      2: *                                                                  *
                      3: *    File: CIFPLOT/edgepath.c                                      *
                      4: *    Written by Dan Fitzpatrick                                    *
                      5: *    copyright 1980 -- Regents of the University of California     *
                      6: *                                                                  *
                      7: ********************************************************************/
                      8: 
                      9: #include <stdio.h>
                     10: #include "defs.h"
                     11: #include "globals.h"
                     12: #include "parser_defs.h"
                     13: #include "structs.h"
                     14: #include "out_structs.h"
                     15: #include "alloc.h"
                     16: 
                     17: 
                     18: static int xstart,ystart,xlast,ylast;
                     19: static PolyDesc *poly;
                     20: static transform *trans;
                     21: 
                     22: StartEdgePath(x,y,itrans,ipoly)
                     23: real x,y;
                     24: transform *itrans;
                     25: PolyDesc *ipoly;
                     26: {
                     27:     poly = ipoly;
                     28:     trans = itrans;
                     29:     Trans(&x,&y,trans);
                     30:     xstart = xlast = CONVERT(x);
                     31:     ystart = ylast = CONVERT(y);
                     32:     return;
                     33:     }
                     34: 
                     35: iedge *NextEdgePath(x,y)
                     36: real x,y;
                     37: {
                     38:     iedge *e;
                     39:     int t;
                     40:     int ix1,ix2,iy1,iy2;
                     41: 
                     42:     Trans(&x,&y,trans);
                     43:     ix1 = ix2 = CONVERT(x);    iy1 = iy2 = CONVERT(y);
                     44: 
                     45:     e = GetIEdge();
                     46:     e->type = EDGE;
                     47:     e->poly = poly;
                     48:     (poly->refs)++;
                     49:     if(xlast <= ix1) e->dir = 1;
                     50:       else {
                     51:        e->dir = -1;
                     52:        SWAP(xlast,ix1,t);
                     53:        SWAP(ylast,iy1,t);
                     54:        }
                     55:     /* xlast <= x */
                     56:     e->min = e->x1 = xlast;    e->y1 = ylast;
                     57:     e->x2 = ix1;               e->y2 = iy1;
                     58:     xlast = ix2;               ylast = iy2;
                     59:     return(e);
                     60:     }
                     61: 
                     62: iedge *EndEdgePath()
                     63: {
                     64:     iedge *e;
                     65:     int t;
                     66: 
                     67:     e = GetIEdge();
                     68:     e->type = EDGE;
                     69:     e->poly = poly;
                     70:     (poly->refs)++;
                     71:     if(xlast <= xstart) e->dir = 1;
                     72:       else {
                     73:        e->dir = -1;
                     74:        SWAP(xlast,xstart,t);
                     75:        SWAP(ylast,ystart,t);
                     76:        }
                     77:     e->min = e->x1 = xlast;    e->y1 = ylast;
                     78:     e->x2 = xstart;            e->y2 = ystart;
                     79:     return(e);
                     80:     }

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.