[PD-cvs] abstractions/rradical/instruments foscil~.pd,NONE,1.1 rrad.fm2~.pd,NONE,1.1 MA_FM.pd,1.1.1.1,1.2

26 Apr 2004


      Update of /cvsroot/pure-data/abstractions/rradical/instruments
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8636
Modified Files:
    MA_FM.pd 
Added Files:
    foscil~.pd rrad.fm2~.pd 
Log Message:
Some new, some changed...
Index: MA_FM.pd
===================================================================
RCS file: /cvsroot/pure-data/abstractions/rradical/instruments/MA_FM.pd,v
retrieving revision 1.1.1.1
retrieving revision 1.2
diff -C2 -d -r1.1.1.1 -r1.2
*** MA_FM.pd	23 Apr 2004 16:22:13 -0000	1.1.1.1
--- MA_FM.pd	26 Apr 2004 10:34:56 -0000	1.2
***************
*** 1,18 ****
  #N canvas 726 332 249 426 10;
! #X obj 13 239 vsl 15 128 0 1000 0 0 $0-rAtt_1 $0-sAtt_1 A 0 -8 1728
! 8 -262144 -1 -1 4400 1;
! #X obj 31 239 vsl 15 128 0 1000 0 0 $0-rRel_1 $0-sRel_1 R 0 -8 1728
! 8 -262144 -1 -1 10500 1;
! #X obj 72 241 vsl 15 128 0 1000 0 0 $0-rAtt_2 $0-sAtt_2 A 0 -8 1728
! 8 -262144 -1 -1 5600 1;
! #X obj 90 241 vsl 15 128 0 1000 0 0 $0-rRel_2 $0-sRel_2 R 0 -8 1728
! 8 -262144 -1 -1 600 1;
! #X obj 133 240 vsl 15 128 0 1000 0 0 $0-rAtt_3 $0-sAtt_3 A 0 -8 1728
! 8 -262144 -1 -1 900 1;
! #X obj 151 240 vsl 15 128 0 1000 0 0 $0-rRel_3 $0-sRel_3 R 0 -8 1728
! 8 -262144 -1 -1 6800 1;
! #X obj 430 158 s $0-NoteVel;
! #X obj 415 179 s $0-NotePitch;
! #X obj 446 137 s $0-NoteChnl;
  #N canvas 0 0 1054 904 FM_Feedback 0;
  #X obj 181 178 line~;
--- 1,18 ----
  #N canvas 726 332 249 426 10;
! #X obj 15 239 vsl 15 128 0 1000 0 0 $0-rAtt_1 $0-sAtt_1 A 0 -8 0
! 8 -262144 -1 -1 0 1;
! #X obj 33 239 vsl 15 128 0 1000 0 0 $0-rRel_1 $0-sRel_1 R 0 -8 0
! 8 -262144 -1 -1 0 1;
! #X obj 74 241 vsl 15 128 0 1000 0 0 $0-rAtt_2 $0-sAtt_2 A 0 -8 0
! 8 -262144 -1 -1 0 1;
! #X obj 92 241 vsl 15 128 0 1000 0 0 $0-rRel_2 $0-sRel_2 R 0 -8 0
! 8 -262144 -1 -1 0 1;
! #X obj 135 240 vsl 15 128 0 1000 0 0 $0-rAtt_3 $0-sAtt_3 A 0 -8 0
! 8 -262144 -1 -1 0 1;
! #X obj 153 240 vsl 15 128 0 1000 0 0 $0-rRel_3 $0-sRel_3 R 0 -8 0
! 8 -262144 -1 -1 0 1;
! #X obj 432 158 s $0-NoteVel;
! #X obj 417 179 s $0-NotePitch;
! #X obj 448 137 s $0-NoteChnl;
  #N canvas 0 0 1054 904 FM_Feedback 0;
  #X obj 181 178 line~;
***************
*** 152,269 ****
  #X connect 71 0 10 0;
  #X coords 0 0 0.000952381 0.00111111 120 20 0;
! #X restore 739 301 pd FM_Feedback;
! #X obj 414 219 catch~ $0-out;
! #X obj 0 19 cnv 30 244 180 empty empty empty 20 12 0 14 -166441 -66577
  0;
