From 0727bfcaf2bd48bf501a7fa95515c400a1996902 Mon Sep 17 00:00:00 2001 From: Bryan Jurish Date: Thu, 2 Feb 2006 12:49:19 +0000 Subject: initial cvs import svn path=/trunk/externals/moocow/; revision=4536 --- gfsm/src/test-markov.pd | 211 ++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 211 insertions(+) create mode 100644 gfsm/src/test-markov.pd (limited to 'gfsm/src/test-markov.pd') diff --git a/gfsm/src/test-markov.pd b/gfsm/src/test-markov.pd new file mode 100644 index 0000000..7ab52e8 --- /dev/null +++ b/gfsm/src/test-markov.pd @@ -0,0 +1,211 @@ +#N canvas 79 27 832 322 10; +#X obj 21 23 bng 20 250 50 0 \$0-draw-s empty DRAW 0 -6 0 8 -24198 +-1 -1; +#N canvas 0 0 466 454 draw 0; +#X obj 361 16 zexy; +#X obj 67 25 r \$0-draw-s; +#X obj 68 68 f \$0; +#X obj 67 177 shell; +#X obj 68 47 t b; +#X obj 68 91 t f f; +#X msg 68 252 dotgv.sh \$1draw.dot; +#X obj 170 326 f \$0; +#X obj 171 306 t b; +#X obj 170 372 shell; +#X obj 172 20 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X msg 170 349 rm -f \$1draw.gfst \$1draw.dot; +#X obj 141 285 shell; +#X msg 219 251 dotty \$1draw.dot; +#X obj 168 198 r \$0-drawmode-s; +#X obj 110 221 demux 0 1; +#X obj 109 178 t b; +#X obj 110 199 f \$0; +#X obj 283 197 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X obj 176 98 s \$0-markov; +#X msg 176 74 save_bin \$1draw; +#X msg 68 137 gfsmdraw -i \$1draw.lab -o \$1draw.lab \$1draw.gfst -F +\$1draw.dot; +#X connect 1 0 4 0; +#X connect 2 0 5 0; +#X connect 3 1 16 0; +#X connect 4 0 2 0; +#X connect 5 0 21 0; +#X connect 5 1 20 0; +#X connect 6 0 12 0; +#X connect 7 0 11 0; +#X connect 8 0 7 0; +#X connect 10 0 4 0; +#X connect 11 0 9 0; +#X connect 12 1 8 0; +#X connect 13 0 12 0; +#X connect 14 0 15 1; +#X connect 15 0 6 0; +#X connect 15 1 13 0; +#X connect 16 0 17 0; +#X connect 17 0 15 0; +#X connect 18 0 15 1; +#X connect 20 0 19 0; +#X connect 21 0 3 0; +#X restore 22 47 pd draw; +#X obj 34 203 r \$0-markov; +#X obj 104 6 bng 15 250 50 0 empty empty empty 0 -6 0 8 -225280 -1 +-1; +#X obj 104 24 openpanel; +#X msg 104 90 load_bin \$1; +#X obj 104 68 symbol; +#X msg 111 45 markov; +#X obj 103 110 s \$0-markov; +#X obj 204 6 bng 15 250 50 0 empty empty empty 0 -6 0 8 -228992 -1 +-1; +#X obj 204 68 symbol; +#X obj 203 110 s \$0-markov; +#X obj 204 24 savepanel; +#X msg 204 90 save_bin \$1; +#X msg 211 45 markov2; +#X obj 49 22 tgl 20 0 \$0-drawmode-s empty mode 0 -6 0 8 -225271 -1 +-1 0 1; +#X msg 336 8 fsm info; +#X msg 342 28 clear; +#X obj 336 75 s \$0-markov; +#X msg 339 151 next; +#X obj 339 172 s \$0-markov; +#X obj 339 108 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X obj 339 127 metro 500; +#X obj 302 153 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X floatatom 364 107 6 0 0 0 - - -; +#X msg 382 255 add1 \$1; +#X floatatom 341 207 5 0 0 0 - - -; +#X msg 382 208 foo; +#X msg 413 208 bar; +#X msg 442 209 baz; +#X obj 382 279 s \$0-markov; +#X obj 34 225 gfsm_markov markov; +#X obj 384 234 symbol; +#X floatatom 481 210 5 0 0 0 - - -; +#X msg 522 211 foo; +#X msg 553 211 bar; +#X msg 582 212 baz; +#X obj 522 282 s \$0-markov; +#X obj 524 237 symbol; +#X msg 521 258 addi1 \$1; +#X msg 349 51 set; +#X floatatom 538 57 5 0 0 0 - - -; +#X msg 480 138 add1 \$1; +#X floatatom 480 119 5 0 0 0 - - -; +#X obj 539 170 s \$0-markov; +#X floatatom 513 11 5 0 0 0 - - -; +#X obj 480 29 metro 100; +#X obj 480 11 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 480 98 + 1; +#X floatatom 649 59 5 0 0 0 - - -; +#X floatatom 591 121 5 0 0 0 - - -; +#X floatatom 624 13 5 0 0 0 - - -; +#X obj 591 31 metro 100; +#X obj 591 13 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 591 100 + 1; +#X msg 591 140 addi1 \$1; +#X obj 480 77 random 16; +#X obj 591 79 random 16; +#X obj 34 260 spigot; +#X obj 83 262 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 1 +; +#X obj 687 207 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X obj 687 227 metro 2000; +#X floatatom 715 208 5 0 0 0 - - -; +#X msg 689 247 set; +#X obj 689 267 s \$0-markov; +#X obj 667 227 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262144 -1 +-1; +#X floatatom 692 117 5 0 0 0 - - -; +#X msg 692 137 addi \$1 42 5; +#X obj 32 284 print MARKOV-LO; +#X obj 155 284 print MARKOV-HI; +#X obj 175 241 print MARKOV-X; +#X obj 152 262 spigot; +#X obj 201 264 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X floatatom 706 52 5 0 0 0 - - -; +#X msg 705 70 add \$1 24 5; +#X msg 138 192 set 0 \, next; +#X obj 176 219 spigot; +#X obj 224 221 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 0 +1; +#X msg 162 45 big; +#X msg 270 44 big2; +#X msg 49 73 markov2; +#X connect 2 0 31 0; +#X connect 3 0 4 0; +#X connect 4 0 6 0; +#X connect 5 0 8 0; +#X connect 6 0 5 0; +#X connect 7 0 6 0; +#X connect 9 0 12 0; +#X connect 10 0 13 0; +#X connect 12 0 10 0; +#X connect 13 0 11 0; +#X connect 14 0 10 0; +#X connect 16 0 18 0; +#X connect 17 0 18 0; +#X connect 19 0 20 0; +#X connect 21 0 22 0; +#X connect 22 0 19 0; +#X connect 24 0 22 1; +#X connect 25 0 30 0; +#X connect 26 0 25 0; +#X connect 27 0 32 0; +#X connect 28 0 32 0; +#X connect 29 0 32 0; +#X connect 31 0 58 0; +#X connect 31 1 71 0; +#X connect 31 2 75 0; +#X connect 31 2 76 0; +#X connect 32 0 25 0; +#X connect 33 0 39 0; +#X connect 34 0 38 0; +#X connect 35 0 38 0; +#X connect 36 0 38 0; +#X connect 38 0 39 0; +#X connect 39 0 37 0; +#X connect 40 0 18 0; +#X connect 41 0 56 1; +#X connect 42 0 44 0; +#X connect 43 0 42 0; +#X connect 45 0 46 1; +#X connect 46 0 56 0; +#X connect 47 0 46 0; +#X connect 48 0 43 0; +#X connect 49 0 57 1; +#X connect 50 0 55 0; +#X connect 51 0 52 1; +#X connect 52 0 57 0; +#X connect 53 0 52 0; +#X connect 54 0 50 0; +#X connect 55 0 44 0; +#X connect 56 0 48 0; +#X connect 57 0 54 0; +#X connect 58 0 68 0; +#X connect 59 0 58 1; +#X connect 60 0 61 0; +#X connect 61 0 63 0; +#X connect 61 0 65 0; +#X connect 62 0 61 1; +#X connect 63 0 64 0; +#X connect 66 0 67 0; +#X connect 67 0 44 0; +#X connect 71 0 69 0; +#X connect 72 0 71 1; +#X connect 73 0 74 0; +#X connect 74 0 44 0; +#X connect 75 0 31 0; +#X connect 76 0 70 0; +#X connect 77 0 76 1; +#X connect 78 0 6 0; +#X connect 79 0 10 0; +#X connect 80 0 6 0; -- cgit v1.2.1