unpunch.pd 91.1 KB
Newer Older
3001
3002
#X obj 28 311 outlet;
#X obj 28 24 inlet;
3003
#X connect 0 0 1 0;
3004
3005
3006
3007
3008
3009
3010
3011
3012
3013
3014
3015
3016
3017
3018
3019
3020
3021
3022
3023
3024
3025
3026
3027
3028
3029
3030
3031
3032
3033
3034
3035
3036
3037
3038
3039
3040
3041
3042
3043
3044
3045
3046
3047
3048
3049
3050
#X connect 0 1 2 0;
#X connect 0 2 4 0;
#X connect 1 0 5 0;
#X connect 2 0 3 0;
#X connect 3 0 7 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 13 0;
#X connect 9 0 10 0;
#X connect 10 0 14 0;
#X connect 11 0 9 1;
#X connect 11 0 7 1;
#X connect 11 0 5 1;
#X connect 12 0 15 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 18 1;
#X connect 17 0 19 1;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 21 0 0 0;
#X restore 7 221 pd clr.*;
#X obj 109 120 / 113;
#X obj 7 44 t a a;
#X msg 7 82 \$6;
#X msg 109 94 \$4;
#N canvas 73 91 410 208 gid->gclr 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.gid->gclr.get;
#X obj 40 86 r \$0.convert.gid->gclr;
#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 7 117 pd gid->gclr;
#X connect 0 0 4 0;
#X connect 2 0 1 0;
#X connect 3 0 2 1;
#X connect 4 0 5 0;
#X connect 4 1 6 0;
3051
#X connect 5 0 7 0;
3052
3053
#X connect 6 0 3 0;
#X connect 7 0 2 0;
3054
#X restore 346 291 pd c;
3055
3056
3057
3058
3059
3060
3061
3062
#N canvas 16 91 414 215 vis 0;
#X obj 7 21 inlet;
#X obj 7 126 outlet;
#X msg 7 74 1;
#X obj 7 44 b;
#X connect 0 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
3063
#X restore 378 291 pd vis;
3064
3065
3066
3067
#N canvas 16 91 407 242 x 0;
#X obj 7 21 inlet;
#X obj 7 185 outlet;
#X msg 7 44 \$2;
3068
3069
3070
3071
3072
3073
3074
3075
3076
3077
3078
3079
#N canvas 0 99 405 189 step->x 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.step->x.get;
#X obj 40 85 r \$0.convert.step->x;
#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;
3080
3081
3082
3083
3084
3085
3086
3087
#X restore 7 95 pd step->x;
#X connect 0 0 2 0;
#X connect 2 0 3 0;
#X connect 3 0 1 0;
#X restore 6 291 pd x;
#N canvas 14 286 432 235 y 0;
#X obj 7 21 inlet;
#X obj 7 169 outlet;
3088
3089
3090
3091
3092
3093
3094
3095
3096
3097
3098
3099
#N canvas 0 99 405 189 pitch->y 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.pitch->y.get;
#X obj 40 85 r \$0.convert.pitch->y;
#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;
3100
3101
3102
3103
3104
3105
3106
3107
#X restore 7 95 pd pitch->y;
#X msg 7 57 \$3;
#X connect 0 0 3 0;
#X connect 2 0 1 0;
#X connect 3 0 2 0;
#X restore 46 291 pd y;
#X obj 6 473 s \$1;
#X obj 17 214 r \$0.redraw.notes;
3108
3109
3110
3111
3112
3113
3114
3115
3116
3117
#X text 20 389 x y w h id gid vel dur c vis;
#X obj 6 355 pack f f f f f f f f f f, f 57;
#X obj 6 252 t a a a a a a a a a a, f 57;
#N canvas 15 91 396 215 dur 0;
#X obj 20 21 inlet;
#X obj 20 162 outlet;
#X msg 20 76 \$5;
#X connect 0 0 2 0;
#X connect 2 0 1 0;
#X restore 302 291 pd dur;
Roman Haefeli's avatar
Roman Haefeli committed
3118
3119
#X obj 89 76 r \$0.create.id;
#X obj 6 77 list prepend;
3120
3121
#X connect 0 0 1 0;
#X connect 1 0 2 0;
Roman Haefeli's avatar
Roman Haefeli committed
3122
3123
3124
3125
3126
3127
3128
3129
3130
3131
3132
3133
3134
3135
3136
3137
3138
3139
3140
3141
3142
3143
3144
3145
3146
3147
3148
3149
3150
3151
3152
3153
3154
3155
3156
3157
3158
3159
3160
3161
#X connect 2 0 35 0;
#X connect 10 0 4 0;
#X connect 11 0 32 0;
#X connect 11 1 10 0;
#X connect 11 1 12 0;
#X connect 11 1 13 0;
#X connect 11 1 14 0;
#X connect 11 1 15 0;
#X connect 11 1 16 0;
#X connect 12 0 5 0;
#X connect 13 0 6 0;
#X connect 14 0 8 0;
#X connect 15 0 7 0;
#X connect 16 0 9 0;
#X connect 17 0 18 0;
#X connect 18 0 28 0;
#X connect 19 0 31 2;
#X connect 20 0 31 3;
#X connect 21 0 31 4;
#X connect 22 0 31 5;
#X connect 23 0 31 6;
#X connect 24 0 31 8;
#X connect 25 0 31 9;
#X connect 26 0 31 0;
#X connect 27 0 31 1;
#X connect 29 0 32 0;
#X connect 31 0 17 0;
#X connect 32 0 26 0;
#X connect 32 1 27 0;
#X connect 32 2 19 0;
#X connect 32 3 20 0;
#X connect 32 4 21 0;
#X connect 32 5 22 0;
#X connect 32 6 23 0;
#X connect 32 7 33 0;
#X connect 32 8 24 0;
#X connect 32 9 25 0;
#X connect 33 0 31 7;
#X connect 34 0 35 1;
#X connect 35 0 11 0;
3162
#X restore 19 238 pd note.create;
Roman Haefeli's avatar
Roman Haefeli committed
3163
#N canvas 166 421 345 548 note.delete 0;
3164
3165
3166
#X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note;
#X obj 6 54 route delete;
3167
3168
3169
3170
3171
#X obj 51 492 s \$0.active;
#X msg 51 465 \$1 0;
#X msg 161 423 5;
#X msg 123 422 5;
#X obj 78 327 f;
3172
3173
3174
3175
3176
3177
3178
3179
3180
3181
3182
3183
#N canvas 73 91 410 208 id->pointer 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->pointer.get;
#X obj 40 86 r \$0.convert.id->pointer;
#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;
3184
3185
3186
3187
3188
3189
3190
3191
3192
3193
3194
#X restore 78 354 pd id->pointer;
#X obj 6 152 route -1;
#X obj 6 175 b;
#X msg 6 229 note delete: no such note (\$1 \$2);
#X obj 6 256 s error;
#X obj 6 198 list append;
#X obj 51 303 t a a;
#X obj 78 377 route -1;
#X obj 123 448 set \$0.note x y id vis, f 26;
#X obj 123 399 t b b b b p, f 26;
#X msg 199 422 -1;
Roman Haefeli's avatar
Roman Haefeli committed
3195
3196
3197
3198
#X msg 237 424 0;
#X obj 6 77 t b a;
#X obj 6 107 f;
#X obj 37 108 r \$0.delete.id;
3199
3200
#X connect 0 0 1 0;
#X connect 1 0 2 0;
Roman Haefeli's avatar
Roman Haefeli committed
3201
#X connect 2 0 20 0;
3202
#X connect 4 0 3 0;
Roman Haefeli's avatar
Roman Haefeli committed
3203
3204
3205
3206
3207
3208
3209
3210
3211
3212
3213
3214
3215
3216
3217
3218
3219
3220
3221
3222
3223
3224
3225
#X connect 5 0 16 1;
#X connect 6 0 16 0;
#X connect 7 0 8 0;
#X connect 8 0 15 0;
#X connect 9 0 10 0;
#X connect 9 1 14 0;
#X connect 10 0 13 0;
#X connect 11 0 12 0;
#X connect 13 0 11 0;
#X connect 14 0 4 0;
#X connect 14 1 7 0;
#X connect 15 1 17 0;
#X connect 17 0 6 0;
#X connect 17 1 5 0;
#X connect 17 2 18 0;
#X connect 17 3 19 0;
#X connect 17 4 16 4;
#X connect 18 0 16 2;
#X connect 19 0 16 3;
#X connect 20 0 21 0;
#X connect 20 1 13 1;
#X connect 21 0 9 0;
#X connect 22 0 21 1;
3226
3227
3228
3229
3230
3231
3232
3233
3234
3235
3236
3237
3238
3239
3240
3241
3242
3243
3244
#X restore 19 261 pd note.delete;
#N canvas 0 209 422 584 note.change.duration 0;
#X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note;
#X obj 6 54 route change;
#X obj 6 77 route duration;
#X obj 6 100 t a a, f 49;
#X msg 297 155 \$3;
#X msg 6 123 \$1 \$2;
#X obj 51 392 pack f f;
#X obj 51 433 s \$0.duration;
#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;
3245
3246
#X connect 2 0 3 0;
#X connect 3 0 4 0;
3247
3248
3249
3250
#X connect 3 1 0 0;
#X connect 4 0 5 0;
#X restore 6 168 pd step|pitch->id;
#N canvas 83 99 410 208 id->pointer 0;
3251
3252
3253
3254
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
3255
3256
3257
3258
3259
3260
3261
3262
3263
3264
3265
3266
3267
3268
3269
3270
3271
3272
3273
3274
#X obj 40 63 s \$0.convert.id->pointer.get;
#X obj 40 86 r \$0.convert.id->pointer;
#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 165 384 pd id->pointer;
#N canvas 0 99 405 189 duration->w 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.duration->w.get;
#X obj 40 85 r \$0.convert.duration->w;
#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;
3275
#X restore 210 510 pd duration->w;
3276
3277
3278
3279
3280
3281
3282
3283
3284
3285
3286
#X obj 6 194 route -1;
#X obj 6 145 t a a;
#X obj 6 217 b;
#X obj 6 298 s error;
#X obj 6 240 list append;
#X msg 6 271 note change duration: no such note (\$1 \$2);
#X obj 165 407 route -1;
#X obj 210 456 f;
#X obj 210 433 t b p;
#X text 334 159 duration;
#X obj 51 329 t a a;
3287
3288
#X obj 210 543 set \$0.note w dur;
#X obj 210 479 t a a;
3289
3290
3291
3292
3293
3294
#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 4 0 6 0;
#X connect 4 1 5 0;
3295
#X connect 5 0 19 1;
3296
#X connect 5 0 7 1;
3297
#X connect 6 0 13 0;
3298
#X connect 7 0 8 0;
3299
3300
3301
3302
3303
3304
3305
3306
3307
3308
3309
3310
3311
3312
3313
3314
3315
3316
#X connect 9 0 12 0;
#X connect 10 0 18 0;
#X connect 11 0 23 0;
#X connect 12 0 14 0;
#X connect 12 1 22 0;
#X connect 13 0 9 0;
#X connect 13 1 16 1;
#X connect 14 0 16 0;
#X connect 16 0 17 0;
#X connect 17 0 15 0;
#X connect 18 1 20 0;
#X connect 19 0 24 0;
#X connect 20 0 19 0;
#X connect 20 1 23 2;
#X connect 22 0 7 0;
#X connect 22 1 10 0;
#X connect 24 0 11 0;
#X connect 24 1 23 1;
3317
#X restore 19 284 pd note.change.duration;
3318
#N canvas 103 249 385 658 note.change.velocity 0;
3319
3320
3321
3322
3323
3324
3325
3326
3327
3328
3329
3330
3331
3332
3333
3334
3335
3336
3337
3338
3339
3340
3341
3342
3343
3344
3345
3346
3347
#X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note;
#X obj 6 54 route change;
#X obj 51 410 pack f f;
#X obj 6 77 route velocity;
#X obj 51 450 s \$0.velocity;
#N canvas 320 203 446 363 clr.* 0;
#X obj 28 62 t a a a;
#X obj 28 112 div 100;
#X obj 78 113 mod 100;
#X obj 78 136 div 10;
#X obj 128 112 mod 10;
#X obj 28 165 *;
#X obj 28 188 int;
#X obj 78 165 *;
#X obj 78 188 int;
#X obj 128 165 *;
#X obj 128 188 int;
#X obj 230 103 inlet;
#X obj 28 212 min 9;
#X obj 78 212 min 9;
#X obj 128 212 min 9;
#X obj 28 235 * 100;
#X obj 78 235 * 10;
#X obj 128 235 * 1;
#X obj 28 262 +;
#X obj 28 285 +;
#X obj 28 311 outlet;
#X obj 28 24 inlet;
3348
#X connect 0 0 1 0;
3349
3350
3351
#X connect 0 1 2 0;
#X connect 0 2 4 0;
#X connect 1 0 5 0;
3352
#X connect 2 0 3 0;
3353
3354
#X connect 3 0 7 0;
#X connect 4 0 9 0;
3355
#X connect 5 0 6 0;
3356
#X connect 6 0 12 0;
3357
#X connect 7 0 8 0;
3358
3359
3360
3361
3362
3363
3364
3365
3366
3367
3368
3369
3370
3371
3372
3373
3374
3375
3376
3377
#X connect 8 0 13 0;
#X connect 9 0 10 0;
#X connect 10 0 14 0;
#X connect 11 0 9 1;
#X connect 11 0 7 1;
#X connect 11 0 5 1;
#X connect 12 0 15 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 18 1;
#X connect 17 0 19 1;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 21 0 0 0;
#X restore 271 569 pd clr.*;
#X obj 317 508 / 113;
#X obj 216 608 set \$0.note vel c, f 19;
#X obj 51 321 t a a;
#X obj 271 480 get \$0.note gid;
3378
3379
3380
3381
3382
3383
3384
3385
3386
3387
3388
3389
#N canvas 83 99 410 208 id->pointer 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->pointer.get;
#X obj 40 86 r \$0.convert.id->pointer;
#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;
3390
3391
#X restore 171 353 pd id->pointer;
#N canvas 83 99 410 208 gid->gclr 0;
3392
3393
3394
3395
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
3396
3397
#X obj 40 63 s \$0.convert.gid->gclr.get;
#X obj 40 86 r \$0.convert.gid->gclr;
3398
3399
3400
3401
3402
#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;
3403
3404
3405
3406
3407
3408
#X restore 271 537 pd gid->gclr;
#X obj 6 100 t a a, f 38;
#X msg 6 123 \$1 \$2;
#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;
3409
3410
3411
3412
#X obj 13 14 inlet;
#X obj 13 37 t b a;
#X obj 13 114 list append;
#X obj 13 137 outlet;
3413
3414
3415
3416
3417
3418
3419
3420
3421
3422
3423
3424
3425
3426
3427
3428
3429
3430
#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 6 168 pd step|pitch->id;
#X obj 6 194 route -1;
#X obj 6 145 t a a;
#X obj 6 217 b;
#X obj 6 298 s error;
#X obj 6 240 list append;
#X msg 6 271 note change velocity: no such note (\$1 \$2);
#X msg 231 135 \$3;
#X text 258 135 velocity;
#X obj 171 376 route -1;
#X obj 216 478 f;
#X obj 231 400 t a a;
#X obj 216 435 t b p p, f 19;
3431
3432
#X connect 0 0 1 0;
#X connect 1 0 2 0;
3433
3434
3435
3436
3437
3438
3439
3440
3441
3442
3443
3444
3445
3446
3447
3448
3449
3450
3451
3452
3453
3454
3455
3456
3457
3458
3459
3460
3461
3462
3463
#X connect 2 0 4 0;
#X connect 3 0 5 0;
#X connect 4 0 13 0;
#X connect 6 0 8 1;
#X connect 7 0 6 1;
#X connect 9 0 3 0;
#X connect 9 1 11 0;
#X connect 10 0 12 0;
#X connect 11 0 24 0;
#X connect 12 0 6 0;
#X connect 13 0 14 0;
#X connect 13 1 22 0;
#X connect 14 0 17 0;
#X connect 15 0 16 0;
#X connect 16 0 18 0;
#X connect 16 1 9 0;
#X connect 17 0 15 0;
#X connect 17 1 20 1;
#X connect 18 0 20 0;
#X connect 20 0 21 0;
#X connect 21 0 19 0;
#X connect 22 0 3 1;
#X connect 22 0 26 0;
#X connect 24 1 27 0;
#X connect 25 0 8 0;
#X connect 26 0 25 1;
#X connect 26 1 7 0;
#X connect 27 0 25 0;
#X connect 27 1 10 0;
#X connect 27 2 8 2;
#X restore 19 307 pd note.change.velocity;
3464
#N canvas 202 202 384 665 note.change.gid 0;
3465
3466
3467
#X obj 6 8 r \$0.global.receive;
#X obj 6 31 route note;
#X obj 6 54 route change;
3468
3469
3470
3471
3472
3473
3474
3475
3476
3477
3478
3479
3480
3481
3482
3483
3484
3485
3486
3487
3488
3489
3490
#X obj 6 77 route gid;
#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;
#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 6 175 pd step|pitch->id;
#X obj 6 198 route -1;
#X obj 6 100 t a a, f 35;
#X msg 6 128 \$1 \$2;
#X obj 6 224 b;
#X obj 6 305 s error;
#X obj 6 247 list append;
#X msg 6 278 note change gid: no such note (\$1 \$2);
#X obj 6 151 t a a;
#X msg 213 129 \$3;
3491
3492
3493
3494
3495
3496
3497
3498
3499
3500
3501
3502
3503
3504
3505
3506
3507
3508
3509
3510
3511
3512
3513
3514
3515
3516
3517
#N canvas 320 203 446 363 clr.* 0;
#X obj 28 62 t a a a;
#X obj 28 112 div 100;
#X obj 78 113 mod 100;
#X obj 78 136 div 10;
#X obj 128 112 mod 10;
#X obj 28 165 *;
#X obj 28 188 int;
#X obj 78 165 *;
#X obj 78 188 int;
#X obj 128 165 *;
#X obj 128 188 int;
#X obj 230 103 inlet;
#X obj 28 212 min 9;
#X obj 78 212 min 9;
#X obj 128 212 min 9;
#X obj 28 235 * 100;
#X obj 78 235 * 10;
#X obj 128 235 * 1;
#X obj 28 262 +;
#X obj 28 285 +;
#X obj 28 311 outlet;
#X obj 28 24 inlet;
#X connect 0 0 1 0;
#X connect 0 1 2 0;
#X connect 0 2 4 0;
#X connect 1 0 5 0;
3518
#X connect 2 0 3 0;
3519
3520
3521
3522
3523
3524
3525
3526
3527
3528
3529
3530
3531
3532
3533
3534
3535
3536
3537
3538
#X connect 3 0 7 0;
#X connect 4 0 9 0;
#X connect 5 0 6 0;
#X connect 6 0 12 0;
#X connect 7 0 8 0;
#X connect 8 0 13 0;
#X connect 9 0 10 0;
#X connect 10 0 14 0;
#X connect 11 0 9 1;
#X connect 11 0 7 1;
#X connect 11 0 5 1;
#X connect 12 0 15 0;
#X connect 13 0 16 0;
#X connect 14 0 17 0;
#X connect 15 0 18 0;
#X connect 16 0 18 1;
#X connect 17 0 19 1;
#X connect 18 0 19 0;
#X connect 19 0 20 0;
#X connect 21 0 0 0;
3539
3540
#X restore 199 577 pd clr.*;
#X obj 227 511 / 113;
3541
3542
3543
3544
3545
3546
3547
#N canvas 83 99 410 208 id->pointer 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->pointer.get;
#X obj 40 86 r \$0.convert.id->pointer;
3548
3549
3550
3551
3552
#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;
3553
#X restore 127 366 pd id->pointer;
3554
3555
3556
3557
3558
3559
3560
3561
3562
3563
3564
3565
#N canvas 83 99 410 208 gid->gclr 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.gid->gclr.get;
#X obj 40 86 r \$0.convert.gid->gclr;
#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;
3566
3567
3568
3569
3570
3571
3572
3573
3574
3575
#X restore 199 545 pd gid->gclr;
#X obj 127 389 route -1;
#X obj 172 491 f;
#X obj 172 448 t b p p, f 19;
#X obj 51 363 pack f f;
#X obj 51 325 t a a;
#X obj 51 390 s \$0.gid;
#X obj 227 483 get \$0.note vel;
#X obj 172 621 set \$0.note gid c, f 19;
#X obj 172 514 t a a;
3576
3577
#X connect 0 0 1 0;
#X connect 1 0 2 0;
3578
3579
3580
3581
3582
#X connect 2 0 3 0;
#X connect 3 0 6 0;
#X connect 4 0 5 0;
#X connect 5 0 8 0;
#X connect 5 1 22 0;
3583
#X connect 6 0 7 0;
3584
#X connect 6 1 13 0;
3585
#X connect 7 0 12 0;
3586
3587
3588
3589
3590
3591
3592
3593
3594
#X connect 8 0 10 0;
#X connect 10 0 11 0;
#X connect 11 0 9 0;
#X connect 12 0 4 0;
#X connect 12 1 10 1;
#X connect 13 0 21 1;
#X connect 13 0 19 1;
#X connect 14 0 25 1;
#X connect 15 0 14 1;
3595
#X connect 16 0 18 0;
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606
3607
#X connect 17 0 14 0;
#X connect 18 1 20 0;
#X connect 19 0 26 0;
#X connect 20 0 19 0;
#X connect 20 1 24 0;
#X connect 20 2 25 2;
#X connect 21 0 23 0;
#X connect 22 0 21 0;
#X connect 22 1 16 0;
#X connect 24 0 15 0;
#X connect 26 0 25 0;
#X connect 26 1 17 0;
3608
#X restore 19 330 pd note.change.gid;
Roman Haefeli's avatar
Roman Haefeli committed
3609
#N canvas 344 165 401 476 inspector 0;
3610
3611
3612
3613
3614
3615
3616
3617
3618
3619
3620
3621
3622
3623
#X obj 42 89 t a a a a a a;
#X obj 117 113 tabread \$0.active;
#X obj 102 158 tabread \$0.step;
#X obj 87 205 tabread \$0.pitch;
#X obj 72 252 tabread \$0.duration;
#X obj 57 299 tabread \$0.velocity;
#X obj 42 349 tabread \$0.gid;
#X msg 42 372 gid \$1;
#X msg 57 322 velocity \$1;
#X msg 72 275 duration \$1;
#X msg 87 228 pitch \$1;
#X msg 117 136 active \$1;
#X obj 42 59 t a a, f 30;
#X obj 117 435 print NOTE;
3624
#X floatatom 42 19 5 0 0 0 - - -;
3625
3626
3627
3628
3629
3630
3631
3632
3633
3634
3635
3636
3637
3638
3639
3640
3641
3642
3643
3644
3645
3646
3647
3648
#X msg 219 290 -- ID \$1 ------------;
#X msg 102 181 step \$1;
#X connect 0 0 6 0;
#X connect 0 1 5 0;
#X connect 0 2 4 0;
#X connect 0 3 3 0;
#X connect 0 4 2 0;
#X connect 0 5 1 0;
#X connect 1 0 11 0;
#X connect 2 0 16 0;
#X connect 3 0 10 0;
#X connect 4 0 9 0;
#X connect 5 0 8 0;
#X connect 6 0 7 0;
#X connect 7 0 13 0;
#X connect 8 0 13 0;
#X connect 9 0 13 0;
#X connect 10 0 13 0;
#X connect 11 0 13 0;
#X connect 12 0 0 0;
#X connect 12 1 15 0;
#X connect 14 0 12 0;
#X connect 15 0 13 0;
#X connect 16 0 13 0;
3649
#X restore 430 497 pd inspector;
Roman Haefeli's avatar
Roman Haefeli committed
3650
3651
3652
3653
#N canvas 0 99 393 172 errors 0;
#X obj 15 14 r error;
#X obj 15 37 print ERROR:;
#X connect 0 0 1 0;
3654
#X restore 350 497 pd errors;
3655
3656
3657
3658
#X msg 206 69 \; \$1.stepsperpage 64 \; \$1.page 0 \; \$1.pitchrange
48 \; \$1.stepviswidth 15 \; \$1.stepvisheight 14 \; \$1.canvastopmargin
53 \; \$1.canvasleftmargin 30 \; \$1.stepkeycolor1 887 \; \$1.stepkeycolor2
777 \; \$1.griddivision 4 \; \$1.gridsubdivision 4 \; \$1.gidcolorlist
3659
800 840 80 68 408 808 \; \$1.default.vel 64 \; \$1.default.gid 0 \;
3660
\$1.default.dur 4 \; \$1.default.show 0 \; \$1.init bang \;;
Roman Haefeli's avatar
Roman Haefeli committed
3661
3662
3663
3664
3665
3666
3667
3668
3669
3670
3671
3672
3673
3674
3675
3676
3677
3678
3679
3680
3681
3682
3683
3684
3685
3686
3687
3688
3689
3690
3691
3692
3693
3694
3695
3696
3697
3698
3699
3700
3701
3702
3703
3704
3705
3706
3707
3708
3709
3710
3711
#X obj 20 387 t a a a;
#X obj 39 442 s \$0.seq.receive;
#N canvas 0 99 450 300 manaage.id 0;
#X obj 13 22 inlet;
#N canvas 0 99 391 254 prepend.id 0;
#X obj 32 66 array min \$0.active;
#X obj 32 89 sel 0;
#X obj 32 123 f;
#X obj 32 13 inlet;
#X obj 32 190 outlet;
#X obj 94 176 s error;
#X msg 94 152 note create: note buffer full!;
#X obj 59 123 t b b;
#X msg 59 146 -1;
#X obj 32 36 b;
#X connect 0 0 1 0;
#X connect 0 1 2 1;
#X connect 1 0 2 0;
#X connect 1 1 7 0;
#X connect 2 0 4 0;
#X connect 3 0 9 0;
#X connect 6 0 5 0;
#X connect 7 0 8 0;
#X connect 7 1 6 0;
#X connect 8 0 4 0;
#X connect 9 0 0 0;
#X restore 13 150 pd prepend.id;
#X obj 13 173 s \$0.create.id;
#X obj 13 45 route note;
#X obj 13 73 route create delete;
#N canvas 80 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;
#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 68 99 pd step|pitch->id;
#X obj 68 122 s \$0.delete.id;
#X connect 0 0 3 0;
#X connect 1 0 2 0;
#X connect 3 0 4 0;
#X connect 4 0 1 0;
#X connect 4 1 5 0;
#X connect 5 0 6 0;
#X restore 59 417 pd manaage.id;
3712
3713
3714
3715
3716
3717
3718
3719
3720
3721
3722
3723
3724
3725
3726
3727
3728
3729
3730
3731
3732
3733
3734
3735
3736
3737
3738
3739
3740
3741
3742
3743
#N canvas 0 99 421 294 parse.config.commands 0;
#X obj 10 221 s;
#X obj 10 18 r \$0.global.receive;
#X obj 10 64 list split 1;
#X obj 10 106 list prepend \$0;
#X msg 10 129 symbol \$1.\$2;
#X obj 10 189 list append;
#X obj 10 152 t b a;
#X obj 10 41 route set redraw page, f 54;
#X obj 251 150 s \$0.page;
#X obj 224 71 max 1;
#X obj 117 105 b;
#X obj 117 128 s \$0.redraw;
#X obj 224 94 t b a;
#X obj 251 125 - 1;
#X connect 1 0 7 0;
#X connect 2 0 3 0;
#X connect 2 1 5 1;
#X connect 3 0 4 0;
#X connect 4 0 6 0;
#X connect 5 0 0 0;
#X connect 6 0 5 0;
#X connect 6 1 0 1;
#X connect 7 0 2 0;
#X connect 7 1 10 0;
#X connect 7 2 9 0;
#X connect 9 0 12 0;
#X connect 10 0 11 0;
#X connect 12 0 10 0;
#X connect 12 1 13 0;
#X connect 13 0 8 0;
#X restore 290 22 pd parse.config.commands;
3744
#X connect 0 0 31 0;
3745
#X connect 1 0 2 0;
Roman Haefeli's avatar
Roman Haefeli committed
3746
#X connect 2 0 56 0;
3747
#X connect 3 0 2 0;
3748
3749
3750
#X connect 4 0 31 0;
#X connect 7 0 31 0;
#X connect 9 0 31 0;
3751
#X connect 11 0 12 0;
3752
3753
3754
3755
3756
3757
#X connect 12 0 40 0;
#X connect 12 0 41 0;
#X connect 12 0 42 0;
#X connect 12 0 43 0;
#X connect 12 0 44 0;
#X connect 12 0 45 0;
3758
3759
3760
3761
3762
#X connect 13 0 14 0;
#X connect 13 1 9 0;
#X connect 13 2 4 0;
#X connect 13 3 7 0;
#X connect 13 4 0 0;
3763
3764
3765
#X connect 14 0 31 0;
#X connect 16 0 26 0;
#X connect 25 0 28 0;
3766
#X connect 27 0 57 0;
3767
3768
3769
3770
3771
3772
3773
3774
#X connect 29 0 25 0;
#X connect 33 0 37 0;
#X connect 34 0 36 0;
#X connect 36 0 38 0;
#X connect 36 1 35 0;
#X connect 37 0 39 0;
#X connect 37 1 13 0;
#X connect 46 0 13 0;
Roman Haefeli's avatar
Roman Haefeli committed
3775
3776
3777
#X connect 57 0 17 0;
#X connect 57 1 58 0;
#X connect 57 2 59 0;
For faster browsing, not all history is shown. View entire blame