Update of /cvsroot/pure-data/externals/nusmuk/msd2D In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv27149/msd2D
Added Files: 05_msd2DDataStruct.pd make_anim.pd structures.pd Log Message: MSD Version 0.05
--- NEW FILE: make_anim.pd --- #N struct mass float x float y float mid float mob; #N struct fixmass float x float y float mid; #N canvas 327 365 669 506 10; #X obj 352 260 pointer; #X obj 86 83 spigot; #X obj 227 148 bng 24 250 50 0 $0-create empty Create 0 -6 0 8 -262144 -1 -1; #X obj 316 76 r $0-create; #X obj 123 50 r $0-listen; #X obj 533 184 s $0-listen; #X msg 533 159 1; #X obj 316 98 t b b b b b; #X obj 199 217 s $0-listen; #X msg 199 191 0; #N canvas 0 0 870 770 1002-anim 0; #X scalar mass 501.859 143.462 2 0 ;; #X scalar mass 385.528 207.845 3 0 ;; #X scalar mass 563.885 96.7994 4 0 ;; #X scalar mass 436.681 183.23 5 0 ;; #X scalar mass 677.97 25.7242 6 0 ;; #X scalar mass 635.854 51.7641 7 0 ;; #X scalar fixmass 287 68 0 ;; #X scalar fixmass 56 223 1 ;; #X restore 220 25 pd $0-anim; #X obj 446 329 makefilename pd-%s; #X obj 446 283 loadbang; #X msg 446 261 bang; #X obj 446 353 s $0-cnv; #X obj 400 137 symbol; #X obj 407 98 r $0-cnv; #X obj 352 137 symbol; #X msg 352 228 traverse $1 , bang; #X obj 86 27 inlet; #X obj 143 326 tgl 15 0 empty empty poll 0 -6 0 8 -262144 -1 -1 1 1 ; #X msg 400 160 ; $1 clear ;; #X obj 464 376 r $0-cnv; #X obj 413 334 tgl 15 0 empty empty view 0 -6 0 8 -262144 -1 -1 0 1 ; #X obj 413 403 pack 0 s; #X msg 413 434 ; $2 vis $1; #X obj 59 376 metro 40; #X obj 59 401 s $0-create; #X obj 284 221 outlet; #X obj 446 305 symbol $1; #N canvas 683 281 568 586 make_link 0; #X obj 165 35 inlet; #X obj 367 438 inlet; #X obj 236 135 s $0-mass2; #X obj 334 305 r $0-mass2; #X obj 293 283 r $0-mass1; #X obj 203 159 s $0-mass1; #N canvas 0 0 591 644 look4mass2 0; #X msg 228 199 next; #X obj 228 463 spigot; #X obj 228 386 pack 0 0; #X obj 228 508 unpack 0 0; #X obj 295 411 r $0-mass2; #X obj 228 562 outlet; #X obj 293 564 outlet; #X obj 228 68 inlet; #X obj 228 90 t b b; #X obj 437 327 select 0; #X obj 137 319 get mass x y mid; #X obj 281 317 get fixmass x y mid; #X obj 265 437 == -1; #X obj 367 247 print lookmass1; #X msg 404 136 traverse pd-data , next; #X obj 228 229 pointer; #X connect 0 0 15 0; #X connect 1 0 3 0; #X connect 2 0 1 0; #X connect 3 0 5 0; #X connect 3 1 6 0; #X connect 4 0 12 1; #X connect 7 0 8 0; #X connect 8 0 0 0; #X connect 8 1 14 0; #X connect 9 0 0 0; #X connect 10 0 2 0; #X connect 10 1 2 1; #X connect 10 2 12 0; #X connect 11 0 2 0; #X connect 11 1 2 1; #X connect 11 2 12 0; #X connect 12 0 1 1; #X connect 12 0 9 0; #X connect 14 0 15 0; #X connect 15 0 10 0; #X connect 15 0 11 0; #X connect 15 1 13 0; #X restore 184 267 pd look4mass2; #X obj 165 67 t b b a a; #X msg 203 113 $3; #X msg 236 113 $4; #N canvas 0 0 591 644 look4mass1 0; #X msg 228 199 next; #X obj 228 463 spigot; #X obj 228 386 pack 0 0; #X obj 228 508 unpack 0 0; #X obj 228 562 outlet; #X obj 293 564 outlet; #X obj 228 68 inlet; #X obj 228 90 t b b; #X obj 437 327 select 0; #X obj 228 229 pointer mass fixmass; #X obj 137 319 get mass x y mid; #X obj 281 317 get fixmass x y mid; #X obj 295 384 r $0-mass1; #X obj 265 437 == -1; #X msg 404 136 traverse pd-data , bang; #X connect 0 0 9 0; #X connect 1 0 3 0; #X connect 2 0 1 0; #X connect 3 0 4 0; #X connect 3 1 5 0; #X connect 6 0 7 0; #X connect 7 0 0 0; #X connect 7 1 14 0; #X connect 8 0 0 0; #X connect 9 0 10 0; #X connect 9 1 11 0; #X connect 10 0 2 0; #X connect 10 1 2 1; #X connect 10 2 13 0; #X connect 11 0 2 0; #X connect 11 1 2 1; #X connect 11 2 13 0; #X connect 12 0 13 1; #X connect 13 0 1 1; #X connect 13 0 8 0; #X connect 14 0 9 0; #X restore 160 241 pd look4mass1; #X obj 121 463 append liaison x1 y1 x2 y2 mid1 mid2; #X obj 159 358 pack 0 0 0 0 0 0; #X obj 167 417 print linklist; #X connect 0 0 7 0; #X connect 1 0 11 6; #X connect 3 0 12 5; #X connect 4 0 12 4; #X connect 6 0 12 2; #X connect 6 1 12 3; #X connect 7 0 10 0; #X connect 7 1 6 0; #X connect 7 2 8 0; #X connect 7 3 9 0; #X connect 8 0 5 0; #X connect 9 0 2 0; #X connect 10 0 12 0; #X connect 10 1 12 1; #X connect 12 0 11 0; #X connect 12 0 13 0; #X restore 273 411 pd make_link; #X text 216 384 LATER:; #X obj 86 113 route Mass linksPos; #X msg 284 198 infosL , get linksPos; #X obj 192 345 append liaison x1 y1 x2 y2; #X msg 195 325 $2 $3 $4 $5; #X obj 141 257 append mass mid x y; #X msg 141 168 $1 $5 $6; #X obj 86 142 t a a; #X msg 62 166 $3; #X obj 62 283 set mass mob; #X obj 62 229 * 0; #X connect 0 0 30 1; #X connect 0 0 34 4; #X connect 0 0 36 3; #X connect 1 0 32 0; #X connect 3 0 7 0; #X connect 4 0 1 1; #X connect 6 0 5 0; #X connect 7 0 9 0; #X connect 7 1 33 0; #X connect 7 2 17 0; #X connect 7 3 15 0; #X connect 7 4 6 0; #X connect 7 4 13 0; #X connect 9 0 8 0; #X connect 11 0 14 0; #X connect 12 0 29 0; #X connect 13 0 29 0; #X connect 15 0 21 0; #X connect 16 0 15 1; #X connect 16 0 17 1; #X connect 17 0 18 0; #X connect 18 0 0 0; #X connect 19 0 1 0; #X connect 20 0 26 0; #X connect 22 0 24 1; #X connect 23 0 24 0; #X connect 24 0 25 0; #X connect 26 0 27 0; #X connect 29 0 11 0; #X connect 32 0 38 0; #X connect 32 1 35 0; #X connect 33 0 28 0; #X connect 35 0 34 0; #X connect 36 0 40 1; #X connect 37 0 36 0; #X connect 38 0 39 0; #X connect 38 1 37 0; #X connect 39 0 41 0; #X connect 41 0 40 0; #X coords 0 0 1 1 120 80 1;
--- NEW FILE: 05_msd2DDataStruct.pd --- #N struct liaison float x1 float y1 float x2 float y2 float mid1 float mid2 float lid; #N struct mass float x float y float mid float mob; #N struct fixmass float x float y float mid; #N canvas 391 53 852 890 10; #X obj 52 15 loadbang; #X obj 52 501 msd2D --------------------------------; #X obj 135 274 t a; #X obj 135 20 bng 15 250 50 0 empty empty empty 0 -6 0 8 -262131 -1 -1; #X msg 207 71 reset; #X text 173 21 reset; #X obj 135 42 t b b b b b; #X obj 574 252 structures; #X obj 53 188 tgl 15 0 empty empty empty 0 -6 0 8 -262144 -1 -1 1 1 ; #X msg 153 181 Xmax 300 , Xmin 0 , Ymax 300 , Ymin 0; #X msg 171 146 mass mob 1 100 $1 $2; #X msg 186 317 forceY mob 8; #X msg 135 252 link souple $1 $2 10 2.5 1.5; #X msg 171 113 100 300 , 150 300 , 100 230 , 150 230 , 100 180 , 150 180 , 50 180 , 200 180 , 115 180 , 135 180 , 110 150 , 140 150; #X msg 135 205 0 5 , 1 2 , 1 4 , 2 3 , 3 0 , 0 2 , 1 3 , 2 4 , 4 5 , 5 3 , 3 4 , 2 5 , 4 6 , 5 7 , 6 5 , 4 7 , 4 8 , 5 9 , 8 9 , 8 10 , 10 11 , 11 9 , 9 10 , 8 11; #X msg 211 443 forceY mob -500; #X msg 211 466 forceY mob 500; #X msg 86 441 forceX mob 500; #X msg 86 464 forceX mob -500; #X obj 53 217 metro 10; #X msg 52 571 forceY 6 -500 , forceY 7 -500; #X msg 52 540 forceX 0 -500 , forceX 1 500; #X msg 52 609 forceY 0 -500 , forceY 1 -500 , forceX 0 -500 , forceX 1 500; #N canvas 0 0 307 306 1000-anim 0; #X scalar liaison 181.293 300 243.137 187.054 0 0 0 ;; #X scalar liaison 252.758 300 192.826 235.497 0 0 0 ;; #X scalar liaison 252.758 300 190.913 187.054 0 0 0 ;; #X scalar liaison 192.826 235.497 241.225 235.497 0 0 0 ;; #X scalar liaison 241.225 235.497 181.293 300 0 0 0 ;; #X scalar liaison 181.293 300 192.826 235.497 0 0 0 ;; #X scalar liaison 252.758 300 241.225 235.497 0 0 0 ;; #X scalar liaison 192.826 235.497 190.913 187.054 0 0 0 ;; #X scalar liaison 190.913 187.054 243.137 187.054 0 0 0 ;; #X scalar liaison 243.137 187.054 241.225 235.497 0 0 0 ;; #X scalar liaison 241.225 235.497 190.913 187.054 0 0 0 ;; #X scalar liaison 192.826 235.497 243.137 187.054 0 0 0 ;; #X scalar liaison 190.913 187.054 150.806 220.479 0 0 0 ;; #X scalar liaison 243.137 187.054 283.244 220.479 0 0 0 ;; #X scalar liaison 150.806 220.479 243.137 187.054 0 0 0 ;; #X scalar liaison 190.913 187.054 283.244 220.479 0 0 0 ;; #X scalar liaison 190.913 187.054 205.914 196.864 0 0 0 ;; #X scalar liaison 243.137 187.054 228.137 196.864 0 0 0 ;; #X scalar liaison 205.914 196.864 228.137 196.864 0 0 0 ;; #X scalar liaison 205.914 196.864 202.014 167.631 0 0 0 ;; #X scalar liaison 202.014 167.631 232.035 167.63 0 0 0 ;; #X scalar liaison 232.035 167.63 228.137 196.864 0 0 0 ;; #X scalar liaison 228.137 196.864 202.014 167.631 0 0 0 ;; #X scalar liaison 205.914 196.864 232.035 167.63 0 0 0 ;; #X scalar mass 181.293 300 0 0 ;; #X scalar mass 252.758 300 1 0 ;; #X scalar mass 192.826 235.497 2 0 ;; #X scalar mass 241.225 235.497 3 0 ;; #X scalar mass 190.913 187.054 4 0 ;; #X scalar mass 243.137 187.054 5 0 ;; #X scalar mass 150.806 220.479 6 0 ;; #X scalar mass 283.244 220.479 7 0 ;; #X scalar mass 205.914 196.864 8 0 ;; #X scalar mass 228.137 196.864 9 0 ;; #X scalar mass 202.014 167.631 10 0 ;; #X scalar mass 232.035 167.63 11 0 ;; #X coords 0 0 300 300 300 300 1; #X restore 466 370 pd $0-anim; #X obj 52 290 make_anim $0-anim; #X text 26 165 3 - metro ON; #X text 333 302 1 - Create the Datastructre; #X text 333 321 2 - notch the "poll" case to set DS to actual model state; #X text 95 417 4 - "force" the dancer to move; #X connect 0 0 6 0; #X connect 1 0 24 0; #X connect 1 1 24 0; #X connect 2 0 1 0; #X connect 3 0 6 0; #X connect 4 0 2 0; #X connect 6 0 14 0; #X connect 6 1 9 0; #X connect 6 2 13 0; #X connect 6 4 4 0; #X connect 8 0 19 0; #X connect 9 0 2 0; #X connect 10 0 2 0; #X connect 11 0 1 0; #X connect 12 0 2 0; #X connect 13 0 10 0; #X connect 14 0 12 0; #X connect 15 0 1 0; #X connect 16 0 1 0; #X connect 17 0 1 0; #X connect 18 0 1 0; #X connect 19 0 1 0; #X connect 19 0 11 0; #X connect 20 0 1 0; #X connect 21 0 1 0; #X connect 22 0 1 0; #X connect 24 0 1 0;
--- NEW FILE: structures.pd --- #N canvas 752 10 450 300 10; #N canvas 389 332 664 321 mass 0; #X obj 62 182 drawnumber mid 0 -18 0 m; #X obj 64 72 struct mass float x float y float mid float mob; #X obj 61 136 filledpolygon mob mob 1 -5 0 -4 4 0 5 4 4 5 0 4 -4 0 -5 -4 -4; #X restore 132 125 pd mass; #N canvas 73 302 487 201 liaison 0; #X obj 19 25 struct liaison float x1 float y1 float x2 float y2 float mid1 float mid2 float lid; #X obj 23 73 drawpolygon lid 2 x1 y1 x2 y2; #X restore 132 169 pd liaison; #N canvas 0 0 450 300 model 0; #X obj 50 102 plot m 0 0 0 0; #X obj 51 135 plot l 0 0 0 0; #X obj 45 72 struct model float x1 array m mass array l liaison; #X restore 132 147 pd model; #N canvas 389 332 664 321 fixmass 0; #X obj 64 72 struct fixmass float x float y float mid; #X obj 61 136 filledpolygon 900 900 1 -5 0 -4 4 0 5 4 4 5 0 4 -4 0 -5 -4 -4; #X obj 51 203 drawnumber mid 0 -18 900 m; #X restore 132 191 pd fixmass; #N canvas 0 0 450 300 fixed 0; #X obj 50 97 plot f 0 0 0 0; #X obj 49 56 struct fixed float x float y array f fixmass; #X restore 132 213 pd fixed;