[PD-cvs] externals/hcs/pan equal_power_pan~.pd, 1.1, 1.2 gogins_pan~.pd, 1.1, 1.2 linear_pan~.pd, 1.1, 1.2

Hans-Christoph Steiner eighthave at users.sourceforge.net
Sat May 27 12:59:26 CEST 2006


Update of /cvsroot/pure-data/externals/hcs/pan
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv10667

Modified Files:
	equal_power_pan~.pd gogins_pan~.pd linear_pan~.pd 
Log Message:
replaced complicated [expr] with simple [clip]

Index: linear_pan~.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/hcs/pan/linear_pan~.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** linear_pan~.pd	26 Dec 2005 02:07:50 -0000	1.1
--- linear_pan~.pd	27 May 2006 10:59:24 -0000	1.2
***************
*** 1,3 ****
! #N canvas 438 88 458 368 10;
  #X obj 23 38 inlet~;
  #X obj 193 36 inlet;
--- 1,3 ----
! #N canvas 438 88 462 372 10;
  #X obj 23 38 inlet~;
  #X obj 193 36 inlet;
***************
*** 6,12 ****
  #X text 30 282 left;
  #X text 84 282 right;
- #X obj 193 112 expr if($f1 > 0 \, $f1 \, 0);
- #X obj 193 93 expr if($f1 < 1 \, $f1 \, 1);
- #X text 206 79 filter so 0 < f < 1;
  #X obj 40 150 expr 1 - $f1;
  #X text 130 318 (C) Copyright 2004 Hans-Christoph Steiner;
--- 6,9 ----
***************
*** 16,27 ****
  #X obj 268 32 loadbang;
  #X msg 268 52 0.5;
! #X connect 0 0 13 0;
! #X connect 1 0 7 0;
! #X connect 6 0 9 0;
! #X connect 6 0 13 2;
! #X connect 7 0 6 0;
! #X connect 9 0 13 1;
! #X connect 13 0 2 0;
! #X connect 13 1 3 0;
! #X connect 14 0 15 0;
! #X connect 15 0 7 0;
--- 13,24 ----
  #X obj 268 32 loadbang;
  #X msg 268 52 0.5;
! #X obj 193 112 clip 0 1;
! #X connect 0 0 10 0;
! #X connect 1 0 13 0;
! #X connect 6 0 10 1;
! #X connect 10 0 2 0;
! #X connect 10 1 3 0;
! #X connect 11 0 12 0;
! #X connect 12 0 13 0;
! #X connect 13 0 6 0;
! #X connect 13 0 10 2;

Index: equal_power_pan~.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/hcs/pan/equal_power_pan~.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** equal_power_pan~.pd	26 Dec 2005 02:07:50 -0000	1.1
--- equal_power_pan~.pd	27 May 2006 10:59:24 -0000	1.2
***************
*** 1,3 ****
! #N canvas 509 36 445 434 10;
  #X obj 23 38 inlet~;
  #X obj 234 48 inlet;
--- 1,3 ----
! #N canvas 509 36 449 438 10;
  #X obj 23 38 inlet~;
  #X obj 234 48 inlet;
***************
*** 6,12 ****
  #X text 30 342 left;
  #X text 84 342 right;
- #X obj 234 124 expr if($f1 > 0 \, $f1 \, 0);
- #X obj 234 105 expr if($f1 < 1 \, $f1 \, 1);
- #X text 247 91 filter so 0 < f < 1;
  #X text 130 368 (C) Copyright 2004 Hans-Christoph Steiner;
  #X text 234 384 released under the GNU GPL;
--- 6,9 ----
***************
*** 17,29 ****
  #X obj 234 184 expr sin($f1 * 3.14159 / 2);
  #X text 10 17 [equal_power_pan~];
! #X connect 0 0 11 0;
! #X connect 1 0 7 0;
! #X connect 6 0 14 0;
! #X connect 6 0 15 0;
! #X connect 7 0 6 0;
! #X connect 11 0 2 0;
! #X connect 11 1 3 0;
! #X connect 12 0 13 0;
! #X connect 13 0 7 0;
! #X connect 14 0 11 1;
! #X connect 15 0 11 2;
--- 14,26 ----
  #X obj 234 184 expr sin($f1 * 3.14159 / 2);
  #X text 10 17 [equal_power_pan~];