! #X obj 136 178 cnv 10 40 1 $0-r_Op1OutCanvash $0-s_Op1OutCanvash
! empty 20 12 1728 14 -33289 -262144 0;
! #X obj 120 172 cnv 12 38 16 empty $0-s_Op1OutCanvash empty 4 6 576
! 8 -33289 -262144 0;
! #X obj 121 173 nbx 3 14 0 100 0 0 $0-outAmt_1 $0-send-outAmt_1 empty
! 0 -6 1728 10 -166441 -1 -1 31 256;
! #X obj 78 130 cnv 15 1 50 $0-r_Op2OutCanvas $0-s_Op2OutCanvas empty
! 20 12 1728 14 -33289 -262144 0;
! #X obj 80 178 cnv 10 40 1 $0-r_Op2OutCanvash $0-s_Op2OutCanvash empty
! 20 12 1728 14 -33289 -262144 0;
! #X obj 68 172 cnv 12 38 16 empty $0-s_Op2OutCanvas empty 4 6 576 8
! -33289 -262144 0;
! #X obj 69 173 nbx 3 14 0 100 0 0 $0-outAmt_2 $0-send-outAmt_2 empty
! 0 -6 1728 10 -166441 -1 -1 84 256;
! #X obj 28 178 cnv 10 40 1 $0-r_Op3OutCanvash $0-s_Op3OutCanvash empty
! 20 12 1728 14 -166441 -262144 0;
! #X obj 25 30 cnv 12 40 22 empty $0-s_Op3FBCanvas empty 4 6 576 8 -166441
  -262144 0;
! #X obj 27 32 cnv 12 36 18 empty empty empty 4 6 0 8 -166441 -262144
! 0;
! #X obj 13 22 cnv 12 34 16 empty $0-s_Op3FBCanvas empty 4 6 576 8 -166441
  -262144 0;
! #X obj 14 23 nbx 3 14 0 100 0 0 $0-op3->op3 $0-send-op3->op3 empty
! 0 -6 1728 8 -166441 -1 -1 0 256;
! #X obj 25 42 cnv 15 1 50 $0-r_Op3Op2 $0-s_Op3Op2 empty 20 12 1728
! 14 -33289 -262144 0;
! #X obj 177 171 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 179 173 cnv 12 38 14 empty empty Out 10 7 0 8 -195568 -66577
  0;
! #X obj 25 130 cnv 15 1 50 $0-r_Op3OutCanvas $0-s_Op3OutCanvas empty
! 20 12 1728 14 -166441 -262144 0;
! #X obj 16 172 cnv 12 38 16 empty $0-s_Op3OutCanvas empty 4 6 576 8
  -166441 -262144 0;
! #X obj 17 173 nbx 3 14 0 100 0 0 $0-outAmt_3 $0-send-outAmt_3 empty
! 0 -6 1728 10 -166441 -1 -1 0 256;
! #X obj 26 87 cnv 10 40 1 $0-r_Op3Op2h $0-s_Op3Op2h empty 20 12 1728
! 14 -33289 -262144 0;
! #X obj 28 135 cnv 10 40 1 $0-r_Op3Op1h $0-s_Op3Op1h empty 20 12 1728
  14 -166441 -262144 0;
! #X obj 25 82 cnv 15 1 50 $0-r_Op3Op2_2 $0-s_Op3Op2_2 empty 20 12
! 1728 14 -166441 -262144 0;
! #X obj 15 81 cnv 12 38 16 empty $0-s_Op3Op2Canvas empty 4 6 576 8
! -33289 -262144 0;
! #X obj 16 82 nbx 3 14 0 100 0 0 $0-op3->op2 $0-send-op3->op2 empty
! 0 -6 1728 10 -166441 -1 -1 87 256;
! #X obj 15 129 cnv 12 38 16 empty $0-s_Op3Op1Canvas empty 4 6 576 8
! -166441 -262144 0;
! #X obj 16 130 nbx 3 14 0 100 0 0 $0-op3->op1 $0-send-op3->op1 empty
! 0 -6 1728 10 -166441 -1 -1 0 256;
! #X obj 88 135 cnv 10 30 1 $0-r_Op2Op1h $0-s_Op2Op1h empty 20 12 1728
  14 -166441 -262144 0;
