unpunch.pd 91.1 KB
Newer Older
1001
1002
1003
1004
1005
1006
1007
1008
1009
1010
1011
1012
1013
1014
#X obj 63 168 t b p;
#N canvas 246 399 398 338 init.pointer 0;
#X obj 17 79 until;
#X msg 17 102 next;
#X obj 17 51 t b b;
#X obj 17 14 inlet;
#X obj 17 217 sel 0;
#X obj 17 290 outlet;
#X obj 17 138 pointer \$0.show.selector;
#X obj 17 188 get \$0.show.selector id;
#X obj 58 215 r \$0.default.show;
#X obj 17 161 t p p;
#X obj 17 240 t b b, f 21;
#X obj 17 263 pointer;
1015
1016
#X obj 68 54 symbol \$1;
#X msg 68 80 traverse \$1;
1017
#X connect 0 0 1 0;
1018
#X connect 1 0 6 0;
1019
#X connect 2 0 0 0;
1020
#X connect 2 1 12 0;
1021
#X connect 3 0 2 0;
1022
1023
1024
1025
1026
1027
1028
1029
1030
1031
#X connect 4 0 10 0;
#X connect 6 0 9 0;
#X connect 6 2 0 1;
#X connect 7 0 4 0;
#X connect 8 0 4 1;
#X connect 9 0 7 0;
#X connect 9 1 11 1;
#X connect 10 0 11 0;
#X connect 10 1 0 1;
#X connect 11 0 5 0;
1032
#X connect 12 0 13 0;
1033
#X connect 13 0 6 0;
1034
1035
1036
1037
1038
1039
1040
1041
1042
1043
1044
1045
1046
1047
1048
1049
1050
1051
1052
1053
1054
1055
1056
1057
#X restore 191 97 pd init.pointer;
#X obj 191 69 inlet;
#X obj 12 52 r \$0.show.selector.send;
#X msg 63 197 555;
#X msg 12 195 0;
#X obj 12 249 set \$0.show.selector hilite;
#X obj 191 120 t p b p;
#X connect 0 0 1 0;
#X connect 1 0 8 0;
#X connect 1 1 9 1;
#X connect 1 2 2 1;
#X connect 1 3 2 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 3 1 9 1;
#X connect 4 0 10 0;
#X connect 5 0 4 0;
#X connect 6 0 0 0;
#X connect 7 0 9 0;
#X connect 8 0 9 0;
#X connect 10 0 2 1;
#X connect 10 1 8 0;
#X connect 10 2 9 1;
#X restore 53 169 pd show.selector.state;
1058
1059
1060
#N canvas 250 344 403 392 create.cursor 0;
#X obj 45 194 r \$0.canvastopmargin;
#X obj 22 96 f;
Roman Haefeli's avatar
Roman Haefeli committed
1061
#X obj 22 26 inlet;
1062
1063
#X obj 22 303 list prepend \$0;
#X obj 22 354 outlet;
Roman Haefeli's avatar
Roman Haefeli committed
1064
1065
1066
1067
1068
1069
1070
1071
1072
1073
1074
1075
1076
1077
#N canvas 0 99 398 252 h 0;
#X obj 23 14 inlet;
#X obj 23 37 b;
#X obj 23 163 outlet;
#X obj 38 115 r \$0.stepvisheight;
#X obj 23 91 f;
#X obj 23 140 *;
#X obj 38 66 r \$0.pitchrange;
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 3 0 5 1;
#X connect 4 0 5 0;
#X connect 5 0 2 0;
#X connect 6 0 4 1;
1078
#X restore 68 219 pd h;
Roman Haefeli's avatar
Roman Haefeli committed
1079
#X obj 22 49 t b b;
1080
1081
1082
1083
1084
1085
1086
1087
#X obj 22 272 pack f f f 1;
#X obj 37 73 r \$0.canvasleftmargin;
#X msg 22 331 scalar \$1.cursor \$2 \$3 \$4 \$5;
#X obj 91 248 r \$0.cursor.show;
#X obj 60 150 *;
#X obj 96 153 r \$0.stepviswidth;
#X obj 60 118 r \$0.cursor.pos;
#X obj 22 148 +;
Roman Haefeli's avatar
Roman Haefeli committed
1088
#X connect 0 0 7 1;
1089
#X connect 1 0 14 0;
Roman Haefeli's avatar
Roman Haefeli committed
1090
1091
1092
1093
1094
1095
1096
1097
#X connect 2 0 6 0;
#X connect 3 0 9 0;
#X connect 5 0 7 2;
#X connect 6 0 1 0;
#X connect 6 1 5 0;
#X connect 7 0 3 0;
#X connect 8 0 1 1;
#X connect 9 0 4 0;
1098
1099
1100
1101
1102
#X connect 10 0 7 3;
#X connect 11 0 14 1;
#X connect 12 0 11 1;
#X connect 13 0 11 0;
#X connect 14 0 7 0;
Roman Haefeli's avatar
Roman Haefeli committed
1103
#X restore 383 245 pd create.cursor;
Roman Haefeli's avatar
Roman Haefeli committed
1104
1105
1106
1107
1108
1109
1110
#N canvas 357 99 501 367 cursor.state 0;
#X obj 258 107 until;
#X msg 258 130 next;
#X obj 258 79 t b b;
#X obj 258 42 inlet;
#X obj 258 166 pointer \$0.cursor;
#X obj 258 189 t p b;
1111
1112
#X obj 171 238 set \$0.cursor x;
#X obj 44 238 set \$0.cursor vis;
Roman Haefeli's avatar
Roman Haefeli committed
1113
#X obj 82 92 *;
1114
#X obj 118 95 r \$0.stepviswidth;
Roman Haefeli's avatar
Roman Haefeli committed
1115
1116
#X obj 82 117 +;
#X obj 118 119 r \$0.canvasleftmargin;
1117
1118
1119
1120
#X obj 309 82 symbol \$1;
#X msg 309 108 traverse \$1;
#X obj 82 60 r \$0.cursor.pos;
#X obj 44 210 r \$0.cursor.show;
Roman Haefeli's avatar
Roman Haefeli committed
1121
#X connect 0 0 1 0;
1122
#X connect 1 0 4 0;
Roman Haefeli's avatar
Roman Haefeli committed
1123
#X connect 2 0 0 0;
1124
#X connect 2 1 12 0;
Roman Haefeli's avatar
Roman Haefeli committed
1125
1126
#X connect 3 0 2 0;
#X connect 4 0 5 0;
1127
1128
1129
1130
1131
1132
1133
1134
1135
1136
#X connect 4 2 0 1;
#X connect 5 0 6 1;
#X connect 5 0 7 1;
#X connect 5 1 0 1;
#X connect 8 0 10 0;
#X connect 9 0 8 1;
#X connect 10 0 6 0;
#X connect 11 0 10 1;
#X connect 12 0 13 0;
#X connect 13 0 4 0;
Roman Haefeli's avatar
Roman Haefeli committed
1137
#X connect 14 0 8 0;
1138
#X connect 15 0 7 0;
Roman Haefeli's avatar
Roman Haefeli committed
1139
#X restore 52 204 pd cursor.state;
1140
#N canvas 0 99 652 395 create.mode.button 0;
1141
#X obj 24 21 inlet;
1142
1143
1144
1145
1146
1147
1148
1149
1150
1151
1152
1153
1154
1155
1156
1157
1158
1159
#X obj 24 336 outlet;
#X obj 57 162 r \$0.canvasleftmargin;
#X obj 24 289 list prepend \$0;
#X obj 24 161 +;
#X msg 24 312 scalar \$1.mode.button \$2 \$3 \$4 \$5 \$6;
#X obj 105 19 r \$0.edit.modes;
#X obj 105 42 route velocity duration gid;
#X obj 24 44 f;
#X obj 24 80 pack f f f;
#X msg 24 116 85 72 velocity \$1 \, 168 72 duration \$2 \, 251 95 gid
\$3;
#X obj 24 139 unpack f f s f;
#X obj 24 242 pack f f s f;
#X msg 24 268 \$1 11 \$2 \$4 \$3;
#X obj 96 187 sel 0 1;
#X msg 96 210 666;
#X msg 132 211 900;
#X connect 0 0 8 0;
1160
#X connect 2 0 4 1;
1161
1162
1163
1164
1165
1166
1167
1168
1169
1170
1171
1172
1173
1174
1175
1176
1177
1178
1179
1180
#X connect 3 0 5 0;
#X connect 4 0 12 0;
#X connect 5 0 1 0;
#X connect 6 0 7 0;
#X connect 7 0 8 1;
#X connect 7 1 9 1;
#X connect 7 2 9 2;
#X connect 8 0 9 0;
#X connect 9 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 4 0;
#X connect 11 1 12 1;
#X connect 11 2 12 2;
#X connect 11 3 14 0;
#X connect 12 0 13 0;
#X connect 13 0 3 0;
#X connect 14 0 15 0;
#X connect 14 1 16 0;
#X connect 15 0 12 3;
#X connect 16 0 12 3;
Roman Haefeli's avatar
Roman Haefeli committed
1181
#X restore 411 192 pd create.mode.button;
1182
1183
1184
#N canvas 83 122 487 422 create.pager 0;
#X obj 34 317 list prepend \$0;
#X obj 34 368 outlet;
Roman Haefeli's avatar
Roman Haefeli committed
1185
#X obj 34 17 inlet;
1186
1187
#X msg 34 345 scalar \$1.pager \$2 \$3 \$4 \$5 \$6 \$7;
#X text 47 288 x y c dir num nvis;
Roman Haefeli's avatar
Roman Haefeli committed
1188
1189
1190
1191
1192
1193
1194
1195
#X obj 34 140 t a a;
#X msg 110 116 \$1;
#X obj 110 139 + 40;
#X obj 34 175 list append;
#X obj 34 47 f;
#X obj 68 49 r \$0.canvasleftmargin;
#X obj 34 70 + 10;
#X msg 34 117 \$1 20;
1196
1197
1198
1199
1200
1201
1202
1203
1204
#X obj 328 98 != 1;
#X msg 358 159 444;
#X msg 328 160 666;
#X obj 328 131 sel 0 1;
#X obj 260 33 r \$0.page;
#X msg 34 255 \$1 \$2 \$5 0 \$4 1 \, \$3 \$2 444 24 0 0;
#X obj 34 221 list append 666;
#X obj 34 198 list append 1;
#X obj 260 56 + 1;
Roman Haefeli's avatar
Roman Haefeli committed
1205
#X connect 0 0 3 0;
1206
#X connect 2 0 9 0;
Roman Haefeli's avatar
Roman Haefeli committed
1207
#X connect 3 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1208
1209
1210
1211
#X connect 5 0 8 0;
#X connect 5 1 6 0;
#X connect 6 0 7 0;
#X connect 7 0 8 1;
1212
1213
1214
1215
1216
1217
1218
1219
1220
1221
1222
1223
1224
1225
1226
1227
#X connect 8 0 20 0;
#X connect 9 0 11 0;
#X connect 10 0 9 1;
#X connect 11 0 12 0;
#X connect 12 0 5 0;
#X connect 13 0 16 0;
#X connect 14 0 19 1;
#X connect 15 0 19 1;
#X connect 16 0 15 0;
#X connect 16 1 14 0;
#X connect 17 0 21 0;
#X connect 18 0 0 0;
#X connect 19 0 18 0;
#X connect 20 0 19 0;
#X connect 21 0 13 0;
#X connect 21 0 20 1;
Roman Haefeli's avatar
Roman Haefeli committed
1228
1229
1230
1231
1232
1233
1234
1235
1236
1237
1238
1239
1240
1241
1242
1243
1244
1245
1246
1247
1248
#X restore 369 270 pd create.pager;
#X obj 355 61 t b b b b b b b b b;
#N canvas 301 211 450 300 create.guibar 0;
#X obj 8 14 inlet;
#X obj 8 235 outlet;
#X obj 241 109 r \$0.stepviswidth;
#X obj 287 134 r \$0.stepsperpage;
#X obj 287 157 t b a;
#X obj 241 189 *;
#X obj 48 58 r \$0.canvasleftmargin;
#X obj 8 58 f;
#X obj 8 139 pack f 11 f;
#X obj 8 162 list prepend \$0;
#X msg 8 185 scalar \$1.guibar \$2 \$3 \$4;
#X connect 0 0 7 0;
#X connect 2 0 5 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 4 1 5 1;
#X connect 5 0 8 2;
#X connect 6 0 7 1;
Roman Haefeli's avatar
Roman Haefeli committed
1249
#X connect 7 0 8 0;
Roman Haefeli's avatar
Roman Haefeli committed
1250
#X connect 8 0 9 0;
Roman Haefeli's avatar
Roman Haefeli committed
1251
#X connect 9 0 10 0;
Roman Haefeli's avatar
Roman Haefeli committed
1252
1253
#X connect 10 0 1 0;
#X restore 473 88 pd create.guibar;
Roman Haefeli's avatar
Roman Haefeli committed
1254
#X connect 0 0 17 0;
1255
1256
1257
1258
1259
1260
1261
1262
#X connect 2 0 4 0;
#X connect 3 0 2 0;
#X connect 5 0 3 0;
#X connect 6 0 2 1;
#X connect 7 0 1 0;
#X connect 8 0 1 0;
#X connect 9 0 1 0;
#X connect 10 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1263
#X connect 13 0 1 0;
1264
#X connect 15 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1265
1266
1267
1268
1269
1270
1271
1272
1273
1274
1275
#X connect 16 0 1 0;
#X connect 17 0 11 0;
#X connect 17 0 12 0;
#X connect 17 0 14 0;
#X connect 17 1 16 0;
#X connect 17 2 13 0;
#X connect 17 3 10 0;
#X connect 17 4 15 0;
#X connect 17 5 9 0;
#X connect 17 6 8 0;
#X connect 17 7 7 0;
Roman Haefeli's avatar
Roman Haefeli committed
1276
1277
#X connect 17 8 18 0;
#X connect 18 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1278
#X restore 461 215 pd create_guis;
Roman Haefeli's avatar
Roman Haefeli committed
1279
#N canvas 0 99 804 259 gui-templates 0;
Roman Haefeli's avatar
Roman Haefeli committed
1280
1281
#N canvas 0 99 408 150 gid.button-template 0;
#X obj 16 99 s \$0.gid.button.send;
1282
#X obj 17 26 filledpolygon clr clr 1 0 0 0 15 15 15 15 0;
Roman Haefeli's avatar
Roman Haefeli committed
1283
#X obj 16 60 struct \$0.gid.button float x float y float clr float
1284
1285
gid;
#X connect 2 0 0 0;
1286
#X restore 8 78 pd gid.button-template;
1287
1288
1289
1290
1291
1292
1293
1294
1295
1296
1297
#N canvas 195 247 417 284 vel-template 0;
#X obj 14 260 s \$0.vel.send;
#X obj 99 168 max 0;
#X obj 99 191 min 127;
#X obj 14 65 struct \$0.vel float x float y float value;
#X obj 14 88 t a a;
#X obj 99 144 get \$0.vel value;
#X obj 99 99 route change;
#X obj 99 122 t p p;
#X obj 99 216 set \$0.vel value;
#X obj 13 39 filledpolygon 886 886 1 0 0 0 15 72 15 72 0;
Roman Haefeli's avatar
Roman Haefeli committed
1298
1299
1300
1301
1302
1303
#X obj 14 11 drawnumber value 0 2 0 velocity=;
#X connect 1 0 2 0;
#X connect 2 0 8 0;
#X connect 3 0 4 0;
#X connect 4 0 0 0;
#X connect 4 1 6 0;
Roman Haefeli's avatar
Roman Haefeli committed
1304
#X connect 5 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1305
1306
1307
#X connect 6 0 7 0;
#X connect 7 0 5 0;
#X connect 7 1 8 1;
Roman Haefeli's avatar
Roman Haefeli committed
1308
#X restore 8 48 pd vel-template;
1309
1310
1311
1312
1313
1314
1315
1316
1317
1318
1319
#N canvas 0 99 414 335 dur-template 0;
#X obj 14 75 struct \$0.dur float x float y float value;
#X obj 99 201 min 127;
#X obj 14 98 t a a;
#X obj 99 109 route change;
#X obj 99 132 t p p;
#X obj 99 154 get \$0.dur value;
#X obj 99 226 set \$0.dur value;
#X obj 14 270 s \$0.dur.send;
#X obj 99 178 max 1;
#X obj 13 39 filledpolygon 886 886 1 0 0 0 15 72 15 72 0;
Roman Haefeli's avatar
Roman Haefeli committed
1320
#X obj 14 11 drawnumber value 0 2 0 duration=;
1321
#X obj 155 199 r \$0.stepsperpage;
Roman Haefeli's avatar
Roman Haefeli committed
1322
1323
#X connect 0 0 2 0;
#X connect 1 0 6 0;
1324
#X connect 2 0 7 0;
Roman Haefeli's avatar
Roman Haefeli committed
1325
1326
#X connect 2 1 3 0;
#X connect 3 0 4 0;
1327
#X connect 4 0 5 0;
Roman Haefeli's avatar
Roman Haefeli committed
1328
#X connect 4 1 6 1;
1329
1330
1331
#X connect 5 0 8 0;
#X connect 8 0 1 0;
#X connect 11 0 1 1;
1332
1333
#X restore 8 18 pd dur-template;
#N canvas 469 142 450 300 show.selector-template 0;
1334
#X obj 22 149 s \$0.show.selector.send;
Roman Haefeli's avatar
Roman Haefeli committed
1335
1336
#X obj 22 108 struct \$0.show.selector float x float y float w float
hilite float id symbol label;
Roman Haefeli's avatar
Roman Haefeli committed
1337
#X obj 21 25 filledpolygon 666 666 1 0 0 0 15 w 15 w 0;
1338
#X obj 22 53 drawsymbol label 2 1 hilite;
Roman Haefeli's avatar
Roman Haefeli committed
1339
#X connect 1 0 0 0;
1340
#X restore 8 138 pd show.selector-template;
1341
1342
1343
1344
1345
1346
1347
1348
1349
1350
1351
1352
1353
1354
1355
1356
#X obj 464 59 route click;
#X obj 464 107 s \$0.default.gid;
#X obj 333 35 r \$0.vel.send;
#X obj 333 81 get \$0.vel value;
#X obj 333 106 s \$0.default.vel;
#X obj 333 58 route change;
#X obj 209 55 route change;
#X obj 209 32 r \$0.dur.send;
#X obj 209 78 get \$0.dur value;
#X obj 209 103 s \$0.default.dur;
#X obj 464 36 r \$0.gid.button.send;
#X obj 464 82 get \$0.gid.button gid;
#X obj 612 60 route click;
#X obj 612 37 r \$0.show.selector.send;
#X obj 612 83 get \$0.show.selector id;
#X obj 612 108 s \$0.default.show;
Roman Haefeli's avatar
Roman Haefeli committed
1357
1358
1359
#N canvas 489 158 450 300 cursor-template 0;
#X obj 22 149 s \$0.cursor.send;
#X obj 22 108 struct \$0.cursor float x float y float h float vis;
1360
#X obj 18 20 drawpolygon -v vis 900 2 0 0 0 h;
Roman Haefeli's avatar
Roman Haefeli committed
1361
#X connect 1 0 0 0;
1362
1363
1364
1365
1366
1367
1368
1369
#X restore 8 168 pd cursor-template;
#N canvas 0 99 392 164 mode.button-template 0;
#X obj 16 99 s \$0.mode.button.send;
#X obj 17 26 filledpolygon c c 1 0 0 0 8 w 8 w 0;
#X obj 16 60 struct \$0.mode.button float x float y float w float c
symbol param;
#X connect 2 0 0 0;
#X restore 8 108 pd mode.button-template;
Roman Haefeli's avatar
Roman Haefeli committed
1370
#N canvas 199 504 810 268 mode.button.logic 0;
1371
1372
1373
1374
1375
1376
1377
1378
1379
1380
1381
1382
1383
1384
1385
1386
1387
#X obj 23 17 r \$0.mode.button.send;
#X msg 99 186 900;
#X msg 130 187 666;
#X obj 99 159 sel 666 900;
#X obj 23 63 t p p, f 26;
#X obj 23 88 get \$0.mode.button w c;
#X obj 23 217 set \$0.mode.button w c, f 26;
#X obj 23 148 f;
#X obj 75 121 b;
#X obj 23 40 route click change;
#X obj 243 17 r \$0.mode.button.send;
#X obj 243 40 route click;
#X obj 243 63 get \$0.mode.button c param;
#X obj 243 86 sel 666 900;
#X msg 243 109 1;
#X msg 274 109 0;
#X obj 243 152 list prepend;
1388
1389
#X obj 243 198 s \$0.edit.modes;
#X obj 243 175 list trim;
1390
1391
1392
1393
1394
1395
1396
1397
1398
1399
1400
1401
1402
1403
1404
1405
1406
1407
1408
1409
1410
#X connect 0 0 9 0;
#X connect 1 0 6 1;
#X connect 2 0 6 1;
#X connect 3 0 1 0;
#X connect 3 1 2 0;
#X connect 4 0 5 0;
#X connect 4 1 6 2;
#X connect 5 0 7 0;
#X connect 5 1 3 0;
#X connect 7 0 6 0;
#X connect 8 0 7 0;
#X connect 9 0 4 0;
#X connect 9 1 8 0;
#X connect 10 0 11 0;
#X connect 11 0 12 0;
#X connect 12 0 13 0;
#X connect 12 1 16 1;
#X connect 13 0 14 0;
#X connect 13 1 15 0;
#X connect 14 0 16 0;
#X connect 15 0 16 0;
1411
1412
#X connect 16 0 18 0;
#X connect 18 0 17 0;
1413
#X restore 212 143 pd mode.button.logic;
1414
#N canvas 399 371 405 373 pager-template 0;
Roman Haefeli's avatar
Roman Haefeli committed
1415
#X obj 15 41 filledpolygon c c 1 dir 7 12 14 12 0;
1416
#X obj 21 285 s \$0.pager.send;
Roman Haefeli's avatar
Roman Haefeli committed
1417
1418
1419
#X obj 21 117 struct \$0.pager float x float y float c float dir float
num float nvis;
#X obj 19 66 drawnumber -v nvis num 30 2 0;
1420
1421
1422
1423
1424
1425
1426
1427
1428
1429
1430
1431
1432
1433
#X obj 165 164 route change;
#X obj 165 187 t p p;
#X obj 21 185 t a a;
#X obj 165 209 get \$0.pager num;
#X obj 165 233 max 1;
#X obj 165 281 set \$0.pager num;
#X connect 2 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 7 0;
#X connect 5 1 9 1;
#X connect 6 0 1 0;
#X connect 6 1 4 0;
#X connect 7 0 8 0;
#X connect 8 0 9 0;
Roman Haefeli's avatar
Roman Haefeli committed
1434
#X restore 8 198 pd pager-template;
Roman Haefeli's avatar
Roman Haefeli committed
1435
1436
1437
1438
1439
1440
#N canvas 305 215 450 300 guibar-template 0;
#X obj 21 180 s \$0.guibar.send;
#X obj 21 117 struct \$0.guibar float x float y float w;
#X obj 17 39 filledpolygon 777 777 1 0 0 w 0 w 24 0 24;
#X connect 1 0 0 0;
#X restore 8 228 pd guibar-template;
1441
#N canvas 100 265 435 556 pager.logic 0;
1442
1443
1444
1445
1446
1447
1448
1449
1450
1451
1452
1453
1454
#X obj 24 24 r \$0.pager.send;
#X msg 24 186 -1;
#X msg 53 187 1;
#X obj 24 234 f 1;
#X obj 24 263 +;
#X obj 24 286 t a a;
#X obj 24 209 t b a;
#X obj 24 110 get \$0.pager dir;
#X obj 24 47 route click change;
#X obj 156 91 get \$0.pager num;
#X obj 139 209 != 1;
#X obj 24 133 sel 0 24;
#X obj 24 156 spigot 1;
1455
1456
1457
#X obj 51 459 s \$0.page;
#X obj 24 432 t b a;
#X obj 24 481 s \$0.redraw;
1458
#X obj 24 309 - 1;
1459
1460
1461
1462
#X obj 24 351 t b a;
#X obj 24 374 del 0;
#X obj 24 397 f;
#X text 89 379 <- decoupler (does this work at all?);
1463
1464
1465
1466
1467
1468
1469
1470
1471
1472
1473
1474
1475
1476
1477
1478
1479
1480
1481
#X connect 0 0 8 0;
#X connect 1 0 6 0;
#X connect 2 0 6 0;
#X connect 3 0 4 0;
#X connect 4 0 5 0;
#X connect 5 0 16 0;
#X connect 5 1 3 1;
#X connect 5 1 10 0;
#X connect 6 0 3 0;
#X connect 6 1 4 1;
#X connect 7 0 11 0;
#X connect 8 0 7 0;
#X connect 8 1 9 0;
#X connect 10 0 12 1;
#X connect 11 0 12 0;
#X connect 11 1 2 0;
#X connect 12 0 1 0;
#X connect 14 0 15 0;
#X connect 14 1 13 0;
1482
1483
1484
1485
1486
#X connect 16 0 17 0;
#X connect 17 0 18 0;
#X connect 17 1 19 1;
#X connect 18 0 19 0;
#X connect 19 0 14 0;
1487
#X restore 212 198 pd pager.logic;
1488
1489
1490
1491
1492
1493
1494
1495
1496
1497
1498
1499
#X connect 4 0 15 0;
#X connect 6 0 9 0;
#X connect 7 0 8 0;
#X connect 9 0 7 0;
#X connect 10 0 12 0;
#X connect 11 0 10 0;
#X connect 12 0 13 0;
#X connect 14 0 4 0;
#X connect 15 0 5 0;
#X connect 16 0 18 0;
#X connect 17 0 16 0;
#X connect 18 0 19 0;
Roman Haefeli's avatar
Roman Haefeli committed
1500
#X restore 624 215 pd gui-templates;
Roman Haefeli's avatar
Roman Haefeli committed
1501
1502
#X obj 20 498 r \$0.global.send;
#X obj 20 465 s \$0.global.receive;
1503
1504
1505
1506
1507
#X text 20 63 generate events;
#X text 20 218 process events;
#N canvas 0 99 406 517 note.change.duration 0;
#X obj 14 19 r \$0.note.send;
#X obj 14 246 change -1;
1508
1509
1510
#X obj 167 164 t a a;
#X obj 194 190 tabread \$0.duration;
#X msg 194 215 set \$1;
1511
1512
1513
1514
#X obj 14 376 list prepend;
#X obj 14 404 list prepend note change duration;
#X obj 14 427 list trim;
#X obj 14 455 s \$0.global.send;
1515
#X obj 167 138 change -1;
1516
1517
#X obj 14 42 route change click;
#N canvas 83 99 398 214 id->step|pitch 0;
1518
1519
1520
1521
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
1522
1523
#X obj 40 63 s \$0.convert.id->step|pitch.get;
#X obj 40 86 r \$0.convert.id->step|pitch;
1524
1525
1526
1527
1528
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
1529
#X restore 167 272 pd id->step|pitch;
1530
#N canvas 83 99 398 214 pointer->id 0;
1531
1532
1533
1534
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
1535
1536
#X obj 40 63 s \$0.convert.pointer->id.get;
#X obj 40 86 r \$0.convert.pointer->id;
1537
#X connect 0 0 1 0;
1538
#X connect 1 0 2 0;
1539
1540
1541
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
1542
#X restore 167 76 pd pointer->id;
1543
#N canvas 0 99 405 189 w->duration 0;
1544
1545
1546
1547
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
1548
1549
#X obj 40 85 r \$0.convert.w->duration;
#X obj 40 63 s \$0.convert.w->duration.get;
1550
1551
#X connect 0 0 1 0;
#X connect 1 0 2 0;
1552
#X connect 1 1 5 0;
1553
1554
1555
#X connect 2 0 3 0;
#X connect 4 0 2 1;
#X restore 14 114 pd w->duration;
1556
1557
#X obj 14 85 get \$0.note w dur;
#X connect 0 0 10 0;
1558
#X connect 1 0 5 0;
1559
#X connect 2 0 11 0;
1560
1561
1562
#X connect 2 1 3 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
1563
#X connect 5 0 6 0;
1564
#X connect 6 0 7 0;
1565
#X connect 7 0 8 0;
1566
1567
#X connect 9 0 2 0;
#X connect 10 0 14 0;
1568
1569
1570
1571
1572
1573
#X connect 10 1 12 0;
#X connect 11 0 5 1;
#X connect 12 0 9 0;
#X connect 13 0 1 0;
#X connect 14 0 13 0;
#X connect 14 1 1 0;
1574
#X restore 19 110 pd note.change.duration;
Roman Haefeli's avatar
Roman Haefeli committed
1575
#N canvas 104 99 631 633 note.create/delete 0;
1576
1577
1578
1579
1580
1581
1582
1583
1584
1585
1586
1587
1588
1589
1590
1591
1592
1593
1594
1595
1596
1597
1598
1599
1600
1601
1602
1603
1604
1605
1606
1607
#X obj 29 235 del 0;
#X obj 29 262 f;
#X msg 72 238 1;
#X msg 254 191 0;
#X obj 29 288 sel 1;
#N canvas 0 99 483 432 detect_double_click 0;
#X obj 91 101 -;
#X obj 90 76 t a a;
#X obj 19 23 inlet;
#X text 109 21 this detects two clicks on the same scalar within a
certain period.;
#X obj 19 75 t b b;
#X obj 19 99 del 300;
#X msg 19 122 0;
#X msg 52 123 1;
#X obj 19 48 t b a;
#X obj 91 166 spigot 0;
#X obj 91 203 outlet;
#X obj 91 126 sel 0;
#X connect 0 0 11 0;
#X connect 1 0 0 1;
#X connect 1 1 0 0;
#X connect 2 0 8 0;
#X connect 4 0 5 0;
#X connect 4 1 7 0;
#X connect 5 0 6 0;
#X connect 6 0 9 1;
#X connect 7 0 9 1;
#X connect 8 0 4 0;
#X connect 8 1 1 0;
#X connect 9 0 10 0;
#X connect 11 0 9 0;
Roman Haefeli's avatar
Roman Haefeli committed
1608
#X restore 281 255 pd detect_double_click;
1609
1610
1611
1612
1613
1614
1615
1616
1617
1618
1619
1620
1621
1622
1623
1624
#X obj 254 109 unpack s p f;
#X obj 254 132 sel click;
#X obj 254 154 t b b;
#X obj 281 178 pointer;
#X obj 29 14 r \$0.horizgrid.send;
#X obj 29 37 route click;
#X obj 29 60 get \$0.horizgrid y;
#X obj 74 105 route click;
#X obj 74 82 r \$0.vertgrid.send;
#X obj 29 153 pack f f;
#X obj 74 128 get \$0.vertgrid x;
#X obj 29 202 t b b a;
#X obj 29 315 list append;
#X msg 29 176 \$2 \$1;
#X obj 254 79 r \$0.note.send;
#X text 103 318 x y;
Roman Haefeli's avatar
Roman Haefeli committed
1625
#X obj 281 301 f;
1626
1627
#X text 72 427 step pitch;
#N canvas 0 190 318 251 append.vel.dur.gid 0;
1628
1629
1630
1631
1632
1633
1634
1635
1636
1637
1638
1639
1640
1641
1642
#X obj 12 18 inlet;
#X obj 12 199 outlet;
#X obj 95 55 r \$0.default.vel;
#X obj 95 85 r \$0.default.dur;
#X obj 95 115 r \$0.default.gid;
#X obj 12 73 list append;
#X obj 12 103 list append;
#X obj 12 133 list append;
#X connect 0 0 5 0;
#X connect 2 0 5 1;
#X connect 3 0 6 1;
#X connect 4 0 7 1;
#X connect 5 0 6 0;
#X connect 6 0 7 0;
#X connect 7 0 1 0;
1643
1644
1645
1646
1647
#X restore 29 444 pd append.vel.dur.gid;
#X text 33 463 step pitch vel dur gid;
#X obj 29 479 list prepend note create;
#X obj 29 502 list trim;
#X obj 29 525 s \$0.global.send;
Roman Haefeli's avatar
Roman Haefeli committed
1648
1649
#X obj 281 278 b;
#X obj 281 232 t a a;
Roman Haefeli's avatar
Roman Haefeli committed
1650
1651
1652
#X obj 326 458 list trim;
#X obj 326 481 s \$0.global.send;
#X obj 326 435 list prepend note delete;
1653
1654
1655
1656
1657
1658
1659
1660
1661
1662
1663
1664
1665
1666
1667
1668
1669
1670
1671
1672
1673
1674
1675
1676
1677
1678
1679
1680
1681
1682
1683
1684
1685
1686
1687
1688
1689
1690
1691
1692
1693
#N canvas 0 99 405 189 x->step 0;
#X obj 40 63 s \$0.convert.x->step.get;
#X obj 40 85 r \$0.convert.x->step;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X connect 1 0 4 1;
#X connect 2 0 3 0;
#X connect 3 0 4 0;
#X connect 3 1 0 0;
#X connect 4 0 5 0;
#X restore 29 362 pd x->step;
#N canvas 0 99 405 189 y->pitch 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.y->pitch.get;
#X obj 40 85 r \$0.convert.y->pitch;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 104 362 pd y->pitch;
#X obj 29 338 unpack f f, f 13;
#X obj 29 392 pack f f, f 13;
#N canvas 83 99 398 214 pointer->id 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.pointer->id.get;
#X obj 40 86 r \$0.convert.pointer->id;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 281 203 pd pointer->id;
1694
#N canvas 73 91 398 214 id->step|pitch 0;
1695
1696
1697
1698
1699
1700
1701
1702
1703
1704
1705
1706
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.id->step|pitch.get;
#X obj 40 86 r \$0.convert.id->step|pitch;
#X connect 0 0 1 0;
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 281 332 pd id->step|pitch;
Roman Haefeli's avatar
Roman Haefeli committed
1707
1708
1709
#X obj 281 355 route -1;
#X msg 281 380 note delete: inconsistency in note cache detected;
#X obj 281 405 s error;
1710
1711
1712
1713
#X connect 0 0 1 0;
#X connect 1 0 4 0;
#X connect 2 0 1 1;
#X connect 3 0 1 1;
Roman Haefeli's avatar
Roman Haefeli committed
1714
#X connect 4 0 18 0;
1715
#X connect 5 0 29 0;
1716
#X connect 6 0 7 0;
Roman Haefeli's avatar
Roman Haefeli committed
1717
1718
1719
1720
#X connect 6 1 9 1;
#X connect 7 0 8 0;
#X connect 8 0 3 0;
#X connect 8 1 9 0;
1721
#X connect 9 0 38 0;
Roman Haefeli's avatar
Roman Haefeli committed
1722
#X connect 10 0 11 0;
1723
#X connect 11 0 12 0;
Roman Haefeli's avatar
Roman Haefeli committed
1724
#X connect 12 0 15 0;
1725
#X connect 13 0 16 0;
Roman Haefeli's avatar
Roman Haefeli committed
1726
1727
1728
1729
1730
1731
#X connect 14 0 13 0;
#X connect 15 0 19 0;
#X connect 16 0 15 1;
#X connect 17 0 0 0;
#X connect 17 1 2 0;
#X connect 17 2 18 1;
1732
#X connect 18 0 36 0;
Roman Haefeli's avatar
Roman Haefeli committed
1733
1734
#X connect 19 0 17 0;
#X connect 20 0 6 0;
1735
1736
1737
#X connect 22 0 39 0;
#X connect 24 0 26 0;
#X connect 26 0 27 0;
1738
#X connect 27 0 28 0;
1739
1740
1741
1742
1743
1744
1745
1746
1747
1748
1749
#X connect 29 0 22 0;
#X connect 30 0 5 0;
#X connect 30 1 22 1;
#X connect 31 0 32 0;
#X connect 33 0 31 0;
#X connect 34 0 37 0;
#X connect 35 0 37 1;
#X connect 36 0 34 0;
#X connect 36 1 35 0;
#X connect 37 0 24 0;
#X connect 38 0 30 0;
Roman Haefeli's avatar
Roman Haefeli committed
1750
1751
1752
1753
#X connect 39 0 40 0;
#X connect 40 0 41 0;
#X connect 40 1 33 0;
#X connect 41 0 42 0;
1754
#X restore 19 85 pd note.create/delete;
1755
1756
1757
1758
1759
1760
1761
1762
1763
1764
1765
1766
1767
#N canvas 0 99 406 517 note.change.velocity 0;
#X obj 14 19 r \$0.note.send;
#X obj 14 42 route change;
#X obj 14 226 change -1;
#X obj 120 144 t a a;
#X msg 147 195 set \$1;
#X obj 14 356 list prepend;
#X obj 14 407 list trim;
#X obj 14 435 s \$0.global.send;
#X obj 120 118 change -1;
#X obj 14 65 get \$0.note vel id;
#X obj 147 170 tabread \$0.velocity;
#X obj 14 384 list prepend note change velocity;
1768
1769
1770
1771
1772
1773
1774
#N canvas 83 99 398 214 id->step|pitch 0;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X obj 40 63 s \$0.convert.id->step|pitch.get;
#X obj 40 86 r \$0.convert.id->step|pitch;
1775
#X connect 0 0 1 0;
1776
1777
1778
1779
1780
1781
1782
1783
1784
1785
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
#X restore 120 242 pd id->step|pitch;
#X connect 0 0 1 0;
#X connect 1 0 9 0;
#X connect 2 0 5 0;
#X connect 3 0 12 0;
#X connect 3 1 10 0;
1786
#X connect 4 0 2 0;
1787
1788
1789
1790
1791
1792
1793
1794
#X connect 5 0 11 0;
#X connect 6 0 7 0;
#X connect 8 0 3 0;
#X connect 9 0 2 0;
#X connect 9 1 8 0;
#X connect 10 0 4 0;
#X connect 11 0 6 0;
#X connect 12 0 5 1;
1795
1796
1797
1798
1799
1800
1801
1802
1803
1804
1805
1806
1807
1808
1809
#X restore 19 135 pd note.change.velocity;
#N canvas 0 99 406 517 note.change.gid 0;
#X obj 14 19 r \$0.note.send;
#X obj 14 42 route change;
#X obj 14 226 change -1;
#X obj 119 144 t a a;
#X msg 146 195 set \$1;
#X obj 14 356 list prepend;
#X obj 14 407 list trim;
#X obj 14 435 s \$0.global.send;
#X obj 119 118 change -1;
#X obj 146 170 tabread \$0.gid;
#X obj 14 384 list prepend note change gid;
#X obj 14 65 get \$0.note gid id;
#N canvas 83 99 398 214 id->step|pitch 0;
1810
1811
1812
1813
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
1814
1815
#X obj 40 63 s \$0.convert.id->step|pitch.get;
#X obj 40 86 r \$0.convert.id->step|pitch;
Roman Haefeli's avatar
Roman Haefeli committed
1816
#X connect 0 0 1 0;
1817
1818
1819
1820
#X connect 1 0 2 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 5 0 2 1;
1821
#X restore 119 247 pd id->step|pitch;
1822
#X connect 0 0 1 0;
1823
1824
1825
1826
1827
1828
1829
1830
1831
1832
1833
1834
#X connect 1 0 11 0;
#X connect 2 0 5 0;
#X connect 3 0 12 0;
#X connect 3 1 9 0;
#X connect 4 0 2 0;
#X connect 5 0 10 0;
#X connect 6 0 7 0;
#X connect 8 0 3 0;
#X connect 9 0 4 0;
#X connect 10 0 6 0;
#X connect 11 0 2 0;
#X connect 11 1 8 0;
1835
#X connect 12 0 5 1;
1836
1837
#X restore 19 159 pd note.change.gid;
#X obj 285 430 text define \$0.sequence;
1838
#N canvas 136 170 513 371 sequencer 0;
Roman Haefeli's avatar
Roman Haefeli committed
1839
#N canvas 0 278 505 346 note.create 0;
1840
1841
#X obj 24 39 route note;
#X obj 24 62 route create;
Roman Haefeli's avatar
Roman Haefeli committed
1842
1843
1844
1845
1846
1847
1848
1849
1850
1851
1852
1853
1854
#X obj 69 228 +;
#X obj 69 287 s \$0.sequencer.event.add.pre;
#X obj 251 243 s \$0.sequencer.event.add.post;
#X obj 69 254 pack f f 0 f;
#X obj 131 86 r \$0.create.id;
#X obj 24 16 r \$0.seq.receive;
#X obj 24 85 list prepend -1;
#X obj 24 108 route -1;
#X msg 69 205 \$2 \$5;
#X msg 113 202 \$3;
#X msg 251 217 \$2 \$3 \$4 \$1;
#X obj 69 160 t a a a a;
#X msg 146 202 \$1;
1855
#X connect 0 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1856
1857
1858
1859
1860
1861
1862
1863
1864
1865
1866
1867
1868
1869
1870
#X connect 1 0 8 0;
#X connect 2 0 5 0;
#X connect 5 0 3 0;
#X connect 6 0 8 1;
#X connect 7 0 0 0;
#X connect 8 0 9 0;
#X connect 9 1 13 0;
#X connect 10 0 2 0;
#X connect 11 0 5 1;
#X connect 12 0 4 0;
#X connect 13 0 10 0;
#X connect 13 1 11 0;
#X connect 13 2 14 0;
#X connect 13 3 12 0;
#X connect 14 0 5 3;
1871
#X restore 13 19 pd note.create;
1872
#N canvas 140 99 478 389 note.delete 0;
1873
1874
#X obj 24 39 route note;
#X obj 24 62 route delete;
1875
1876
1877
1878
1879
1880
1881
1882
1883
#X obj 69 313 s \$0.sequencer.event.remove;
#X obj 24 143 route -1;
#X obj 24 85 b;
#X obj 24 108 f;
#X obj 88 213 tabread \$0.velocity;
#X obj 88 236 pack f f;
#X msg 69 275 0 \$1, f 5;
#X text 151 235 note-on (vel \, id);
#X text 111 276 note-off (vel \, id);
Roman Haefeli's avatar
Roman Haefeli committed
1884
#X obj 69 170 t a a a;
Roman Haefeli's avatar
Roman Haefeli committed
1885
1886
#X obj 56 110 r \$0.delete.id;
#X obj 24 16 r \$0.seq.receive;
1887
#X connect 0 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1888
1889
1890
1891
#X connect 1 0 4 0;
#X connect 3 1 11 0;
#X connect 4 0 5 0;
#X connect 5 0 3 0;
1892
#X connect 6 0 7 0;
Roman Haefeli's avatar
Roman Haefeli committed
1893
1894
1895
1896
1897
1898
1899
#X connect 7 0 2 0;
#X connect 8 0 2 0;
#X connect 11 0 8 0;
#X connect 11 1 6 0;
#X connect 11 2 7 1;
#X connect 12 0 5 1;
#X connect 13 0 0 0;
1900
#X restore 13 42 pd note.delete;
1901
#N canvas 0 99 784 430 note.change.duration 0;
1902
1903
1904
1905
#X obj 24 39 route note;
#X obj 24 109 t a a;
#X obj 24 62 route change;
#X obj 24 85 route duration;
1906
#X msg 186 110 \$1 \$2;
1907
1908
1909
#X obj 24 173 t a a;
#X msg 24 196 \$1 \$3;
#X obj 24 219 +;
1910
#X msg 52 225 \$2;
1911
#X obj 258 331 s \$0.sequencer.event.remove;
1912
#X obj 24 298 s \$0.sequencer.event.add.pre;
1913
1914
1915
1916
1917
1918
1919
1920
#N canvas 83 99 410 208 step|pitch->id 0;
#X obj 40 63 s \$0.convert.step|pitch->id.get;
#X obj 40 86 r \$0.convert.step|pitch->id;
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
#X connect 1 0 4 1;
1921
1922
#X connect 2 0 3 0;
#X connect 3 0 4 0;
1923
1924
#X connect 3 1 0 0;
#X connect 4 0 5 0;
1925
1926
#X restore 186 173 pd step|pitch->id;
#X obj 186 196 route -1;
1927
1928
1929
1930
#X obj 483 343 list append;
#X obj 483 319 b;
#X msg 483 367 sequencer: note delete: note not found (\$1 \$2);
#X obj 483 390 s error;
1931
1932
1933
1934
#X obj 24 270 pack f f 0 f;
#X obj 186 142 t a a;
#X msg 258 269 0 \$1;
#X obj 231 233 t a a;
Roman Haefeli's avatar
Roman Haefeli committed
1935
#X obj 24 16 r \$0.seq.receive;
1936
1937
1938
1939
1940
#X connect 0 0 2 0;
#X connect 1 0 5 0;
#X connect 1 1 4 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
Roman Haefeli's avatar
Roman Haefeli committed
1941
#X connect 4 0 18 0;
1942
1943
1944
#X connect 5 0 6 0;
#X connect 5 1 8 0;
#X connect 6 0 7 0;
Roman Haefeli's avatar
Roman Haefeli committed
1945
1946
#X connect 7 0 17 0;
#X connect 8 0 17 1;
1947
1948
#X connect 11 0 12 0;
#X connect 12 0 14 0;
Roman Haefeli's avatar
Roman Haefeli committed
1949
#X connect 12 1 20 0;
1950
1951
1952
#X connect 13 0 15 0;
#X connect 14 0 13 0;
#X connect 15 0 16 0;
Roman Haefeli's avatar
Roman Haefeli committed
1953
1954
1955
1956
1957
1958
1959
#X connect 17 0 10 0;
#X connect 18 0 11 0;
#X connect 18 1 13 1;
#X connect 19 0 9 0;
#X connect 20 0 17 3;
#X connect 20 1 19 0;
#X connect 21 0 0 0;
1960
1961
1962
1963
1964
1965
1966
1967
1968
1969
1970
1971
1972
1973
1974
1975
1976
1977
1978
1979
#X restore 13 66 pd note.change.duration;
#N canvas 604 608 577 279 event.add 0;
#X obj 16 37 t a a;
#X msg 71 59 \$1;
#X obj 71 107 sel -1;
#X msg 71 132 1e+09;
#X obj 16 158 text insert \$0.sequence;
#X obj 71 84 text search \$0.sequence > 0;
#X obj 16 11 r \$0.sequencer.event.add.post;
#X obj 256 37 t a a;
#X msg 311 59 \$1;
#X obj 311 127 sel -1;
#X msg 311 152 1e+09;
#X obj 256 184 text insert \$0.sequence;
#X obj 256 11 r \$0.sequencer.event.add.pre;
#X obj 311 104 text search \$0.sequence > 0;
#X obj 311 82 - 1;
#X connect 0 0 4 0;
#X connect 0 1 1 0;
#X connect 1 0 5 0;
1980
#X connect 2 0 3 0;
1981
1982
1983
1984
1985
1986
1987
1988
1989
1990
1991
1992
1993
1994
#X connect 2 1 4 1;
#X connect 3 0 4 1;
#X connect 5 0 2 0;
#X connect 6 0 0 0;
#X connect 7 0 11 0;
#X connect 7 1 8 0;
#X connect 8 0 14 0;
#X connect 9 0 10 0;
#X connect 9 1 11 1;
#X connect 10 0 11 1;
#X connect 12 0 7 0;
#X connect 13 0 9 0;
#X connect 14 0 13 0;
#X restore 15 132 pd event.add;
Roman Haefeli's avatar
Roman Haefeli committed
1995
#N canvas 594 831 359 230 event.remove 0;
1996
1997
1998
1999
2000
#X obj 47 110 text delete \$0.sequence;
#X obj 14 11 r \$0.sequencer.event.remove;
#X obj 14 80 sel -1;
#X obj 14 143 list append;
#X obj 14 34 t a a;