! #X obj 234 124 clip 0 1;
! #X connect 0 0 8 0;
! #X connect 1 0 14 0;
! #X connect 8 0 2 0;
! #X connect 8 1 3 0;
! #X connect 9 0 10 0;
! #X connect 10 0 14 0;
! #X connect 11 0 8 1;
! #X connect 12 0 8 2;
! #X connect 14 0 11 0;
! #X connect 14 0 12 0;

Index: gogins_pan~.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/hcs/pan/gogins_pan~.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** gogins_pan~.pd	26 Dec 2005 02:07:50 -0000	1.1
--- gogins_pan~.pd	27 May 2006 10:59:24 -0000	1.2
***************
*** 1,3 ****
! #N canvas 612 28 518 582 10;
  #X obj 23 38 inlet~;
  #X obj 139 47 inlet;
--- 1,3 ----
! #N canvas 612 28 522 586 10;
  #X obj 23 38 inlet~;
  #X obj 139 47 inlet;
***************
*** 6,12 ****
  #X text 30 502 left;
  #X text 84 502 right;
- #X obj 139 93 expr if($f1 > 0 \, $f1 \, 0);
- #X obj 139 74 expr if($f1 < 1 \, $f1 \, 1);
- #X text 174 59 filter so 0 < f < 1;
  #X text 130 528 (C) Copyright 2004 Hans-Christoph Steiner;
  #X text 234 544 released under the GNU GPL;
--- 6,9 ----
***************
*** 31,60 ****
  #X obj 207 326 +;
  #X obj 107 324 -;
! #X connect 0 0 11 0;
! #X connect 1 0 7 0;
! #X connect 6 0 22 0;
! #X connect 7 0 6 0;
! #X connect 11 0 2 0;
! #X connect 11 1 3 0;
! #X connect 12 0 13 0;
! #X connect 13 0 7 0;
! #X connect 14 0 19 0;
! #X connect 15 0 23 1;
! #X connect 17 0 14 0;
! #X connect 17 0 18 0;
! #X connect 18 0 21 1;
! #X connect 18 0 20 1;
! #X connect 19 0 22 1;
! #X connect 19 1 15 0;
! #X connect 20 0 11 1;
! #X connect 21 0 11 2;
! #X connect 22 0 23 0;
! #X connect 23 0 24 0;
! #X connect 24 0 25 0;
! #X connect 24 1 26 0;
! #X connect 25 0 28 0;
! #X connect 25 0 29 0;
! #X connect 26 0 28 1;
! #X connect 26 0 29 1;
! #X connect 28 0 21 0;
! #X connect 29 0 20 0;
--- 28,57 ----
  #X obj 207 326 +;
  #X obj 107 324 -;
! #X obj 139 74 clip 0 1;
! #X connect 0 0 8 0;
! #X connect 1 0 27 0;
! #X connect 8 0 2 0;
! #X connect 8 1 3 0;
! #X connect 9 0 10 0;
! #X connect 10 0 27 0;
! #X connect 11 0 16 0;
! #X connect 12 0 20 1;
! #X connect 14 0 11 0;
! #X connect 14 0 15 0;
! #X connect 15 0 18 1;
! #X connect 15 0 17 1;
! #X connect 16 0 19 1;
! #X connect 16 1 12 0;
! #X connect 17 0 8 1;
! #X connect 18 0 8 2;
! #X connect 19 0 20 0;
! #X connect 20 0 21 0;
! #X connect 21 0 22 0;
! #X connect 21 1 23 0;
! #X connect 22 0 25 0;
! #X connect 22 0 26 0;
! #X connect 23 0 25 1;
! #X connect 23 0 26 1;
! #X connect 25 0 18 0;
! #X connect 26 0 17 0;
! #X connect 27 0 19 0;





More information about the Pd-cvs mailing list