! #X obj 68 129 cnv 12 38 16 empty $0-s_Op2Op1Canvas empty 4 6 576 8
  -166441 -262144 0;
! #X obj 69 130 nbx 3 14 0 100 0 0 $0-op2->op1 $0-send-op2->op1 empty
! 0 -6 1728 10 -166441 -1 -1 0 256;
! #X obj 131 81 cnv 15 1 50 $0-r_Op1Op2 $0-s_Op1Op2 empty 20 12 1728
! 14 -33289 -262144 0;
! #X obj 120 81 cnv 12 38 16 empty $0-s_Op1Op2Canvas empty 4 6 576 8
! -33289 -262144 0;
! #X obj 121 82 nbx 3 14 0 100 0 0 $0-op1->op2 $0-send-op1->op2 empty
! 0 -6 1728 10 -166441 -1 -1 12 256;
! #X obj 131 131 cnv 15 1 40 $0-r_Op1OutCanvas $0-s_Op1OutCanvas empty
! 20 12 1728 14 -33289 -262144 0;
! #X obj 131 118 cnv 12 40 22 empty $0-s_Op1FBCanvas empty 4 6 576 8
! -33289 -262144 0;
! #X obj 133 120 cnv 12 36 18 empty empty empty 4 6 0 8 -166441 -262144
  0;
! #X obj 119 128 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 121 130 cnv 12 38 14 empty empty Op_1 4 6 0 8 -233017 -66577
  0;
! #X obj 119 110 cnv 12 34 16 empty $0-s_Op1FBCanvas empty 4 6 576 8
! -33289 -262144 0;
! #X obj 120 111 nbx 3 14 0 100 0 0 $0-op1->op1 $0-send-op1->op1 empty
! 0 -6 1728 8 -166441 -1 -1 15 256;
! #X obj 78 70 cnv 12 40 22 empty $0-s_Op2FBCanvas empty 4 6 576 8 -166441
  -262144 0;
! #X obj 80 72 cnv 12 36 18 empty empty empty 4 6 0 8 -166441 -262144
  0;
! #X obj 66 62 cnv 12 34 16 empty $0-s_Op2FBCanvas empty 4 6 576 8 -166441
  -262144 0;
! #X obj 67 63 nbx 3 14 0 100 0 0 $0-op2->op2 $0-send-op2->op2 empty
! 0 -6 1728 8 -166441 -1 -1 0 256;
! #X obj 78 82 cnv 15 1 46 $0-r_Op2Op1 $0-s_Op2Op1 empty 20 12 1728
! 14 -33289 -262144 0;
! #X obj 90 88 cnv 10 30 1 $0-r_Op1Op2h $0-s_Op1Op2h empty 20 12 1728
! 14 -33289 -262144 0;
! #X obj 66 80 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 68 82 cnv 12 38 14 empty empty Op_2 4 6 0 8 -233017 -66577 0
! ;
! #X obj 121 37 cnv 12 38 16 empty $0-s_Op1Op3Canvas empty 4 6 576 8
! -33289 -262144 0;
! #X obj 131 38 cnv 15 1 42 $0-r_Op1Op3_1 $0-s_Op1Op3_1 empty 20 12
! 1728 14 -33289 -262144 0;
! #X obj 122 38 nbx 3 14 0 100 0 0 $0-op1->op3 $0-send-op1->op3 empty
! 0 -6 1728 10 -166441 -1 -1 7 256;
! #X obj 36 42 cnv 10 32 1 $0-r_Op2Op3h $0-s_Op2Op3h empty 20 12 1728
! 14 -33289 -262144 0;
! #X obj 90 42 cnv 10 30 1 $0-r_Op1Op3h $0-s_Op1Op3h empty 20 12 1728
! 14 -33289 -262144 0;
! #X obj 68 37 cnv 12 38 16 empty $0-s_Op2Op3Canvas empty 4 6 576 8
  -166441 -262144 0;
! #X obj 78 37 cnv 15 1 24 $0-r_Op2Op3 $0-s_Op2Op3 empty 20 12 1728
  14 -166441 -262144 0;
