externals/mapping/pd buttongate.pd, NONE, 1.1 curve.pd, NONE, 1.1 keygate.pd, NONE, 1.1 notescale.pd, NONE, 1.1 spiral.pd, NONE, 1.1 curve_exp.pd, 1.1, 1.2 curve_log.pd, 1.1, 1.2 curve_power.pd, 1.1, 1.2 curve_root.pd, 1.1, 1.2 - Pd-cvs

29 Jan 2006


      Update of /cvsroot/pure-data/externals/mapping/pd
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv30862/pd
Modified Files:
    curve_exp.pd curve_log.pd curve_power.pd curve_root.pd 
Added Files:
    buttongate.pd curve.pd keygate.pd notescale.pd spiral.pd 
Log Message:
cleaned up a lot of hid_ cruft; renamed some hid_ objects to better names; added more objects from hid_ and wrote more curve objects
--- NEW FILE: curve.pd ---
#N canvas 12 269 577 490 10;
#X obj 50 36 inlet;
#X obj 165 34 inlet;
#X obj 165 57 symbol;
#X obj 47 411 outlet;
#X obj 50 150 pack float symbol;
#X msg 50 175 $2 $1;
#X obj 39 256 atan;
#X obj 123 260 cos;
#X obj 152 260 sin;
#X obj 188 273 print [curve];
#X msg 189 251 ERROR: argument not supported $1;
#X obj 194 96 symbol_argument $1;
#X obj 51 100 * 3.14159;
#X obj 39 277 / 1.26263;
#X obj 50 198 route atan cos sin;
#X obj 190 225 symbol;
#X connect 0 0 12 0;
#X connect 1 0 2 0;
#X connect 2 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 14 0;
#X connect 6 0 13 0;
#X connect 7 0 3 0;
#X connect 8 0 3 0;
#X connect 10 0 9 0;
#X connect 11 0 4 1;
#X connect 12 0 4 0;
#X connect 13 0 3 0;
#X connect 14 0 6 0;
#X connect 14 1 7 0;
#X connect 14 2 8 0;
#X connect 14 3 15 0;
#X connect 15 0 10 0;
Index: curve_log.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/mapping/pd/curve_log.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** curve_log.pd	29 Jan 2006 05:43:33 -0000	1.1
--- curve_log.pd	29 Jan 2006 08:12:33 -0000	1.2
***************
*** 1,11 ****
! #N canvas 297 485 422 322 10;
! #X obj 31 45 inlet;
! #X obj 31 282 outlet;
! #X text 79 45 input range: 0 to 1;
! #X text 87 282 output range: 0 to 1;
! #X text 9 5 [hid_log];
! #X obj 30 145 rmstodb;
! #X obj 30 175 / 100;
! #X connect 0 0 5 0;
  #X connect 5 0 6 0;
! #X connect 6 0 1 0;
--- 1,24 ----
! #N canvas 236 31 428 321 10;
! #X obj 31 8 inlet;
! #X obj 31 245 outlet;
! #X obj 77 122 rmstodb;
! #X obj 77 152 / 100;
! #X obj 32 46 moses 0;
! #X obj 16 99 abs;
! #X obj 16 123 rmstodb;
! #X obj 16 151 / 100;
! #X obj 16 172 * -1;
! #X text 79 8 input range: -1 to 1;
! #X text 87 245 output range: -1 to 1;
! #X text 225 284 released under the GNU GPL;
! #X text 8 270 (C) Copyright 2006 Hans-Christoph Steiner hans@at.or.at
! ;
! #X connect 0 0 4 0;
! #X connect 2 0 3 0;
! #X connect 3 0 1 0;
! #X connect 4 0 5 0;
! #X connect 4 1 2 0;
  #X connect 5 0 6 0;
! #X connect 6 0 7 0;
! #X connect 7 0 8 0;
! #X connect 8 0 1 0;
Index: curve_root.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/mapping/pd/curve_root.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** curve_root.pd	29 Jan 2006 05:43:33 -0000	1.1
--- curve_root.pd	29 Jan 2006 08:12:33 -0000	1.2
***************
*** 1,22 ****
! #N canvas 295 229 460 377 10;
  #X obj 40 32 inlet;
  #X obj 40 299 outlet;
