diff options
Diffstat (limited to 'gui/slider.h')
| -rwxr-xr-x | gui/slider.h | 439 |
1 files changed, 0 insertions, 439 deletions
diff --git a/gui/slider.h b/gui/slider.h deleted file mode 100755 index 69c44dd..0000000 --- a/gui/slider.h +++ /dev/null @@ -1,439 +0,0 @@ -#ifndef __SLIDER_H__
-#define __SLIDER_H__
-
-/* changes for setting width by <dieter@rhiz.org>
- set message by <dieter@klingt.org>
-*/
-
-#include "ggee.h"
-#include "m_imp.h"
-#include "g_canvas.h"
-#ifdef NT
-#pragma warning( disable : 4244 )
-#pragma warning( disable : 4305 )
-#endif
-
-#define SPOSITIONS
-#define te_xpos te_xpix
-#define te_ypos te_ypix
-
-typedef struct _slider
-{
- t_object x_obj;
- t_atom a_pos;
- t_atom a_pos2;
- t_glist * x_glist;
- int x_width;
- int x_height;
- int x_offset;
- int x_mpos;
- int x_num;
- int x_horizontal;
-} t_slider;
-
-#define x_pos a_pos.a_w.w_float
-#define x_pos2 a_pos2.a_w.w_float
-
-
-/* widget helper functions */
-
-static void draw_inlets(t_slider *x, t_glist *glist, int firsttime, int nin, int nout)
-{
- int n = nin;
- int nplus, i;
- nplus = (n == 1 ? 1 : n-1);
- for (i = 0; i < n; i++)
- {
- int onset = x->x_obj.te_xpos + (x->x_width - IOWIDTH) * i / nplus;
- if (firsttime)
- sys_vgui(".x%x.c create rectangle %d %d %d %d -tags %xo%d\n",
- glist_getcanvas(glist),
- onset, x->x_obj.te_ypos + x->x_height - 1,
- onset + IOWIDTH, x->x_obj.te_ypos + x->x_height,
- x, i);
- else
- sys_vgui(".x%x.c coords %xo%d %d %d %d %d\n",
- glist_getcanvas(glist), x, i,
- onset, x->x_obj.te_ypos + x->x_height - 1,
- onset + IOWIDTH, x->x_obj.te_ypos + x->x_height);
- }
- n = nout;
- nplus = (n == 1 ? 1 : n-1);
- for (i = 0; i < n; i++)
- {
- int onset = x->x_obj.te_xpos + (x->x_width - IOWIDTH) * i / nplus;
- if (firsttime)
- sys_vgui(".x%x.c create rectangle %d %d %d %d -tags %xi%d\n",
- glist_getcanvas(glist),
- onset, x->x_obj.te_ypos,
- onset + IOWIDTH, x->x_obj.te_ypos + 1,
- x, i);
- else
- sys_vgui(".x%x.c coords %xi%d %d %d %d %d\n",
- glist_getcanvas(glist), x, i,
- onset, x->x_obj.te_ypos,
- onset + IOWIDTH, x->x_obj.te_ypos + 1);
-
- }
-}
-
-
-
-static void slider_update(t_slider *x, t_glist *glist)
-{
- if (glist_isvisible(glist)) {
- if (!x->x_horizontal) {
- sys_vgui(".x%x.c coords %xP \
-%d %d %d %d\n",glist_getcanvas(glist),x,
- x->x_obj.te_xpos,x->x_obj.te_ypos + x->x_height - (int)x->x_pos + x->x_offset,
- x->x_obj.te_xpos + x->x_width,x->x_obj.te_ypos + x->x_height - (int)x->x_pos + x->x_offset);
- sys_vgui(".x%x.c coords %xP2 \
-%d %d %d %d\n",glist_getcanvas(glist),x,
- x->x_obj.te_xpos,x->x_obj.te_ypos + x->x_height - (int)x->x_pos2 + x->x_offset,
- x->x_obj.te_xpos + x->x_width,x->x_obj.te_ypos + x->x_height - (int)x->x_pos2 + x->x_offset);
- }
- else {
- sys_vgui(".x%x.c coords %xP \
-%d %d %d %d\n",glist_getcanvas(glist),x,
- x->x_obj.te_xpos +(int)x->x_pos - x->x_offset ,x->x_obj.te_ypos,
- x->x_obj.te_xpos +(int)x->x_pos - x->x_offset ,x->x_obj.te_ypos + x->x_height);
- sys_vgui(".x%x.c coords %xP2 \
-%d %d %d %d\n",glist_getcanvas(glist),x,
- x->x_obj.te_xpos +(int)x->x_pos2 - x->x_offset ,x->x_obj.te_ypos,
- x->x_obj.te_xpos +(int)x->x_pos2 - x->x_offset ,x->x_obj.te_ypos + x->x_height);
- }
- }
-}
-
-
-static void slider_drawme(t_slider *x, t_glist *glist, int firsttime)
-{
- if (firsttime) {
- sys_vgui(".x%x.c create rectangle \
-%d %d %d %d -tags %xS "BACKGROUND"\n",
- glist_getcanvas(glist),
- x->x_obj.te_xpos, x->x_obj.te_ypos,
- x->x_obj.te_xpos + x->x_width, x->x_obj.te_ypos + x->x_height,
- x);
- if (!x->x_horizontal) {
- sys_vgui(".x%x.c create line \
-%d %d %d %d -width 3 -tags %xP\n",glist_getcanvas(glist),
- x->x_obj.te_xpos,x->x_obj.te_ypos + x->x_height - (int)x->x_pos + x->x_offset,
- x->x_obj.te_xpos + x->x_width,
- x->x_obj.te_ypos + x->x_height - (int)x->x_pos + x->x_offset,x);
-
- sys_vgui(".x%x.c create line \
-%d %d %d %d -width 3 -tags %xP2\n",glist_getcanvas(glist),
- x->x_obj.te_xpos,x->x_obj.te_ypos + x->x_height - (int)x->x_pos2 + x->x_offset,
- x->x_obj.te_xpos + x->x_width,
- x->x_obj.te_ypos + x->x_height - (int)x->x_pos2 + x->x_offset,x);
- }
- else {
- sys_vgui(".x%x.c create line \
-%d %d %d %d -width 3 -tags %xP\n",glist_getcanvas(glist),
- x->x_obj.te_xpos + (int)x->x_pos + x->x_offset ,x->x_obj.te_ypos,
- x->x_obj.te_xpos + (int)x->x_pos + x->x_offset,
- x->x_obj.te_ypos + x->x_height,x );
- sys_vgui(".x%x.c create line \
-%d %d %d %d -width 3 -tags %xP2\n",glist_getcanvas(glist),
- x->x_obj.te_xpos + (int)x->x_pos2 + x->x_offset ,x->x_obj.te_ypos,
- x->x_obj.te_xpos + (int)x->x_pos2 + x->x_offset,
- x->x_obj.te_ypos + x->x_height,x );
- }
- }
- else {
- sys_vgui(".x%x.c coords %xS \
-%d %d %d %d\n",
- glist_getcanvas(glist), x,
- x->x_obj.te_xpos, x->x_obj.te_ypos,
- x->x_obj.te_xpos + x->x_width, x->x_obj.te_ypos + x->x_height);
- slider_update(x, glist);
- }
-
- draw_inlets(x, glist, firsttime, 1,1);
-
-}
-
-
-
-
-static void slider_erase(t_slider* x,t_glist* glist)
-{
- int n;
- sys_vgui(".x%x.c delete %xS\n",
- glist_getcanvas(glist), x);
-
- sys_vgui(".x%x.c delete %xP\n",
- glist_getcanvas(glist), x);
-
- sys_vgui(".x%x.c delete %xP2\n",
- glist_getcanvas(glist), x);
-
- n = x->x_num;
-
- while (n--) {
- sys_vgui(".x%x.c delete %xi%d\n",glist_getcanvas(glist),x,n);
- sys_vgui(".x%x.c delete %xo%d\n",glist_getcanvas(glist),x,n);
- }
-}
-
-
-
-/* ------------------------ slider widgetbehaviour----------------------------- */
-
-
-static void slider_getrect(t_gobj *z, t_glist *owner,
- int *xp1, int *yp1, int *xp2, int *yp2)
-{
- int width, height;
- t_slider* s = (t_slider*)z;
-
-
- width = s->x_width;
- height = s->x_height;
- *xp1 = s->x_obj.te_xpos;
- *yp1 = s->x_obj.te_ypos;
- *xp2 = s->x_obj.te_xpos + width;
- *yp2 = s->x_obj.te_ypos + height;
-}
-
-static void slider_displace(t_gobj *z, t_glist *glist,
- int dx, int dy)
-{
- t_slider *x = (t_slider *)z;
- x->x_obj.te_xpos += dx;
- x->x_obj.te_ypos += dy;
- slider_drawme(x, glist, 0);
- canvas_fixlinesfor(glist_getcanvas(glist),(t_text*) x);
-}
-
-static void slider_select(t_gobj *z, t_glist *glist, int state)
-{
- t_slider *x = (t_slider *)z;
- sys_vgui(".x%x.c itemconfigure %xS -fill %s\n", glist,
- x, (state? "blue" : BACKGROUNDCOLOR));
-}
-
-
-static void slider_activate(t_gobj *z, t_glist *glist, int state)
-{
-/* t_text *x = (t_text *)z;
- t_rtext *y = glist_findrtext(glist, x);
- if (z->g_pd != gatom_class) rtext_activate(y, state);*/
-}
-
-static void slider_delete(t_gobj *z, t_glist *glist)
-{
- t_text *x = (t_text *)z;
- canvas_deletelinesfor(glist_getcanvas(glist), x);
-}
-
-
-static void slider_vis(t_gobj *z, t_glist *glist, int vis)
-{
- t_slider* s = (t_slider*)z;
- if (vis)
- slider_drawme(s, glist, 1);
- else
- slider_erase(s,glist);
-}
-
-/* can we use the normal text save function ?? */
-
-static void slider_save(t_gobj *z, t_binbuf *b)
-{
- t_slider *x = (t_slider *)z;
- t_symbol* sname;
- int maxlen,maxwidth;
-
-/* if (!x->x_horizontal) {*/
- sname = gensym("slider");
- maxlen = x->x_height + x->x_offset;
- maxwidth = x->x_width;
-/* }*/
-
- /* forget hsliders ...
- else {
- sname = gensym("hslider");
- maxlen = x->x_width + x->x_offset;
- maxwidth = x->x_height;
- }
-*/
-
-
- binbuf_addv(b, "ssiisiiii", gensym("#X"),gensym("obj"),
- (t_int)x->x_obj.te_xpos, (t_int)x->x_obj.te_ypos, sname,maxlen,
- x->x_offset,maxwidth,x->x_num,x->x_horizontal);
-/* binbuf_addbinbuf(b, x->te_binbuf); */
- binbuf_addv(b, ";");
-}
-
-
-t_widgetbehavior slider_widgetbehavior;
-
-
-static void slider_motion(t_slider *x, t_floatarg dx, t_floatarg dy)
-{
- int max;
-
- if (!x->x_horizontal) {
- x->x_mpos -= dy;
- max = (x->x_offset + x->x_height);
- }
- else {
- x->x_mpos += dx;
- max = (x->x_offset + x->x_width);
- }
-
- if (x->x_mpos < x->x_offset)
- x->x_pos = x->x_offset;
- else if (x->x_mpos > (max))
- x->x_pos = (max);
- else
- x->x_pos = x->x_mpos;
-
-
- slider_update(x, x->x_glist);
- outlet_float(x->x_obj.ob_outlet, x->x_pos);
-
-}
-
-
-static void slider_click(t_slider *x,
- t_floatarg xpos, t_floatarg ypos, t_floatarg shift, t_floatarg ctrl,
- t_floatarg alt)
-{
-
- if (!x->x_horizontal)
- x->x_mpos = x->x_pos = x->x_obj.te_ypos + x->x_height + x->x_offset - ypos;
- else
- x->x_mpos = x->x_pos = xpos - x->x_obj.te_xpos + x->x_offset;
-
- slider_update(x, x->x_glist);
- outlet_float(x->x_obj.ob_outlet, x->x_pos);
-#if (PD_VERSION_MINOR > 31)
- glist_grab(x->x_glist, &x->x_obj.te_g, slider_motion, 0,xpos, ypos);
-#else
- glist_grab(x->x_glist, &x->x_obj.te_g, xpos, ypos);
-#endif
-}
-
-
-#if (PD_VERSION_MINOR > 31)
-static int slider_newclick(t_gobj *z, struct _glist *glist,
- int xpix, int ypix, int shift, int alt, int dbl, int doit)
-{
- t_slider* x = (t_slider *)z;
- if (doit)
- slider_click( x, (t_floatarg)xpix, (t_floatarg)ypix,
- (t_floatarg)shift, 0, (t_floatarg)alt);
- return (1);
-}
-#endif
-
-static void slider_setwidget()
-{
- slider_widgetbehavior.w_getrectfn = slider_getrect;
- slider_widgetbehavior.w_displacefn = slider_displace;
- slider_widgetbehavior.w_selectfn = slider_select;
- slider_widgetbehavior.w_activatefn = slider_activate;
- slider_widgetbehavior.w_deletefn = slider_delete;
- slider_widgetbehavior.w_visfn = slider_vis;
-#if (PD_VERSION_MINOR > 31)
- slider_widgetbehavior.w_clickfn = slider_newclick;
- slider_widgetbehavior.w_propertiesfn = NULL;
-#endif
- slider_widgetbehavior.w_savefn = slider_save;
-}
-
-
-
-static void slider_float(t_slider *x,t_floatarg f)
-{
- if (!x->x_horizontal) {
- if (f >= x->x_offset && f <= (x->x_offset + x->x_height))
- x->x_pos = (int)f;
- }
- else
- if (f >= x->x_offset && f <= (x->x_offset + x->x_width))
- x->x_pos = (int)f;
-
-
- slider_update(x, x->x_glist);
- outlet_float(x->x_obj.ob_outlet, x->x_pos);
-
-}
-
-
-static void slider_mark(t_slider *x,t_floatarg val)
-{
- if (!x->x_horizontal) {
- if (val >= x->x_offset && val <= (x->x_offset + x->x_height))
- x->x_pos2 = (int)val;
- }
- else
- if (val >= x->x_offset && val <= (x->x_offset + x->x_width))
- x->x_pos2 = (int)val;
-
- slider_update(x, x->x_glist);
-}
-
-
-static void slider_type(t_slider *x,t_floatarg val)
-{
- x->x_horizontal=val;
- slider_vis((struct _gobj*)x,x->x_glist,0);
- slider_vis((struct _gobj*)x,x->x_glist,1);
-}
-
-static void slider_list(t_slider *x,t_symbol* s,t_int argc, t_atom* argv)
-{
- t_float num;
- t_float val;
-
- if (argc != 2) return;
-
- num = atom_getfloat(argv++);
- val = atom_getfloat(argv);
- if (!x->x_horizontal) {
- if (val >= x->x_offset && val <= (x->x_offset + x->x_height))
- if (num)
- x->x_pos2 = (int)val;
- else
- x->x_pos = (int)val;
- }
- else
- if (val >= x->x_offset && val <= (x->x_offset + x->x_width))
- if (num)
- x->x_pos2 = (int)val;
- else
- x->x_pos = (int)val;
-
- slider_update(x, x->x_glist);
- outlet_float(x->x_obj.ob_outlet, x->x_pos);
-
-}
-
-
-
-static void slider_bang(t_slider *x)
-{
- outlet_float(x->x_obj.ob_outlet, x->x_pos);
-}
-
-
-static void slider_set(t_slider *x,t_floatarg f)
-{
- if (!x->x_horizontal) {
- if (f >= x->x_offset && f <= (x->x_offset + x->x_height))
- x->x_pos = (int)f;
- }
- else{
- if (f >= x->x_offset && f <= (x->x_offset + x->x_width))
- x->x_pos = (int)f;
- }
-
- slider_update(x, x->x_glist);
-}
-
-#endif
|