/* Copyright (c) 1997-1999 Miller Puckette. * For information on usage and redistribution, and for a DISCLAIMER OF ALL * WARRANTIES, see the file, "LICENSE.txt," in this distribution. */ /* g_grid.c written by Yves Degoyon 2002 */ /* grid control object : two dimensionnal grid */ /* thanks to Thomas Musil, Miller Puckette, Guenther Geiger and Krzystof Czaja */ #include #include #include #include #include #include "m_pd.h" #include "g_canvas.h" #include "g_grid.h" /* For the scalehandle... */ #include "g_all_guis.h" #ifdef _WIN32 #include #else #include #endif #define DEFAULT_GRID_WIDTH 200 #define DEFAULT_GRID_HEIGHT 200 #define DEFAULT_GRID_NBLINES 10 #define MIN_GRID_WIDTH 20 #define MIN_GRID_HEIGHT 20 t_widgetbehavior grid_widgetbehavior; static t_class *grid_class; static int gridcount=0; static int guidebug=0; static int pointsize = 5; static char *grid_version = "grid: version 0.9, written by Yves Degoyon (ydegoyon@free.fr)"; #define GRID_SYS_VGUI2(a,b) if (guidebug) \ post(a,b);\ sys_vgui(a,b) #define GRID_SYS_VGUI3(a,b,c) if (guidebug) \ post(a,b,c);\ sys_vgui(a,b,c) #define GRID_SYS_VGUI4(a,b,c,d) if (guidebug) \ post(a,b,c,d);\ sys_vgui(a,b,c,d) #define GRID_SYS_VGUI7(a,b,c,d,e,f,g) if (guidebug) \ post(a,b,c,d,e,f,g );\ sys_vgui(a,b,c,d,e,f,g) #define GRID_SYS_VGUI8(a,b,c,d,e,f,g,h) if (guidebug) \ post(a,b,c,d,e,f,g,h);\ sys_vgui(a,b,c,d,e,f,g,h) #define GRID_SYS_VGUI9(a,b,c,d,e,f,g,h,i) if (guidebug) \ post(a,b,c,d,e,f,g,h,i );\ sys_vgui(a,b,c,d,e,f,g,h,i) /* drawing functions */ static void grid_draw_update(t_grid *x, t_glist *glist) { t_canvas *canvas=glist_getcanvas(glist); t_int xpoint=x->x_current, ypoint=x->y_current; if (glist_isvisible(glist)) { // delete previous point if existing //if (x->x_point) //{ // GRID_SYS_VGUI3(".x%lx.c delete %lxPOINT\n", canvas, x); //} if (x->x_current < text_xpix(&x->x_obj, glist)) xpoint = text_xpix(&x->x_obj, glist); if (x->x_current > text_xpix(&x->x_obj, glist) + x->x_width - pointsize) xpoint = text_xpix(&x->x_obj, glist) + x->x_width - pointsize; if (x->y_current < text_ypix(&x->x_obj, glist)) ypoint = text_ypix(&x->x_obj, glist); if (x->y_current > text_ypix(&x->x_obj, glist) + x->x_height - pointsize) ypoint = text_ypix(&x->x_obj, glist) + x->x_height - pointsize; // draw the selected point //GRID_SYS_VGUI7(".x%lx.c create rectangle %d %d %d %d " // "-fill #FF0000 -tags %lxPOINT\n", // canvas, xpoint, ypoint, xpoint+pointsize, ypoint+pointsize, x); /* move the point */ gui_vmess("gui_grid_point", "xxii", canvas, x, xpoint - text_xpix(&x->x_obj, glist), ypoint - text_ypix(&x->x_obj, glist)); x->x_point = 1; } // else // { // post( "grid : position updated in an invisible grid" ); // } } static void grid_draw_select(t_grid* x, t_glist* glist); static void grid_draw_configure(t_grid *x, t_glist *glist) { t_canvas *canvas=glist_getcanvas(glist); //GRID_SYS_VGUI8(".x%lx.c create rectangle %d %d %d %d " // "-fill %s -tags %lxGRID\n", // canvas, text_xpix(&x->x_obj, glist), text_ypix(&x->x_obj, glist), // text_xpix(&x->x_obj, glist) + x->x_width, // text_ypix(&x->x_obj, glist) + x->x_height, // x->x_bgcolor, x); //GRID_SYS_VGUI7(".x%lx.c create rectangle %d %d %d %d -tags %lxo0\n", // canvas, text_xpix(&x->x_obj, glist), // text_ypix(&x->x_obj, glist) + x->x_height+1, // text_xpix(&x->x_obj, glist)+7, // text_ypix(&x->x_obj, glist) + x->x_height+2, x); //GRID_SYS_VGUI7(".x%lx.c create rectangle %d %d %d %d -tags %lxo1\n", // canvas, text_xpix(&x->x_obj, glist) + x->x_width - 7, // text_ypix(&x->x_obj, glist) + x->x_height + 1, // text_xpix(&x->x_obj, glist) + x->x_width, // text_ypix(&x->x_obj, glist) + x->x_height + 2, // x); //if (x->x_grid) //{ // int xlpos = text_xpix(&x->x_obj, glist)+x->x_width/x->x_xlines; // int ylpos = text_ypix(&x->x_obj, glist)+x->x_height/x->x_ylines; // int xcount = 1; // int ycount = 1; // while ( xlpos < text_xpix(&x->x_obj, glist)+x->x_width ) // { // GRID_SYS_VGUI9(".x%lx.c create line %d %d %d %d " // "-fill #FFFFFF -tags %lxLINE%d%d\n", // canvas, xlpos, text_ypix(&x->x_obj, glist), // xlpos, text_ypix(&x->x_obj, glist) + x->x_height, // x, xcount, 0); // xlpos += x->x_width / x->x_xlines; // xcount++; // } // while (ylpos < text_ypix(&x->x_obj, glist)+x->x_height) // { // GRID_SYS_VGUI9(".x%lx.c create line %d %d %d %d " // "-fill #FFFFFF -tags %lxLINE%d%d\n", // canvas, text_xpix(&x->x_obj, glist), ylpos, // text_xpix(&x->x_obj, glist)+x->x_width, ylpos, // x, 0, ycount); // ylpos += x->x_height / x->x_ylines; // ycount++; // } //} // gui_gobj_new, "xx type text_xpix text_ypix istoplevel" gui_vmess("gui_configure_grid", "xxiisiii", canvas, x, x->x_width, x->x_height, x->x_bgcolor, x->x_grid, x->x_xlines, x->x_ylines); if (glist_isselected(glist, &x->x_obj)) grid_draw_select(x, glist); canvas_fixlinesfor( canvas, (t_text*)x ); } static void grid_draw_new(t_grid *x, t_glist *glist) { t_canvas *canvas=glist_getcanvas(glist); gui_vmess("gui_grid_new", "xxiii", canvas, x, text_xpix(&x->x_obj, glist), text_ypix(&x->x_obj, glist), glist_istoplevel(glist)); grid_draw_configure(x, glist); } static void grid_draw_move(t_grid *x, t_glist *glist) { t_canvas *canvas=glist_getcanvas(glist); //GRID_SYS_VGUI7(".x%lx.c coords %lxGRID %d %d %d %d\n", // canvas, x, // text_xpix(&x->x_obj, glist), text_ypix(&x->x_obj, glist), // text_xpix(&x->x_obj, glist)+x->x_width, // text_ypix(&x->x_obj, glist)+x->x_height); //GRID_SYS_VGUI7(".x%lx.c coords %lxo0 %d %d %d %d\n", // canvas, x, // text_xpix(&x->x_obj, glist), // text_ypix(&x->x_obj, glist) + x->x_height + 1, // text_xpix(&x->x_obj, glist) + 7, // text_ypix(&x->x_obj, glist) + x->x_height + 2); //GRID_SYS_VGUI7(".x%lx.c coords %lxo1 %d %d %d %d\n", // canvas, x, // text_xpix(&x->x_obj, glist) + x->x_width - 7, // text_ypix(&x->x_obj, glist) + x->x_height + 1, // text_xpix(&x->x_obj, glist) + x->x_width, // text_ypix(&x->x_obj, glist) + x->x_height + 2); if (x->x_point) { grid_draw_update(x, glist); } //if (x->x_grid) //{ // int xlpos = text_xpix(&x->x_obj, glist)+x->x_width/x->x_xlines; // int ylpos = text_ypix(&x->x_obj, glist)+x->x_height/x->x_ylines; // int xcount = 1; // int ycount = 1; // while (xlpos < text_xpix(&x->x_obj, glist) + x->x_width) // { // GRID_SYS_VGUI9(".x%lx.c coords %lxLINE%d%d %d %d %d %d\n", // canvas, x, xcount, 0, xlpos, text_ypix(&x->x_obj, glist), // xlpos, text_ypix(&x->x_obj, glist) + x->x_height); // xlpos+=x->x_width/x->x_xlines; // xcount++; // } // while (ylpos < text_ypix(&x->x_obj, glist) + x->x_height) // { // GRID_SYS_VGUI9(".x%lx.c coords %lxLINE%d%d %d %d %d %d\n", // canvas, x, 0, ycount, text_xpix(&x->x_obj, glist), ylpos, // text_xpix(&x->x_obj, glist) + x->x_width, ylpos); // ylpos+=x->x_height/x->x_ylines; // ycount++; // } //} canvas_fixlinesfor( canvas, (t_text*)x ); } static void grid_draw_erase(t_grid* x, t_glist* glist) { t_canvas *canvas = glist_getcanvas(glist); gui_vmess("gui_gobj_erase", "xx", canvas, x); //int i; //GRID_SYS_VGUI3(".x%lx.c delete %lxGRID\n", canvas, x); //GRID_SYS_VGUI3(".x%lx.c delete %lxo0\n", canvas, x); //GRID_SYS_VGUI3(".x%lx.c delete %lxo1\n", canvas, x); //if (x->x_grid) //{ // for (i=1; ix_xlines; i++) // { // GRID_SYS_VGUI4(".x%lx.c delete %lxLINE%d0\n", canvas, x, i); // } // for (i=1; ix_ylines; i++) // { // GRID_SYS_VGUI4(".x%lx.c delete %lxLINE0%d\n", canvas, x, i); // } //} //if (x->x_point) //{ // GRID_SYS_VGUI3(".x%lx.c delete %lxPOINT\n", canvas, x); // x->x_point = 0; //} } static void grid_draw_select(t_grid* x,t_glist* glist) { t_canvas *canvas = glist_getcanvas(glist); if (x->x_selected) { //pd_bind(&x->x_obj.ob_pd, x->x_name); /* sets the item in blue */ //GRID_SYS_VGUI3(".x%lx.c itemconfigure %lxGRID " // "-outline #0000FF\n", // canvas, x); gui_vmess("gui_gobj_select", "xx", canvas, x); } else { //pd_unbind(&x->x_obj.ob_pd, x->x_name); //GRID_SYS_VGUI3(".x%lx.c itemconfigure %lxGRID " // "-outline #000000\n", // canvas, x); gui_vmess("gui_gobj_deselect", "xx", canvas, x); } } static void grid_output_current(t_grid* x) { t_float xvalue, yvalue; t_float xmodstep, ymodstep; xvalue = x->x_min + (x->x_current - text_xpix(&x->x_obj, x->x_glist)) * (x->x_max-x->x_min) / x->x_width ; if (xvalue < x->x_min ) xvalue = x->x_min; if (xvalue > x->x_max ) xvalue = x->x_max; xmodstep = ((float)((int)(xvalue*10000) % (int)(x->x_xstep*10000))/10000.); xvalue = xvalue - xmodstep; outlet_float( x->x_xoutlet, xvalue ); yvalue = x->y_max - (x->y_current - text_ypix(&x->x_obj, x->x_glist) ) * (x->y_max-x->y_min) / x->x_height ; if (yvalue < x->y_min ) yvalue = x->y_min; if (yvalue > x->y_max ) yvalue = x->y_max; ymodstep = ((float)((int)(yvalue*10000) % (int)(x->x_ystep*10000))/10000.); yvalue = yvalue - ymodstep; outlet_float(x->x_youtlet, yvalue); } /* ------------------------ grid widgetbehaviour----------------------------- */ static void grid_getrect(t_gobj *z, t_glist *owner, int *xp1, int *yp1, int *xp2, int *yp2) { t_grid* x = (t_grid*)z; *xp1 = text_xpix(&x->x_obj, x->x_glist); *yp1 = text_ypix(&x->x_obj, x->x_glist); *xp2 = text_xpix(&x->x_obj, x->x_glist)+x->x_width; *yp2 = text_ypix(&x->x_obj, x->x_glist)+x->x_height; } static void grid_save(t_gobj *z, t_binbuf *b) { t_grid *x = (t_grid *)z; // post( "saving grid : %s", x->x_name->s_name ); binbuf_addv(b, "ssiissiffiffiffiiff", gensym("#X"),gensym("obj"), (t_int)x->x_obj.te_xpix, (t_int)x->x_obj.te_ypix, atom_getsymbol(binbuf_getvec(x->x_obj.te_binbuf)), x->x_name, x->x_width, x->x_min, x->x_max, x->x_height, x->y_min, x->y_max, x->x_grid, x->x_xstep, x->x_ystep, x->x_xlines, x->x_ylines, x->x_current, x->y_current ); binbuf_addv(b, ";"); } static void grid_properties(t_gobj *z, t_glist *owner) { char buf[800]; char *gfx_tag; t_grid *x=(t_grid *)z; //sprintf(buf, "pdtk_grid_dialog %%s %s %d %.2f %.2f %d %.2f %.2f %d %.2f %.2f %d %d\n", // x->x_name->s_name, x->x_width, x->x_min, x->x_max, x->x_height, // x->y_min, x->y_max, x->x_grid, x->x_xstep, x->x_ystep, // x->x_xlines, x->x_ylines ); // post("grid_properties : %s", buf ); //gfxstub_new(&x->x_obj.ob_pd, x, buf); gfx_tag = gfxstub_new2(&x->x_obj.ob_pd, x); gui_start_vmess("gui_external_dialog", "ss", gfx_tag, "grid"); gui_start_array(); gui_s("receive_symbol"); gui_s(x->x_name->s_name); gui_s("width"); gui_i(x->x_width); gui_s("min"); gui_f(x->x_min); gui_s("max"); gui_f(x->x_max); gui_s("height"); gui_i(x->x_height); gui_s("y-min"); gui_f(x->y_min); gui_s("y-max"); gui_f(x->y_max); gui_s("grid_toggle"); gui_i(x->x_grid); gui_s("x-steps"); gui_f(x->x_xstep); gui_s("y-steps"); gui_f(x->x_ystep); gui_s("x-lines"); gui_i(x->x_xlines); gui_s("y-lines"); gui_i(x->x_ylines); gui_end_array(); gui_end_vmess(); } static void grid_select(t_gobj *z, t_glist *glist, int selected) { t_grid *x = (t_grid *)z; x->x_selected = selected; grid_draw_select(x, glist); } static void grid_vis(t_gobj *z, t_glist *glist, int vis) { t_grid *x = (t_grid *)z; if (vis) { grid_draw_new( x, glist ); grid_draw_update( x, glist ); grid_output_current(x); } else { grid_draw_erase( x, glist ); } } static void grid_dialog(t_grid *x, t_symbol *s, int argc, t_atom *argv) { if (!x) { error("grid : error :tried to set properties on an unexisting object"); } if (argc != 12) { pd_error(x, "grid : error in the number of arguments ( %d instead of 12 )", argc ); return; } if ( argv[0].a_type != A_SYMBOL || argv[1].a_type != A_FLOAT || argv[2].a_type != A_FLOAT || argv[3].a_type != A_FLOAT || argv[4].a_type != A_FLOAT || argv[5].a_type != A_FLOAT || argv[6].a_type != A_FLOAT || argv[7].a_type != A_FLOAT || argv[8].a_type != A_FLOAT || argv[9].a_type != A_FLOAT || argv[10].a_type != A_FLOAT || argv[11].a_type != A_FLOAT ) { pd_error(x, "grid : wrong arguments" ); return; } x->x_name = argv[0].a_w.w_symbol; x->x_width = (int)argv[1].a_w.w_float; x->x_min = argv[2].a_w.w_float; x->x_max = argv[3].a_w.w_float; x->x_height = (int)argv[4].a_w.w_float; x->y_min = argv[5].a_w.w_float; x->y_max = argv[6].a_w.w_float; x->x_grid = argv[7].a_w.w_float; x->x_xstep = argv[8].a_w.w_float; x->x_ystep = argv[9].a_w.w_float; x->x_xlines = argv[10].a_w.w_float; x->x_ylines = argv[11].a_w.w_float; //grid_draw_erase(x, x->x_glist); //grid_draw_new(x, x->x_glist); grid_draw_configure(x, x->x_glist); } static void grid_delete(t_gobj *z, t_glist *glist) { canvas_deletelinesfor(glist, (t_text *)z); } static void grid_displace(t_gobj *z, t_glist *glist, int dx, int dy) { t_grid *x = (t_grid *)z; int xold = text_xpix(&x->x_obj, glist); int yold = text_ypix(&x->x_obj, glist); // post( "grid_displace dx=%d dy=%d", dx, dy ); x->x_obj.te_xpix += dx; x->x_current += dx; x->x_obj.te_ypix += dy; x->y_current += dy; if (xold != text_xpix(&x->x_obj, glist) || yold != text_ypix(&x->x_obj, glist)) { //grid_draw_move(x, x->x_glist); canvas_fixlinesfor(glist, (t_text *)z); } } static void grid_displace_wtag(t_gobj *z, t_glist *glist, int dx, int dy) { t_grid *x = (t_grid *)z; int xold = text_xpix(&x->x_obj, glist); int yold = text_ypix(&x->x_obj, glist); // post( "grid_displace dx=%d dy=%d", dx, dy ); x->x_obj.te_xpix += dx; x->x_current += dx; x->x_obj.te_ypix += dy; x->y_current += dy; if (xold != text_xpix(&x->x_obj, glist) || yold != text_ypix(&x->x_obj, glist)) { //grid_draw_move(x, x->x_glist); canvas_fixlinesfor(glist, (t_text *)z); } } static void grid_motion(t_grid *x, t_floatarg dx, t_floatarg dy) { int xold = x->x_current; int yold = x->y_current; // post( "grid_motion dx=%f dy=%f", dx, dy ); x->x_current += dx; x->y_current += dy; if(xold != x->x_current || yold != x->y_current) { grid_output_current(x); grid_draw_update(x, x->x_glist); } } static int grid_click(t_gobj *z, struct _glist *glist, int xpix, int ypix, int shift, int alt, int dbl, int doit) { t_grid* x = (t_grid *)z; // post( "grid_click doit=%d x=%d y=%d", doit, xpix, ypix ); if ( doit) { x->x_current = xpix; x->y_current = ypix; grid_output_current(x); grid_draw_update(x, glist); glist_grab(glist, &x->x_obj.te_g, (t_glistmotionfn)grid_motion, 0, xpix, ypix); } return (1); } static void grid_goto(t_grid *x, t_floatarg newx, t_floatarg newy) { int xold = x->x_current; int yold = x->y_current; if (newx > x->x_width-1) newx = x->x_width-1; if (newx < 0) newx = 0; if (newy > x->x_height-1) newy = x->x_height-1; if (newy < 0) newy = 0; // post( "grid_set x=%f y=%f", newx, newy ); x->x_current = newx + text_xpix(&x->x_obj, x->x_glist); x->y_current = newy + text_ypix(&x->x_obj, x->x_glist); if (xold != x->x_current || yold != x->y_current) { grid_output_current(x); grid_draw_update(x, x->x_glist); } } static void grid_new_color(t_grid *x, t_floatarg color1, t_floatarg color2, t_floatarg color3) { char col1[10], col2[10], col3[10]; if ((color1 < 0) || (color1 > 255)) { pd_error(x, "wrong color component : %d", (int)color1); } if ((color2 < 0) || (color2 > 255)) { pd_error(x, "wrong color component : %d", (int)color2); } if ((color3 < 0) || (color3 > 255)) { pd_error(x, "wrong color component : %d", (int)color3); } if (color1 < 17) sprintf(col1,"0%X",(int) color1); else sprintf(col1,"%X",(int) color1); if (color2 < 17) sprintf(col2,"0%X",(int) color2); else sprintf(col2,"%X",(int) color2); if (color3 < 17) sprintf(col3,"0%X",(int) color3); else sprintf(col3,"%X",(int) color3); sprintf( x->x_bgcolor, "#%s%s%s", col1, col2, col3); //grid_draw_erase(x, x->x_glist); //grid_draw_new(x, x->x_glist); grid_draw_configure(x, x->x_glist); } static void grid_values(t_grid* x, t_floatarg xvalue, t_floatarg yvalue) { int xold = x->x_current; int yold = x->y_current; if (xvalue < x->x_min ) xvalue = x->x_min; if (xvalue > x->x_max ) xvalue = x->x_max; x->x_current = text_xpix(&x->x_obj, x->x_glist) + abs(((xvalue - x->x_min) / (x->x_max - x->x_min)) * x->x_width); if (yvalue < x->y_min ) yvalue = x->y_min; if (yvalue > x->y_max ) yvalue = x->y_max; x->y_current = text_ypix(&x->x_obj, x->x_glist) + abs((1 - (yvalue - x->y_min) / (x->y_max - x->y_min)) * x->x_height); if (xold != x->x_current || yold != x->y_current) { grid_output_current(x); grid_draw_update(x, x->x_glist); } } static void grid_xvalues(t_grid* x, t_floatarg xvalue, t_floatarg yvalue) { int xold = x->x_current; int yold = x->y_current; if (xvalue < x->x_min ) xvalue = x->x_min; if (xvalue > x->x_max ) xvalue = x->x_max; x->x_current = text_xpix(&x->x_obj, x->x_glist) + abs(((xvalue - x->x_min) / (x->x_max - x->x_min)) * x->x_width); if (yvalue < x->y_min ) yvalue = x->y_min; if (yvalue > x->y_max ) yvalue = x->y_max; x->y_current = text_ypix(&x->x_obj, x->x_glist) + abs((1 - (yvalue - x->y_min) / (x->y_max - x->y_min)) * x->x_height); if (xold != x->x_current || yold != x->y_current) { grid_draw_update(x, x->x_glist); } } static void grid_valuemotion(t_grid* x, t_floatarg dx, t_floatarg dy) { int xold = x->x_current; int yold = x->y_current; t_float xvalue, yvalue; xvalue = x->x_min + (x->x_current - text_xpix(&x->x_obj, x->x_glist)) * (x->x_max-x->x_min) / x->x_width ; if (xvalue < x->x_min ) xvalue = x->x_min; if (xvalue > x->x_max ) xvalue = x->x_max; yvalue = x->y_max - (x->y_current - text_ypix(&x->x_obj, x->x_glist) ) * (x->y_max-x->y_min) / x->x_height ; if (yvalue < x->y_min ) yvalue = x->y_min; if (yvalue > x->y_max ) yvalue = x->y_max; xvalue += dx; yvalue += dy; if (xvalue < x->x_min ) xvalue = x->x_min; if (xvalue > x->x_max ) xvalue = x->x_max; x->x_current = text_xpix(&x->x_obj, x->x_glist) + abs(((xvalue - x->x_min) / (x->x_max - x->x_min)) * x->x_width); if (yvalue < x->y_min ) yvalue = x->y_min; if (yvalue > x->y_max ) yvalue = x->y_max; x->y_current = text_ypix(&x->x_obj, x->x_glist) + (1 - ((yvalue - x->y_min) / x->y_max)) * x->x_height; if (xold != x->x_current || yold != x->y_current) { grid_output_current(x); grid_draw_update(x, x->x_glist); } } static void grid_xvaluemotion(t_grid* x, t_floatarg dx, t_floatarg dy) { int xold = x->x_current; int yold = x->y_current; t_float xvalue, yvalue; xvalue = x->x_min + (x->x_current - text_xpix(&x->x_obj, x->x_glist)) * (x->x_max-x->x_min) / x->x_width; if (xvalue < x->x_min) xvalue = x->x_min; if (xvalue > x->x_max) xvalue = x->x_max; yvalue = x->y_max - (x->y_current - text_ypix(&x->x_obj, x->x_glist) ) * (x->y_max-x->y_min) / x->x_height ; if (yvalue < x->y_min ) yvalue = x->y_min; if (yvalue > x->y_max ) yvalue = x->y_max; xvalue += dx; yvalue += dy; if (xvalue < x->x_min) xvalue = x->x_min; if (xvalue > x->x_max) xvalue = x->x_max; x->x_current = text_xpix(&x->x_obj, x->x_glist) + abs(((xvalue - x->x_min) / (x->x_max - x->x_min)) * x->x_width); if (yvalue < x->y_min) yvalue = x->y_min; if (yvalue > x->y_max) yvalue = x->y_max; x->y_current = text_ypix(&x->x_obj, x->x_glist) + abs((1 - (yvalue - x->y_min) / (x->y_max - x->y_min)) * x->x_height); if (xold != x->x_current || yold != x->y_current) { grid_draw_update(x, x->x_glist); } } static void grid_bang(t_grid *x) { grid_output_current(x); } static void grid__clickhook(t_scalehandle *sh, int newstate) { t_grid *x = (t_grid *)(sh->h_master); /* Use constrained dragging-- see g_canvas.c clickhook */ sh->h_constrain = newstate; sh->h_adjust_x = sh->h_offset_x - (((t_object *)x)->te_xpix + x->x_width); sh->h_adjust_y = sh->h_offset_y - (((t_object *)x)->te_ypix + x->x_height); canvas_apply_setundo(x->x_glist, (t_gobj *)x); sh->h_dragon = newstate; } static void grid__motionhook(t_scalehandle *sh, t_floatarg mouse_x, t_floatarg mouse_y) { t_grid *x = (t_grid *)(sh->h_master); int width = (sh->h_constrain == CURSOR_EDITMODE_RESIZE_Y) ? x->x_width : (int)mouse_x - text_xpix(&x->x_obj, x->x_glist) - sh->h_adjust_x; int height = (sh->h_constrain == CURSOR_EDITMODE_RESIZE_X) ? x->x_height : (int)mouse_y - text_ypix(&x->x_obj, x->x_glist) - sh->h_adjust_y; int minw = MIN_GRID_WIDTH, minh = MIN_GRID_HEIGHT; x->x_width = width < minw ? minw : width; x->x_height = height < minh ? minh : height; if (glist_isvisible(x->x_glist)) { grid_draw_configure(x, x->x_glist); //scalehandle_unclick_scale(sh); } int properties = gfxstub_haveproperties((void *)x); if (properties) { int new_w = x->x_width + sh->h_dragx; int new_h = x->x_height + sh->h_dragy; properties_set_field_int(properties,"width",new_w); properties_set_field_int(properties,"height",new_h); } } /* wrapper method for forwarding "scalehandle" data */ static void grid_click_for_resizing(t_grid *x, t_floatarg f, t_floatarg xxx, t_floatarg yyy) { t_scalehandle *sh = (t_scalehandle *)x->x_handle; sh->h_offset_x = (int)xxx; sh->h_offset_y = (int)yyy; grid__clickhook(sh, f); } /* another wrapper for forwarding "scalehandle" motion data */ static void grid_motion_for_resizing(t_grid *x, t_floatarg xxx, t_floatarg yyy) { t_scalehandle *sh = (t_scalehandle *)x->x_handle; grid__motionhook(sh, xxx, yyy); } static t_grid *grid_new(t_symbol *s, int argc, t_atom *argv) { int zz; t_grid *x; char *str; // post( "grid_new : create : %s argc =%d", s->s_name, argc ); x = (t_grid *)pd_new(grid_class); // new grid created from the gui if (argc != 0) { if ( argc != 14 ) { pd_error(x, "grid : error in the number of arguments " "( %d instead of 14 )", argc ); return NULL; } if (argv[0].a_type != A_SYMBOL || argv[1].a_type != A_FLOAT || argv[2].a_type != A_FLOAT || argv[3].a_type != A_FLOAT || argv[4].a_type != A_FLOAT || argv[5].a_type != A_FLOAT || argv[6].a_type != A_FLOAT || argv[7].a_type != A_FLOAT || argv[8].a_type != A_FLOAT || argv[9].a_type != A_FLOAT || argv[10].a_type != A_FLOAT || argv[11].a_type != A_FLOAT || argv[12].a_type != A_FLOAT || argv[13].a_type != A_FLOAT ) { pd_error(x, "grid : wrong arguments" ); return NULL; } // update grid count if (!strncmp((str = argv[0].a_w.w_symbol->s_name), "grid", 5) && (zz = atoi(str + 5)) > gridcount) { gridcount = zz; } x->x_name = argv[0].a_w.w_symbol; pd_bind(&x->x_obj.ob_pd, x->x_name); x->x_width = argv[1].a_w.w_float; x->x_min = argv[2].a_w.w_float; x->x_max = argv[3].a_w.w_float; x->x_height = argv[4].a_w.w_float; x->y_min = argv[5].a_w.w_float; x->y_max = argv[6].a_w.w_float; x->x_grid = argv[7].a_w.w_float; x->x_xstep = argv[8].a_w.w_float; x->x_ystep = argv[9].a_w.w_float; x->x_xlines = argv[10].a_w.w_float; x->x_ylines = argv[11].a_w.w_float; x->x_current = argv[12].a_w.w_float; x->y_current = argv[13].a_w.w_float; x->x_point = 1; } else { char buf[40]; sprintf(buf, "grid%d", ++gridcount); s = gensym(buf); x->x_name = s; pd_bind(&x->x_obj.ob_pd, x->x_name); x->x_width = DEFAULT_GRID_WIDTH; x->x_min = 0; x->x_max = DEFAULT_GRID_WIDTH - 1; x->x_height = DEFAULT_GRID_HEIGHT; x->y_min = 0; x->y_max = DEFAULT_GRID_HEIGHT - 1; x->x_grid = 1; x->x_xstep = 1.0; x->x_ystep = 1.0; x->x_xlines = DEFAULT_GRID_NBLINES; x->x_ylines = DEFAULT_GRID_NBLINES; x->x_current = 0; x->y_current = 0; } // common fields for new and restored grids x->x_point = 0; x->x_selected = 0; x->x_glist = (t_glist *) canvas_getcurrent(); x->x_xoutlet = outlet_new(&x->x_obj, &s_float ); x->x_youtlet = outlet_new(&x->x_obj, &s_float ); x->x_bgcolor = (char*)getbytes(12); strcpy( x->x_bgcolor, "#123589" ); // post( "grid_new name : %s width: %d height : %d", // x->x_name->s_name, x->x_width, x->x_height ); x->x_handle = scalehandle_new((t_object *)x, x->x_glist, 1, grid__clickhook, grid__motionhook); return (x); } static void grid_free(t_grid *x) { pd_unbind(&x->x_obj.ob_pd, x->x_name); gfxstub_deleteforkey(x); } void grid_setup(void) { //#include "grid.tk2c" post ( grid_version ); grid_class = class_new(gensym("grid"), (t_newmethod)grid_new, (t_method)grid_free, sizeof(t_grid), 0, A_GIMME, 0); class_addmethod(grid_class, (t_method)grid_click, gensym("click"), A_FLOAT, A_FLOAT, A_FLOAT, A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_motion, gensym("motion"), A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_bang, gensym("bang"), 0); class_addmethod(grid_class, (t_method)grid_values, gensym("values"), A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_valuemotion, gensym("valuemotion"), A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_xvalues, gensym("xvalues"), A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_xvaluemotion, gensym("xvaluemotion"), A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_goto, gensym("goto"), A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_dialog, gensym("dialog"), A_GIMME, 0); class_addmethod(grid_class, (t_method)grid_new_color, gensym("color"), A_FLOAT, A_FLOAT, A_FLOAT, 0); /* Big hack for receiving edit-mode resize anchor clicks from g_editor.c. */ class_addmethod(grid_class, (t_method)grid_click_for_resizing, gensym("_click_for_resizing"), A_FLOAT, A_FLOAT, A_FLOAT, 0); class_addmethod(grid_class, (t_method)grid_motion_for_resizing, gensym("_motion_for_resizing"), A_FLOAT, A_FLOAT, 0); grid_widgetbehavior.w_getrectfn = grid_getrect; grid_widgetbehavior.w_displacefn = grid_displace; grid_widgetbehavior.w_selectfn = grid_select; grid_widgetbehavior.w_activatefn = NULL; grid_widgetbehavior.w_deletefn = grid_delete; grid_widgetbehavior.w_visfn = grid_vis; grid_widgetbehavior.w_clickfn = grid_click; grid_widgetbehavior.w_displacefnwtag = grid_displace_wtag; #if PD_MINOR_VERSION >= 37 class_setpropertiesfn(grid_class, grid_properties); class_setsavefn(grid_class, grid_save); #else grid_widgetbehavior.w_propertiesfn = grid_properties; grid_widgetbehavior.w_savefn = grid_save; #endif class_setwidget(grid_class, &grid_widgetbehavior); }