externals/k_cext help-markov.pd,1.1,1.2 - Pd-cvs

9 Aug 2004


      Update of /cvsroot/pure-data/externals/k_cext
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv8314
Modified Files:
    help-markov.pd 
Log Message:
New SEND syntax
Index: help-markov.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/k_cext/help-markov.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** help-markov.pd	8 Jan 2004 14:55:24 -0000	1.1
--- help-markov.pd	9 Aug 2004 14:20:52 -0000	1.2
***************
*** 8,16 ****
  #X msg 371 52 ; state 1;
  #X text 371 32 reset;
- #X obj 260 103 k_cext 1 0 ; ; int state=I(0) ; int s1[3]=BEGIN 30
- , 10 , 70 END ; int s2[3]=BEGIN 60 , 60 , 80 END ; int random=RANDOM(100)
- ; ; IF random < s1[state] THEN DO ; . SEND("state" , 1) ; ELIF
- random < s2[state] THEN DO ; . SEND("state" , 2) ; ELSE ; . SEND("state"
- , 3) ;;
  #X obj 33 25 bng 20 250 50 0 empty empty empty 20 8 0 8 -262144 -1
  -1;
--- 8,11 ----
***************
*** 35,41 ****
  ; IF random<a THEN DO ; . return 1 ; ELIF random<b THEN DO ; .
  return 2 ; ELSE ; . return 3 ;;
- #X obj 557 115 k_cext 1 0 ; ; int s1[3]=BEGIN 30 , 10 , 70 END
- ; int s2[3]=BEGIN 60 , 60 , 80 END ; SEND("state" , INT_markov(s1[I(0)]
- , s2[I(0)])) ;;
  #X obj 574 46 bng 20 250 50 0 empty empty empty 20 8 0 8 -262144 -1
  -1;
--- 30,33 ----
***************
*** 45,66 ****
  #X text 557 25 STEP;
  #X msg 530 72 print;
! #X text 237 29;
  #X text 244 360 Three ways to implement the markov;
  #X msg 561 259 print;
  #X connect 0 0 2 0;
  #X connect 1 0 2 1;
  #X connect 1 0 3 0;
! #X connect 2 0 7 0;
  #X connect 8 0 10 0;
! #X connect 9 0 10 1;
! #X connect 9 0 11 0;
! #X connect 10 0 18 0;
! #X connect 16 0 18 0;
! #X connect 17 0 7 0;
! #X connect 18 0 13 0;
! #X connect 21 0 23 0;
! #X connect 22 0 23 1;
! #X connect 22 0 24 0;
! #X connect 23 0 20 0;
! #X connect 26 0 20 0;
! #X connect 29 0 19 0;
--- 37,66 ----
  #X text 557 25 STEP;
  #X msg 530 72 print;
! #X text 237 29 comment;
  #X text 244 360 Three ways to implement the markov;
  #X msg 561 259 print;
+ #X obj 260 103 k_cext 1 0 ; ; int state=I(0) ; int s1[3]=BEGIN 30
+ , 10 , 70 END ; int s2[3]=BEGIN 60 , 60 , 80 END ; int random=RANDOM(100)
+ ; ; IF random < s1[state] THEN DO ; . SEND(state , 1) ; ELIF random
+ < s2[state] THEN DO ; . SEND(state , 2) ; ELSE ; . SEND(state ,
+ 3) ;;
+ #X obj 557 115 k_cext 1 0 ; ; int s1[3]=BEGIN 30 , 10 , 70 END
+ ; int s2[3]=BEGIN 60 , 60 , 80 END ; SEND(state , INT_markov(s1[I(0)]
+ , s2[I(0)])) ;;
  #X connect 0 0 2 0;
  #X connect 1 0 2 1;
  #X connect 1 0 3 0;
! #X connect 2 0 28 0;
! #X connect 7 0 9 0;
! #X connect 8 0 9 1;
  #X connect 8 0 10 0;
! #X connect 9 0 17 0;
! #X connect 15 0 17 0;
! #X connect 16 0 28 0;
! #X connect 17 0 12 0;
! #X connect 19 0 21 0;
! #X connect 20 0 21 1;
! #X connect 20 0 22 0;
! #X connect 21 0 29 0;
! #X connect 24 0 29 0;
! #X connect 27 0 18 0;