-
Notifications
You must be signed in to change notification settings - Fork 13
/
browser.mmb.pd
1021 lines (1021 loc) · 24.4 KB
/
browser.mmb.pd
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 234 22 1206 623 10;
#X obj 92 356 folderpanel;
#X obj 237 69 vsl 10 115 1 0 0 0 \$0-scrollbar \$0-scrollbar.r empty
0 -9 0 10 -42246 -24198 -262144 11400 1;
#N canvas 705 40 735 798 scrolling 0;
#X obj 203 30 r \$0-scrollbar;
#X obj 203 174 *;
#X obj 218 65 r \$0-numfiles;
#X obj 203 221 int;
#X msg 242 211 set -1;
#X obj 225 633 list-idx;
#X obj 225 607 list;
#X obj 251 577 r \$0-filelist;
#X obj 218 90 t f b f;
#X obj 266 459 < 8;
#X obj 218 123 - 8;
#X obj 218 150 max 0;
#X obj 203 251 change;
#X obj 140 343 until;
#X msg 140 321 8;
#X obj 140 368 f 0;
#X obj 167 368 + 1;
#X obj 217 510 spigot;
#X obj 215 436 t f f;
#X obj 220 535 t b f;
#X obj 336 533 spigot;
#X obj 368 507 == 0;
#X obj 197 718 pack f s \$0;
#X obj 139 392 t f f;
#X obj 151 487 -;
#X obj 140 297 t b f f;
#X msg 197 741 \; \$3-file\$1.r label \$2 \;;
#X text 271 150 adjust scrollbar range;
#X text 347 751 update labels with filenames;
#X obj 218 300 s \$0-top.item;
#N canvas 195 83 603 657 get.and.format.type 0;
#X obj 92 11 inlet;
#X obj 132 154 file_type;
#X obj 132 335 list append;
#X obj 132 360 list trim;
#X obj 182 182 s2l /;
#X obj 239 227 list length;
#X obj 182 269 list split;
#X obj 239 249 - 1;
#X obj 182 204 t l l;
#X obj 132 392 route folder file;
#X obj 181 491 symbol;
#X obj 133 544 outlet;
#X text 266 440 add brackets to folders;
#X obj 92 85 route ..;
#X obj 92 45 list trim;
#X obj 132 124 t s s;
#X msg 79 495 symbol ..;
#X obj 163 103 symbol;
#N canvas 454 64 634 718 trim.long.names 0;
#X obj 114 38 inlet;
#X obj 114 141 s2l;
#X msg 142 110 symbol;
#X obj 144 86 loadbang;
#X obj 223 189 list length;
#X obj 114 166 t l l;
#X obj 112 294 spigot;
#X obj 196 295 spigot;
#X obj 316 278 - 13;
#X obj 241 418 list split 17;
#X msg 225 394 ...;
#X obj 304 449 t l;
#X obj 225 449 list append;
#X obj 194 476 list;
#X obj 194 332 t b l b l b;
#X obj 157 567 l2s;
#X msg 209 543 symbol;
#X obj 209 517 loadbang;
#X obj 154 599 outlet;
#X obj 145 268 <= 29;
#X obj 229 269 > 29;
#X obj 209 363 list split 13;
#X obj 514 599 outlet;
#X obj 514 559 min 29;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 2 0;
#X connect 4 0 8 0;
#X connect 4 0 19 0;
#X connect 4 0 20 0;
#X connect 4 0 23 0;
#X connect 5 0 7 0;
#X connect 5 0 6 0;
#X connect 5 1 4 0;
#X connect 6 0 15 0;
#X connect 7 0 14 0;
#X connect 8 0 9 1;
#X connect 9 1 12 0;
#X connect 10 0 12 0;
#X connect 11 0 12 1;
#X connect 12 0 11 0;
#X connect 12 0 13 1;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 14 1 21 0;
#X connect 14 2 10 0;
#X connect 14 3 9 0;
#X connect 14 4 12 1;
#X connect 15 0 18 0;
#X connect 16 0 15 1;
#X connect 17 0 16 0;
#X connect 19 0 6 1;
#X connect 20 0 7 1;
#X connect 21 0 12 0;
#X connect 23 0 22 0;
#X restore 207 299 pd trim.long.names;
#N canvas 0 22 473 581 add.spaces.and.> 0;
#X obj 131 80 inlet;
#X obj 262 80 inlet;
#X obj 247 204 -;
#X obj 247 313 makefilename %c;
#X obj 247 261 until;
#X obj 247 231 t f b;
#X obj 247 138 f;
#X obj 131 375 list append;
#X msg 247 289 32;
#X obj 247 347 list;
#X obj 288 348 t l;
#X obj 131 109 t a b;
#X obj 131 446 l2s;
#X msg 146 424 symbol;
#X obj 146 403 loadbang;
#X obj 131 480 makefilename %s>;
#X obj 131 513 outlet;
#X msg 247 180 29 \$1;
#X connect 0 0 11 0;
#X connect 1 0 6 1;
#X connect 2 0 5 0;
#X connect 3 0 9 0;
#X connect 4 0 8 0;
#X connect 5 0 4 0;
#X connect 5 1 9 1;
#X connect 5 1 7 1;
#X connect 6 0 17 0;
#X connect 7 0 12 0;
#X connect 8 0 3 0;
#X connect 9 0 10 0;
#X connect 9 0 7 1;
#X connect 10 0 9 1;
#X connect 11 0 7 0;
#X connect 11 1 6 0;
#X connect 12 0 15 0;
#X connect 13 0 12 1;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 17 0 2 0;
#X restore 132 436 pd add.spaces.and.>;
#X connect 0 0 14 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 9 0;
#X connect 4 0 8 0;
#X connect 5 0 7 0;
#X connect 6 1 18 0;
#X connect 7 0 6 1;
#X connect 8 0 6 0;
#X connect 8 1 5 0;
#X connect 9 0 19 0;
#X connect 9 1 10 0;
#X connect 10 0 11 0;
#X connect 13 0 16 0;
#X connect 13 1 17 0;
#X connect 14 0 13 0;
#X connect 15 0 1 0;
#X connect 15 1 4 0;
#X connect 16 0 11 0;
#X connect 17 0 15 0;
#X connect 18 0 2 1;
#X connect 18 1 19 1;
#X connect 19 0 11 0;
#X restore 225 665 pd get.and.format.type;
#X msg 350 576 symbol;
#X obj 203 199 + 0.5;
#N canvas 60 22 775 664 highlight.selected 0;
#X obj 130 84 r \$0-top.item;
#X obj 234 86 r \$0-selected.item;
#X obj 187 207 -;
#X obj 185 176 swap;
#X obj 187 319 moses 0;
#X obj 226 345 moses 8;
#X obj 207 134 t b f;
#X obj 363 290 f -1;
#X obj 363 317 moses 0;
#X obj 402 343 moses 8;
#X obj 359 246 t f b;
#X obj 396 555 pack f f f \$0;
#X obj 493 522 r \$0-textcolor;
#X obj 477 437 r \$0-bgcolor1;
#X obj 518 456 r \$0-bgcolor2;
#X obj 440 487 f;
#X obj 475 487 f;
#X obj 399 372 t f f;
#X obj 427 403 % 2;
#X obj 426 432 sel 0 1;
#X obj 199 551 pack f f f \$0;
#X obj 275 440 r \$0-hltextcolor;
#X obj 237 409 r \$0-hlcolor;
#X msg 311 602 \; \$4-file\$1.r color \$2 \$2 \$3;
#X obj 273 479 t b f;
#X obj 229 479 t b f;
#X obj 112 512 t b;
#X obj 187 270 f -1;
#X obj 255 287 r \$0-numfiles;
#X obj 254 318 min 8;
#X connect 0 0 3 0;
#X connect 1 0 6 0;
#X connect 2 0 10 0;
#X connect 2 0 27 0;
#X connect 3 0 2 0;
#X connect 3 1 2 1;
#X connect 4 1 5 0;
#X connect 5 0 20 0;
#X connect 6 0 3 0;
#X connect 6 1 3 1;
#X connect 7 0 8 0;
#X connect 8 1 9 0;
#X connect 9 0 17 0;
#X connect 10 0 7 1;
#X connect 10 1 7 0;
#X connect 11 0 23 0;
#X connect 12 0 11 2;
#X connect 13 0 15 1;
#X connect 14 0 16 1;
#X connect 15 0 11 1;
#X connect 16 0 11 1;
#X connect 17 0 11 0;
#X connect 17 1 18 0;
#X connect 18 0 19 0;
#X connect 19 0 15 0;
#X connect 19 1 16 0;
#X connect 20 0 23 0;
#X connect 21 0 24 0;
#X connect 22 0 25 0;
#X connect 24 0 26 0;
#X connect 24 1 20 2;
#X connect 25 0 26 0;
#X connect 25 1 20 1;
#X connect 26 0 27 0;
#X connect 27 0 4 0;
#X connect 28 0 29 0;
#X connect 29 0 5 1;
#X restore 437 394 pd highlight.selected;
#X msg 311 208 -1;
#X obj 310 234 s \$0-selected.item;
#X text 391 48 pretty much all of the gui updating takes place here.
;
#X connect 0 0 1 0;
#X connect 1 0 32 0;
#X connect 2 0 8 0;
#X connect 3 0 12 0;
#X connect 4 0 12 0;
#X connect 5 0 30 0;
#X connect 6 0 5 0;
#X connect 7 0 6 1;
#X connect 8 0 10 0;
#X connect 8 1 4 0;
#X connect 8 1 34 0;
#X connect 8 2 9 1;
#X connect 9 0 17 1;
#X connect 9 0 21 0;
#X connect 10 0 11 0;
#X connect 11 0 1 1;
#X connect 12 0 25 0;
#X connect 12 0 29 0;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
#X connect 15 0 23 0;
#X connect 16 0 15 1;
#X connect 17 0 19 0;
#X connect 18 0 17 0;
#X connect 18 0 20 0;
#X connect 18 1 9 0;
#X connect 19 0 6 0;
#X connect 19 1 5 1;
#X connect 20 0 31 0;
#X connect 21 0 20 1;
#X connect 22 0 26 0;
#X connect 23 0 24 0;
#X connect 23 1 18 0;
#X connect 24 0 22 0;
#X connect 25 0 14 0;
#X connect 25 1 15 1;
#X connect 25 2 24 1;
#X connect 30 0 22 1;
#X connect 31 0 22 1;
#X connect 32 0 3 0;
#X connect 34 0 35 0;
#X restore 709 355 pd scrolling;
#N canvas 604 22 807 769 select.item 0;
#N canvas 576 93 542 387 clicks 0;
#X obj 129 29 r \$0-file0;
#X obj 158 56 r \$0-file1;
#X obj 188 84 r \$0-file2;
#X obj 223 115 r \$0-file3;
#X obj 256 143 r \$0-file4;
#X obj 282 167 r \$0-file5;
#X obj 323 198 r \$0-file6;
#X obj 366 233 r \$0-file7;
#X msg 115 71 0;
#X msg 150 102 1;
#X msg 185 138 2;
#X msg 218 165 3;
#X msg 248 192 4;
#X msg 282 219 5;
#X msg 318 249 6;
#X msg 350 277 7;
#X obj 168 317 outlet;
#X connect 0 0 8 0;
#X connect 1 0 9 0;
#X connect 2 0 10 0;
#X connect 3 0 11 0;
#X connect 4 0 12 0;
#X connect 5 0 13 0;
#X connect 6 0 14 0;
#X connect 7 0 15 0;
#X connect 8 0 16 0;
#X connect 9 0 16 0;
#X connect 10 0 16 0;
#X connect 11 0 16 0;
#X connect 12 0 16 0;
#X connect 13 0 16 0;
#X connect 14 0 16 0;
#X connect 15 0 16 0;
#X restore 189 108 pd clicks;
#X obj 189 233 list;
#X obj 242 197 r \$0-filelist;
#X obj 255 235 r \$0-top.item;
#X obj 234 262 +;
#X obj 189 187 t b f;
#X obj 189 292 list-idx;
#X obj 186 355 route ..;
#X obj 231 447 file_type;
#X obj 231 416 t s s;
#X obj 231 472 list append;
#X obj 231 500 list trim;
#X obj 187 326 list trim;
#X obj 231 386 symbol;
#N canvas 224 60 515 610 directory.up 0;
#X obj 114 55 inlet;
#X obj 147 114 r \$0-new.folder;
#X obj 114 151 symbol;
#X obj 114 185 s2l /;
#X obj 158 241 list length;
#X obj 114 213 t l l;
#X obj 114 378 list split;
#X obj 114 407 l2s /;
#X obj 114 91 t b;
#X obj 114 543 outlet;
#X msg 114 503 folder \$1;
#X text 180 55 take current path and hack off last folder;
#X obj 114 475 makefilename /%s/;
#X obj 156 351 - 2;
#X obj 192 290 > 2;
#X obj 114 319 spigot;
#X obj 216 386 spigot;
#X msg 216 416 symbol /;
#X obj 249 358 == 0;
#X obj 156 265 t f f;
#X connect 0 0 8 0;
#X connect 1 0 2 1;
#X connect 2 0 3 0;
#X connect 3 0 5 0;
#X connect 4 0 19 0;
#X connect 5 0 15 0;
#X connect 5 1 4 0;
#X connect 6 0 7 0;
#X connect 7 0 12 0;
#X connect 8 0 2 0;
#X connect 10 0 9 0;
#X connect 12 0 10 0;
#X connect 13 0 6 1;
#X connect 14 0 15 1;
#X connect 14 0 18 0;
#X connect 15 0 6 0;
#X connect 16 0 17 0;
#X connect 17 0 10 0;
#X connect 18 0 16 1;
#X connect 19 0 13 0;
#X connect 19 0 16 0;
#X connect 19 1 14 0;
#X restore 109 475 pd directory.up;
#X obj 231 692 s \$0-outlet;
#X obj 231 536 route folder;
#X obj 231 599 makefilename %s/;
#X msg 231 630 folder \$1;
#X obj 231 568 symbol;
#N canvas 0 22 450 300 selected.item 0;
#X obj 134 52 inlet;
#X obj 218 87 r \$0-top.item;
#X obj 173 190 s \$0-selected.item;
#X obj 182 134 +;
#X connect 0 0 3 0;
#X connect 1 0 3 1;
#X connect 3 0 2 0;
#X restore 315 172 pd selected.item;
#X obj 189 137 t f f;
#X connect 0 0 21 0;
#X connect 1 0 6 0;
#X connect 2 0 1 1;
#X connect 3 0 4 1;
#X connect 4 0 6 1;
#X connect 5 0 1 0;
#X connect 5 1 4 0;
#X connect 6 0 12 0;
#X connect 7 0 14 0;
#X connect 7 1 13 0;
#X connect 8 0 10 0;
#X connect 9 0 8 0;
#X connect 9 1 10 1;
#X connect 10 0 11 0;
#X connect 11 0 16 0;
#X connect 12 0 7 0;
#X connect 13 0 9 0;
#X connect 14 0 15 0;
#X connect 16 0 19 0;
#X connect 16 1 15 0;
#X connect 17 0 18 0;
#X connect 18 0 15 0;
#X connect 19 0 17 0;
#X connect 21 0 5 0;
#X connect 21 1 20 0;
#X restore 709 380 pd select.item;
#X obj 54 67 hsl 180 15 0 127 0 0 \$0-file0 \$0-file0.r empty 2 8 0
10 -1 -1 -24198 0 1;
#X msg 332 103 0 \, 1 \, 2 \, 3 \, 4 \, 5 \, 6 \, 7;
#X obj 332 125 pack f \$0;
#X obj 107 442 s \$0-new.folder;
#N canvas 493 22 667 628 new.folder 0;
#X obj 231 269 t l;
#X obj 129 339 list;
#X obj 129 420 list length;
#X obj 156 481 s \$0-numfiles;
#X obj 129 452 t b f;
#X msg 129 508 0;
#X obj 129 539 s \$0-scrollbar.r;
#X obj 129 363 t l l;
#X obj 156 391 s \$0-filelist;
#X msg 248 210 ..;
#X obj 146 268 list prepend;
#X obj 248 113 s2l /;
#X obj 248 136 list length;
#X obj 248 186 sel 1;
#X obj 129 25 r \$0-new.folder;
#X text 333 123 if not in root directory \, add the ".." to move up.
;
#X text 340 159 TODO: make this Windows compatible;
#X text 169 452 this will update the gui;
#N canvas 34 54 586 756 directory.label 0;
#X obj 82 26 r \$0-new.folder;
#X obj 82 142 s2l;
#X msg 97 120 symbol;
#X obj 97 98 loadbang;
#X obj 133 204 list length;
#X obj 82 178 t l l;
#X obj 80 306 spigot;
#X obj 164 307 spigot;
#X obj 177 375 list split 14;
#X obj 209 430 list split 17;
#X msg 193 406 ...;
#X obj 272 461 t l;
#X obj 193 461 list append;
#X obj 162 488 list;
#X obj 162 344 t b l b l b;
#X obj 125 579 l2s;
#X msg 177 555 symbol;
#X obj 177 529 loadbang;
#X msg 125 611 label \$1;
#X obj 125 642 s \$0-directory.label.r;
#X obj 113 280 <= 32;
#X obj 197 281 > 32;
#X obj 284 290 - 15;
#X connect 0 0 1 0;
#X connect 1 0 5 0;
#X connect 2 0 1 1;
#X connect 3 0 2 0;
#X connect 4 0 20 0;
#X connect 4 0 21 0;
#X connect 4 0 22 0;
#X connect 5 0 7 0;
#X connect 5 0 6 0;
#X connect 5 1 4 0;
#X connect 6 0 15 0;
#X connect 7 0 14 0;
#X connect 8 0 12 0;
#X connect 9 1 12 0;
#X connect 10 0 12 0;
#X connect 11 0 12 1;
#X connect 12 0 11 0;
#X connect 12 0 13 1;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 14 1 8 0;
#X connect 14 2 10 0;
#X connect 14 3 9 0;
#X connect 14 4 12 1;
#X connect 15 0 18 0;
#X connect 16 0 15 1;
#X connect 17 0 16 0;
#X connect 18 0 19 0;
#X connect 20 0 6 1;
#X connect 21 0 7 1;
#X connect 22 0 9 1;
#X restore 436 496 pd directory.label;
#X obj 146 210 folder_list;
#X obj 129 150 makefilename %s*;
#X obj 248 159 > 1;
#X text 31 179 in case folder;
#X text 31 190 is empty;
#X obj 129 180 t b s;
#X obj 129 72 t s s b b;
#N canvas 406 22 960 738 file.filter 0;
#X obj 65 65 inlet;
#X obj 260 399 splitfilename .;
#X obj 139 202 file_type;
#X obj 139 232 pack s s;
#X obj 138 166 t s s;
#X obj 139 295 route folder;
#X obj 79 616 outlet;
#X obj 207 325 list split 1;
#X obj 241 348 symbol;
#X obj 428 274 r \$0-extensions;
#X obj 397 222 s \$0-extensions;
#X msg 396 178 aif wav pd;
#X msg 369 143 bang;
#X obj 426 304 route bang;
#X obj 426 409 s \$0-filter.on;
#X msg 426 378 0;
#X msg 480 388 1;
#X obj 183 68 r \$0-filter.on;
#X obj 122 93 == 0;
#X obj 456 564 list;
#X obj 420 648 sel pd;
#X text 220 296 always let folders through;
#X obj 77 142 spigot 1;
#X obj 138 143 spigot 0;
#X obj 204 489 spigot;
#X obj 483 367 t b l l;
#X obj 523 408 list length;
#X obj 441 471 f 0;
#X obj 485 470 + 1;
#X obj 241 376 t s s b;
#X obj 456 589 list-idx;
#X msg 442 436 0;
#X obj 454 621 symbol;
#X msg 262 456 0;
#X msg 280 516 1;
#X obj 570 475 <;
#X obj 537 496 spigot;
#X obj 536 449 t f f;
#X msg 420 681 0;
#X text 530 576 this crazy convoluted mess is basically going through
a list of extensions \, and once it finds a match it passes the file
through. Once it finds the match \, it stops testing and starts the
next file.;
#X obj 389 550 symbol;
#X obj 355 447 t b s;
#X obj 441 494 t f b b f;
#X obj 483 335 list;
#X obj 139 265 list trim;
#X connect 0 0 22 0;
#X connect 0 0 23 0;
#X connect 1 1 41 0;
#X connect 2 0 3 0;
#X connect 3 0 44 0;
#X connect 4 0 2 0;
#X connect 4 1 3 1;
#X connect 5 0 6 0;
#X connect 5 1 7 0;
#X connect 7 1 8 0;
#X connect 8 0 29 0;
#X connect 9 0 13 0;
#X connect 11 0 10 0;
#X connect 12 0 10 0;
#X connect 13 0 15 0;
#X connect 13 1 43 0;
#X connect 15 0 14 0;
#X connect 16 0 14 0;
#X connect 17 0 18 0;
#X connect 17 0 23 1;
#X connect 18 0 22 1;
#X connect 19 0 30 0;
#X connect 20 0 34 0;
#X connect 20 0 38 0;
#X connect 22 0 6 0;
#X connect 23 0 4 0;
#X connect 24 0 6 0;
#X connect 25 0 16 0;
#X connect 25 1 19 1;
#X connect 25 2 26 0;
#X connect 26 0 35 1;
#X connect 27 0 42 0;
#X connect 28 0 37 0;
#X connect 29 0 24 0;
#X connect 29 1 1 0;
#X connect 29 2 33 0;
#X connect 30 0 32 0;
#X connect 31 0 27 0;
#X connect 32 0 20 1;
#X connect 33 0 24 1;
#X connect 34 0 24 1;
#X connect 35 0 36 1;
#X connect 36 0 27 0;
#X connect 37 0 36 0;
#X connect 37 1 35 0;
#X connect 38 0 36 1;
#X connect 40 0 20 0;
#X connect 41 0 31 0;
#X connect 41 1 40 1;
#X connect 42 0 28 0;
#X connect 42 1 40 0;
#X connect 42 2 19 0;
#X connect 42 3 30 1;
#X connect 43 0 25 0;
#X connect 44 0 5 0;
#X restore 146 237 pd file.filter;
#X connect 0 0 10 1;
#X connect 1 0 7 0;
#X connect 2 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 3 0;
#X connect 5 0 6 0;
#X connect 7 0 2 0;
#X connect 7 1 8 0;
#X connect 9 0 10 0;
#X connect 10 0 0 0;
#X connect 10 0 1 1;
#X connect 11 0 12 0;
#X connect 12 0 21 0;
#X connect 13 0 9 0;
#X connect 14 0 25 0;
#X connect 19 0 26 0;
#X connect 20 0 24 0;
#X connect 21 0 13 0;
#X connect 24 0 1 0;
#X connect 24 1 19 0;
#X connect 25 0 20 0;
#X connect 25 1 11 0;
#X connect 25 2 10 1;
#X connect 25 3 1 1;
#X connect 26 0 10 0;
#X restore 709 330 pd new.folder;
#X text 323 73 CLICK THIS BEFORE SAVING!!;
#X obj 584 71 inlet;
#X obj 584 245 s \$0-new.folder;
#X obj 536 553 outlet;
#X obj 536 474 r \$0-outlet;
#X obj 51 51 cnv 15 196 15 \$0-directory.label \$0-directory.label.r
empty 2 8 0 10 -42246 -24198 0;
#X msg 332 147 \; \$2-file\$1.r label \; \$2-directory.label.r label
;
#X obj 647 38 loadbang;
#X obj 584 217 symbol;
#N canvas 0 22 450 300 dump.contents 0;
#X obj 92 36 inlet;
#X obj 93 73 t b;
#X obj 93 107 list;
#X obj 93 139 drip;
#X obj 91 175 s \$0-dump.outlet;
#X obj 123 80 r \$0-filelist;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 5 0 2 1;
#X restore 641 216 pd dump.contents;
#X obj 636 553 outlet;
#X obj 635 474 r \$0-dump.outlet;
#X obj 92 385 makefilename %s/;
#X msg 92 329 bang;
#X msg 312 206 -1;
#X obj 312 231 s \$0-selected.item;
#X obj 303 75 bng 15 250 50 0 empty empty empty 17 7 0 10 -262144 -1
-1;
#N canvas 362 161 1078 623 colors 0;
#X obj 90 58 inlet;
#X obj 90 91 route bgcolor1 bgcolor2 textcolor hlcolor hltextcolor
;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 90 146 pd get.color;
#X obj 100 201 s \$0-bgcolor1;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 153 226 pd get.color;
#X obj 163 281 s \$0-bgcolor2;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 216 146 pd get.color;
#X obj 226 201 s \$0-textcolor;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 279 226 pd get.color;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 342 166 pd get.color;
#X obj 342 201 s \$0-hltextcolor;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 435 226 pd get.color;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 510 166 pd get.color;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 586 226 pd get.color;
#N canvas 533 158 479 375 get.color 0;
#X obj 87 40 inlet;
#X obj 87 73 t l l;
#X obj 114 105 list length;
#X obj 114 140 == 1;
#X obj 87 187 spigot;
#X obj 176 141 > 1;
#X obj 155 187 spigot;
#X obj 95 280 outlet;
#X obj 157 237 rgb2pd.mmb;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 1 0 6 0;
#X connect 1 1 2 0;
#X connect 2 0 3 0;
#X connect 2 0 5 0;
#X connect 3 0 4 1;
#X connect 4 0 7 0;
#X connect 5 0 6 1;
#X connect 6 0 8 0;
#X connect 8 0 7 0;
#X restore 662 166 pd get.color;
#X msg 97 323 0 \, 2 \, 4 \, 6;
#X obj 97 418 pack f f f \$0;
#X obj 90 172 t b f;
#X obj 122 357 r \$0-bgcolor1;
#X obj 147 391 r \$0-textcolor;
#X obj 268 418 pack f f f \$0;
#X obj 318 391 r \$0-textcolor;
#X msg 268 323 1 \, 3 \, 5 \, 7;
#X obj 293 357 r \$0-bgcolor2;
#X obj 152 252 t b f;
#X obj 216 173 t b f;
#X obj 279 261 s \$0-hlcolor;
#X msg 97 448 \; \$4-file\$1.r color \$2 \$2 \$3;
#X msg 268 448 \; \$4-file\$1.r color \$2 \$2 \$3;
#X obj 435 93 route scrollbgcolor scrollhandlecolor dirbgcolor dirtextcolor
;
#X obj 436 302 pack f f;
#X obj 460 268 t b f;
#X obj 650 362 s \$0-directory.label.r;
#X msg 438 331 color \$1 \$2 0;
#X obj 439 366 s \$0-scrollbar.r;
#X obj 621 286 pack f f;
#X obj 645 252 t b f;
#X msg 623 315 color \$1 \$2;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 1 2 6 0;
#X connect 1 3 8 0;
#X connect 1 4 9 0;
#X connect 1 5 29 0;
#X connect 2 0 17 0;
#X connect 4 0 24 0;
#X connect 6 0 25 0;
#X connect 8 0 26 0;
#X connect 9 0 10 0;
#X connect 11 0 30 0;
#X connect 12 0 31 0;
#X connect 13 0 35 0;
#X connect 14 0 36 0;
#X connect 15 0 16 0;
#X connect 16 0 27 0;
#X connect 17 0 15 0;
#X connect 17 1 3 0;
#X connect 18 0 16 1;
#X connect 19 0 16 2;
#X connect 20 0 28 0;
#X connect 21 0 20 2;
#X connect 22 0 20 0;
#X connect 23 0 20 1;
#X connect 24 0 22 0;
#X connect 24 1 5 0;
#X connect 25 0 22 0;
#X connect 25 0 15 0;
#X connect 25 1 7 0;
#X connect 29 0 11 0;
#X connect 29 1 12 0;
#X connect 29 2 13 0;
#X connect 29 3 14 0;
#X connect 30 0 33 0;
#X connect 31 0 30 0;
#X connect 31 1 30 1;
#X connect 33 0 34 0;
#X connect 35 0 37 0;
#X connect 36 0 35 0;
#X connect 36 1 35 1;
#X connect 37 0 32 0;
#X restore 848 166 pd colors;
#N canvas 628 44 450 300 init.colors 0;
#X obj 84 63 inlet;
#X obj 87 163 outlet;
#X msg 83 95 bgcolor1 22 \, bgcolor2 22 \, textcolor 16 \, hlcolor
16 \, hltextcolor 22 \, scrollbgcolor 26 \, scrollhandlecolor 16 \,
dirbgcolor 26 \, dirtextcolor 16;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 849 70 pd init.colors;
#X obj 713 243 s \$0-extensions;
#X obj 584 139 route folder dump extensions send receive;
#X obj 728 271 s \$0-send.names;
#X obj 835 208 s \$0-receive.name;
#X obj 552 535 s.mmb;
#X obj 653 535 s.mmb;
#X obj 740 463 r \$0-send.names;
#X obj 740 485 unpack s s;
#X obj 520 60 r.mmb;
#X obj 520 28 r \$0-receive.name;
#X obj 54 82 hsl 180 15 0 127 0 0 \$0-file1 \$0-file1.r empty 2 8 0
10 -1 -1 -24198 0 1;
#X obj 54 97 hsl 180 15 0 127 0 0 \$0-file2 \$0-file2.r empty 2 8 0
10 -1 -1 -24198 0 1;
#X obj 54 112 hsl 180 15 0 127 0 0 \$0-file3 \$0-file3.r empty 2 8
0 10 -1 -1 -24198 0 1;
#X obj 54 127 hsl 180 15 0 127 0 0 \$0-file4 \$0-file4.r empty 2 8
0 10 -1 -1 -24198 0 1;
#X obj 54 142 hsl 180 15 0 127 0 0 \$0-file5 \$0-file5.r empty 2 8
0 10 -1 -1 -24198 0 1;
#X obj 54 157 hsl 180 15 0 127 0 0 \$0-file6 \$0-file6.r empty 2 8
0 10 -1 -1 -24198 0 1;
#X obj 54 172 hsl 180 15 0 127 0 0 \$0-file7 \$0-file7.r empty 2 8
0 10 -1 -1 -24198 0 1;
#X msg 630 93 folder ~/ \, extensions;
#X obj 681 169 t b a;
#X connect 0 0 21 0;
#X connect 5 0 6 0;
#X connect 6 0 15 0;
#X connect 10 0 29 0;
#X connect 13 0 12 0;
#X connect 13 0 32 0;
#X connect 16 0 27 0;
#X connect 16 0 45 0;
#X connect 17 0 11 0;
#X connect 20 0 19 0;
#X connect 20 0 33 0;