! #X obj 69 38 nbx 3 14 0 100 0 0 $0-op2->op3 $0-send-op2->op3 empty
! 0 -6 1728 10 -166441 -1 -1 0 256;
! #X obj 12 40 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 14 42 cnv 12 38 14 empty empty Op_3 4 6 0 8 -233017 -66577 0
  ;
! #X obj 178 148 bng 15 250 50 0 $0-r_RsFB $0-s_RsFB Reset 0 -6 1728
! 8 -262144 -1 -1;
  #N canvas 536 352 858 576 feedbacksReset 0;
  #X obj 215 122 s $0-send-op1->op1;
--- 152,269 ----
  #X connect 71 0 10 0;
  #X coords 0 0 0.000952381 0.00111111 120 20 0;
! #X restore 741 301 pd FM_Feedback;
! #X obj 416 219 catch~ $0-out;
! #X obj 2 19 cnv 30 244 180 empty empty empty 20 12 0 14 -166441 -66577
  0;
! #X obj 138 178 cnv 10 40 1 $0-r_Op1OutCanvash $0-s_Op1OutCanvash
! empty 20 12 0 14 -166441 -262144 0;
! #X obj 122 172 cnv 12 38 16 empty $0-s_Op1OutCanvash empty 4 6 0 8
! -166441 -262144 0;
! #X obj 123 173 nbx 3 14 0 100 0 0 $0-outAmt_1 $0-send-outAmt_1 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 80 130 cnv 15 1 50 $0-r_Op2OutCanvas $0-s_Op2OutCanvas empty
! 20 12 0 14 -166441 -262144 0;
! #X obj 82 178 cnv 10 40 1 $0-r_Op2OutCanvash $0-s_Op2OutCanvash empty
! 20 12 0 14 -166441 -262144 0;
! #X obj 70 172 cnv 12 38 16 empty $0-s_Op2OutCanvas empty 4 6 0 8 -166441
  -262144 0;
! #X obj 71 173 nbx 3 14 0 100 0 0 $0-outAmt_2 $0-send-outAmt_2 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 30 178 cnv 10 40 1 $0-r_Op3OutCanvash $0-s_Op3OutCanvash empty
! 20 12 0 14 -166441 -262144 0;
! #X obj 27 30 cnv 12 40 22 empty $0-s_Op3FBCanvas empty 4 6 0 8 -166441
  -262144 0;
! #X obj 29 32 cnv 12 36 18 empty empty empty 4 6 0 8 -166441 -262144
  0;
! #X obj 15 22 cnv 12 34 16 empty $0-s_Op3FBCanvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 16 23 nbx 3 14 0 100 0 0 $0-op3->op3 $0-send-op3->op3 empty
! 0 -6 0 8 -166441 -1 -1 0 256;
! #X obj 27 42 cnv 15 1 50 $0-r_Op3Op2 $0-s_Op3Op2 empty 20 12 0 14
  -166441 -262144 0;
! #X obj 179 171 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 181 173 cnv 12 38 14 empty empty Out 10 7 0 8 -195568 -66577
! 0;
! #X obj 27 130 cnv 15 1 50 $0-r_Op3OutCanvas $0-s_Op3OutCanvas empty
! 20 12 0 14 -166441 -262144 0;
! #X obj 18 172 cnv 12 38 16 empty $0-s_Op3OutCanvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 19 173 nbx 3 14 0 100 0 0 $0-outAmt_3 $0-send-outAmt_3 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 28 87 cnv 10 40 1 $0-r_Op3Op2h $0-s_Op3Op2h empty 20 12 0
  14 -166441 -262144 0;
! #X obj 30 135 cnv 10 40 1 $0-r_Op3Op1h $0-s_Op3Op1h empty 20 12 0
  14 -166441 -262144 0;
! #X obj 27 82 cnv 15 1 50 $0-r_Op3Op2_2 $0-s_Op3Op2_2 empty 20 12
! 0 14 -166441 -262144 0;
! #X obj 17 81 cnv 12 38 16 empty $0-s_Op3Op2Canvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 18 82 nbx 3 14 0 100 0 0 $0-op3->op2 $0-send-op3->op2 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 17 129 cnv 12 38 16 empty $0-s_Op3Op1Canvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 18 130 nbx 3 14 0 100 0 0 $0-op3->op1 $0-send-op3->op1 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 90 135 cnv 10 30 1 $0-r_Op2Op1h $0-s_Op2Op1h empty 20 12 0
! 14 -166441 -262144 0;
! #X obj 70 129 cnv 12 38 16 empty $0-s_Op2Op1Canvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 71 130 nbx 3 14 0 100 0 0 $0-op2->op1 $0-send-op2->op1 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 133 81 cnv 15 1 50 $0-r_Op1Op2 $0-s_Op1Op2 empty 20 12 0 14
  -166441 -262144 0;
