plot_stations.c

Go to the documentation of this file.

 
#include "prototypes_new.h"
 
 
void plot_zstations(Drawable pix,int type,int h,int display_flag)
 
{
 
extern int find_station_flag;
extern struct zdata zdata[10];
extern struct dval dval;
extern int npoint[2],zoom;
extern GC gc;
extern unsigned long qmap[16];
extern Widget drawing_area;
extern Display *display;
extern Font font[10];
extern XFontStruct *info_font[10];
extern struct station zstation[500];
extern int max_zstations;
extern long amap[16];
extern int pcpn_time,pcpn_day;
extern int pcpn_time_step;
int i,xc,yc,text_width,length,m;
int x1,y1,xadd,yadd,MY=10;
float xrat,yrat,mult,dmult,cmult;
long xmin,xmax,ymin,ymax;
signed long xcen,ycen,lint1,lint2;
Dimension width,height;
Arg args[10];
signed long XSIZE,YSIZE;
extern struct display_set display_set[4];
long r,s;
float conv=.0174;
float lat,lon;
char tbuf[100],mbuf[100];
int yheight;   
int time_pos;
int mm;
 
if(pcpn_time_step==0)
              time_pos=pcpn_time;
 
else
              time_pos=4;
 
XSetFont(display,gc,font[4]);
 
yheight=info_font[4]->ascent;
 
if(type==0)
         return;
 
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;
 
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=mult*dmult;
 
for(i=0;i<max_zstations;i++) {
     
     lat=zstation[i].lat;
     lon=zstation[i].lon;
 
     r=dval.a * cos(lat*conv)/(1+sin(lat*conv))
       * cos((lon-dval.lo-90)*conv) + dval.xo +.5;
 
     s=dval.a * cos(lat*conv)/(1+sin(lat*conv))
       * sin((lon-dval.lo-90)*conv) + dval.yo + .5;       
             
     if(zoom==1) {
 
           x1=(xmin+(float)r * cmult)/MY;
           y1=(ymin+(float)s * cmult)/MY;
 
                                }
 
     else      {
 
           x1=(((xmin+(float)r*cmult)-lint1)*zoom+xcen)/MY;
           y1=(((ymin+(float)s*cmult)-lint2)*zoom+ycen)/MY;
 
     }
 
     XSetForeground(display,gc,qmap[15]);
     
     if((type==4 || type==5) 
         && zdata[pcpn_day].stn[i].zlevel[time_pos].data == -1)
                                  continue;
 
     XDrawLine(display,pix,gc,x1+1,y1+1,x1+1,y1-1);
     XDrawLine(display,pix,gc,x1+1,y1-1,x1-1,y1-1);
     XDrawLine(display,pix,gc,x1-1,y1-1,x1-1,y1+1);
     XDrawLine(display,pix,gc,x1-1,y1+1,x1+1,y1-1);
 
     if(type==1)
              strcpy(tbuf,zstation[i].hb5);
 
     else if(type==2) {
 
              strcpy(tbuf,&zstation[i].parm[4]);
              tbuf[1]=0;
 
        }
 
     else if(type==3)
              strcpy(tbuf,zstation[i].name);
 
     else if(type==4) {
     
              if(zdata[pcpn_day].used[time_pos]==0)
                                       continue;
 
              if(z0data[pcpn_day].stn[i].zlevel[time_pos].data == -2)
                                      continue;
 
              sprintf(mbuf,"%5.2f",zdata[pcpn_day].stn[i].zlevel[time_pos].data);
 
              if(mbuf[0]=='0')
                    strcpy(tbuf,&mbuf[1]);
 
              else
                    strcpy(tbuf,mbuf);
 
        }
 
     XSetForeground(display,gc,amap[m]);  
     length=strlen(tbuf);
     text_width=XTextWidth(info_font[4],tbuf,length); 
 
     xadd=zstation[i].xadd;
     yadd=zstation[i].yadd;
 
     if(xadd < 0) 
                    xc=x1 - text_width;
                        
     else
                    xc=x1+3;
 
     if(yadd < 0)
                    yc=y1;
 
     else
                    yc=y1+yheight;
 
     XDrawString(display,pix,gc,xc,yc,tbuf,length);
 
     if(i==find_station_flag) {
 
              find_zstation_flag=-1;
 
              XDrawLine(display,pix,gc,xc,yc,xc+text_width,yc);
 
    }
return;
 
}