Update of /cvsroot/pure-data/abstractions/rradical/control In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30255
Modified Files: rrad.nseq.pd Added Files: _nslider-commun.pd kbd2midi.pd qwerty2midi.xml qwertz2midi.xml rrad.nseq-help.pd Log Message:
* added rrad.nseq and related patches.
--- NEW FILE: rrad.nseq-help.pd --- #N canvas 252 197 903 653 10; #X obj 190 155 rrad.nseq /id; #X floatatom 190 519 5 0 0 0 - - -; #X obj 190 61 metro 250; #X obj 190 83 int 0; #X obj 234 84 + 1; #X floatatom 147 154 5 0 0 0 - - -; #X obj 190 39 tgl 15 0 empty $0-start empty 0 -6 0 8 -24198 -1 -1 1 1; #X obj 190 129 mod 16; #X text 468 49 rrad.nseq: 16-step number box sequencer; #X text 422 133 nseq supports alphanumerical keyboard control. Clicking the toggle labeled "edit" will switch on receiving of keyboard events. With the "TAB" key you can navigate focus to the next row , which will be highlighted. To input a note just use your alnum keyboard in a piano mode. Default is a quertz-keyboard , you can change this by loading the qwerty2midi.xml file into the kbd2midi abstraction. The letter "y" on qwertz rsp. z on qwerty keyboards will input a note value of 60 (== note C) into the currently highlighted row. PageUp and PageDown (Prior and Next) will change octave from -5 to 5 To leave keyboard input mode press Esc or deactivate the "edit" toggle.; #X obj 424 311 bng 15 250 50 0 $0-copy empty copy 0 -6 0 8 -225271 -1 -1; #X obj 485 311 bng 15 250 50 0 $0-paste empty paste 0 -6 0 8 -257472 -1 -1; #X obj 424 347 bng 15 250 50 0 $0-reset empty reset 0 -6 0 8 -258699 -1 -1; #X text 451 309 and; #X text 514 310 will copy or paste the current pattern.; #X text 457 347 sets every number to zero. Press this first if you get "argument out of range" errors in the console.; #X obj 425 413 nbx 2 14 0 1000 0 0 $0-substate $0-substate pre 0 -6 0 8 -261689 -1 -1 0 256; #X text 463 412 switches between patterns.; #X obj 393 148 tgl 15 0 $0-tab-enabled $0-tab-enabled edit 0 -6 0 8 -262144 -1 -1 0 1; #X text 428 441 inlets:; #X text 440 457 1 inlet accepts ints ranging from 0-15. They specify the step to play; #X text 439 493 The rightmost inlet is OSC inlet. See the main RRADical documentation for details.; #X text 427 526 outlets:; #X text 440 545 1 outlet will output the value of the currently active step or the keyboard input.; #X text 74 436 rrad.shuffler; #X text 74 452 rrad.metro; #X text 55 419 Related:; #N canvas 598 329 231 193 ed 0; #X floatatom 84 42 5 100 1000 0 - - -; #X floatatom 146 63 4 10 500 0 height - -; #X obj 68 87 pack 0 0; #X text 129 42 width; #X obj 69 134 s $0-title; #X msg 68 112 vis_size $1 $2; #X obj 142 82 t b f; #X connect 0 0 2 0; #X connect 1 0 6 0; #X connect 2 0 5 0; #X connect 5 0 4 0; #X connect 6 0 2 0; #X connect 6 1 2 1; #X restore 853 1 pd ed; #X obj 1 -8 cnv 15 900 30 empty $0-title rrad.nseq 20 12 0 20 -257472 -262144 0; #X obj 156 570 ezdac~; #N canvas 0 0 450 300 testtone 0; #X obj 115 25 inlet; #X obj 89 264 outlet~; #X obj 171 110 mtof; #X obj 115 48 select 0; #X obj 166 80 t b f; #X obj 90 240 *~; #X obj 53 156 vline~; #X obj 53 184 *~; #X obj 55 207 *~; #X msg 52 134 1 10 , 0 150 80; #X obj 171 158 osc~ 0; #X connect 0 0 3 0; #X connect 2 0 10 0; #X connect 3 1 4 0; #X connect 4 0 9 0; #X connect 4 1 2 0; #X connect 5 0 1 0; #X connect 6 0 7 0; #X connect 6 0 7 1; #X connect 7 0 8 0; #X connect 7 0 8 1; #X connect 8 0 5 0; #X connect 9 0 6 0; #X connect 10 0 5 1; #X restore 190 540 pd testtone; #X text 423 78 rrad.nseq (called nseq for now) is a sequencer for numberboxes carrying values from 0 to 127 . Arranged from top to bottom nseq is similar to old-fashioned tracker interfaces.; #X msg 291 64 /id/preset $1; #X obj 291 39 tgl 15 0 empty empty switch_presets 20 10 0 8 -24198 -1 -1 0 1; #N canvas 340 97 594 666 init 0; #X obj 66 303 bng 15 250 50 0 empty empty click_first 20 10 0 8 -24198 -1 -1; #X obj 130 467 s $0-start; #X msg 130 441 1; #X obj 272 40 r setmess; #X obj 270 86 prepend add; #X obj 275 64 prepend nseq; #X msg 387 76 ; nseq /id/preset 0 ; nseq /id/n0 83 ; nseq /id/n14 0 ; nseq /id/n15 55 ; nseq /id/n10 93 ; nseq /id/n11 40 ; nseq /id/n12 76 ; nseq /id/n13 0 ; nseq /id/n6 41 ; nseq /id/n7 88 ; nseq /id/n8 91 ; nseq /id/n9 89 ; nseq /id/n2 76 ; nseq /id/n1 74 ; nseq /id/n5 79 ; nseq /id/n4 79 ; nseq /id/n3 43 ; nseq /id/preset 1 ; nseq /id/n0 83 ; nseq /id/n14 0 ; nseq /id/n15 55 ; nseq /id/n10 93 ; nseq /id/n11 40 ; nseq /id/n12 96 ; nseq /id/n13 0 ; nseq /id/n6 41 ; nseq /id/n7 88 ; nseq /id/n8 45 ; nseq /id/n9 100 ; nseq /id/n2 95 ; nseq /id/n1 37 ; nseq /id/n5 41 ; nseq /id/n4 91 ; nseq /id/n3 93 ;; #X connect 0 0 6 0; #X connect 0 0 2 0; #X connect 2 0 1 0; #X connect 3 0 5 0; #X connect 5 0 4 0; #X coords 0 0 1 1 100 40 1; #X restore 22 43 pd init; #X obj 316 105 r nseq; #X obj 439 379 bng 15 250 50 0 $0-forward empty v 3 7 1 12 -262131 -225271 -1; #X obj 420 379 bng 15 250 50 0 $0-backward empty ^ 3 9 1 12 -262131 -225271 -1; #X text 465 380 shift pattern up or down.; #X obj 241 109 mod 32; #X obj 241 129 sel 31; #X text 439 584 The rightmost outlet is OSC outlet. See the main RRADical documentation for details.; #X connect 0 0 1 0; #X connect 1 0 30 0; #X connect 2 0 3 0; #X connect 3 0 7 0; #X connect 3 0 39 0; #X connect 3 0 4 0; #X connect 4 0 3 1; #X connect 6 0 2 0; #X connect 6 0 3 1; #X connect 7 0 5 0; #X connect 7 0 0 0; #X connect 30 0 29 0; #X connect 30 0 29 1; #X connect 32 0 0 1; #X connect 33 0 32 0; #X connect 35 0 0 1; #X connect 39 0 40 0; #X connect 40 0 33 0;
--- NEW FILE: _nslider-commun.pd --- #N canvas 563 234 607 600 10; #X obj 425 146 symbol $1; #X obj 425 213 t f; #X obj 425 192 unpack 0; #X obj 425 119 loadbang; #X obj 409 417 r $0-current; #X obj 358 243 f 1; #X obj 342 264 +; #X obj 393 444 f; #X obj 307 187 r $2-shifter; #X msg 328 497 ; $2 $3; #X obj 328 474 pack s s 0; #X obj 303 429 symbol $1; #X obj 307 219 t b f b; #X obj 393 387 r $2-prepare-shift; #X obj 43 44 inlet; #X obj 51 175 outlet; #X obj 48 120 commun $1 $2; #X obj 103 60 s $0-current; #X obj 425 170 symbol2list /n; #X obj 342 349 makefilename $2-n%d; #X obj 342 307 mod 16; #X connect 0 0 18 0; #X connect 1 0 5 1; #X connect 2 0 1 0; #X connect 3 0 0 0; #X connect 4 0 7 1; #X connect 5 0 6 1; #X connect 6 0 20 0; #X connect 7 0 10 2; #X connect 8 0 12 0; #X connect 10 0 9 0; #X connect 11 0 10 0; #X connect 12 0 11 0; #X connect 12 1 6 0; #X connect 12 2 5 0; #X connect 13 0 7 0; #X connect 14 0 16 0; #X connect 14 0 17 0; #X connect 16 0 15 0; #X connect 18 0 2 0; #X connect 19 0 10 1; #X connect 20 0 19 0;
Index: rrad.nseq.pd =================================================================== RCS file: /cvsroot/pure-data/abstractions/rradical/control/rrad.nseq.pd,v retrieving revision 1.1 retrieving revision 1.2 diff -C2 -d -r1.1 -r1.2 *** rrad.nseq.pd 5 Jun 2004 14:34:03 -0000 1.1 --- rrad.nseq.pd 7 Jun 2004 12:23:58 -0000 1.2 *************** *** 1,13 **** ! #N canvas 237 255 108 385 10; ! #X obj 2 19 cnv 15 100 360 empty $0-background-cnv empty 20 12 1 14 -233017 -66577 0; #X obj 254 1 inlet; ! #X obj 433 1 inlet OSC; #N canvas 183 51 981 424 saves 0; #X obj 45 160 originator $1 $0; #X obj 152 132 inlet OSC; ! #X obj 47 55 r $0-substate; ! #X obj 15 13 inlet substate; ! #X obj 15 35 route substate; #X obj 159 55 r $0-copy; #X msg 159 76 copy; --- 1,13 ---- ! #N canvas 237 255 105 363 10; ! #X obj 3 19 cnv 7 100 340 empty $0-background-cnv empty 20 12 1 14 -233017 -66577 0; #X obj 254 1 inlet; ! #X obj 428 3 inlet OSC; #N canvas 183 51 981 424 saves 0; #X obj 45 160 originator $1 $0; #X obj 152 132 inlet OSC; ! #X obj 45 59 r $0-substate; ! #X obj 18 15 inlet substate; ! #X obj 18 37 route substate; #X obj 159 55 r $0-copy; #X msg 159 76 copy; *************** *** 17,122 **** standard functionality.; #X text 507 56 Put your commun sends here , if you like.; ! #X msg 15 91 setsub $1; ! #X msg 249 184 svdir $1; ! #X obj 250 139 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; ! #X obj 250 163 savepanel; #X obj 152 189 outlet OSC; #X msg 108 214 svxdir /tmp/svdir.xml; #X msg 78 241 ldxdir /tmp/svdir.xml; #N canvas 0 0 518 492 communs 0; ! #X obj 20 39 commun /n0 $0; ! #X obj 270 39 s $0-n0; ! #X obj 20 61 commun /n1 $0; ! #X obj 270 61 s $0-n1; ! #X obj 20 83 commun /n2 $0; ! #X obj 270 83 s $0-n2; ! #X obj 20 105 commun /n3 $0; ! #X obj 270 105 s $0-n3; ! #X obj 20 127 commun /n4 $0; ! #X obj 270 127 s $0-n4; ! #X obj 20 149 commun /n5 $0; ! #X obj 270 149 s $0-n5; ! #X obj 20 171 commun /n6 $0; ! #X obj 270 171 s $0-n6; ! #X obj 20 193 commun /n7 $0; ! #X obj 270 193 s $0-n7; ! #X obj 20 215 commun /n8 $0; ! #X obj 270 215 s $0-n8; ! #X obj 20 237 commun /n9 $0; ! #X obj 270 237 s $0-n9; ! #X obj 20 259 commun /n10 $0; ! #X obj 270 259 s $0-n10; ! #X obj 20 281 commun /n11 $0; ! #X obj 270 281 s $0-n11; ! #X obj 20 303 commun /n12 $0; ! #X obj 270 303 s $0-n12; ! #X obj 20 325 commun /n13 $0; ! #X obj 270 325 s $0-n13; ! #X obj 20 347 commun /n14 $0; ! #X obj 270 347 s $0-n14; ! #X obj 20 369 commun /n15 $0; ! #X obj 270 369 s $0-n15; ! #X obj 170 39 r $0-n0-s; ! #X obj 170 61 r $0-n1-s; ! #X obj 169 83 r $0-n2-s; ! #X obj 170 105 r $0-n3-s; ! #X obj 170 127 r $0-n4-s; ! #X obj 170 149 r $0-n5-s; ! #X obj 170 171 r $0-n6-s; ! #X obj 170 193 r $0-n7-s; ! #X obj 170 215 r $0-n8-s; ! #X obj 170 237 r $0-n9-s; ! #X obj 170 259 r $0-n10-s; ! #X obj 170 281 r $0-n11-s; ! #X obj 170 303 r $0-n12-s; ! #X obj 170 325 r $0-n13-s; ! #X obj 170 347 r $0-n14-s; ! #X obj 170 369 r $0-n15-s; #X connect 0 0 1 0; ! #X connect 2 0 3 0; ! #X connect 4 0 5 0; ! #X connect 6 0 7 0; ! #X connect 8 0 9 0; ! #X connect 10 0 11 0; ! #X connect 12 0 13 0; ! #X connect 14 0 15 0; ! #X connect 16 0 17 0; ! #X connect 18 0 19 0; ! #X connect 20 0 21 0; ! #X connect 22 0 23 0; ! #X connect 24 0 25 0; ! #X connect 26 0 27 0; ! #X connect 28 0 29 0; ! #X connect 30 0 31 0; ! #X connect 32 0 0 0; #X connect 33 0 2 0; ! #X connect 34 0 4 0; ! #X connect 35 0 6 0; ! #X connect 36 0 8 0; ! #X connect 37 0 10 0; ! #X connect 38 0 12 0; ! #X connect 39 0 14 0; ! #X connect 40 0 16 0; ! #X connect 41 0 18 0; ! #X connect 42 0 20 0; ! #X connect 43 0 22 0; ! #X connect 44 0 24 0; ! #X connect 45 0 26 0; ! #X connect 46 0 28 0; ! #X connect 47 0 30 0; #X restore 554 103 pd communs; #X obj 45 285 outlet; #X obj 93 97 r $0-step; ! #X obj 420 159 r $0-reset; ! #X obj 420 191 symbol $1; ! #X msg 420 261 $1/n* 0; ! #X connect 0 0 19 0; ! #X connect 0 2 15 0; #X connect 1 0 0 1; ! #X connect 2 0 11 0; #X connect 3 0 4 0; ! #X connect 4 0 11 0; ! #X connect 4 1 0 0; #X connect 5 0 6 0; #X connect 6 0 0 0; --- 17,123 ---- standard functionality.; #X text 507 56 Put your commun sends here , if you like.; ! #X msg 8 333 svdir $1; ! #X obj 9 288 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 -1; ! #X obj 9 312 savepanel; #X obj 152 189 outlet OSC; #X msg 108 214 svxdir /tmp/svdir.xml; #X msg 78 241 ldxdir /tmp/svdir.xml; #N canvas 0 0 518 492 communs 0; ! #X obj 20 39 _nslider-commun /n0 $0; ! #X obj 299 40 s $0-n0; ! #X obj 299 62 s $0-n1; ! #X obj 299 84 s $0-n2; ! #X obj 299 106 s $0-n3; ! #X obj 299 128 s $0-n4; ! #X obj 299 150 s $0-n5; ! #X obj 299 172 s $0-n6; ! #X obj 299 194 s $0-n7; ! #X obj 299 216 s $0-n8; ! #X obj 299 238 s $0-n9; ! #X obj 299 260 s $0-n10; ! #X obj 299 282 s $0-n11; ! #X obj 299 304 s $0-n12; ! #X obj 299 326 s $0-n13; ! #X obj 299 348 s $0-n14; ! #X obj 299 370 s $0-n15; ! #X obj 199 40 r $0-n0-s; ! #X obj 199 62 r $0-n1-s; ! #X obj 198 84 r $0-n2-s; ! #X obj 199 106 r $0-n3-s; ! #X obj 199 128 r $0-n4-s; ! #X obj 199 150 r $0-n5-s; ! #X obj 199 172 r $0-n6-s; ! #X obj 199 194 r $0-n7-s; ! #X obj 199 216 r $0-n8-s; ! #X obj 199 238 r $0-n9-s; ! #X obj 199 260 r $0-n10-s; ! #X obj 199 282 r $0-n11-s; ! #X obj 199 304 r $0-n12-s; ! #X obj 199 326 r $0-n13-s; ! #X obj 199 348 r $0-n14-s; ! #X obj 199 370 r $0-n15-s; ! #X obj 20 61 _nslider-commun /n1 $0; ! #X obj 20 83 _nslider-commun /n2 $0; ! #X obj 20 105 _nslider-commun /n3 $0; ! #X obj 20 127 _nslider-commun /n4 $0; ! #X obj 20 149 _nslider-commun /n5 $0; ! #X obj 20 171 _nslider-commun /n6 $0; ! #X obj 20 193 _nslider-commun /n7 $0; ! #X obj 20 215 _nslider-commun /n8 $0; ! #X obj 20 237 _nslider-commun /n9 $0; ! #X obj 20 259 _nslider-commun /n10 $0; ! #X obj 20 281 _nslider-commun /n11 $0; ! #X obj 20 303 _nslider-commun /n12 $0; ! #X obj 20 325 _nslider-commun /n13 $0; ! #X obj 20 347 _nslider-commun /n14 $0; ! #X obj 20 369 _nslider-commun /n15 $0; #X connect 0 0 1 0; ! #X connect 17 0 0 0; ! #X connect 18 0 33 0; ! #X connect 19 0 34 0; ! #X connect 20 0 35 0; ! #X connect 21 0 36 0; ! #X connect 22 0 37 0; ! #X connect 23 0 38 0; ! #X connect 24 0 39 0; ! #X connect 25 0 40 0; ! #X connect 26 0 41 0; ! #X connect 27 0 42 0; ! #X connect 28 0 43 0; ! #X connect 29 0 44 0; ! #X connect 30 0 45 0; ! #X connect 31 0 46 0; ! #X connect 32 0 47 0; #X connect 33 0 2 0; ! #X connect 34 0 3 0; ! #X connect 35 0 4 0; ! #X connect 36 0 5 0; ! #X connect 37 0 6 0; ! #X connect 38 0 7 0; ! #X connect 39 0 8 0; ! #X connect 40 0 9 0; ! #X connect 41 0 10 0; ! #X connect 42 0 11 0; ! #X connect 43 0 12 0; ! #X connect 44 0 13 0; ! #X connect 45 0 14 0; ! #X connect 46 0 15 0; ! #X connect 47 0 16 0; #X restore 554 103 pd communs; #X obj 45 285 outlet; #X obj 93 97 r $0-step; ! #X obj 459 159 r $0-reset; ! #X obj 459 191 symbol $1; ! #X msg 459 214 $1/n* 0; ! #X msg 18 92 1; ! #X obj 437 288 r $0-parentstate; ! #X obj 437 309 s $0-substate; ! #X connect 0 0 18 0; ! #X connect 0 2 14 0; #X connect 1 0 0 1; ! #X connect 2 0 23 0; #X connect 3 0 4 0; ! #X connect 4 0 23 0; #X connect 5 0 6 0; #X connect 6 0 0 0; *************** *** 124,137 **** #X connect 8 0 0 0; #X connect 11 0 0 0; ! #X connect 12 0 0 0; ! #X connect 13 0 14 0; ! #X connect 14 0 12 0; #X connect 16 0 0 0; ! #X connect 17 0 0 0; ! #X connect 20 0 0 0; #X connect 21 0 22 0; ! #X connect 22 0 23 0; ! #X connect 23 0 0 1; ! #X restore 371 0 pd saves; #N canvas 636 203 450 300 cnv.ctl 0; #X obj 90 188 s $0-background-cnv; --- 125,139 ---- #X connect 8 0 0 0; #X connect 11 0 0 0; ! #X connect 12 0 13 0; ! #X connect 13 0 11 0; ! #X connect 15 0 0 0; #X connect 16 0 0 0; ! #X connect 19 0 0 0; ! #X connect 20 0 21 0; #X connect 21 0 22 0; ! #X connect 22 0 0 1; ! #X connect 23 0 0 0; ! #X connect 24 0 25 0; ! #X restore 377 31 pd saves; #N canvas 636 203 450 300 cnv.ctl 0; #X obj 90 188 s $0-background-cnv; *************** *** 147,159 **** #X connect 5 0 3 0; #X connect 5 1 3 1; ! #X restore 296 0 pd cnv.ctl; ! #X obj 9 356 bng 15 250 50 0 $0-copy empty copy 0 -6 0 8 -225271 -1 -1; ! #X obj 36 356 bng 15 250 50 0 $0-paste empty paste 0 -6 0 8 -257472 -1 -1; ! #X obj 348 63 outlet; ! #X text 19 -1 look! ==>; ! #X obj 422 34 outlet OSC; ! #X obj 329 29 inlet; #N canvas 304 261 722 388 build-ns 0; #X msg 221 76 ; pd-tmp clear ;; --- 149,160 ---- #X connect 5 0 3 0; #X connect 5 1 3 1; ! #X restore 653 34 pd cnv.ctl; ! #X obj 8 292 bng 15 250 50 0 $0-copy empty copy 0 -6 0 8 -225271 -1 -1; ! #X obj 35 292 bng 15 250 50 0 $0-paste empty paste 0 -6 0 8 -257472 -1 -1; ! #X obj 377 84 outlet; ! #X text 20 -1 look! ==>; ! #X obj 428 84 outlet OSC; #N canvas 304 261 722 388 build-ns 0; #X msg 221 76 ; pd-tmp clear ;; *************** *** 180,186 **** #X connect 6 0 4 0; #X restore 40 115 pd count; - #X obj 203 197 + 20; #X obj 152 196 int 0; - #X obj 19 264 makefilename $0-n%d; #X obj 20 291 s $0-dollar-name; #X obj 36 327 makefilename n%d; --- 181,185 ---- *************** *** 191,276 **** #X obj 49 146 t f f b; #X msg 51 30 16; ! #X msg 316 333 ; pd-tmp obj 0 $3 nbx 3 14 0 127 0 0 $1 $1 $2 40 ! 8 1 10 -262144 -1 -1 0 256 ;; #X connect 2 0 18 0; #X connect 3 0 2 0; #X connect 4 0 2 1; #X connect 5 0 2 2; ! #X connect 6 0 16 0; ! #X connect 7 0 8 1; ! #X connect 8 0 7 0; ! #X connect 8 0 13 0; #X connect 9 0 10 0; ! #X connect 11 0 12 0; ! #X connect 14 0 6 0; ! #X connect 14 1 15 0; ! #X connect 15 0 8 1; ! #X connect 16 0 9 0; ! #X connect 16 1 11 0; ! #X connect 16 2 8 0; ! #X connect 17 0 14 0; ! #X restore 401 100 pd build-ns; #N canvas 475 407 319 362 tmp 0; ! #X restore 392 191 pd tmp; ! #X obj 8 27 nbx 3 14 0 127 0 0 $0-n0-s $0-n0 n0 40 8 1 10 -262144 ! -1 -1 44 256; ! #X obj 8 47 nbx 3 14 0 127 0 0 $0-n1-s $0-n1 n1 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 67 nbx 3 14 0 127 0 0 $0-n2-s $0-n2 n2 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 87 nbx 3 14 0 127 0 0 $0-n3-s $0-n3 n3 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 107 nbx 3 14 0 127 0 0 $0-n4-s $0-n4 n4 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 127 nbx 3 14 0 127 0 0 $0-n5-s $0-n5 n5 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 147 nbx 3 14 0 127 0 0 $0-n6-s $0-n6 n6 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 167 nbx 3 14 0 127 0 0 $0-n7-s $0-n7 n7 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 187 nbx 3 14 0 127 0 0 $0-n8-s $0-n8 n8 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 207 nbx 3 14 0 127 0 0 $0-n9-s $0-n9 n9 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 227 nbx 3 14 0 127 0 0 $0-n10-s $0-n10 n10 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 247 nbx 3 14 0 127 0 0 $0-n11-s $0-n11 n11 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 267 nbx 3 14 0 127 0 0 $0-n12-s $0-n12 n12 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 287 nbx 3 14 0 127 0 0 $0-n13-s $0-n13 n13 40 8 1 10 -262144 ! -1 -1 0 256; ! #X obj 8 307 nbx 3 14 0 127 0 0 $0-n14-s $0-n14 n14 40 8 1 10 -262144 -1 -1 0 256; ! #X obj 8 327 nbx 3 14 0 127 0 0 $0-n15-s $0-n15 n15 40 8 1 10 -262144 -1 -1 0 256; ! #X msg 262 101 get $1; ! #X obj 252 53 mod 16; ! #X obj 251 26 int; ! #X obj 264 127 s $0-step; ! #X obj 259 82 makefilename /n%d; ! #X obj 73 356 bng 15 250 50 0 $0-reset empty reset 0 -6 0 8 -258699 ! -1 -1; ! #X obj 77 58 nbx 2 14 0 1000 0 0 $0-substate $0-substate pre 0 -6 ! 0 8 -261689 -1 -1 0 256; ! #X obj 230 170 makefilename $0-n%d; ! #X obj 250 221 symbol; ! #X obj 237 197 t s b; ! #X msg 253 257 ; $1 color 0 -1 -1; ! #X msg 232 290 ; $1 color 80 -1 -1; ! #X connect 1 0 31 0; #X connect 2 0 3 1; #X connect 3 0 7 0; #X connect 3 1 9 0; ! #X connect 10 0 3 0; ! #X connect 29 0 32 0; ! #X connect 30 0 33 0; ! #X connect 30 0 36 0; ! #X connect 31 0 30 0; ! #X connect 33 0 29 0; ! #X connect 36 0 38 0; ! #X connect 36 0 40 0; ! #X connect 37 0 39 0; ! #X connect 38 0 37 1; ! #X connect 38 1 37 0; ! #X coords 0 0 1 1 102 380 1; --- 190,367 ---- #X obj 49 146 t f f b; #X msg 51 30 16; ! #X obj 203 197 + 16; ! #X obj 407 175 nbx 5 14 -1e+37 1e+37 0 0 empty empty empty 0 -6 0 10 ! -262144 -1 -1 0 256; ! #X msg 316 333 ; pd-tmp obj 0 $3 nbx 3 14 0 127 0 0 $1-s $1 $2 ! 40 8 1 10 -262144 -1 -1 0 256 ;; ! #X obj 19 264 makefilename dollar0-n%d; #X connect 2 0 18 0; #X connect 3 0 2 0; #X connect 4 0 2 1; #X connect 5 0 2 2; ! #X connect 6 0 14 0; ! #X connect 7 0 11 0; ! #X connect 7 0 16 0; #X connect 9 0 10 0; ! #X connect 12 0 6 0; ! #X connect 12 1 13 0; ! #X connect 13 0 7 1; ! #X connect 14 0 19 0; ! #X connect 14 1 9 0; ! #X connect 14 2 7 0; ! #X connect 15 0 12 0; ! #X connect 16 0 7 1; ! #X connect 19 0 8 0; ! #X restore 595 60 pd build-ns; #N canvas 475 407 319 362 tmp 0; ! #X restore 596 35 pd tmp; ! #X msg 418 230 get $1; ! #X obj 254 61 mod 16; ! #X obj 254 25 int; ! #X obj 418 255 s $0-step; ! #X obj 418 209 makefilename /n%d; ! #X obj 72 292 bng 15 250 50 0 $0-reset empty reset 0 -6 0 8 -258699 ! -1 -1; ! #X obj 76 34 nbx 2 14 0 1000 0 0 $0-substate $0-substate pre 0 -6 ! 0 8 -261689 -1 -1 1 256; ! #X obj 570 205 makefilename $0-n%d; ! #X obj 593 270 symbol; ! #X obj 594 241 t s b; ! #X msg 593 292 ; $1 color 0 -1 -1; ! #X msg 570 326 ; $1 color 80 -1 -1; ! #X obj 10 26 nbx 3 14 0 127 0 0 $0-n0-s $0-n0 n0 40 8 1 10 -195568 ! -1 -1 83 256; ! #X obj 10 42 nbx 3 14 0 127 0 0 $0-n1-s $0-n1 n1 40 8 1 10 -262144 ! -1 -1 37 256; ! #X obj 10 58 nbx 3 14 0 127 0 0 $0-n2-s $0-n2 n2 40 8 1 10 -262144 ! -1 -1 95 256; ! #X obj 10 74 nbx 3 14 0 127 0 0 $0-n3-s $0-n3 n3 40 8 1 10 -262144 ! -1 -1 93 256; ! #X obj 10 90 nbx 3 14 0 127 0 0 $0-n4-s $0-n4 n4 40 8 1 10 -262144 ! -1 -1 91 256; ! #X obj 10 106 nbx 3 14 0 127 0 0 $0-n5-s $0-n5 n5 40 8 1 10 -262144 ! -1 -1 41 256; ! #X obj 10 122 nbx 3 14 0 127 0 0 $0-n6-s $0-n6 n6 40 8 1 10 -262144 ! -1 -1 41 256; ! #X obj 10 138 nbx 3 14 0 127 0 0 $0-n7-s $0-n7 n7 40 8 1 10 -262144 ! -1 -1 88 256; ! #X obj 10 154 nbx 3 14 0 127 0 0 $0-n8-s $0-n8 n8 40 8 1 10 -262144 ! -1 -1 45 256; ! #X obj 10 170 nbx 3 14 0 127 0 0 $0-n9-s $0-n9 n9 40 8 1 10 -262144 ! -1 -1 100 256; ! #X obj 10 186 nbx 3 14 0 127 0 0 $0-n10-s $0-n10 n10 40 8 1 10 -262144 ! -1 -1 93 256; ! #X obj 10 202 nbx 3 14 0 127 0 0 $0-n11-s $0-n11 n11 40 8 1 10 -262144 ! -1 -1 40 256; ! #X obj 10 218 nbx 3 14 0 127 0 0 $0-n12-s $0-n12 n12 40 8 1 10 -262144 ! -1 -1 96 256; ! #X obj 10 234 nbx 3 14 0 127 0 0 $0-n13-s $0-n13 n13 40 8 1 10 -262144 -1 -1 0 256; ! #X obj 10 250 nbx 3 14 0 127 0 0 $0-n14-s $0-n14 n14 40 8 1 10 -262144 -1 -1 0 256; ! #X obj 10 266 nbx 3 14 0 127 0 0 $0-n15-s $0-n15 n15 40 8 1 10 -262144 ! -1 -1 55 256; ! #X obj 644 240 s $0-current; ! #N canvas 465 369 450 300 keys 0; ! #X obj 191 64 r $0-current; ! #X obj 84 66 r $0-set-note; ! #X obj 99 104 pack 0 s; ! #X obj 194 203 spigot; ! #X obj 309 140 r $0-tab-enabled; ! #X obj 189 132 key; ! #X obj 168 169 select 9; ! #X obj 195 235 int 0; ! #X obj 241 235 + 1; ! #X obj 195 258 mod 16; ! #X msg 99 145 ; $2 $1; ! #X obj 57 190 outlet; ! #X obj 335 164 key; ! #X obj 338 184 select 27; ! #X text 362 164 Esc; ! #X obj 289 81 r $0-tab-enabled; ! #X obj 305 208 spigot; ! #X obj 302 246 s $0-tab-enabled; ! #X msg 305 229 0; ! #X obj 267 266 s $0-curr-step; ! #X obj 284 117 r $0-playing; ! #X connect 0 0 2 1; ! #X connect 1 0 2 0; ! #X connect 1 0 11 0; ! #X connect 2 0 10 0; ! #X connect 3 0 7 0; ! #X connect 4 0 3 1; ! #X connect 4 0 7 1; ! #X connect 4 0 16 1; ! #X connect 5 0 6 0; ! #X connect 6 0 3 0; ! #X connect 7 0 9 0; ! #X connect 7 0 8 0; ! #X connect 8 0 7 1; ! #X connect 9 0 19 0; ! #X connect 12 0 13 0; ! #X connect 13 0 16 0; ! #X connect 16 0 18 0; ! #X connect 18 0 17 0; ! #X connect 20 0 7 1; ! #X restore 318 31 pd keys; ! #X obj 76 62 tgl 15 0 $0-tab-enabled $0-tab-enabled edit 0 -6 0 8 ! -262144 -1 -1 0 1; ! #X obj 8 363 s $0-set-note; ! #X obj 7 312 kbd2midi; ! #X obj 89 258 r $0-tab-enabled; ! #X obj 148 26 r $0-curr-step; ! #X obj 254 84 s $0-playing; ! #X obj 418 184 r $0-playing; ! #X obj 570 184 r $0-playing; ! #X text 405 162 Get value from pool; ! #X text 571 164 Colorize current step; ! #X text 713 298 Re-colorize previous step; ! #X text 602 13 Utility patches; ! #X obj 76 107 bng 15 250 50 0 $0-forward empty v 3 7 1 12 -262131 ! -225271 -1; ! #X obj 76 87 bng 15 250 50 0 $0-backward empty ^ 3 9 1 12 -262131 ! -225271 -1; ! #N canvas 0 0 450 300 shifter 0; ! #X obj 141 188 s $0-shifter; ! #X obj 138 157 f -1; ! #X obj 177 158 f 1; ! #X obj 177 80 r $0-forward; ! #X obj 138 61 r $0-backward; ! #X obj 98 212 s $0-originator; ! #X msg 83 154 set; ! #X obj 179 108 t b b b; ! #X obj 226 139 s $0-prepare-shift; ! #X obj 109 113 t b b b; ! #X connect 1 0 0 0; ! #X connect 2 0 0 0; ! #X connect 3 0 7 0; ! #X connect 4 0 9 0; ! #X connect 6 0 5 0; ! #X connect 7 0 6 0; ! #X connect 7 1 2 0; ! #X connect 7 2 8 0; ! #X connect 9 0 6 0; ! #X connect 9 1 1 0; ! #X connect 9 2 8 0; ! #X restore 248 142 pd shifter; ! #X connect 1 0 14 0; #X connect 2 0 3 1; #X connect 3 0 7 0; #X connect 3 1 9 0; ! #X connect 12 0 15 0; ! #X connect 13 0 47 0; ! #X connect 14 0 13 0; ! #X connect 16 0 12 0; ! #X connect 19 0 21 0; ! #X connect 19 0 23 0; ! #X connect 19 0 40 0; ! #X connect 20 0 22 0; ! #X connect 21 0 20 1; ! #X connect 21 1 20 0; ! #X connect 41 0 7 0; ! #X connect 44 0 43 0; ! #X connect 45 0 44 0; ! #X connect 46 0 13 0; ! #X connect 48 0 16 0; ! #X connect 49 0 19 0; ! #X coords 0 0 1 1 108 360 1;
--- NEW FILE: kbd2midi.pd --- #N canvas 413 429 88 48 10; #N canvas 405 324 705 488 guts 0; #X obj 97 26 keyname; #X obj 103 102 symbol; #X obj 103 77 select 1; #X obj 181 153 pool; #X msg 121 129 get $1; #X obj 181 261 outlet; #X obj 181 82 loadbang; #X obj 218 175 r $0-onoff; #X obj 94 51 spigot; #X obj 164 28 r $0-onoff; #X obj 181 220 route float; #X obj 181 198 spigot; #X msg 325 116 set $1 $2; #X obj 326 81 pack s 0; #X floatatom 377 58 5 0 0 0 - - -; #X obj 319 38 symbol; #X symbolatom 338 16 10 0 0 0 - - -; #X msg 292 2 bang; #X obj 243 52 spigot; #X obj 263 25 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 84 162 r $0-op; #X obj 84 184 openpanel; #X msg 84 209 loadx $1; #X msg 224 154 savex qwertz2midi.xml; #X obj 9 38 s $0-onoff; #X obj 7 14 inlet; #X obj 267 218 r $0-oct; #X obj 181 240 + 0; #X obj 246 244 * 12; #X msg 181 128 loadx qwertz2midi.xml; #X obj 26 239 select Prior Next; #X obj 27 350 int 0; #X obj 71 312 + 1; #X obj 134 359 int 0; #X obj 151 306 - 1; #X obj 28 373 moses 5; #X obj 134 381 moses -5; #X obj 89 437 s $0-oct; #X connect 0 0 8 0; #X connect 0 1 1 1; #X connect 0 1 18 0; #X connect 1 0 4 0; #X connect 1 0 30 0; #X connect 2 0 1 0; #X connect 3 0 11 0; #X connect 4 0 3 0; #X connect 6 0 29 0; #X connect 7 0 11 1; #X connect 8 0 2 0; #X connect 9 0 8 1; #X connect 10 0 27 0; #X connect 11 0 10 0; #X connect 12 0 3 0; #X connect 13 0 12 0; #X connect 14 0 13 1; #X connect 15 0 13 0; #X connect 16 0 15 1; #X connect 17 0 15 0; #X connect 18 0 16 0; #X connect 19 0 18 1; #X connect 20 0 21 0; #X connect 21 0 22 0; #X connect 22 0 3 0; #X connect 23 0 3 0; #X connect 25 0 24 0; #X connect 26 0 28 0; #X connect 27 0 5 0; #X connect 28 0 27 1; #X connect 29 0 3 0; #X connect 30 0 31 0; #X connect 30 1 33 0; #X connect 31 0 35 0; #X connect 32 0 31 1; #X connect 33 0 36 0; #X connect 34 0 33 1; #X connect 35 0 32 0; #X connect 35 0 34 0; #X connect 35 0 37 0; #X connect 36 1 32 0; #X connect 36 1 34 0; #X connect 36 1 37 0; #X restore 88 0 pd guts; #X obj 88 26 outlet; #X obj 2 14 cnv 15 80 30 empty empty empty 20 12 0 14 -233017 -66577 0; #X obj 8 23 tgl 15 0 $0-onoff $0-onoff on 3 -3 0 8 -262144 -1 -1 1 1; #X obj 29 23 bng 15 250 50 0 $0-op $0-op op 3 -3 0 8 -262144 -1 -1 ; #X obj 146 -1 inlet; #X obj 50 24 nbx 2 14 -5 5 0 0 $0-oct $0-oct oct 3 -3 0 8 -262144 -1 -1 0 256; #X connect 0 0 1 0; #X connect 5 0 0 0; #X coords 0 0 1 1 82 45 1;
--- NEW FILE: qwerty2midi.xml --- <?xml version="1.0" encoding="ISO-8859-1"?> <!DOCTYPE pool SYSTEM "http://www.parasitaere-kapazitaeten.net/ext/pool/pool-0.2.dtd"> <pool> <value><key>5</key><data>78</data></value> <value><key>0</key><data>74</data></value> <value><key>7</key><data>82</data></value> <value><key>6</key><data>80</data></value> <value><key>d</key><data>63</data></value> <value><key>2</key><data>73</data></value> <value><key>3</key><data>75</data></value> <value><key>u</key><data>83</data></value> <value><key>n</key><data>69</data></value> <value><key>l</key><data>73</data></value> <value><key>,</key><data>72</data></value> <value><key>t</key><data>79</data></value> <value><key>w</key><data>74</data></value> <value><key>g</key><data>66</data></value> <value><key>v</key><data>65</data></value> <value><key>h</key><data>68</data></value> <value><key>i</key><data>84</data></value> <value><key>j</key><data>70</data></value> <value><key>q</key><data>72</data></value> <value><key>s</key><data>61</data></value> <value><key>a</key><data>1</data></value> <value><key>b</key><data>67</data></value> <value><key>x</key><data>62</data></value> <value><key>z</key><data>60</data></value> <value><key>r</key><data>77</data></value> <value><key>y</key><data>81</data></value> <value><key>e</key><data>76</data></value> <value><key>c</key><data>64</data></value> <value><key>m</key><data>71</data></value> </pool>
--- NEW FILE: qwertz2midi.xml --- <?xml version="1.0" encoding="ISO-8859-1"?> <!DOCTYPE pool SYSTEM "http://www.parasitaere-kapazitaeten.net/ext/pool/pool-0.2.dtd"> <pool> <value><key>5</key><data>78</data></value> <value><key>0</key><data>74</data></value> <value><key>7</key><data>82</data></value> <value><key>6</key><data>80</data></value> <value><key>d</key><data>63</data></value> <value><key>2</key><data>73</data></value> <value><key>3</key><data>75</data></value> <value><key>u</key><data>83</data></value> <value><key>n</key><data>69</data></value> <value><key>l</key><data>73</data></value> <value><key>,</key><data>72</data></value> <value><key>t</key><data>79</data></value> <value><key>w</key><data>74</data></value> <value><key>g</key><data>66</data></value> <value><key>v</key><data>65</data></value> <value><key>h</key><data>68</data></value> <value><key>i</key><data>84</data></value> <value><key>j</key><data>70</data></value> <value><key>72</key><data>u , 83</data></value> <value><key>q</key><data>72</data></value> <value><key>s</key><data>61</data></value> <value><key>a</key><data>1</data></value> <value><key>b</key><data>67</data></value> <value><key>x</key><data>62</data></value> <value><key>z</key><data>81</data></value> <value><key>r</key><data>77</data></value> <value><key>y</key><data>60</data></value> <value><key>e</key><data>76</data></value> <value><key>c</key><data>64</data></value> <value><key>m</key><data>71</data></value> </pool>