! #X obj 122 81 cnv 12 38 16 empty $0-s_Op1Op2Canvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 123 82 nbx 3 14 0 100 0 0 $0-op1->op2 $0-send-op1->op2 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 133 131 cnv 15 1 40 $0-r_Op1OutCanvas $0-s_Op1OutCanvas empty
! 20 12 0 14 -166441 -262144 0;
! #X obj 133 118 cnv 12 40 22 empty $0-s_Op1FBCanvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 135 120 cnv 12 36 18 empty empty empty 4 6 0 8 -166441 -262144
  0;
! #X obj 121 128 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 123 130 cnv 12 38 14 empty empty Op_1 4 6 0 8 -233017 -66577
  0;
! #X obj 121 110 cnv 12 34 16 empty $0-s_Op1FBCanvas empty 4 6 0 8 -166441
  -262144 0;
! #X obj 122 111 nbx 3 14 0 100 0 0 $0-op1->op1 $0-send-op1->op1 empty
! 0 -6 0 8 -166441 -1 -1 0 256;
! #X obj 80 70 cnv 12 40 22 empty $0-s_Op2FBCanvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 82 72 cnv 12 36 18 empty empty empty 4 6 0 8 -166441 -262144
  0;
! #X obj 68 62 cnv 12 34 16 empty $0-s_Op2FBCanvas empty 4 6 0 8 -166441
  -262144 0;
! #X obj 69 63 nbx 3 14 0 100 0 0 $0-op2->op2 $0-send-op2->op2 empty
! 0 -6 0 8 -166441 -1 -1 0 256;
! #X obj 80 82 cnv 15 1 46 $0-r_Op2Op1 $0-s_Op2Op1 empty 20 12 0 14
  -166441 -262144 0;
! #X obj 92 88 cnv 10 30 1 $0-r_Op1Op2h $0-s_Op1Op2h empty 20 12 0
  14 -166441 -262144 0;
! #X obj 68 80 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 70 82 cnv 12 38 14 empty empty Op_2 4 6 0 8 -233017 -66577 0
  ;
! #X obj 123 37 cnv 12 38 16 empty $0-s_Op1Op3Canvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 133 38 cnv 15 1 42 $0-r_Op1Op3_1 $0-s_Op1Op3_1 empty 20 12
! 0 14 -166441 -262144 0;
! #X obj 124 38 nbx 3 14 0 100 0 0 $0-op1->op3 $0-send-op1->op3 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 38 42 cnv 10 32 1 $0-r_Op2Op3h $0-s_Op2Op3h empty 20 12 0
! 14 -166441 -262144 0;
! #X obj 92 42 cnv 10 30 1 $0-r_Op1Op3h $0-s_Op1Op3h empty 20 12 0
! 14 -166441 -262144 0;
! #X obj 70 37 cnv 12 38 16 empty $0-s_Op2Op3Canvas empty 4 6 0 8 -166441
! -262144 0;
! #X obj 80 37 cnv 15 1 24 $0-r_Op2Op3 $0-s_Op2Op3 empty 20 12 0 14
! -166441 -262144 0;
! #X obj 71 38 nbx 3 14 0 100 0 0 $0-op2->op3 $0-send-op2->op3 empty
! 0 -6 0 10 -166441 -1 -1 0 256;
! #X obj 14 40 cnv 12 42 18 empty empty empty 4 6 0 8 -1 -66577 0;
! #X obj 16 42 cnv 12 38 14 empty empty Op_3 4 6 0 8 -233017 -66577 0
! ;
! #X obj 180 148 bng 15 250 50 0 $0-r_RsFB $0-s_RsFB Reset 0 -6 0 8
! -262144 -1 -1;
  #N canvas 536 352 858 576 feedbacksReset 0;
  #X obj 215 122 s $0-send-op1->op1;