! #X obj 40 94 min 1;
  #X text 5 6 input range: -1 to 1;
! #X obj 40 114 max -1;
! #X obj 41 271 pow;
  #X text 96 298 output range: -1 to 1;
! #X obj 58 246 /;
! #X msg 58 226 1 $1;
! #X obj 142 33 inlet;
! #X obj 155 107 float_argument $1 1;
! #X obj 155 86 loadbang;
  #X connect 0 0 2 0;
  #X connect 2 0 4 0;
! #X connect 4 0 5 0;
! #X connect 5 0 1 0;
  #X connect 7 0 5 1;
  #X connect 8 0 7 0;
  #X connect 9 0 8 0;
  #X connect 10 0 8 0;
  #X connect 11 0 10 0;
--- 1,35 ----
! #N canvas 295 229 464 381 10;
  #X obj 40 32 inlet;
  #X obj 40 299 outlet;
! #X obj 40 74 min 1;
  #X text 5 6 input range: -1 to 1;
! #X obj 40 94 max -1;
! #X obj 41 231 pow;
  #X text 96 298 output range: -1 to 1;
! #X obj 177 156 /;
! #X msg 177 136 1 $1;
! #X obj 178 30 inlet;
! #X obj 207 106 float_argument $1 1;
! #X obj 207 85 loadbang;
! #X text 245 344 released under the GNU GPL;
! #X text 28 330 (C) Copyright 2006 Hans-Christoph Steiner hans@at.or.at
! ;
! #X obj 39 121 moses 0;
! #X obj 40 161 abs;
! #X obj 115 232 pow;
! #X obj 41 257 * -1;
  #X connect 0 0 2 0;
  #X connect 2 0 4 0;
! #X connect 4 0 14 0;
! #X connect 5 0 17 0;
  #X connect 7 0 5 1;
+ #X connect 7 0 16 1;
  #X connect 8 0 7 0;
  #X connect 9 0 8 0;
  #X connect 10 0 8 0;
  #X connect 11 0 10 0;
+ #X connect 14 0 15 0;
+ #X connect 14 1 16 0;
+ #X connect 15 0 5 0;
+ #X connect 16 0 1 0;
+ #X connect 17 0 1 0;
--- NEW FILE: buttongate.pd ---
#N canvas 367 43 525 408 10;
#X obj 303 81 hid $1;
#X obj 303 24 inlet;
#X obj 303 106 route key;
#X obj 303 127 route $2;
#X obj 104 26 inlet;
#X obj 104 295 outlet;
#X obj 104 264 spigot;
#X text 10 324 (C) Copyright 2004 Hans-Christoph Steiner hans@at.or.at
;
#X text 226 340 released under the GNU GPL;
#X text 16 371 $Author: eighthave $;
#X text 16 388 $Date: 2006/01/29 08:12:33 $;
#X text 16 354 $Revision: 1.1 $;
#X obj 192 16 loadbang;
#X obj 303 147 unpack f f;
#X text 5 6 [buttongate];
#X obj 242 263 spigot;
#X obj 242 295 outlet;
#X obj 333 195 - 1;
#X obj 333 215 abs;
#X msg 192 50 0;
#X msg 243 50 1;
#X obj 303 168 t f f;
#X connect 0 0 2 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 13 0;
#X connect 4 0 6 0;
#X connect 4 0 15 0;
#X connect 6 0 5 0;
#X connect 12 0 19 0;
#X connect 12 0 20 0;
#X connect 13 0 21 0;
#X connect 15 0 16 0;
#X connect 17 0 18 0;
#X connect 18 0 15 1;
#X connect 19 0 6 1;
#X connect 20 0 15 1;
#X connect 20 0 0 0;
#X connect 21 0 6 1;
#X connect 21 1 17 0;
--- NEW FILE: notescale.pd ---
#N canvas 37 318 444 446 10;
#X obj 64 49 inlet;
#X obj 64 389 outlet;
#X obj 64 325 int;
#X obj 64 297 expr $f1 * ($f3 - $f2) + $f2;
#X obj 357 231 f $2;
#X obj 159 230 f $1;
#X obj 159 257 expr if ($f1 == $f2 , 0 , $f1) ; if ($f1 == $f2 ,
127 , $f2);
#X text 10 7 [notescale];
#X obj 229 152 loadbang;
#X obj 229 179 t b b;
#X text 114 49 input range: 0 to 1;
#X obj 64 96 min 1;
#X obj 64 116 max 0;
#X text 123 389 output range: MIDI note #s;
#X connect 0 0 11 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 6 1;
#X connect 5 0 6 0;
#X connect 6 0 3 1;
#X connect 6 1 3 2;
#X connect 8 0 9 0;
#X connect 9 0 5 0;
#X connect 9 1 4 0;
#X connect 11 0 12 0;
#X connect 12 0 3 0;
#X connect 12 0 9 0;
Index: curve_exp.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/mapping/pd/curve_exp.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** curve_exp.pd	29 Jan 2006 05:43:33 -0000	1.1
--- curve_exp.pd	29 Jan 2006 08:12:33 -0000	1.2
***************
*** 1,11 ****
! #N canvas 225 325 499 325 10;
! #X obj 72 38 inlet;
! #X obj 72 258 outlet;
! #X text 120 38 input range: 0 to 1;
! #X text 128 258 output range: 0 to 1;
! #X text 7 9 [hid_exp];
! #X obj 73 142 dbtorms;
! #X obj 73 120 * 100;
! #X connect 0 0 6 0;
! #X connect 5 0 1 0;
  #X connect 6 0 5 0;
