hi !

Just make your segment longer, or use iLine instead of iSeg.

Cheers,
Damien.

jörg brinkmann a écrit :
> hello pdlers,
>
> the pmpd library is superfun to play with. 
>
> but i need some help with my simple patch (shaker)
>
> does someone knows, why the balls in my patch sometimes fall out of the 
> shaker ?
>
> (this happens when you shake it too hard)
>
> thanks for any help !
>
> greetz
>
>
>
>
>
>
>
>   
> ------------------------------------------------------------------------
>
> _______________________________________________
> Pd-list@iem.at mailing list
> UNSUBSCRIBE and account-management -> 
> http://lists.puredata.info/listinfo/pd-list
>   
#N canvas 601 33 852 602 10;
#X obj 11 43 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1
;
#X obj 74 77 loadbang;
#X msg 64 114 reset;
#X msg 185 104 0 \, destroy;
#X obj 6 169 s mass;
#X obj 147 470 gemhead;
#X obj 147 503 translateXYZ;
#X obj 136 443 unpack s f f;
#X obj 43 395 gemmouse;
#X msg 43 438 \; mass reset \;;
#X msg 173 82 reset \, create \, 1;
#X text 36 42 <- 2;
#X obj 173 151 gemwin 50;
#X obj 295 466 gemhead;
#X obj 295 499 translateXYZ;
#X obj 284 439 unpack s f f;
#X obj 147 532 sphere 0.1;
#X obj 295 528 sphere 0.1;
#X obj 411 465 gemhead;
#X obj 411 498 translateXYZ;
#X obj 400 438 unpack s f f;
#X obj 411 527 sphere 0.1;
#X obj 283 416 mass2D mass 10 1 1;
#X obj 399 415 mass2D mass 10 1.5 1;
#X obj 159 187 iAmbient2D mass 0 -0.005 0 0 0.03;
#X obj 24 564 s mousx;
#X obj 16 511 s mousy;
#X obj 588 80 r mousx;
#X obj 511 81 r mousy;
#X text 300 83 <- 1;
#X text 754 51 <- 3;
#X text 505 51 click into the window and move the cursor;
#X floatatom 588 101 5 0 0 0 - - -;
#X floatatom 511 106 5 0 0 0 - - -;
#X obj 510 215 s shakey;
#X obj 589 214 s shakex;
#X obj 119 295 r shakey;
#X obj 365 296 r shakex;
#X obj 282 294 r shakey;
#X obj 444 294 r shakey;
#X obj 599 296 r shakey;
#X obj 533 297 r shakex;
#X obj 34 293 r shakex;
#X obj 197 295 r shakex;
#X obj 66 188 s metrobang;
#X obj 22 268 r metrobang;
#X obj 184 270 r metrobang;
#X obj 515 276 r metrobang;
#X obj 350 271 r metrobang;
#X obj 511 130 - 250;
#X obj 588 127 - 250;
#X obj 511 154 / 250;
#X obj 588 152 / 250;
#X obj 135 421 mass2D mass 10 0 1;
#X obj 589 179 * 4;
#X obj 511 181 * -4;
#X obj 282 320 - 3;
#X obj 119 320 + 3;
#X obj 533 322 + 2;
#X obj 365 323 - 2;
#X text 660 109 transforms values into GEM coordinates (from x=-4 to
x=4 \, from y=-4 to y=4);
#N canvas 699 177 384 387 top--- 0;
#X obj -7 78 inlet;
#X obj 29 322 curve 2;
#X obj 27 258 gemhead;
#X msg 42 57 setX1 \$1;
#X msg 107 58 setY1 \$1;
#X msg 174 58 setX2 \$1;
#X msg 241 57 setY2 \$1;
#X obj 36 23 inlet;
#X obj 110 27 inlet;
#X obj 177 27 inlet;
#X obj 242 26 inlet;
#X obj 21 211 pack f f 0;
#X obj 106 215 pack f f 0;
#X obj 142 167 t b f;
#X obj 52 169 t b f;
#X text 274 117 upper border;
#X text 81 324 upper stripe;
#X obj -7 114 iSeg2D mass 0 0 0 0 200 0 0 0.4 0.4 0.4;
#X connect 0 0 17 0;
#X connect 2 0 1 0;
#X connect 3 0 17 0;
#X connect 4 0 17 0;
#X connect 5 0 17 0;
#X connect 6 0 17 0;
#X connect 7 0 3 0;
#X connect 7 0 11 0;
#X connect 8 0 4 0;
#X connect 8 0 14 0;
#X connect 9 0 5 0;
#X connect 9 0 12 0;
#X connect 10 0 6 0;
#X connect 10 0 13 0;
#X connect 11 0 1 1;
#X connect 12 0 1 2;
#X connect 13 0 12 0;
#X connect 13 1 12 1;
#X connect 14 0 11 0;
#X connect 14 1 11 1;
#X restore 22 354 pd top---;
#N canvas 222 252 480 347 bottom--- 0;
#X obj 10 44 inlet;
#X obj 57 278 curve 2;
#X obj 54 247 gemhead;
#X text 66 312 Bezierkurve (2 punkte x/y/z ergeben einen Strich);
#X msg 69 67 setX1 \$1;
#X msg 134 68 setY1 \$1;
#X msg 201 68 setX2 \$1;
#X msg 268 67 setY2 \$1;
#X obj 68 40 inlet;
#X obj 137 37 inlet;
#X obj 204 37 inlet;
#X obj 269 36 inlet;
#X obj 145 189 pack f f 0;
#X obj 28 187 pack f f 0;
#X obj 175 152 t b f;
#X obj 57 156 t b f;
#X text 295 112 lower border;
#X text 125 278 lower stripe;
#X obj 316 213 iLine2D;
#X obj 14 110 iSeg2D mass 0 0 0 0 200 0 0 0.4 0.4 0.4;
#X connect 0 0 19 0;
#X connect 2 0 1 0;
#X connect 4 0 19 0;
#X connect 5 0 19 0;
#X connect 6 0 19 0;
#X connect 7 0 19 0;
#X connect 8 0 4 0;
#X connect 8 0 13 0;
#X connect 9 0 5 0;
#X connect 9 0 15 0;
#X connect 10 0 6 0;
#X connect 10 0 12 0;
#X connect 11 0 7 0;
#X connect 11 0 14 0;
#X connect 12 0 1 2;
#X connect 13 0 1 1;
#X connect 14 0 12 0;
#X connect 14 1 12 1;
#X connect 15 0 13 0;
#X connect 15 1 13 1;
#X restore 184 353 pd bottom---;
#N canvas 27 172 336 347 left--- 0;
#X obj 15 29 inlet;
#X obj 21 300 curve 2;
#X obj 18 228 gemhead;
#X msg 69 60 setX1 \$1;
#X msg 134 61 setY1 \$1;
#X msg 201 61 setX2 \$1;
#X msg 268 60 setY2 \$1;
#X obj 61 32 inlet;
#X obj 130 29 inlet;
#X obj 197 29 inlet;
#X obj 273 27 inlet;
#X obj 78 232 pack f f 0;
#X obj 198 238 pack f f 0;
#X obj 86 181 t b f;
#X obj 226 191 t b f;
#X text 68 300 left stripe;
#X text 254 139 left border;
#X obj 20 139 iSeg2D mass 0 0 0 0 200 0 0 0.4 0.4 0.5;
#X connect 0 0 17 0;
#X connect 2 0 1 0;
#X connect 3 0 17 0;
#X connect 4 0 17 0;
#X connect 5 0 17 0;
#X connect 6 0 17 0;
#X connect 7 0 3 0;
#X connect 7 0 11 0;
#X connect 8 0 4 0;
#X connect 8 0 13 0;
#X connect 9 0 5 0;
#X connect 9 0 12 0;
#X connect 10 0 6 0;
#X connect 10 0 14 0;
#X connect 11 0 1 1;
#X connect 12 0 1 2;
#X connect 13 0 11 0;
#X connect 13 1 11 1;
#X connect 14 0 12 0;
#X connect 14 1 12 1;
#X restore 350 356 pd left---;
#N canvas 453 191 387 337 right--- 0;
#X obj 10 9 inlet;
#X obj 78 298 curve 2;
#X obj 76 234 gemhead;
#X msg 60 56 setX1 \$1;
#X msg 125 57 setY1 \$1;
#X msg 191 58 setX2 \$1;
#X msg 259 56 setY2 \$1;
#X obj 59 29 inlet;
#X obj 128 26 inlet;
#X obj 195 26 inlet;
#X obj 260 25 inlet;
#X obj 73 191 pack f f 0;
#X obj 174 191 pack f f 0;
#X obj 201 150 t b f;
#X obj 96 144 t b f;
#X text 253 115 right border;
#X text 131 299 right stripe;
#X obj 18 114 iSeg2D mass 0 0 0 0 200 0 0 0.4 0.4 0.5;
#X connect 0 0 17 0;
#X connect 2 0 1 0;
#X connect 3 0 17 0;
#X connect 4 0 17 0;
#X connect 5 0 17 0;
#X connect 6 0 17 0;
#X connect 7 0 3 0;
#X connect 7 0 11 0;
#X connect 8 0 4 0;
#X connect 8 0 14 0;
#X connect 9 0 5 0;
#X connect 9 0 12 0;
#X connect 10 0 6 0;
#X connect 10 0 13 0;
#X connect 11 0 1 1;
#X connect 12 0 1 2;
#X connect 13 0 12 0;
#X connect 13 1 12 1;
#X connect 14 0 11 0;
#X connect 14 1 11 1;
#X restore 515 352 pd right---;
#X text 540 415 Balls (mass/x-ini/y-ini);
#X text 646 336 sets the coordinates of the borders and stripes;
#X text 707 530 shake it baby !!!;
#X obj 11 64 metro 5;
#X obj 16 484 f;
#X obj 22 537 f;
#X obj 9 91 t b b b;
#X obj 34 320 + 5;
#X obj 76 321 - 5;
#X obj 197 321 - 5;
#X obj 240 321 + 5;
#X obj 406 320 + 5;
#X obj 444 320 - 5;
#X obj 560 321 - 5;
#X obj 599 321 + 5;
#X connect 0 0 68 0;
#X connect 1 0 2 0;
#X connect 2 0 4 0;
#X connect 3 0 12 0;
#X connect 5 0 6 0;
#X connect 6 0 16 0;
#X connect 7 1 6 1;
#X connect 7 2 6 2;
#X connect 8 0 70 1;
#X connect 8 1 69 1;
#X connect 8 2 9 0;
#X connect 10 0 12 0;
#X connect 13 0 14 0;
#X connect 14 0 17 0;
#X connect 15 1 14 1;
#X connect 15 2 14 2;
#X connect 18 0 19 0;
#X connect 19 0 21 0;
#X connect 20 1 19 1;
#X connect 20 2 19 2;
#X connect 22 0 15 0;
#X connect 23 0 20 0;
#X connect 27 0 32 0;
#X connect 28 0 33 0;
#X connect 32 0 50 0;
#X connect 33 0 49 0;
#X connect 36 0 57 0;
#X connect 37 0 59 0;
#X connect 38 0 56 0;
#X connect 39 0 76 0;
#X connect 39 0 77 0;
#X connect 40 0 78 0;
#X connect 40 0 79 0;
#X connect 41 0 58 0;
#X connect 42 0 72 0;
#X connect 42 0 73 0;
#X connect 43 0 74 0;
#X connect 43 0 75 0;
#X connect 45 0 61 0;
#X connect 46 0 62 0;
#X connect 47 0 64 0;
#X connect 48 0 63 0;
#X connect 49 0 51 0;
#X connect 50 0 52 0;
#X connect 51 0 55 0;
#X connect 52 0 54 0;
#X connect 53 0 7 0;
#X connect 54 0 35 0;
#X connect 55 0 34 0;
#X connect 56 0 62 4;
#X connect 56 0 62 2;
#X connect 57 0 61 4;
#X connect 57 0 61 2;
#X connect 58 0 64 1;
#X connect 58 0 64 3;
#X connect 59 0 63 3;
#X connect 59 0 63 1;
#X connect 68 0 71 0;
#X connect 69 0 26 0;
#X connect 70 0 25 0;
#X connect 71 0 69 0;
#X connect 71 0 70 0;
#X connect 71 1 4 0;
#X connect 71 2 24 0;
#X connect 71 2 44 0;
#X connect 72 0 61 1;
#X connect 73 0 61 3;
#X connect 74 0 62 1;
#X connect 75 0 62 3;
#X connect 76 0 63 2;
#X connect 77 0 63 4;
#X connect 78 0 64 2;
#X connect 79 0 64 4;
_______________________________________________
Pd-list@iem.at mailing list
UNSUBSCRIBE and account-management -> 
http://lists.puredata.info/listinfo/pd-list

Reply via email to