aboutsummaryrefslogtreecommitdiff
path: root/externals/build/src/cup.c
blob: 6aca2141638a95c8a60a4396c4ec46b8082c93a1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
#include "m_pd.h"

t_class *cup_class;

typedef struct _cup
{
  t_object x_obj;
  t_int f_count, fa;
  t_outlet *count;
} t_cup;

void cup_float(t_cup *y, t_floatarg f)
{
  y->f_count = f;
}

void cup_bang(t_cup *y)
{
  outlet_float(y->count, y->f_count);
  y->f_count += 1;
}

void *cup_new(t_floatarg f)
{
  t_cup *y = (t_cup *)pd_new(cup_class);
  y->fa = f;
  y->f_count = 0;
  y->count = outlet_new(&y->x_obj, gensym("float"));
  return(void *)y;
}

void cup_setup(void) 
{
  cup_class = class_new(gensym("cup"),
  (t_newmethod)cup_new,
  0, sizeof(t_cup),
  0, A_DEFFLOAT, 0);
  post("cup counts up ^_^");
  class_sethelpsymbol(cup_class, gensym("help-cup"));
  class_addbang(cup_class, cup_bang);
  class_addfloat(cup_class, cup_float);
}