aboutsummaryrefslogtreecommitdiff
path: root/gui/ticker.c
diff options
context:
space:
mode:
Diffstat (limited to 'gui/ticker.c')
-rwxr-xr-xgui/ticker.c36
1 files changed, 7 insertions, 29 deletions
diff --git a/gui/ticker.c b/gui/ticker.c
index abb55b2..4fc3b7f 100755
--- a/gui/ticker.c
+++ b/gui/ticker.c
@@ -6,6 +6,7 @@
#pragma warning( disable : 4305 )
#endif
+#include <stdio.h>
#include "fatom.h"
/* can we use the normal text save function ?? */
@@ -17,9 +18,9 @@ static void ticker_save(t_gobj *z, t_binbuf *b)
t_fatom *x = (t_fatom *)z;
- binbuf_addv(b, "ssiis", gensym("#X"),gensym("obj"),
+ binbuf_addv(b, "ssiiss", gensym("#X"),gensym("obj"),
x->x_obj.te_xpix, x->x_obj.te_ypix ,
- gensym("ticker"));
+ gensym("ticker"),x->x_text);
binbuf_addv(b, ";");
}
@@ -29,35 +30,11 @@ static void ticker_bang(t_fatom* x)
fatom_float(x,x->x_val);
}
-static void *ticker_new()
+static void *ticker_new(t_symbol* t)
{
t_fatom *x = (t_fatom *)pd_new(ticker_class);
- char buf[256];
-
x->x_type = gensym("checkbutton");
- x->x_glist = (t_glist*)NULL;
-/*
- if (h) x->x_width = h;
- else
-*/
-/*
- if (o) x->x_height = o;
- else
-*/
-
- /* bind to a symbol for ticker callback (later make this based on the
- filepath ??) */
-
- sprintf(buf,"ticker%x",x);
- x->x_sym = gensym(buf);
- pd_bind(&x->x_obj.ob_pd, x->x_sym);
-
-/* pipe startup code to slitk */
-
- sys_vgui("proc fatom_cb%x {val} {\n pd [concat ticker%x f $val \\;]\n }\n",x,x);
-
- outlet_new(&x->x_obj, &s_float);
- return (x);
+ return fatom_new(x,10,0,0,t);
}
@@ -75,9 +52,10 @@ t_widgetbehavior ticker_widgetbehavior = {
void ticker_setup() {
ticker_class = class_new(gensym("ticker"), (t_newmethod)ticker_new, 0,
- sizeof(t_fatom),0,0);
+ sizeof(t_fatom),0,A_DEFSYMBOL,0);
class_addbang(ticker_class,ticker_bang);
fatom_setup_common(ticker_class);
+ class_addbang(ticker_class, (t_method)ticker_bang);
class_setwidget(ticker_class,&ticker_widgetbehavior);
}