You can see this patch and its abstraction.
They could help you to make an interface with several numberbox.
++

Jack



Le dimanche 11 avril 2010 à 16:33 +0100, Andrew Faraday a écrit :
> Hey all
> 
> 
> One of my workshop members recently challenged me about how to produce
> a keyboard-based control system to select and change parameters (in
> this example RGB) using the left and right arrows to select and the up
> and down to change. I've attached my attempt at it, however the logic
> involved is a bit cumbersome. Any more elegant solutions?
> 
> 
> Thanks
> 
> 
> Andrew
> 
> 
> ______________________________________________________________________
> Get a free e-mail account with Hotmail. Sign-up now. 
> _______________________________________________
> Pd-list@iem.at mailing list
> UNSUBSCRIBE and account-management -> 
> http://lists.puredata.info/listinfo/pd-list

#N canvas 448 385 712 300 10;
#X obj 210 99 r more;
#X obj 263 99 r less;
#X obj 323 99 r nbselected;
#X obj 323 124 route \$1;
#X obj 100 100 nbx 5 14 -1e+37 1e+37 0 0 empty \$0-nbbox empty 0 -8
0 10 -258699 -262144 -262144 6 256;
#X obj 210 231 s \$0-nbbox;
#X obj 210 176 spigot;
#X msg 323 151 1;
#X msg 368 151 0;
#X msg 210 132 1;
#X msg 263 132 -1;
#X msg 323 201 color \$1 0 0;
#X msg 323 175 13;
#X msg 368 175 1;
#X obj 100 127 s from\$1;
#X obj 469 99 initbang;
#X obj 469 125 s recFromAbs;
#X obj 210 201 +;
#X obj 240 201 t f;
#X obj 529 99 r initrest;
#X text 506 213 Jack/RYBN 2010;
#X connect 0 0 9 0;
#X connect 1 0 10 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 3 1 8 0;
#X connect 4 0 14 0;
#X connect 6 0 17 0;
#X connect 7 0 6 1;
#X connect 7 0 12 0;
#X connect 8 0 6 1;
#X connect 8 0 13 0;
#X connect 9 0 6 0;
#X connect 10 0 6 0;
#X connect 11 0 5 0;
#X connect 12 0 11 0;
#X connect 13 0 11 0;
#X connect 15 0 16 0;
#X connect 17 0 18 0;
#X connect 17 0 5 0;
#X connect 18 0 17 1;
#X connect 19 0 16 0;
#X coords 0 -1 1 1 54 14 2 100 100;
#N canvas 205 25 796 421 10;
#N canvas 390 127 841 542 keyboard 0;
#X obj 110 49 keyname;
#X obj 149 83 select Up Down Left Right;
#X obj 149 511 s more;
#X obj 222 312 s previous;
#X obj 259 212 s next;
#X obj 442 114 r previous;
#X obj 387 114 r next;
#X msg 387 138 1;
#X msg 442 138 -1;
#X obj 387 170 +;
#X obj 149 459 spigot 1;
#X obj 149 485 t b b;
#X msg 194 437 0;
#X obj 110 93 sel 0;
#X msg 110 117 1;
#X obj 185 359 spigot 1;
#X obj 185 385 t b b;
#X msg 230 337 0;
#X obj 185 412 s less;
#X obj 222 259 spigot 1;
#X obj 222 285 t b b;
#X msg 267 237 0;
#X obj 259 163 spigot 1;
#X obj 259 189 t b b;
#X msg 304 141 0;
#X obj 547 115 r recFromAbs;
#X obj 577 153 + 1;
#X obj 417 170 mod;
#X obj 417 203 s nbselected;
#X obj 547 153 f 1;
#X obj 646 58 inlet;
#X obj 646 84 t b b;
#X msg 673 111 1;
#X obj 646 153 s initrest;
#X connect 0 0 13 0;
#X connect 0 1 1 0;
#X connect 1 0 10 0;
#X connect 1 1 15 0;
#X connect 1 2 19 0;
#X connect 1 3 22 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 7 0 9 0;
#X connect 8 0 9 0;
#X connect 9 0 27 0;
#X connect 10 0 11 0;
#X connect 11 0 2 0;
#X connect 11 1 12 0;
#X connect 12 0 10 1;
#X connect 13 0 14 0;
#X connect 14 0 10 1;
#X connect 14 0 15 1;
#X connect 14 0 19 1;
#X connect 14 0 22 1;
#X connect 15 0 16 0;
#X connect 16 0 18 0;
#X connect 16 1 17 0;
#X connect 17 0 15 1;
#X connect 19 0 20 0;
#X connect 20 0 3 0;
#X connect 20 1 21 0;
#X connect 21 0 19 1;
#X connect 22 0 23 0;
#X connect 23 0 4 0;
#X connect 23 1 24 0;
#X connect 24 0 22 1;
#X connect 25 0 29 0;
#X connect 26 0 29 1;
#X connect 27 0 9 1;
#X connect 27 0 28 0;
#X connect 29 0 26 0;
#X connect 29 0 27 1;
#X connect 30 0 31 0;
#X connect 31 0 33 0;
#X connect 31 1 32 0;
#X connect 32 0 29 1;
#X restore 48 73 pd keyboard;
#X obj 331 128 r from0;
#X obj 391 128 r from1;
#X obj 451 128 r from2;
#X obj 511 128 r from3;
#X floatatom 331 156 5 0 0 0 - - -;
#X floatatom 391 156 5 0 0 0 - - -;
#X floatatom 451 156 5 0 0 0 - - -;
#X floatatom 511 156 5 0 0 0 - - -;
#X obj 578 73 absChoice 4;
#X floatatom 571 156 5 0 0 0 - - -;
#X obj 571 128 r from4;
#X obj 48 50 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#X text 70 49 <- init if you need;
#X text 532 287 Jack/RYBN 2010;
#X obj 331 73 absChoice 0;
#X obj 391 73 absChoice 1;
#X obj 451 73 absChoice 2;
#X obj 511 73 absChoice 3;
#X text 49 236 Create a new object with [absChoice n] where n is the
next id of your number box. In this patch there is 5 [absChoice] from
0 to 4 If you want another one just create a new object : [absChoice
5]. If you are lost \, you can click on the bang to initialize the
number of number box created.;
#X connect 1 0 5 0;
#X connect 2 0 6 0;
#X connect 3 0 7 0;
#X connect 4 0 8 0;
#X connect 11 0 10 0;
#X connect 12 0 0 0;
_______________________________________________
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management -> 
http://lists.puredata.info/listinfo/pd-list

Reply via email to