--- 1,24 ----
! #N canvas 225 325 507 333 10;
! #X obj 37 25 inlet;
! #X obj 37 262 outlet;
! #X obj 38 63 moses 0;
! #X obj 22 116 abs;
! #X obj 22 189 * -1;
! #X obj 22 168 dbtorms;
! #X obj 22 142 * 100;
! #X obj 83 142 * 100;
! #X obj 83 169 dbtorms;
! #X text 85 25 input range: -1 to 1;
! #X text 93 262 output range: -1 to 1;
! #X text 248 296 released under the GNU GPL;
! #X text 31 282 (C) Copyright 2006 Hans-Christoph Steiner hans@at.or.at
! ;
! #X connect 0 0 2 0;
! #X connect 2 0 3 0;
! #X connect 2 1 7 0;
! #X connect 3 0 6 0;
! #X connect 4 0 1 0;
! #X connect 5 0 4 0;
  #X connect 6 0 5 0;
+ #X connect 7 0 8 0;
+ #X connect 8 0 1 0;
--- NEW FILE: keygate.pd ---
#N canvas 326 22 530 481 10;
#X obj 44 36 inlet;
#X obj 44 365 outlet;
#X obj 44 334 spigot;
#X text 109 401 (C) Copyright 2004 Hans-Christoph Steiner hans@at.or.at
;
#X text 326 415 released under the GNU GPL;
#X text 16 444 $Author: eighthave $;
#X text 16 461 $Date: 2006/01/29 08:12:33 $;
#X text 16 427 $Revision: 1.1 $;
#X obj 132 26 loadbang;
#X text 5 6 [keygate];
#X obj 182 333 spigot;
#X obj 182 365 outlet;
#X obj 273 204 - 1;
#X obj 273 224 abs;
#X obj 236 27 keyname;
#X msg 132 60 0;
#X msg 183 60 1;
#X obj 243 181 t f f;
#X obj 243 157 f;
#X obj 243 107 sel $1;
#X obj 243 86 symbol;
#X obj 236 57 trigger bang float;
#X connect 0 0 2 0;
#X connect 0 0 10 0;
#X connect 2 0 1 0;
#X connect 8 0 15 0;
#X connect 8 0 16 0;
#X connect 10 0 11 0;
#X connect 12 0 13 0;
#X connect 13 0 10 1;
#X connect 14 0 21 0;
#X connect 14 1 20 1;
#X connect 15 0 2 1;
#X connect 16 0 10 1;
#X connect 17 0 2 1;
#X connect 17 1 12 0;
#X connect 18 0 17 0;
#X connect 19 0 18 0;
#X connect 20 0 19 0;
#X connect 21 0 20 0;
#X connect 21 1 18 1;
Index: curve_power.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/mapping/pd/curve_power.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** curve_power.pd	29 Jan 2006 05:43:33 -0000	1.1
--- curve_power.pd	29 Jan 2006 08:12:33 -0000	1.2
***************
*** 1,14 ****
! #N canvas 612 444 456 373 10;
! #X obj 42 53 inlet;
! #X obj 42 230 outlet;
! #X text 5 14 input range: -1 to 1;
! #X obj 43 182 pow;
! #X text 98 229 output range: -1 to 1;
! #X obj 138 53 inlet;
! #X obj 146 106 float_argument $1 1;
! #X obj 146 84 loadbang;
! #X connect 0 0 3 0;
! #X connect 3 0 1 0;
! #X connect 5 0 3 1;
! #X connect 6 0 3 1;
! #X connect 7 0 6 0;
--- 1,33 ----
! #N canvas 529 139 460 377 10;
! #X obj 40 32 inlet;
! #X obj 40 299 outlet;
! #X obj 40 74 min 1;
! #X text 5 6 input range: -1 to 1;
! #X obj 40 94 max -1;
! #X obj 41 231 pow;
! #X text 96 298 output range: -1 to 1;
! #X obj 178 30 inlet;
! #X obj 207 106 float_argument $1 1;
! #X obj 207 85 loadbang;
! #X text 245 344 released under the GNU GPL;
! #X text 28 330 (C) Copyright 2006 Hans-Christoph Steiner hans@at.or.at
! ;
! #X obj 39 121 moses 0;
! #X obj 41 207 abs;
! #X obj 115 232 pow;
! #X obj 41 257 * -1;
! #X obj 177 156 float;
! #X connect 0 0 2 0;
! #X connect 2 0 4 0;
! #X connect 4 0 12 0;
! #X connect 5 0 15 0;
! #X connect 7 0 16 0;
! #X connect 8 0 16 0;
! #X connect 9 0 8 0;
! #X connect 12 0 13 0;
! #X connect 12 1 14 0;
! #X connect 13 0 5 0;
! #X connect 14 0 1 0;
! #X connect 15 0 1 0;
! #X connect 16 0 14 1;
! #X connect 16 0 5 1;
--- NEW FILE: spiral.pd ---
#N canvas 492 167 673 445 10;
#X obj 30 58 inlet;
#X obj 25 363 outlet;
#X text 73 363 output range: 0 to 1;
#X text 72 57 input range: 0 to 1;
#X obj 232 362 outlet;
#X obj 222 58 inlet;
#X text 264 57 input range: 0 to 1;
#X text 29 29 x-axis value;
#X text 221 26 y-axis value;
#X text 254 411 released under the GNU GPL;
#X text 40 396 (C) Copyright 2005 Hans-Christoph Steiner hans@at.or.at
;
#X obj 309 258 +;
#X msg 260 227 1;
#X msg 356 227 -1;
#X obj 232 327 +;
#X obj 262 161 delta;
#X obj 310 291 * 1;
#X obj 262 185 moses -0.4;
#X obj 312 205 moses 0.4;
#X text 273 90 changes over 0.4 mean one rotation. I can't move fast
enough on my joystick to get near a change of 0.4 This might not work
on other devices , like tablets , but we'll cross that bridge when
we get to it (i.e. when I get a tablet);
#X text 280 362 output range: infinite , one rotation = 1;
#X obj 105 109 polar;
#X obj 135 133 trigger float float;
#X obj 340 258 float;
#X connect 0 0 21 0;
#X connect 5 0 21 1;
#X connect 11 0 16 0;
#X connect 11 0 23 0;
#X connect 12 0 11 0;
#X connect 13 0 11 0;
#X connect 14 0 4 0;
#X connect 15 0 17 0;
#X connect 16 0 14 1;
#X connect 17 0 12 0;
#X connect 17 1 18 0;
#X connect 18 1 13 0;
#X connect 21 0 1 0;
#X connect 21 1 22 0;
#X connect 22 0 14 0;
#X connect 22 1 15 0;
#X connect 23 0 11 1;