aboutsummaryrefslogtreecommitdiff
path: root/semento/polaroid.pd
blob: 9b4f35eda674a2efbe1b0ae6303b1639b945b4e9 (plain)
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
#N canvas 361 200 341 279 10;
#X obj 14 41 bng 13 250 50 0 \$0saveLocalFile \$0saveLocalFileR SaveTo
15 8 0 8 -1988 -1 -1;
#X obj 59 41 bng 13 250 50 0 \$0loadLocalFile \$0loadLocalFileR Load
15 8 0 8 -155777 -1 -1;
#X obj 11 25 cnv 13 114 13 empty empty empty 2 8 0 8 -1024 -66577 0
;
#X obj 13 27 cnv 9 110 9 empty \$0localFilenameR test 1 6 0 8 -262144
-1 0;
#X obj 17 117 inlet;
#X obj 158 116 inlet;
#X obj 111 43 bng 8 250 50 0 \$0load \$0nullS empty 17 7 0 10 -258177
-1 -1;
#X obj 101 43 bng 8 250 50 0 \$0save \$0nullR empty 17 7 0 10 -4062
-1 -1;
#X obj 158 170 outlet;
#X obj 106 53 bng 8 250 50 0 \$0makeDefault \$0nullS empty 17 7 0 10
-228742 -1 -1;
#X obj 17 171 outlet null;
#N canvas 186 394 339 332 messages 0;
#X obj 17 29 inlet;
#X obj 17 265 s \$0saveLocalFileR;
#X obj 54 246 s \$0loadLocalFileR;
#X obj 92 227 s \$0save;
#X obj 17 130 sel saveas load save restore copy paste;
#X obj 17 65 symbol;
#X obj 171 187 s \$0copyR;
#X obj 209 163 s \$0pasteR;
#X obj 34 98 r \$2polaroid;
#X obj 130 208 s \$0load;
#X connect 0 0 5 0;
#X connect 4 0 1 0;
#X connect 4 1 2 0;
#X connect 4 2 3 0;
#X connect 4 3 9 0;
#X connect 4 4 6 0;
#X connect 4 5 7 0;
#X connect 5 0 4 0;
#X connect 8 0 4 0;
#X restore 17 144 pd messages;
#N canvas 655 133 358 405 defaulter 0;
#X obj 58 14 inlet;
#X obj 58 318 outlet;
#X obj 58 59 symbol;
#X obj 25 193 loadbang;
#X msg 58 280 set \$1;
#X obj 95 236 r \$0fileName;
#X obj 58 260 symbol;
#X obj 58 215 r \$0makeDefault;
#X obj 25 173 s \$0localFilenameR;
#X obj 58 133 s \$2-localSave;
#X msg 58 80 lddir \$1;
#X obj 120 271 loadbang;
#X msg 120 294 symbol SetAFileFirst!;
#X msg 101 106 setsub 0;
#X obj 58 106 t b a;
#X obj 168 106 s \$1-localSetsub;
#X obj 106 59 s \$0def;
#X msg 25 152 label Default--->;
#X connect 0 0 2 0;
#X connect 2 0 10 0;
#X connect 2 0 17 0;
#X connect 2 0 16 0;
#X connect 3 0 1 0;
#X connect 4 0 1 0;
#X connect 5 0 6 1;
#X connect 6 0 4 0;
#X connect 7 0 6 0;
#X connect 10 0 14 0;
#X connect 11 0 12 0;
#X connect 12 0 6 1;
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 14 1 9 0;
#X connect 17 0 8 0;
#X restore 158 143 pd defaulter;
#X obj 16 56 bng 8 250 50 0 \$0copy \$0copyR Copy 9 5 0 8 -159808 -1
-1;
#X obj 61 56 bng 8 250 50 0 \$0paste \$0pasteR Paste 9 5 0 8 -260097
-1 -1;
#N canvas 616 178 817 648 logic 1;
#X obj 574 324 s \$0localFilenameR;
#X obj 68 21 r \$0saveLocalFile;
#X obj 309 23 r \$0loadLocalFile;
#X obj 68 94 savepanel;
#X obj 309 83 openpanel;
#X msg 574 301 label \$1;
#X obj 574 204 symbol2list;
#X obj 574 254 list append >;
#X obj 574 278 list-l2s;
#X msg 600 204 symbol;
#X obj 600 183 loadbang;
#X obj 78 118 s \$0fileName;
#X obj 574 137 r \$0fileName;
#X obj 68 223 symbol;
#X obj 309 213 symbol;
#X obj 81 177 r \$0save;
#X obj 323 168 r \$0load;
#X obj 28 476 r \$0copy;
#X obj 470 466 r \$0paste;
#X obj 309 264 t b a;
#X msg 309 318 setsub 0;
#X obj 309 340 s \$1-localSetsub;
#X obj 28 573 s \$2-localSave;
#X obj 497 544 s \$2-localSave;
#X obj 68 301 s \$2-localSave;
#X obj 470 520 t b a;
#X msg 470 564 setsub 0;
#X obj 470 586 s \$1-localSetsub;
#X msg 470 490 lddir /tmp/polaroidTemp;
#X msg 28 549 svdir /tmp/polaroidTemp;
#X msg 68 251 svdir \$1;
#X msg 309 241 lddir \$1;
#X obj 574 228 list split 21;
#X obj 574 98 s \$0localFilenameR;
#X obj 574 22 loadbang;
#X msg 574 75 label ChooseAFile..;
#X obj 58 520 s SAVE_PREP;
#X obj 28 498 t b b;
#X obj 98 73 s SAVE_PREP;
#X obj 68 52 t b b;
#X obj 574 160 ggee/stripdir;
#X obj 105 198 r \$0def;
#X obj 346 188 r \$0def;
#X obj 154 263 print SavedTo;
#X obj 154 239 list trim;
#X obj 402 229 list trim;
#X obj 402 253 print Loaded;
#X obj 339 290 s \$2-localSave;
#X obj 321 109 s \$0fileName;
#X obj 574 49 spigot 1;
#X msg 653 33 0;
#X text 636 50 ^ Don't Override;
#X obj 653 6 r \$0def;
#X connect 1 0 39 0;
#X connect 2 0 4 0;
#X connect 3 0 11 0;
#X connect 3 0 13 0;
#X connect 4 0 14 0;
#X connect 4 0 48 0;
#X connect 5 0 0 0;
#X connect 6 0 32 0;
#X connect 7 0 8 0;
#X connect 8 0 5 0;
#X connect 9 0 6 1;
#X connect 10 0 9 0;
#X connect 12 0 40 0;
#X connect 13 0 30 0;
#X connect 13 0 44 0;
#X connect 14 0 31 0;
#X connect 14 0 45 0;
#X connect 15 0 13 0;
#X connect 16 0 14 0;
#X connect 17 0 37 0;
#X connect 18 0 28 0;
#X connect 19 0 20 0;
#X connect 19 1 47 0;
#X connect 20 0 21 0;
#X connect 25 0 26 0;
#X connect 25 1 23 0;
#X connect 26 0 27 0;
#X connect 28 0 25 0;
#X connect 29 0 22 0;
#X connect 30 0 24 0;
#X connect 31 0 19 0;
#X connect 32 0 7 0;
#X connect 32 2 8 0;
#X connect 34 0 49 0;
#X connect 35 0 33 0;
#X connect 37 0 29 0;
#X connect 37 1 36 0;
#X connect 39 0 3 0;
#X connect 39 1 38 0;
#X connect 40 0 6 0;
#X connect 41 0 13 1;
#X connect 42 0 14 1;
#X connect 44 0 43 0;
#X connect 45 0 46 0;
#X connect 49 0 35 0;
#X connect 50 0 49 1;
#X connect 52 0 50 0;
#X restore 167 41 pd logic;
#X connect 4 0 11 0;
#X connect 5 0 12 0;
#X connect 12 0 8 0;
#X coords 0 -1 1 1 116 57 1 10 10;