move_area.c

Go to the documentation of this file.

 
 
#include "prototypes.h"
 
void move_area(int win_x,int win_y,int qpf_flag)
 
{
extern struct save save;
extern int spoint[2];
extern int npoint[2],zoom;
extern struct display_set display_set[4];
extern Display *display;
extern Window window;
extern GC gc;
extern int qmap[16];
extern struct abogus *bbogus[50];
extern Widget drawing_area;
Arg args[10];
int i,ox[3],oy[3],closed;
int x,y,firstx,firsty;
int MY=10;
Dimension width,height;
signed long XSIZE,YSIZE;
float xrat,yrat;
int xmin,xmax,ymin,ymax,display_flag,xcen,ycen,h;
long lint1,lint2;
float dmult,cmult,mult;
struct abogus *cbogus;
struct abogus *nbogus;
struct abogus *pbogus;
struct abogus *xbogus;
struct abogus *zbogus;
 
cbogus=bbogus[qpf_flag];
 
closed=0;
 
if(cbogus !=NULL){
 
         firstx=cbogus->x;
         firsty=cbogus->y;
 
         for(;;) {
 
                  if(cbogus->next==NULL) {
 
                                   if(firstx==cbogus->x &&
                                      firsty==cbogus->y)
                                                      closed=1; 
                                   break;
 
                                 }
 
                  xbogus=cbogus;
                  cbogus=cbogus->next;
 
        }           
 
       }
 
zbogus=cbogus;
 
XSetFunction(display,gc,GXxor);
XSetForeground(display,gc,qmap[15]);
XSetBackground(display,gc,0);
 
XtSetArg(args[0],XtNwidth,&width);
XtSetArg(args[1],XtNheight,&height);
XtGetValues(drawing_area,args,2);
 
XSIZE=(long)width*10L;
YSIZE=(long)height*10L;
 
xrat=(float)XSIZE/(float)12800;
yrat=(float)YSIZE/(float)9600;
 
if(xrat < yrat)
             mult=xrat;
 
else
             mult=yrat;
 
display_flag=0;
h=0;
 
dmult=display_set[display_flag].dmult[h];
xmin= display_set[display_flag].xmin[h];
xmax= display_set[display_flag].xmax[h];
ymin= display_set[display_flag].ymin[h];
ymax= display_set[display_flag].ymax[h];
xcen= display_set[display_flag].xcen[h];
ycen= display_set[display_flag].ycen[h];
 
lint1=(long)npoint[0]*(long)MY;
lint2=(long)npoint[1]*(long)MY;
 
cmult=dmult*mult;
 
x=win_x;
y=win_y;
 
if(zoom==1) {
 
     win_x=x*MY/mult;
     win_y=y*MY/mult;
 
   }
 
else         {
 
 
     win_x=((x*MY-xcen)/zoom + lint1)/mult;
     win_y=((y*MY-ycen)/zoom + lint2)/mult;
 
   }
 
/* first draw current area */
 
cbogus=bbogus[qpf_flag];
 
pbogus=NULL;
 
if(cbogus !=NULL){
 
             for(;;) {
 
                  if(cbogus->x == spoint[0] && cbogus->y==spoint[1])
                                         break;
 
                  if(cbogus->next==NULL) 
                                   return;
 
                  pbogus=cbogus;
                  cbogus=cbogus->next;
 
        }
 
       }
 
nbogus=cbogus->next;
 
cbogus->x=win_x;
cbogus->y=win_y;
 
if(pbogus==NULL && closed==1) {
 
/*xbogus is the next to last point */
 
              pbogus=xbogus;
 
/*zbogus is the last point */
 
              zbogus->x=win_x;
              zbogus->y=win_y;
 
              /*point chosen was first and last point */
 
            }
 
/* need to xor old points and lines */
 
if(save.inuse==1) {
 
for(i=0;i<3;i++) {
 
   if(zoom==1) {
 
            ox[i]=(xmin+(float)save.x[i] * cmult)/MY;
            oy[i]=(xmin+(float)save.y[i] * cmult)/MY;
 
            }
 
   else        {
 
            ox[i]=(((xmin+save.x[i]*cmult)-lint1)*zoom+xcen)/MY;
            oy[i]=(((ymin+save.y[i]*cmult)-lint2)*zoom+ycen)/MY;
 
                         
            }
 
   if(i==1 && pbogus==NULL)
                        continue;
 
   if(i==2 && nbogus==NULL)
                        continue;
 
   if(i >= 1) {
 
         XDrawLine(display,window,gc,ox[i],oy[i],ox[i-1],oy[i-1]);
         
       }
 
/* next Xor new points on to screen and pixmap */
 }
 
XDrawLine(display,window,gc,ox[1]-10,oy[1],ox[1]+10,oy[1]);
XDrawLine(display,window,gc,ox[1],oy[1]-10,ox[1],oy[1]+10);
 
}
 
if(pbogus!=NULL) {
   save.x[0]=pbogus->x;
   save.y[0]=pbogus->y;
 }
 
save.x[1]=cbogus->x;
save.y[1]=cbogus->y;
 
if(nbogus != NULL) {
   save.x[2]=nbogus->x;
   save.y[2]=nbogus->y;
 }
 
 
for(i=0;i<3;i++) {
 
   if(zoom==1) {
 
            ox[i]=(xmin+(float)save.x[i] * cmult)/MY;
            oy[i]=(ymin+(float)save.y[i] * cmult)/MY;
 
            }
 
   else        {
 
            ox[i]=(((xmin+save.x[i]*cmult)-lint1)*zoom+xcen)/MY;
            oy[i]=(((ymin+save.y[i]*cmult)-lint2)*zoom+ycen)/MY;
 
                         
            }
 
 
   if(i==1 && pbogus==NULL)
                        continue;
 
   if(i==2 && nbogus==NULL)
                        continue;
 
 
   if(i >= 1) {
 
         XDrawLine(display,window,gc,ox[i],oy[i],ox[i-1],oy[i-1]);
                  
       }
         
}
 
XDrawLine(display,window,gc,ox[1]-10,oy[1],ox[1]+10,oy[1]);
XDrawLine(display,window,gc,ox[1],oy[1]-10,ox[1],oy[1]+10);
 
spoint[0]=cbogus->x;
spoint[1]=cbogus->y;
save.inuse=1;
  
}