***************
*** 294,298 ****
  #X connect 13 0 10 0;
  #X connect 13 0 11 0;
! #X restore 739 280 pd feedbacksReset;
  #N canvas 0 0 1267 910 feedback_Matrix_GUI 0;
  #X obj 30 38 moses 1;
--- 294,298 ----
  #X connect 13 0 10 0;
  #X connect 13 0 11 0;
! #X restore 741 280 pd feedbacksReset;
  #N canvas 0 0 1267 910 feedback_Matrix_GUI 0;
  #X obj 30 38 moses 1;
***************
*** 746,750 ****
  #X connect 197 0 198 0;
  #X connect 198 0 180 0;
! #X restore 740 259 pd feedback_Matrix_GUI;
  #N canvas 0 0 452 302 FM_Pitch 0;
  #X floatatom 278 194 5 0 0 0 Op2_Pitch - -;
--- 746,750 ----
  #X connect 197 0 198 0;
  #X connect 198 0 180 0;
! #X restore 742 259 pd feedback_Matrix_GUI;
  #N canvas 0 0 452 302 FM_Pitch 0;
  #X floatatom 278 194 5 0 0 0 Op2_Pitch - -;
***************
*** 812,819 ****
  #X connect 29 1 32 0;
  #X connect 30 0 0 0;
! #X restore 740 325 pd FM_Pitch;
! #X obj 768 39 loadbang;
! #X obj 768 77 s $0-s_RsFB;
! #X text 463 291 And Envelopes (op1 , op2 , op3) -->;
  #N canvas 0 0 1102 748 sound-engine 0;
  #X obj 56 190 cos~;
--- 812,819 ----
  #X connect 29 1 32 0;
  #X connect 30 0 0 0;
! #X restore 742 325 pd FM_Pitch;
! #X obj 770 39 loadbang;
! #X obj 770 77 s $0-s_RsFB;
! #X text 465 291 And Envelopes (op1 , op2 , op3) -->;
  #N canvas 0 0 1102 748 sound-engine 0;
  #X obj 56 190 cos~;
***************
*** 1122,1126 ****
  #X connect 73 0 74 0;
  #X connect 74 0 63 1;
! #X restore 741 236 pd sound-engine;
  #N canvas 384 294 748 517 saves 0;
  #X obj 564 140 originator $1 $0;
--- 1122,1126 ----
  #X connect 73 0 74 0;
  #X connect 74 0 63 1;
! #X restore 743 236 pd sound-engine;
  #N canvas 384 294 748 517 saves 0;
  #X obj 564 140 originator $1 $0;
***************
*** 1209,1212 ****
--- 1209,1214 ----
  #X connect 26 0 6 0;
  #X restore 60 370 pd ops;
+ #X obj 674 184 outlet;
+ #X connect 0 2 39 0;
  #X connect 1 0 0 0;
  #X connect 2 0 15 0;
***************
*** 1234,1249 ****
  #X connect 36 0 35 0;
  #X connect 37 0 34 0;
! #X restore 741 213 pd saves;
! #X obj 414 239 outlet~;
! #X obj 417 97 inlet;
! #X obj 460 96 inlet;
! #X obj 516 96 inlet;
! #X obj 741 190 inlet;
! #X floatatom 174 237 5 0 0 2 preset #0-preset-in #0-preset-out;
  #X connect 10 0 77 0;
  #X connect 72 0 73 0;
  #X connect 78 0 7 0;
  #X connect 79 0 6 0;
  #X connect 80 0 8 0;
  #X connect 81 0 76 0;
! #X coords 0 0 1 1 248 380 1;
--- 1236,1253 ----
  #X connect 36 0 35 0;
  #X connect 37 0 34 0;
! #X restore 743 213 pd saves;
! #X obj 416 239 outlet~;
! #X obj 419 97 inlet;
! #X obj 462 96 inlet;
! #X obj 518 96 inlet;
! #X obj 743 190 inlet;
! #X floatatom 176 237 5 0 0 2 preset #0-preset-in #0-preset-out;
! #X obj 692 236 outlet;
  #X connect 10 0 77 0;
  #X connect 72 0 73 0;
