void gpk_rectangle_draw(GtkWidget *widget, /* plot on this widged */
gdouble *xcord, gdouble *ycord, /* corners */
gdouble xmn,gdouble ymn, /* coordinates of corners */
gdouble xmx,gdouble ymx,
GdkColor *color)
{
GdkPixmap **ppixmap;
GdkPoint points[2];
int i;
gint16 width,height;
GdkGC *gc;
gc = gdk_gc_new(widget->window);
gdk_gc_set_foreground(gc, color);
if ((ppixmap=findpixmap(widget))) {
width = widget->allocation.width;
height = widget->allocation.height;
for (i=0; i<2 ; i++) {
points[i].x =.5+ ((xcord[i]-xmn)*(width-1)/(xmx-xmn));
points[i].y =.5+ ((ycord[i]-ymx)*(height-1)/(ymn-ymx));
}
width=points[1].x-points[0].x + 1;
height=points[1].y-points[0].y + 1;
gdk_draw_rectangle(*ppixmap,gc,TRUE,
points[0].x,points[0].y,width,height);
gpk_redraw(*ppixmap,widget);
}
gdk_gc_destroy(gc);
}
void gpk_graph_draw(GtkWidget *widget, /* plot on this widged */
int n, /* number of data points */
gdouble *xcord, gdouble *ycord, /* data */
gdouble xmn,gdouble ymn, /* coordinates of corners */
gdouble xmx,gdouble ymx,
int clear, /* clear old plot first */
char *title, /* add a title (only if clear=1) */
GdkColor *color)
{
GdkPixmap **ppixmap;
GdkPoint *points;
int i;
gint16 width,height;
GdkFont *fixed_font;
GdkGC *gc;
gc = gdk_gc_new(widget->window);
gdk_gc_set_foreground(gc, color);
if ((ppixmap=findpixmap(widget))) {
width = widget->allocation.width;
height = widget->allocation.height;
if (clear) {
/* white background */
gdk_draw_rectangle (*ppixmap,
widget->style->white_gc,
TRUE,0, 0,width,height);
/* title */
#ifdef _WIN32
fixed_font = gdk_font_load ("-misc-fixed-large-r-*-*-*-100-*-*-*-*-*-*");
#else
fixed_font = gdk_font_load ("-misc-fixed-medium-r-*-*-*-100-*-*-*-*-iso8859-1");
#endif
gdk_draw_text (*ppixmap,fixed_font,
widget->style->fg_gc[GTK_WIDGET_STATE (widget)],
0,10,title,strlen(title));
}
points = g_malloc(n*sizeof(GdkPoint));
for (i=0; i<n ; i++) {
points[i].x =.5+ ((xcord[i]-xmn)*(width-1)/(xmx-xmn));
points[i].y =.5+ ((ycord[i]-ymx)*(height-1)/(ymn-ymx));
}
gdk_draw_lines(*ppixmap,gc,points,n);
g_free(points);
gpk_redraw(*ppixmap,widget);
}
gdk_gc_destroy(gc);
}
void
gpk_bargraph_draw(GtkWidget * widget, /* plot on this widged */
int n, /* number of data points */
gdouble * xcord, gdouble * ycord, /* data */
gdouble xmn, gdouble ymn, /* coordinates of corners */
gdouble xmx, gdouble ymx, int clear, /* clear old plot first */
char *title, /* add a title (only if clear=1) */
int barwidth, /* bar width. 0=compute based on window size */
GdkColor * color)
{
GdkPixmap **ppixmap;
GdkPoint points[2];
int i;
gint16 width, height, x, y, barheight;
GdkFont *fixed_font;
GdkGC *gc;
int titleSplit;
gc = gdk_gc_new(widget->window);
gdk_gc_set_foreground(gc, color);
if ((ppixmap = findpixmap(widget))) {
width = widget->allocation.width;
height = widget->allocation.height;
if (clear) {
/* white background */
gdk_draw_rectangle(*ppixmap, widget->style->white_gc, TRUE, 0, 0, width, height);
/* title */
#ifdef _WIN32
fixed_font = gdk_font_load("-misc-fixed-large-r-*-*-*-100-*-*-*-*-*-*");
#else
fixed_font = gdk_font_load("-misc-fixed-medium-r-*-*-*-100-*-*-*-*-iso8859-1");
#endif
titleSplit = strcspn(title, "\n");
if (titleSplit && (titleSplit != strlen(title))) {
gdk_draw_text(*ppixmap, fixed_font,
widget->style->fg_gc[GTK_WIDGET_STATE(widget)],
0, 10, title, titleSplit);
gdk_draw_text(*ppixmap, fixed_font,
widget->style->fg_gc[GTK_WIDGET_STATE(widget)],
0, 22, title + titleSplit + 1, (strlen(title) - titleSplit) - 1);
}
else {
gdk_draw_text(*ppixmap, fixed_font,
widget->style->fg_gc[GTK_WIDGET_STATE(widget)],
0, 10, title, strlen(title));
}
}
for (i = 0; i < n; i++) {
points[1].x = .5 + ((xcord[i] - xmn) * (width - 1) / (xmx - xmn));
points[1].y = .5 + ((ycord[i] - ymx) * (height - 1) / (ymn - ymx));
points[0].x = points[1].x;
points[0].y = height - 1;
x = .5 + ((xcord[i] - xmn) * (width - 1) / (xmx - xmn));
y = .5 + ((ycord[i] - ymx) * (height - 1) / (ymn - ymx));
if (!barwidth)
barwidth = (width / (n + 1)) - 1;
barwidth = barwidth > 5 ? 5 : barwidth;
barwidth = barwidth < 1 ? 1 : barwidth;
barheight = height - 1 - y;
/* gdk_draw_lines(*ppixmap,gc,points,2); */
gdk_draw_rectangle(*ppixmap, gc, TRUE, x, y, barwidth, barheight);
}
gpk_redraw(*ppixmap, widget);
}
gdk_gc_destroy(gc);
}