On Thu, Oct 15, 2009 at 4:42 PM, Justin Glenn Smith <[email protected]>wrote:

> Silvio Almeida wrote:
> > hi list.
> >
> >
> >
> > can you please help me find the elusive nprnin/out object?
> >
> >
> >
> > if not then is there a better way to achieve the same results(midi
> non-registered parameter numbers)?
> >
> >
> >
> > thanks
> >
> > S.Al.
> >
> > _________________________________________________________________
> > Obtenha 30 Emoticons grátis para o seu Windows Live Messenger
> > http://www.livemessenger-emoticons.com/funfamily/pt-pt/
> >
> >
> > ------------------------------------------------------------------------
> >
> > _______________________________________________
> > [email protected] mailing list
> > UNSUBSCRIBE and account-management ->
> http://lists.puredata.info/listinfo/pd-list
>
> I found these a while back and fixed some bugs in them (doing
> multiplications where bit shifts would have sufficed, outletting values out
> of order).
>
> I contacted the author about these fixes and he basically said they were an
> abandoned project for him and I should announce these versions on this list,
> which I just now finally got around to joining.
>
> I have attached my fixed versions. They have no dependencies other than the
> ctl_in and ctl_out of vanilla pd.
>
> _______________________________________________
> [email protected] mailing list
> UNSUBSCRIBE and account-management ->
> http://lists.puredata.info/listinfo/pd-list
>
>
I have attached [nrpnout] by David McCallum which must be pretty much the
same as Justin's [nrpn_out]. Actually I would be interested if someone would
point out which if there is any important difference.
FYI also attached my [nrpnout-yamaha] which is derived from David's. Yamaha
nrpn uses msb and lsb addresses, hence the modification.

(BTW Wouldn't nrpnin/out and rpnout make sense in the object db?)

Andras
#N canvas 330 504 459 349 10;
#X obj 192 12 cnv 15 15 15 empty empty nrpnout 0 8 1 14 -262144 -66577
0;
#X text 53 304 David McCallum \, 2003 - sintheta.org;
#N canvas 312 344 745 436 \$0-nrpnout_guts 1;
#X obj 128 20 inlet;
#X obj 78 150 mod 128;
#X obj 155 150 div 128;
#X obj 128 115 t f f;
#X obj 216 20 inlet;
#X obj 216 150 mod 128;
#X obj 278 150 div 128;
#X obj 216 115 t f f;
#X obj 140 258 f;
#X obj 201 258 f;
#X obj 263 258 f;
#X obj 78 178 t f b b b;
#X obj 263 378 ctlout 99;
#X obj 201 378 ctlout 98;
#X obj 140 378 ctlout 6;
#X obj 78 378 ctlout 38;
#X obj 228 48 loadbang;
#X obj 228 72 f \$1;
#X obj 303 294 loadbang;
#X obj 289 344 sel 0;
#X obj 289 320 f \$2;
#X obj 289 274 inlet;
#X text 354 316 because absent arguments in Pd default to 0 I can't
parse parameter 0 properly. So zero becomes omni. Yikes!;
#X connect 0 0 3 0;
#X connect 1 0 11 0;
#X connect 2 0 8 1;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 7 0;
#X connect 5 0 9 1;
#X connect 6 0 10 1;
#X connect 7 0 5 0;
#X connect 7 1 6 0;
#X connect 8 0 14 0;
#X connect 9 0 13 0;
#X connect 10 0 12 0;
#X connect 11 0 15 0;
#X connect 11 1 8 0;
#X connect 11 2 9 0;
#X connect 11 3 10 0;
#X connect 16 0 17 0;
#X connect 17 0 7 0;
#X connect 18 0 20 0;
#X connect 19 1 12 2;
#X connect 19 1 13 2;
#X connect 19 1 14 2;
#X connect 19 1 15 2;
#X connect 20 0 19 0;
#X connect 21 0 20 0;
#X restore 141 246 pd \$0-nrpnout_guts;
#X obj 141 170 inlet;
#X obj 192 197 inlet;
#X obj 244 224 inlet;
#X text 190 165 value;
#X text 281 224 channel;
#X text 233 194 parameter;
#X text 51 68 Arguments: NRPN parameter \, MIDI channel - just like
[ctlout];
#X text 49 97 Notes: funny stuff with parameter 0 Has to do with Pd
defaulting absent arguments to 0 Just avoid 0;
#X connect 3 0 2 0;
#X connect 4 0 2 1;
#X connect 5 0 2 2;
#N canvas 516 221 867 558 10;
#X obj 88 30 inlet;
#X obj 88 160 mod 128;
#X obj 285 30 inlet;
#X obj 285 160 mod 128;
#X obj 211 268 f;
#X obj 273 268 f;
#X obj 273 388 ctlout 99;
#X obj 211 388 ctlout 98;
#X obj 150 388 ctlout 6;
#X obj 88 388 ctlout 38;
#X obj 409 280 sel 0;
#X obj 409 30 inlet;
#X obj 88 188 t b f b b;
#X obj 227 30 inlet;
#X obj 227 160 mod 128;
#X text 49 31 Value;
#X text 202 30 MSB;
#X text 322 30 LSB;
#X text 448 31 Channel;
#X msg 88 267 64;
#X connect 0 0 1 0;
#X connect 1 0 12 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 0;
#X connect 10 1 6 2;
#X connect 10 1 7 2;
#X connect 10 1 8 2;
#X connect 10 1 9 2;
#X connect 11 0 10 0;
#X connect 12 0 19 0;
#X connect 12 1 8 0;
#X connect 12 2 4 0;
#X connect 12 3 5 0;
#X connect 13 0 14 0;
#X connect 14 0 5 1;
#X connect 19 0 9 0;
_______________________________________________
[email protected] mailing list
UNSUBSCRIBE and account-management -> 
http://lists.puredata.info/listinfo/pd-list

Reply via email to