1 #ifdef HAVE_STDLIB_H
2 #include <stdlib.h>
3 #endif
4 #include "yagi.h"
5
6 /* These range variables select the graph range and are defined in output.c */
7
8 extern double xrange_min, xrange_max, yrange_min, yrange_max, rrange_min, rrange_max;
9
write_gnuplot_header(FILE * fp,double f,char * filename,int step,int lin_or_log)10 void write_gnuplot_header(FILE *fp, double f, char *filename, int step, int lin_or_log)
11 {
12 fprintf(fp,"#\n");
13 fprintf(fp,"# $Id: %s,v 1.4 1993/09/27 17:10:59 alex Exp $\n",filename);
14 fprintf(fp,"#\n");
15 fprintf(fp,"#\n");
16 fprintf(fp,"# Analsed from %s with Yagi-Uda \n", filename);
17 fprintf(fp,"set angles degrees\n");
18 fprintf(fp,"set size square\n");
19 fprintf(fp,"set polar\n");
20 fprintf(fp,"set grid polar 15.\n");
21 fprintf(fp,"set noborder\n");
22 fprintf(fp,"set noparam\n");
23 fprintf(fp,"set lines\n");
24 if(lin_or_log == LIN)
25 {
26
27 }
28 else if (lin_or_log==LOG)
29 {
30 fprintf(fp,"set xrange [%f:%f]\n",-(rrange_max-rrange_min), rrange_max-rrange_min);
31 fprintf(fp,"set yrange [%f:%f]\n",-(rrange_max-rrange_min), rrange_max-rrange_min);
32 fprintf(fp,"set rrange [%f:%f]\n",rrange_min, rrange_max);
33 fprintf(fp,"set trange [-pi:pi]\n");
34 }
35 fprintf(fp,"set xtics 0, 10, %f\n",-rrange_min+rrange_max);
36 fprintf(fp,"set ytics 0, 10, %f\n",-rrange_min+rrange_max);
37 fprintf(fp,"set xtics axis mirror\n");
38 fprintf(fp,"set ytics axis mirror\n");
39 fprintf(fp,"set data style line\n");
40 }
41
42