+ #X connect 76 0 83 0;
  #X connect 78 0 7 0;
  #X connect 79 0 6 0;
  #X connect 80 0 8 0;
  #X connect 81 0 76 0;
! #X coords 0 0 1 1 246 380 1;
--- NEW FILE: rrad.fm2~.pd ---
#N canvas 135 368 405 175 10;
#X obj 3 18 cnv 15 400 150 empty $0-background-cnv empty 20 12 1 14
-233017 -66577 0;
#X obj 722 17 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;
#X obj 243 50 r $0-paste;
#X msg 241 71 paste;
#X text 154 15 This is the originator , including some ready to use
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;
#X obj 243 116 r $0-adsr-OSC-out;
#X obj 306 144 s $0-adsr-OSC;
#X obj 507 110 commun /mod $0;
#X obj 606 110 commun /car $0;
#X obj 507 86 r $0-mod;
#X obj 507 135 s $0-mod;
#X obj 606 86 r $0-car;
#X obj 607 134 s $0-car;
#X obj 543 193 commun /index $0;
#X obj 507 185 r $0-ind;
#X obj 507 234 s $0-ind;
#X connect 0 2 15 0;
#X connect 1 0 0 1;
#X connect 1 0 19 0;
#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;
#X connect 7 0 8 0;
#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 18 0 15 0;
#X connect 20 0 23 0;
#X connect 21 0 25 0;
#X connect 22 0 20 0;
#X connect 24 0 21 0;
#X connect 26 0 28 0;
#X connect 27 0 26 0;
#X restore 660 16 pd saves;
#N canvas 569 61 450 300 cnv.ctl 0;
#X obj 90 188 s $0-background-cnv;
#X floatatom 108 59 5 100 1000 0 width - -;
#X floatatom 112 83 4 50 500 0 height - -;
#X obj 92 132 pack 0 0;
#X msg 92 159 vis_size $1 $2;
#X obj 110 106 t b f;
#X connect 1 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 5 0 3 0;
#X connect 5 1 3 1;
#X restore 585 16 pd cnv.ctl;
#X obj 11 144 bng 15 250 50 0 $0-copy empty copy 0 -6 0 8 -225271
-1 -1;
#X obj 43 144 bng 15 250 50 0 $0-paste empty paste 0 -6 0 8 -257472
-1 -1;
#X text 244 3 look! ==>;
#X obj 660 37 outlet OSC;
#X obj 618 45 inlet;
#N canvas 478 505 450 300 engine 0;
#X obj 205 173 foscil~;
#X obj 120 63 catch~ $0-adsr;
#X obj 69 64 inlet;
#X obj 66 101 mtof;
#X obj 226 232 outlet~;
#X obj 159 96 r $0-car;
#X obj 231 95 r $0-mod;
#X obj 318 111 catch~ $0-index;
#X connect 0 0 4 0;
#X connect 1 0 0 0;
#X connect 2 0 3 0;
#X connect 3 0 0 1;
#X connect 5 0 0 2;
#X connect 6 0 0 3;
#X connect 7 0 0 4;
#X restore 559 120 pd engine;
#X obj 539 16 inlet;
#X obj 546 48 unpack 0 0;
#X obj 542 156 outlet~;
#X obj 569 80 s $0-note;
#X obj 639 79 s $0-vel;
#X obj 84 9 r $0-vel;
#X obj 81 171 throw~ $0-adsr;
#X obj 224 11 r $0-adsr-OSC;
#X obj 188 213 s $0-adsr-OSC-out;
#X obj 336 3 r $0-vel;
#X obj 415 12 r $0-adsr-OSC;
#X obj 482 194 s $0-adsr-OSC-out;
#X obj 82 35 rrad.adsr~ $1-adsr;
#X obj 334 248 throw~ $0-index;
#X obj 247 35 rrad.adsr~ $1-index;
#X msg 432 212 $1 20;
#X obj 327 200 *~;
#X obj 374 203 line~;
#X obj 8 49 nbx 5 14 -1e+37 1e+37 0 0 $0-car $0-car car 0 -6 1 10
-241291 -1 -1 5 256;
#X obj 8 81 nbx 5 14 -1e+37 1e+37 0 0 $0-mod $0-mod mod 0 -6 1 10
-262131 -1 -1 1 256;
#X obj 8 111 hsl 64 15 0 127 0 0 $0-ind $0-ind index -2 -6 1 8 -262135
-1 -1 4800 1;
#X obj 496 238 r $0-ind;
#X obj 428 191 / 32;
#X obj 83 37 cnv 15 150 15 empty empty $1-adsr 20 8 1 12 -228904 -66577
0;
#X obj 248 37 cnv 15 150 15 empty empty $1-index 20 8 1 12 -228904
-66577 0;
#X connect 1 0 2 1;
#X connect 2 0 7 0;
#X connect 8 0 2 0;
#X connect 9 0 12 0;
#X connect 10 0 11 0;
#X connect 11 0 13 0;
#X connect 11 0 9 0;
#X connect 11 1 14 0;
#X connect 15 0 22 0;
#X connect 17 0 22 1;
#X connect 19 0 24 0;
#X connect 20 0 24 1;
#X connect 22 0 16 0;
#X connect 22 1 18 0;
#X connect 24 0 26 0;
#X connect 24 1 21 0;
#X connect 25 0 27 0;
#X connect 26 0 23 0;
#X connect 27 0 26 1;
#X connect 31 0 32 0;
#X connect 32 0 25 0;
#X coords 0 0 1 1 403 170 1;
--- NEW FILE: foscil~.pd ---
#N canvas 62 230 1119 650 10;
#X obj 269 352 *~;
#X obj 181 448 cos~;
#X obj 181 396 +~;
#X obj 181 354 phasor~ 0;
#X obj 269 320 osc~ 0;
#X text 601 59 PHASE MODULATION ("FM") USING TWO OSCILLATORS;
#X text 93 314 frequency;
#X text 93 296 modulation;
#X text 438 342 <-- signal with smoothed;
#X text 474 362 modulation index to avoid clicks;
#X text 269 372 amplitude-controlled modulation;
#X text 269 390 oscillator output;
#X text 83 338 carrier;
#X text 83 356 phase -->;
#X text 59 378 phase;
#X text 59 396 modulation-->;
#X text 269 432 output;
#X text 475 452 To do phase modulation , we split a "carrier oscillator"
into its phase calculation (phasor~) and its waveform lookup (cos~).
These together would be equivalent to an osc~ object , but the "+~"
between them adds anopther oscillator's output to the phase.;
#X text 475 530 You will get the best graphs by choosing reasonably
low carrier and modulation frequencies (50-100 , say). The modulation
index is usually between 0 and 1 (which means the control will typically
range from 0-100).;
#X text 717 616 updated for Pd version 0.33;
#X obj 297 585 outlet~;
#X text 267 3 car;
#X text 332 3 mod;
#X text 388 7 index;
#X text 234 447 <-- waveform;
#X obj 182 492 *~;
#X obj 49 448 inlet~;
#X text 42 426 amp (0-1);
#X text 183 3 basefreq;
#X obj 388 26 inlet~;
#X obj 326 26 inlet;
#X obj 261 26 inlet;
#X obj 190 26 inlet;
#X obj 185 145 * 1;
#X obj 183 262 sig~ 0;
#X obj 268 218 * 1;
#X obj 307 71 t b f;
#X obj 238 62 t b f;
#X connect 0 0 2 1;
#X connect 1 0 25 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 4 0 0 0;
#X connect 25 0 20 0;
#X connect 26 0 25 1;
#X connect 29 0 0 1;
#X connect 30 0 36 0;
#X connect 31 0 37 0;
#X connect 32 0 33 0;
#X connect 32 0 35 0;
#X connect 33 0 34 0;
#X connect 34 0 3 0;
#X connect 35 0 4 0;
#X connect 36 0 35 0;
#X connect 36 1 35 1;
#X connect 37 0 33 0;
#X connect 37 1 33 1;

2024

2023

2022

2021

2020

2019

2018

2017

2016

2015

2014

2013

2012

2011

2010

2009

2008

2007

2006

2005

2004

2003

[PD-cvs] abstractions/rradical/instruments foscil~.pd,NONE,1.1 rrad.fm2~.pd,NONE,1.1 MA_FM.pd,1.1.1.1,1.2