-
Notifications
You must be signed in to change notification settings - Fork 0
Expand file tree
/
Copy path_main.pd
More file actions
1551 lines (1551 loc) · 39.5 KB
/
Copy path_main.pd
File metadata and controls
1551 lines (1551 loc) · 39.5 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
#N canvas 0 25 1440 847 12;
#X floatatom 330 590 3 0 0 0 - - - 0;
#X obj 330 532 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X obj 467 502 loadbang;
#X floatatom 1011 216 5 0 0 0 - - - 0;
#X obj 1011 157 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X obj 1176 127 loadbang;
#N canvas 92 117 1004 748 urn-jb-track 0;
#X msg 385 120 clear \, bang;
#X obj 276 199 ==;
#X obj 276 224 select 1;
#X obj 276 249 tgl 16 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 261 278 +;
#X floatatom 261 346 5 0 0 0 - - - 0;
#X obj 261 316 %;
#X obj 262 79 inlet;
#X obj 492 77 inlet;
#X text 61 224 If new value is a repeat...;
#X text 91 275 ... then toggle offset;
#X text 93 316 constrain to urn range;
#X text 123 79 bang for new value;
#X text 417 77 urn range;
#X obj 261 369 outlet;
#X text 149 369 new value out;
#X obj 262 167 t f f f;
#N canvas 182 25 1258 847 urn-track 0;
#X obj 197 488 t a a;
#X obj 127 418 - 1;
#X obj 76 282 select 0;
#X obj 338 363 outlet;
#X obj 197 637 outlet;
#X obj 265 41 inlet;
#X obj 76 54 inlet;
#X obj 265 95 f \$1;
#X obj 276 65 loadbang;
#X obj 170 102 b;
#X obj 197 465 random;
#N canvas 689 538 264 239 count-down 0;
#X obj 59 66 inlet;
#X obj 127 60 inlet;
#X obj 59 159 outlet;
#X text 123 37 count from?;
#X text 54 35 trigger;
#X obj 59 96 bang;
#X obj 95 131 - 1;
#X obj 59 131 f;
#X connect 0 0 5 0;
#X connect 1 0 7 1;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 6 0;
#X connect 7 0 2 0;
#X restore 76 249 pd count-down;
#X text 334 389 bang if urn empty;
#X text 172 659 urn selection;
#X obj 127 390 t a b;
#X obj 76 77 route bang seed clear;
#N canvas 549 246 251 276 gate_2 0;
#X obj 68 18 inlet;
#X obj 84 65 inlet;
#X obj 68 212 outlet;
#X obj 100 191 outlet;
#X obj 68 92 f 0;
#X obj 68 118 select 0 1;
#X obj 68 41 b;
#X connect 0 0 6 0;
#X connect 1 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X connect 5 1 3 0;
#X connect 6 0 4 0;
#X restore 76 206 pd gate_2;
#N canvas 589 293 450 300 init-urn-table 0;
#N canvas 0 0 450 300 count 0;
#X obj 158 193 + 1;
#X obj 122 158 until;
#X obj 122 194 f;
#X obj 122 101 inlet;
#X msg 167 157 0;
#X obj 122 120 t a b;
#X obj 122 224 outlet;
#X connect 0 0 2 1;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 2 1;
#X connect 5 0 1 0;
#X connect 5 1 4 0;
#X restore 117 197 pd count;
#X obj 117 218 t a a;
#X msg 147 148 resize \$1;
#X obj 117 82 t a a;
#X obj 117 49 inlet;
#X obj 147 128 change;
#X obj 147 105 int;
#X obj 117 249 tabwrite \$0-urn-track;
#X obj 147 173 s \$0-urn-track;
#X connect 0 0 1 0;
#X connect 1 0 7 0;
#X connect 1 1 7 1;
#X connect 2 0 8 0;
#X connect 3 0 0 0;
#X connect 3 1 6 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X restore 323 149 pd init-urn-table;
#X obj 265 125 t b a a a;
#X obj 76 306 t b b;
#X msg 134 181 0;
#X msg 149 204 1;
#X obj 324 171 table \$0-urn-track \$1;
#X obj 197 609 tabread \$0-urn-track;
#X obj 127 559 tabwrite \$0-urn-track;
#X obj 127 531 tabread \$0-urn-track;
#X msg 578 400 seed \$1;
#X obj 644 169 loadbang;
#X obj 644 227 snapshot~;
#X obj 588 169 adc~ 1;
#X obj 588 198 hip~ 5;
#X obj 644 256 abs;
#X obj 644 285 * 1e+07;
#X obj 644 314 % 1000;
#X text 562 143 seed random from analog;
#X obj 644 198 delay 100 1 msec;
#X connect 0 0 23 0;
#X connect 0 1 24 1;
#X connect 1 0 10 1;
#X connect 1 0 25 0;
#X connect 2 0 19 0;
#X connect 2 1 14 0;
#X connect 5 0 7 0;
#X connect 6 0 15 0;
#X connect 7 0 18 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X connect 10 0 0 0;
#X connect 11 0 2 0;
#X connect 14 0 1 0;
#X connect 14 1 10 0;
#X connect 15 0 16 0;
#X connect 15 2 9 0;
#X connect 16 0 11 0;
#X connect 16 1 3 0;
#X connect 18 0 20 0;
#X connect 18 1 11 1;
#X connect 18 2 10 1;
#X connect 18 3 17 0;
#X connect 19 0 3 0;
#X connect 19 1 21 0;
#X connect 20 0 16 1;
#X connect 21 0 16 1;
#X connect 23 0 4 0;
#X connect 25 0 24 0;
#X connect 26 0 10 0;
#X connect 27 0 35 0;
#X connect 28 0 31 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 26 0;
#X connect 35 0 28 0;
#X restore 262 120 pd urn-track;
#X connect 0 0 17 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 14 0;
#X connect 6 0 5 0;
#X connect 7 0 17 0;
#X connect 8 0 17 1;
#X connect 8 0 6 1;
#X connect 16 0 4 0;
#X connect 16 1 1 1;
#X connect 16 2 1 0;
#X connect 17 0 16 0;
#X connect 17 1 0 0;
#X restore 330 561 pd urn-jb-track;
#X f 20;
#X floatatom 1623 210 5 0 0 0 - - - 0;
#X obj 1623 152 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X obj 1753 122 loadbang;
#N canvas 92 117 1004 748 urn-jb-scenario 0;
#X msg 412 157 clear \, bang;
#X obj 263 236 ==;
#X obj 263 261 select 1;
#X obj 263 286 tgl 16 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 248 315 +;
#X floatatom 248 383 5 0 0 0 - - - 0;
#X obj 248 353 %;
#X obj 249 116 inlet;
#X obj 519 114 inlet;
#X text 48 261 If new value is a repeat...;
#X text 78 312 ... then toggle offset;
#X text 80 353 constrain to urn range;
#X text 110 116 bang for new value;
#X text 444 114 urn range;
#X obj 248 406 outlet;
#X text 136 406 new value out;
#X obj 249 204 t f f f;
#N canvas 57 25 1258 847 urn-scenario 0;
#X obj 197 488 t a a;
#X obj 127 418 - 1;
#X obj 76 282 select 0;
#X obj 338 363 outlet;
#X obj 197 637 outlet;
#X obj 265 51 inlet;
#X obj 76 54 inlet;
#X obj 265 105 f \$1;
#X obj 276 75 loadbang;
#X obj 170 102 b;
#X obj 197 465 random;
#N canvas 689 538 264 239 count-down 0;
#X obj 59 66 inlet;
#X obj 127 60 inlet;
#X obj 59 159 outlet;
#X text 123 37 count from?;
#X text 54 35 trigger;
#X obj 59 96 bang;
#X obj 85 131 - 1;
#X obj 59 131 f;
#X connect 0 0 5 0;
#X connect 1 0 7 1;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 6 0;
#X connect 7 0 2 0;
#X restore 76 249 pd count-down;
#X text 334 389 bang if urn empty;
#X text 172 659 urn selection;
#X obj 127 390 t a b;
#X obj 76 77 route bang seed clear;
#N canvas 549 246 251 276 gate_2 0;
#X obj 68 18 inlet;
#X obj 84 65 inlet;
#X obj 68 212 outlet;
#X obj 100 191 outlet;
#X obj 68 92 f 0;
#X obj 68 118 select 0 1;
#X obj 68 41 b;
#X connect 0 0 6 0;
#X connect 1 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X connect 5 1 3 0;
#X connect 6 0 4 0;
#X restore 76 206 pd gate_2;
#N canvas 589 293 450 300 init-urn-table 0;
#N canvas 0 25 450 300 count 0;
#X obj 158 193 + 1;
#X obj 122 158 until;
#X obj 122 194 f;
#X obj 122 101 inlet;
#X msg 167 157 0;
#X obj 122 120 t a b;
#X obj 122 224 outlet;
#X connect 0 0 2 1;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 2 1;
#X connect 5 0 1 0;
#X connect 5 1 4 0;
#X restore 117 197 pd count;
#X obj 117 218 t a a;
#X msg 147 148 resize \$1;
#X obj 117 82 t a a;
#X obj 117 49 inlet;
#X obj 147 128 change;
#X obj 147 105 int;
#X obj 147 173 s \$0-urn-scenario;
#X obj 117 246 tabwrite \$0-urn-scenario;
#X connect 0 0 1 0;
#X connect 1 0 8 0;
#X connect 1 1 8 1;
#X connect 2 0 7 0;
#X connect 3 0 0 0;
#X connect 3 1 6 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X restore 323 149 pd init-urn-table;
#X obj 265 125 t b a a a;
#X obj 76 306 t b b;
#X msg 134 181 0;
#X msg 149 204 1;
#X obj 324 171 table \$0-urn-scenario \$1;
#X obj 127 531 tabread \$0-urn-scenario;
#X obj 127 559 tabwrite \$0-urn-scenario;
#X obj 197 609 tabread \$0-urn-scenario;
#X msg 578 400 seed \$1;
#X obj 644 169 loadbang;
#X obj 644 227 snapshot~;
#X obj 588 169 adc~ 1;
#X obj 588 198 hip~ 5;
#X obj 644 256 abs;
#X obj 644 285 * 1e+07;
#X obj 644 314 % 1000;
#X text 562 143 seed random from analog;
#X obj 644 198 delay 300 1 msec;
#X connect 0 0 25 0;
#X connect 0 1 24 1;
#X connect 1 0 10 1;
#X connect 1 0 23 0;
#X connect 2 0 19 0;
#X connect 2 1 14 0;
#X connect 5 0 7 0;
#X connect 6 0 15 0;
#X connect 7 0 18 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X connect 10 0 0 0;
#X connect 11 0 2 0;
#X connect 14 0 1 0;
#X connect 14 1 10 0;
#X connect 15 0 16 0;
#X connect 15 2 9 0;
#X connect 16 0 11 0;
#X connect 16 1 3 0;
#X connect 18 0 20 0;
#X connect 18 1 11 1;
#X connect 18 2 10 1;
#X connect 18 3 17 0;
#X connect 19 0 3 0;
#X connect 19 1 21 0;
#X connect 20 0 16 1;
#X connect 21 0 16 1;
#X connect 23 0 24 0;
#X connect 25 0 4 0;
#X connect 26 0 10 0;
#X connect 27 0 35 0;
#X connect 28 0 31 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 26 0;
#X connect 35 0 28 0;
#X restore 249 157 pd urn-scenario;
#X connect 0 0 17 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 14 0;
#X connect 6 0 5 0;
#X connect 7 0 17 0;
#X connect 8 0 17 1;
#X connect 8 0 6 1;
#X connect 16 0 4 0;
#X connect 16 1 1 1;
#X connect 16 2 1 0;
#X connect 17 0 16 0;
#X connect 17 1 0 0;
#X restore 1623 181 pd urn-jb-scenario;
#X f 19;
#X text 1655 151 no. of files;
#X floatatom 2024 206 5 0 0 0 - - - 0;
#X obj 2024 148 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X obj 2154 118 loadbang;
#X text 2056 147 no. of files;
#N canvas 92 117 1004 748 urn-jb-music 0;
#X msg 392 135 clear \, bang;
#X obj 243 214 ==;
#X obj 243 239 select 1;
#X obj 243 264 tgl 16 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 228 293 +;
#X floatatom 228 361 5 0 0 0 - - - 0;
#X obj 228 331 %;
#X obj 229 94 inlet;
#X obj 499 92 inlet;
#X text 28 239 If new value is a repeat...;
#X text 58 290 ... then toggle offset;
#X text 60 331 constrain to urn range;
#X text 90 94 bang for new value;
#X text 424 92 urn range;
#X obj 228 384 outlet;
#X text 116 384 new value out;
#X obj 229 182 t f f f;
#N canvas 57 25 1258 847 urn-music 0;
#X obj 197 488 t a a;
#X obj 127 418 - 1;
#X obj 76 282 select 0;
#X obj 338 363 outlet;
#X obj 197 637 outlet;
#X obj 265 51 inlet;
#X obj 76 54 inlet;
#X obj 265 105 f \$1;
#X obj 276 75 loadbang;
#X obj 170 102 b;
#X obj 197 465 random;
#N canvas 689 538 264 239 count-down 0;
#X obj 59 66 inlet;
#X obj 127 60 inlet;
#X obj 59 159 outlet;
#X text 123 37 count from?;
#X text 54 35 trigger;
#X obj 59 96 bang;
#X obj 85 131 - 1;
#X obj 59 131 f;
#X connect 0 0 5 0;
#X connect 1 0 7 1;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 6 0;
#X connect 7 0 2 0;
#X restore 76 249 pd count-down;
#X text 334 389 bang if urn empty;
#X text 172 659 urn selection;
#X obj 127 390 t a b;
#X obj 76 77 route bang seed clear;
#N canvas 549 246 251 276 gate_2 0;
#X obj 68 18 inlet;
#X obj 84 65 inlet;
#X obj 68 212 outlet;
#X obj 100 191 outlet;
#X obj 68 92 f 0;
#X obj 68 118 select 0 1;
#X obj 68 41 b;
#X connect 0 0 6 0;
#X connect 1 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X connect 5 1 3 0;
#X connect 6 0 4 0;
#X restore 76 206 pd gate_2;
#N canvas 589 293 450 300 init-urn-table 0;
#N canvas 0 25 450 300 count 0;
#X obj 158 193 + 1;
#X obj 122 158 until;
#X obj 122 194 f;
#X obj 122 101 inlet;
#X msg 167 157 0;
#X obj 122 120 t a b;
#X obj 122 224 outlet;
#X connect 0 0 2 1;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 2 1;
#X connect 5 0 1 0;
#X connect 5 1 4 0;
#X restore 117 197 pd count;
#X obj 117 218 t a a;
#X msg 147 148 resize \$1;
#X obj 117 82 t a a;
#X obj 117 49 inlet;
#X obj 147 128 change;
#X obj 147 105 int;
#X obj 147 173 s \$0-urn-music;
#X obj 117 246 tabwrite \$0-urn-music;
#X connect 0 0 1 0;
#X connect 1 0 8 0;
#X connect 1 1 8 1;
#X connect 2 0 7 0;
#X connect 3 0 0 0;
#X connect 3 1 6 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X restore 323 149 pd init-urn-table;
#X obj 265 125 t b a a a;
#X obj 76 306 t b b;
#X msg 134 181 0;
#X msg 149 204 1;
#X obj 324 171 table \$0-urn-music \$1;
#X obj 127 531 tabread \$0-urn-music;
#X obj 127 559 tabwrite \$0-urn-music;
#X obj 197 609 tabread \$0-urn-music;
#X msg 578 400 seed \$1;
#X obj 644 169 loadbang;
#X obj 644 227 snapshot~;
#X obj 588 169 adc~ 1;
#X obj 588 198 hip~ 5;
#X obj 644 256 abs;
#X obj 644 285 * 1e+07;
#X obj 644 314 % 1000;
#X text 562 143 seed random from analog;
#X obj 644 198 delay 400 1 msec;
#X connect 0 0 25 0;
#X connect 0 1 24 1;
#X connect 1 0 10 1;
#X connect 1 0 23 0;
#X connect 2 0 19 0;
#X connect 2 1 14 0;
#X connect 5 0 7 0;
#X connect 6 0 15 0;
#X connect 7 0 18 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X connect 10 0 0 0;
#X connect 11 0 2 0;
#X connect 14 0 1 0;
#X connect 14 1 10 0;
#X connect 15 0 16 0;
#X connect 15 2 9 0;
#X connect 16 0 11 0;
#X connect 16 1 3 0;
#X connect 18 0 20 0;
#X connect 18 1 11 1;
#X connect 18 2 10 1;
#X connect 18 3 17 0;
#X connect 19 0 3 0;
#X connect 19 1 21 0;
#X connect 20 0 16 1;
#X connect 21 0 16 1;
#X connect 23 0 24 0;
#X connect 25 0 4 0;
#X connect 26 0 10 0;
#X connect 27 0 35 0;
#X connect 28 0 31 0;
#X connect 29 0 30 0;
#X connect 30 0 28 0;
#X connect 31 0 32 0;
#X connect 32 0 33 0;
#X connect 33 0 26 0;
#X connect 35 0 28 0;
#X restore 229 135 pd urn-music;
#X connect 0 0 17 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 14 0;
#X connect 6 0 5 0;
#X connect 7 0 17 0;
#X connect 8 0 17 1;
#X connect 8 0 6 1;
#X connect 16 0 4 0;
#X connect 16 1 1 1;
#X connect 16 2 1 0;
#X connect 17 0 16 0;
#X connect 17 1 0 0;
#X restore 2024 177 pd urn-jb-music;
#X f 19;
#X floatatom 418 474 7 0 0 0 - - - 0;
#X obj 418 387 r setPause;
#X obj 330 474 r recall;
#X text 355 590 << track selection;
#X obj 1197 360 s recall;
#X obj 418 445 + 5;
#X obj 1193 244 delay 1 1 sec;
#X obj 330 503 delay 1 1 sec;
#X obj 1193 215 t b;
#X obj 348 387 loadbang;
#X msg 1193 302 start;
#X obj 1011 331 readsf~ 1 44100, f 27;
#X obj 1193 273 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X obj 941 331 random 4;
#X obj 941 389 select 0 1 2 3, f 28;
#X obj 909 467 *~ 0, f 5;
#X obj 957 467 *~ 0, f 5;
#X obj 1005 467 *~ 0, f 5;
#X obj 1053 466 *~ 0, f 5;
#X msg 1161 389 0;
#X text 889 127 MONO NARRATION;
#X text 151 428 RANDOM BREAKS & TRACK SELECTION;
#X obj 1011 360 s~ n-mono-out;
#X obj 835 428 r~ n-mono-out;
#X obj 2026 1158 dac~ 1 2 3 4, f 72;
#X obj 909 582 s~ mono-narration-1;
#X obj 957 553 s~ mono-narration-2;
#X obj 1005 524 s~ mono-narration-3;
#X obj 1053 495 s~ mono-narration-4;
#X obj 2036 1060 r~ mono-narration-1;
#X obj 2203 1060 r~ mono-narration-2;
#X obj 2370 1060 r~ mono-narration-3;
#X obj 2537 1060 r~ mono-narration-4;
#X obj 1623 123 r scenario;
#X obj 1770 239 delay 1 1 sec;
#X obj 1770 210 t b;
#X msg 1770 297 start;
#X text 1802 210 start play;
#X obj 1770 268 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#N canvas 14 25 1426 847 select-scenario 0;
#X obj 314 87 inlet;
#X obj 62 520 outlet;
#X msg 318 901 open scenarie_01.wav;
#X obj 314 122 select 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16, f 87;
#X msg 353 862 open scenarie_02.wav;
#X msg 389 823 open scenarie_03.wav;
#X msg 425 784 open scenarie_04.wav;
#X msg 460 745 open scenarie_05.wav;
#X msg 496 706 open scenarie_06.wav;
#X msg 516 667 open scenarie_07.wav;
#X msg 551 628 open scenarie_08.wav;
#X msg 587 589 open scenarie_09.wav;
#X msg 623 550 open scenarie_10.wav;
#X msg 658 511 open scenarie_11.wav;
#X msg 694 472 open scenarie_12.wav;
#X msg 734 423 open scenarie_13.wav;
#X msg 769 384 open scenarie_14.wav;
#X msg 805 345 open scenarie_15.wav;
#X msg 841 306 open scenarie_16.wav;
#X msg 876 267 open scenarie_17.wav;
#X connect 0 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X connect 3 1 4 0;
#X connect 3 2 5 0;
#X connect 3 3 6 0;
#X connect 3 4 7 0;
#X connect 3 5 8 0;
#X connect 3 6 9 0;
#X connect 3 7 10 0;
#X connect 3 8 11 0;
#X connect 3 9 12 0;
#X connect 3 10 13 0;
#X connect 3 11 14 0;
#X connect 3 12 15 0;
#X connect 3 13 16 0;
#X connect 3 14 17 0;
#X connect 3 15 18 0;
#X connect 3 16 19 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 1 0;
#X connect 7 0 1 0;
#X connect 8 0 1 0;
#X connect 9 0 1 0;
#X connect 10 0 1 0;
#X connect 11 0 1 0;
#X connect 12 0 1 0;
#X connect 13 0 1 0;
#X connect 14 0 1 0;
#X connect 15 0 1 0;
#X connect 16 0 1 0;
#X connect 17 0 1 0;
#X connect 18 0 1 0;
#X connect 19 0 1 0;
#X restore 1623 239 pd select-scenario;
#X obj 1623 326 readsf~ 4 44100, f 27;
#X obj 1623 472 s~ scenario-1;
#X obj 1669 443 s~ scenario-2;
#X obj 1716 414 s~ scenario-3;
#X obj 1762 385 s~ scenario-4;
#X obj 1623 357 *~ 1, f 5;
#X obj 1669 357 *~ 1, f 5;
#X obj 1716 357 *~ 1, f 5;
#X obj 1762 356 *~ 1, f 5;
#X obj 1809 356 s recall;
#X obj 2036 1002 r~ scenario-1;
#X obj 2202 1002 r~ scenario-2;
#X obj 2370 1002 r~ scenario-3;
#X obj 2537 1002 r~ scenario-4;
#X obj 2024 119 r music;
#X obj 2170 235 delay 1 1 sec;
#X obj 2170 206 t b;
#X msg 2170 293 start;
#X text 2202 206 start play;
#X obj 2170 264 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#N canvas 14 25 985 847 select-music 0;
#X obj 274 87 inlet;
#X obj 62 700 outlet;
#X obj 274 122 select 0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19, f 98;
#X msg 857 253 open musik_guitar_02.wav;
#X msg 822 292 open musik_guitar_03.wav;
#X msg 901 217 open musik_guitar_01.wav;
#X msg 802 331 open musik_guitar_04.wav;
#X msg 766 370 open musik_guitar_05.wav;
#X msg 731 409 open musik_guitar_06.wav;
#X msg 709 441 open musik_guitar_07.wav;
#X msg 674 480 open musik_guitar_08.wav;
#X msg 654 519 open musik_guitar_09.wav;
#X msg 618 558 open musik_guitar_10.wav;
#X msg 583 597 open musik_guitar_11.wav;
#X msg 547 636 open musik_guitar_12.wav;
#X msg 511 678 open musik_guitar_13.wav;
#X msg 476 717 open musik_guitar_14.wav;
#X msg 456 756 open musik_guitar_15.wav;
#X msg 420 795 open musik_mandolin_01.wav;
#X msg 385 834 open musik_mandolin_02.wav;
#X msg 349 873 open musik_mandolin_03.wav;
#X msg 313 912 open musik_togfloejte_synth_01.wav;
#X msg 278 951 open musik_togfloejte_synth_02.wav;
#X connect 0 0 2 0;
#X connect 2 0 22 0;
#X connect 2 1 21 0;
#X connect 2 2 20 0;
#X connect 2 3 19 0;
#X connect 2 4 18 0;
#X connect 2 5 17 0;
#X connect 2 6 16 0;
#X connect 2 7 15 0;
#X connect 2 8 14 0;
#X connect 2 9 13 0;
#X connect 2 10 12 0;
#X connect 2 11 11 0;
#X connect 2 12 10 0;
#X connect 2 13 9 0;
#X connect 2 14 8 0;
#X connect 2 15 7 0;
#X connect 2 16 6 0;
#X connect 2 17 4 0;
#X connect 2 18 3 0;
#X connect 2 19 5 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 1 0;
#X connect 7 0 1 0;
#X connect 8 0 1 0;
#X connect 9 0 1 0;
#X connect 10 0 1 0;
#X connect 11 0 1 0;
#X connect 12 0 1 0;
#X connect 13 0 1 0;
#X connect 14 0 1 0;
#X connect 15 0 1 0;
#X connect 16 0 1 0;
#X connect 17 0 1 0;
#X connect 18 0 1 0;
#X connect 19 0 1 0;
#X connect 20 0 1 0;
#X connect 21 0 1 0;
#X connect 22 0 1 0;
#X restore 2024 234 pd select-music;
#X obj 2024 322 readsf~ 4 44100, f 27;
#X obj 2163 351 *~ 1, f 5;
#X obj 2210 351 s recall;
#X obj 2024 467 s~ music-1;
#X obj 2070 438 s~ music-2;
#X obj 2117 409 s~ music-3;
#X obj 2163 380 s~ music-4;
#X obj 2117 351 *~ 1, f 5;
#X obj 2070 351 *~ 1;
#X obj 2024 351 *~ 1;
#X obj 2036 973 r~ music-1;
#X obj 2202 973 r~ music-2;
#X obj 2370 973 r~ music-3;
#X obj 2537 973 r~ music-4;
#X text 1538 124 SCENARIOS;
#X text 1966 119 MUSIC;
#X msg 903 1014 start;
#X obj 903 1104 readsf~ 4 44100, f 37;
#X obj 253 100 loadbang;
#X text 69 128 START BANG (DELAY 2 SEC);
#X obj 253 129 delay 2 1 sec;
#X floatatom 2524 196 5 0 0 0 - - - 0;
#X obj 2524 137 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X obj 2661 107 loadbang;
#X text 2556 136 no. of files;
#X obj 2710 340 s recall;
#X obj 2681 224 delay 1 1 sec;
#X obj 2681 195 t b;
#X text 2563 196 select file;
#X msg 2681 282 start;
#X text 2713 195 start play;
#X obj 2524 311 readsf~ 1 44100, f 27;
#X obj 2681 253 bng 19 250 50 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000;
#X obj 2454 311 random 4;
#X obj 2454 369 select 0 1 2 3, f 28;
#X obj 2454 408 tgl 19 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000 0 1;
#X obj 2502 408 tgl 19 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000 0 1;
#X obj 2550 408 tgl 19 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000 0 1;
#X obj 2598 408 tgl 19 0 empty empty empty 0 -10 0 12 #fcfcfc #000000 #000000 0 1;
#X obj 2422 447 *~ 0, f 5;
#X obj 2470 447 *~ 0, f 5;
#X obj 2518 447 *~ 0, f 5;
#X obj 2566 446 *~ 0, f 5;
#X msg 2674 369 0;
#X text 2430 108 MONO MUSIC;
#X obj 2524 107 r mono-music;
#N canvas 358 124 1004 748 urn-jb-mono-music 0;
#X msg 406 115 clear \, bang;
#X obj 257 194 ==;
#X obj 257 219 select 1;
#X obj 257 244 tgl 16 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 242 273 +;
#X floatatom 242 341 5 0 0 0 - - - 0;
#X obj 242 311 %;
#X obj 243 74 inlet;
#X obj 513 72 inlet;
#X text 42 219 If new value is a repeat...;
#X text 72 270 ... then toggle offset;
#X text 74 311 constrain to urn range;
#X text 104 74 bang for new value;
#X text 438 72 urn range;
#X obj 242 364 outlet;
#X text 130 364 new value out;
#X obj 243 162 t f f f;
#N canvas 57 25 1258 847 urn-mono-music 0;
#X obj 197 488 t a a;
#X obj 127 418 - 1;
#X obj 76 282 select 0;
#X obj 338 363 outlet;
#X obj 197 637 outlet;
#X obj 265 51 inlet;
#X obj 76 54 inlet;
#X obj 265 105 f \$1;
#X obj 276 75 loadbang;
#X obj 170 102 b;
#X obj 197 465 random;
#N canvas 689 538 264 239 count-down 0;
#X obj 59 66 inlet;
#X obj 127 60 inlet;
#X obj 59 159 outlet;
#X text 123 37 count from?;
#X text 54 35 trigger;
#X obj 59 96 bang;
#X obj 85 131 - 1;
#X obj 59 131 f;
#X connect 0 0 5 0;
#X connect 1 0 7 1;
#X connect 5 0 7 0;
#X connect 6 0 7 1;
#X connect 7 0 6 0;
#X connect 7 0 2 0;
#X restore 76 249 pd count-down;
#X text 334 389 bang if urn empty;
#X text 172 659 urn selection;
#X obj 127 390 t a b;
#X obj 76 77 route bang seed clear;
#N canvas 549 246 251 276 gate_2 0;
#X obj 68 18 inlet;
#X obj 84 65 inlet;
#X obj 68 212 outlet;
#X obj 100 191 outlet;
#X obj 68 92 f 0;
#X obj 68 118 select 0 1;
#X obj 68 41 b;
#X connect 0 0 6 0;
#X connect 1 0 4 1;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X connect 5 1 3 0;
#X connect 6 0 4 0;
#X restore 76 206 pd gate_2;
#N canvas 589 293 450 300 init-urn-table 0;
#N canvas 0 25 450 300 count 0;
#X obj 158 193 + 1;
#X obj 122 158 until;
#X obj 122 194 f;
#X obj 122 101 inlet;
#X msg 167 157 0;
#X obj 122 120 t a b;
#X obj 122 224 outlet;
#X connect 0 0 2 1;
#X connect 1 0 2 0;
#X connect 2 0 0 0;
#X connect 2 0 6 0;
#X connect 3 0 5 0;
#X connect 4 0 2 1;
#X connect 5 0 1 0;
#X connect 5 1 4 0;
#X restore 117 197 pd count;
#X obj 117 218 t a a;
#X msg 147 148 resize \$1;
#X obj 117 82 t a a;
#X obj 117 49 inlet;
#X obj 147 128 change;
#X obj 147 105 int;
#X obj 147 173 s \$0-urn-mono-music;
#X obj 117 249 tabwrite \$0-urn-mono-music;
#X connect 0 0 1 0;
#X connect 1 0 8 0;
#X connect 1 1 8 1;
#X connect 2 0 7 0;
#X connect 3 0 0 0;
#X connect 3 1 6 0;
#X connect 4 0 3 0;
#X connect 5 0 2 0;
#X connect 6 0 5 0;
#X restore 323 149 pd init-urn-table;
#X obj 265 125 t b a a a;
#X obj 76 306 t b b;
#X msg 134 181 0;
#X msg 149 204 1;
#X msg 578 400 seed \$1;
#X obj 644 169 loadbang;
#X obj 644 227 snapshot~;
#X obj 588 169 adc~ 1;
#X obj 588 198 hip~ 5;
#X obj 644 256 abs;
#X obj 644 285 * 1e+07;
#X obj 644 314 % 1000;
#X text 562 143 seed random from analog;
#X obj 324 171 table \$0-urn-mono-music \$1;
#X obj 127 531 tabread \$0-urn-mono-music;
#X obj 127 559 tabwrite \$0-urn-mono-music;
#X obj 197 609 tabread \$0-urn-mono-music;
#X obj 644 198 delay 500 1 msec;
#X connect 0 0 34 0;
#X connect 0 1 33 1;
#X connect 1 0 10 1;
#X connect 1 0 32 0;
#X connect 2 0 19 0;
#X connect 2 1 14 0;
#X connect 5 0 7 0;
#X connect 6 0 15 0;
#X connect 7 0 18 0;
#X connect 8 0 7 0;
#X connect 9 0 7 0;
#X connect 10 0 0 0;
#X connect 11 0 2 0;
#X connect 14 0 1 0;
#X connect 14 1 10 0;
#X connect 15 0 16 0;
#X connect 15 2 9 0;
#X connect 16 0 11 0;
#X connect 16 1 3 0;
#X connect 18 0 20 0;
#X connect 18 1 11 1;
#X connect 18 2 10 1;
#X connect 18 3 17 0;
#X connect 19 0 3 0;
#X connect 19 1 21 0;
#X connect 20 0 16 1;
#X connect 21 0 16 1;
#X connect 22 0 10 0;
#X connect 23 0 35 0;
#X connect 24 0 27 0;
#X connect 25 0 26 0;
#X connect 26 0 24 0;
#X connect 27 0 28 0;
#X connect 28 0 29 0;
#X connect 29 0 22 0;
#X connect 32 0 33 0;
#X connect 34 0 4 0;
#X connect 35 0 24 0;
#X restore 243 115 pd urn-mono-music;
#X connect 0 0 17 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 1;
#X connect 4 0 6 0;
#X connect 5 0 14 0;
#X connect 6 0 5 0;
#X connect 7 0 17 0;
#X connect 8 0 17 1;
#X connect 8 0 6 1;
#X connect 16 0 4 0;
#X connect 16 1 1 1;
#X connect 16 2 1 0;
#X connect 17 0 16 0;
#X connect 17 1 0 0;
#X restore 2524 166 pd urn-jb-mono-music;
#N canvas 14 25 1174 753 select-mono-music 0;
#X obj 318 42 inlet;
#X obj 62 330 outlet;
#X obj 318 77 select 0 1 2 3, f 21;
#X msg 425 194 open mono_musik_01.wav;
#X msg 389 233 open mono_musik_02.wav;
#X msg 353 272 open mono_musik_03.wav;
#X msg 318 311 open mono_musik_04.wav;
#X connect 0 0 2 0;
#X connect 2 0 6 0;
#X connect 2 1 5 0;
#X connect 2 2 4 0;
#X connect 2 3 3 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 1 0;
#X connect 6 0 1 0;
#X restore 2524 224 pd select-mono-music;
#X obj 2524 340 s~ m-mono-out;
#X obj 2348 408 r~ m-mono-out;
#X obj 2518 504 s~ mono-music-3;
#X obj 2566 475 s~ mono-music-4;
#X obj 2470 533 s~ mono-music-2;
#X obj 2422 562 s~ mono-music-1;
#X obj 2537 1031 r~ mono-music-4;
#X obj 2370 1031 r~ mono-music-3;
#X obj 2202 1031 r~ mono-music-2;
#X obj 2036 1031 r~ mono-music-1;
#X msg 2661 136 4;
#X obj 1011 127 r mono-narration;
#N canvas 358 124 1004 748 urn-jb-mono-narration 0;
#X msg 309 86 clear \, bang;
#X obj 257 194 ==;
#X obj 257 219 select 1;
#X obj 257 244 tgl 16 0 empty empty empty 0 -8 0 10 #fcfcfc #000000 #000000 0 1;
#X obj 242 273 +;
#X floatatom 242 341 5 0 0 0 - - - 0;
#X obj 242 311 %;
#X obj 243 74 inlet;
#X obj 513 72 inlet;
#X text 42 219 If new value is a repeat...;
#X text 72 270 ... then toggle offset;
#X text 74 311 constrain to urn range;
#X text 104 74 bang for new value;
#X text 438 72 urn range;
#X obj 242 364 outlet;
#X text 130 364 new value out;
#X obj 243 162 t f f f;
#N canvas 57 25 1258 847 urn-mono-narration 0;
#X obj 197 488 t a a;
#X obj 127 418 - 1;
#X obj 76 282 select 0;
#X obj 338 363 outlet;
#X obj 197 637 outlet;
#X obj 265 51 inlet;
#X obj 76 54 inlet;
#X obj 265 105 f \$1;
#X obj 276 75 loadbang;