externals/nusmuk/msd2D 02_msd2Dadd.pd, 1.1, 1.2 03_imsd2Dtest.pd, 1.2, 1.3 04_msd2Dperf.pd, 1.1, 1.2 help-msd2D.pd, 1.3, 1.4 main.cpp, 1.6, 1.7 - Pd-cvs

26 Apr 2005


      Update of /cvsroot/pure-data/externals/nusmuk/msd2D
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv13192/msd2D
Modified Files:
    02_msd2Dadd.pd 03_imsd2Dtest.pd 04_msd2Dperf.pd help-msd2D.pd 
    main.cpp 
Log Message:
MSD Version 0.04
Index: 04_msd2Dperf.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/nusmuk/msd2D/04_msd2Dperf.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 04_msd2Dperf.pd	12 Apr 2005 16:34:04 -0000	1.1
--- 04_msd2Dperf.pd	26 Apr 2005 16:10:07 -0000	1.2
***************
*** 8,14 ****
  #X msg 281 402 forceX mob 100;
  #X obj 167 55 t b b b b b;
- #X obj 313 658 print msd;
  #X obj 52 583 msd2D --------------------------------;
! #X msg 461 409 0 , destroy;
  #X obj 481 320 gemhead;
  #X obj 481 343 world_light;
--- 8,13 ----
  #X msg 281 402 forceX mob 100;
  #X obj 167 55 t b b b b b;
  #X obj 52 583 msd2D --------------------------------;
! #X msg 460 409 0 , destroy;
  #X obj 481 320 gemhead;
  #X obj 481 343 world_light;
***************
*** 53,62 ****
  #X obj 48 177 separator;
  #X obj 48 153 any;
- #X obj 127 57 unpack f f;
  #X obj 125 136 t b f;
! #X connect 0 0 10 0;
  #X connect 1 0 2 0;
  #X connect 3 0 4 0;
! #X connect 4 0 11 0;
  #X connect 5 0 6 0;
  #X connect 6 0 1 2;
--- 52,61 ----
  #X obj 48 177 separator;
  #X obj 48 153 any;
  #X obj 125 136 t b f;
! #X obj 127 57 unpack f f f;
! #X connect 0 0 11 0;
  #X connect 1 0 2 0;
  #X connect 3 0 4 0;
! #X connect 4 0 10 0;
  #X connect 5 0 6 0;
  #X connect 6 0 1 2;
***************
*** 64,71 ****
  #X connect 8 0 1 0;
  #X connect 9 0 8 0;
! #X connect 10 0 3 0;
! #X connect 10 1 5 0;
! #X connect 11 0 9 0;
! #X connect 11 1 1 1;
  #X restore 133 635 pd massrender;
  #N canvas 284 227 587 558 linkrender 0;
--- 63,70 ----
  #X connect 8 0 1 0;
  #X connect 9 0 8 0;
! #X connect 10 0 9 0;
! #X connect 10 1 1 1;
! #X connect 11 1 3 0;
! #X connect 11 2 5 0;
  #X restore 133 635 pd massrender;
  #N canvas 284 227 587 558 linkrender 0;
***************
*** 79,84 ****
  #X obj 44 192 any;
  #X obj 93 164 t b f;
- #X obj 93 69 unpack f f f f;
- #X obj 44 265 curve 2;
  #X obj 207 121 / 12.5;
  #X obj 207 144 - 4;
--- 78,81 ----
***************
*** 89,114 ****
  #X obj 207 193 pack f f;
  #X msg 207 216 $1 $2 0;
! #X connect 0 0 9 0;
  #X connect 1 0 2 0;
  #X connect 2 0 8 0;
  #X connect 3 0 4 0;
! #X connect 4 0 15 1;
  #X connect 5 0 7 1;
! #X connect 6 0 10 0;
  #X connect 7 0 6 0;
  #X connect 8 0 7 0;
! #X connect 8 1 15 0;
! #X connect 9 0 1 0;
! #X connect 9 1 3 0;
! #X connect 9 2 11 0;
! #X connect 9 3 13 0;
  #X connect 11 0 12 0;
! #X connect 12 0 17 0;
  #X connect 13 0 14 0;
  #X connect 14 0 17 1;
  #X connect 15 0 16 0;
! #X connect 16 0 10 1;
! #X connect 17 0 18 0;
! #X connect 18 0 10 2;
  #X restore 52 656 pd linkrender;
  #X msg 211 170 mass mob 1 $1 $2 $3;
--- 86,113 ----
  #X obj 207 193 pack f f;
  #X msg 207 216 $1 $2 0;
! #X obj 44 265 curve 2;
! #X obj 94 70 unpack f f f f f;
! #X connect 0 0 18 0;
  #X connect 1 0 2 0;
  #X connect 2 0 8 0;
  #X connect 3 0 4 0;
! #X connect 4 0 13 1;
  #X connect 5 0 7 1;
! #X connect 6 0 17 0;
  #X connect 7 0 6 0;
  #X connect 8 0 7 0;
! #X connect 8 1 13 0;
! #X connect 9 0 10 0;
! #X connect 10 0 15 0;
  #X connect 11 0 12 0;
! #X connect 12 0 15 1;
  #X connect 13 0 14 0;
  #X connect 14 0 17 1;
  #X connect 15 0 16 0;
! #X connect 16 0 17 2;
! #X connect 18 1 1 0;
! #X connect 18 2 3 0;
! #X connect 18 3 9 0;
! #X connect 18 4 11 0;
  #X restore 52 656 pd linkrender;
  #X msg 211 170 mass mob 1 $1 $2 $3;
***************
*** 132,139 ****
  #X msg 167 284 link souple $1 $2 100 0.5 0.5;
  #X obj 52 278 gemhead;
! #X obj 413 432 gemwin;
  #X msg 52 335 bang , get massesPos , get linksPos;
  #X obj 52 606 route linksPos massesPos;
! #X msg 465 433 view 0 0 4 0 0 0 0 1 0;
  #X msg 281 425 forceX mob -100;
  #X obj 380 109 repeat 500;
--- 131,138 ----
  #X msg 167 284 link souple $1 $2 100 0.5 0.5;
  #X obj 52 278 gemhead;
! #X obj 460 458 gemwin;
  #X msg 52 335 bang , get massesPos , get linksPos;
  #X obj 52 606 route linksPos massesPos;
! #X msg 460 433 view 0 0 4 0 0 0 0 1 0;
  #X msg 281 425 forceX mob -100;
  #X obj 380 109 repeat 500;
***************
*** 141,207 ****
  #X msg 445 53 500;
  #X text 478 52 change number of mass to test performance;
! #X connect 0 0 8 0;
  #X connect 1 0 6 0;
  #X connect 2 0 0 0;
  #X connect 3 0 6 0;
! #X connect 5 0 8 0;
! #X connect 6 0 51 0;
  #X connect 6 1 19 0;
! #X connect 6 1 20 0;
! #X connect 6 2 50 0;
! #X connect 6 3 12 0;
  #X connect 6 4 2 0;
! #X connect 6 4 39 0;
! #X connect 6 4 31 0;
! #X connect 6 4 27 0;
  #X connect 6 4 30 0;
! #X connect 8 0 47 0;
! #X connect 8 1 7 0;
! #X connect 9 0 45 0;
! #X connect 10 0 11 0;
! #X connect 12 0 0 0;
! #X connect 13 0 15 1;
  #X connect 14 0 16 0;
! #X connect 15 0 17 0;
! #X connect 15 0 18 0;
! #X connect 16 0 15 0;
! #X connect 17 0 8 0;
! #X connect 18 0 8 0;
! #X connect 19 0 15 0;
! #X connect 20 0 0 0;
  #X connect 21 0 45 0;
! #X connect 22 0 46 0;
! #X connect 25 0 0 0;
! #X connect 26 0 33 2;
! #X connect 27 0 26 0;
! #X connect 28 0 33 1;
! #X connect 29 0 32 0;
  #X connect 30 0 28 0;
! #X connect 31 0 29 0;
! #X connect 32 0 33 0;
! #X connect 33 0 25 0;
! #X connect 34 0 40 0;
! #X connect 35 0 37 0;
! #X connect 35 0 38 0;
  #X connect 35 0 40 1;
! #X connect 36 0 41 1;
! #X connect 37 0 36 1;
! #X connect 38 0 41 0;
! #X connect 38 1 36 0;
! #X connect 39 0 40 1;
! #X connect 40 0 35 0;
! #X connect 41 0 43 0;
! #X connect 42 0 29 0;
! #X connect 42 1 28 0;
! #X connect 42 2 26 0;
! #X connect 43 0 0 0;
! #X connect 44 0 22 0;
! #X connect 46 0 8 0;
! #X connect 47 0 24 0;
! #X connect 47 1 23 0;
! #X connect 48 0 45 0;
! #X connect 49 0 8 0;
! #X connect 50 0 42 0;
! #X connect 51 0 34 0;
! #X connect 52 0 50 1;
! #X connect 52 0 51 1;
--- 140,205 ----
  #X msg 445 53 500;
  #X text 478 52 change number of mass to test performance;
! #X connect 0 0 7 0;
  #X connect 1 0 6 0;
  #X connect 2 0 0 0;
  #X connect 3 0 6 0;
! #X connect 5 0 7 0;
! #X connect 6 0 50 0;
! #X connect 6 1 18 0;
  #X connect 6 1 19 0;
! #X connect 6 2 49 0;
! #X connect 6 3 11 0;
  #X connect 6 4 2 0;
! #X connect 6 4 38 0;
  #X connect 6 4 30 0;
! #X connect 6 4 26 0;
! #X connect 6 4 29 0;
! #X connect 7 0 46 0;
! #X connect 8 0 44 0;
! #X connect 9 0 10 0;
! #X connect 11 0 0 0;
! #X connect 12 0 14 1;
! #X connect 13 0 15 0;
  #X connect 14 0 16 0;
! #X connect 14 0 17 0;
! #X connect 15 0 14 0;
! #X connect 16 0 7 0;
! #X connect 17 0 7 0;
! #X connect 18 0 14 0;
! #X connect 19 0 0 0;
! #X connect 20 0 44 0;
  #X connect 21 0 45 0;
! #X connect 24 0 0 0;
! #X connect 25 0 32 2;
! #X connect 26 0 25 0;
! #X connect 27 0 32 1;
! #X connect 28 0 31 0;
! #X connect 29 0 27 0;
  #X connect 30 0 28 0;
! #X connect 31 0 32 0;
! #X connect 32 0 24 0;
! #X connect 33 0 39 0;
! #X connect 34 0 36 0;
! #X connect 34 0 37 0;
! #X connect 34 0 39 1;
  #X connect 35 0 40 1;
! #X connect 36 0 35 1;
! #X connect 37 0 40 0;
! #X connect 37 1 35 0;
! #X connect 38 0 39 1;
! #X connect 39 0 34 0;
! #X connect 40 0 42 0;
! #X connect 41 0 28 0;
! #X connect 41 1 27 0;
! #X connect 41 2 25 0;
! #X connect 42 0 0 0;
! #X connect 43 0 21 0;
! #X connect 45 0 7 0;
! #X connect 46 0 23 0;
! #X connect 46 1 22 0;
! #X connect 47 0 44 0;
! #X connect 48 0 7 0;
! #X connect 49 0 41 0;
! #X connect 50 0 33 0;
! #X connect 51 0 49 1;
! #X connect 51 0 50 1;
Index: main.cpp
===================================================================
RCS file: /cvsroot/pure-data/externals/nusmuk/msd2D/main.cpp,v
retrieving revision 1.6
retrieving revision 1.7
diff -C2 -d -r1.6 -r1.7
*** main.cpp	26 Apr 2005 11:39:48 -0000	1.6
--- main.cpp	26 Apr 2005 16:10:07 -0000	1.7
***************
*** 31,35 ****
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
!  Version 0.03 -- 21.04.2005
  */
--- 31,35 ----
   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
!  Version 0.04 -- 26.04.2005
  */
***************
*** 39,43 ****
// define constants
! #define MSD2D_VERSION 0.03
  #define nb_max_link   4000
  #define nb_max_mass   4000
--- 39,43 ----
// define constants
! #define MSD2D_VERSION 0.04
  #define nb_max_link   4000
  #define nb_max_mass   4000
***************
*** 266,280 ****
    // displace mass(es) named Id to a certain position
    	t_int i;
! 		const t_symbol *sym = GetSymbol(argv[0]);
if (argc != 2)
! 			error("posX : Idmass value");
if (GetFloat(argv[1]) < Xmax && GetFloat(argv[1]) > Xmin)
! 			for (i=0; i<nb_mass;i++)
! 			{
! 				if (sym == mass[i]->Id)
! 					mass[i]->posX = GetAFloat(argv[1]);
! 			}
    }
--- 266,289 ----
    // displace mass(es) named Id to a certain position
    	t_int i;
! 		const t_symbol *sym = GetASymbol(argv[0]);
if (argc != 2)
! 			error("posX : Id/Nomass value");
if (GetFloat(argv[1]) < Xmax && GetFloat(argv[1]) > Xmin)
! 			if (sym ==0)	
! 				for (i=0; i<nb_mass;i++)
! 				{
! 					if (GetInt(argv[0]) == mass[i]->nbr)	{
! 						mass[i]->posX = GetFloat(argv[1]);
! 						break;
! 					}
! 				}
! 			else
! 				for (i=0; i<nb_mass;i++)
! 				{
! 					if (sym == mass[i]->Id)
! 						mass[i]->posX = GetFloat(argv[1]);
! 				}
    }
***************
*** 283,298 ****
    // displace mass(es) named Id to a certain position
    	t_int i;
! 		const t_symbol *sym = GetSymbol(argv[0]);
if (argc != 2)
! 			error("posY : Idmass value");
if (GetFloat(argv[1]) < Ymax && GetFloat(argv[1]) > Ymin)
! 			for (i=0; i<nb_mass;i++)
! 			{
! 				if (sym == mass[i]->Id)
! 					mass[i]->posY = GetFloat(argv[1]);
! 			}
! 		
    }
--- 292,315 ----
    // displace mass(es) named Id to a certain position
    	t_int i;
! 		const t_symbol *sym = GetASymbol(argv[0]);
if (argc != 2)
! 			error("posY : Id/Nomass value");
if (GetFloat(argv[1]) < Ymax && GetFloat(argv[1]) > Ymin)
! 			if (sym ==0)	
! 				for (i=0; i<nb_mass;i++)
! 				{
! 					if (GetInt(argv[0]) == mass[i]->nbr)	{
! 						mass[i]->posY = GetFloat(argv[1]);
! 						break;
! 					}
! 				}
! 			else
! 				for (i=0; i<nb_mass;i++)
! 				{
! 					if (sym == mass[i]->Id)
! 						mass[i]->posY = GetFloat(argv[1]);
! 				}
    }
***************
*** 411,457 ****
    	t_atom sortie[7], aux[2];
    	t_int i;
! 		if (argc < 6 || argc > 8)
! 			error("link : Id Nomass1 Nomass2 K D1 D2 (Lmin Lmax)");
! 		link[nb_link] = new t_link;			// New pointer
! 		link[nb_link]->Id = GetSymbol(argv[0]);		// ID
! 		for (i=0; i<nb_mass;i++)
! 			if (mass[i]->nbr==GetAInt(argv[1]))	// pointer to mass1
! 				link[nb_link]->mass1 = mass[i];
! 			else if(mass[i]->nbr==GetAInt(argv[2]))	// pointer to mass2
! 				link[nb_link]->mass2 = mass[i];
! 		link[nb_link]->K1 = GetFloat(argv[3]);		// K1
! 		link[nb_link]->D1 = GetFloat(argv[4]);		// D1
! 		link[nb_link]->D2 = GetFloat(argv[5]);		// D2
! 		link[nb_link]->longx = link[nb_link]->mass1->posX - link[nb_link]->mass2->posX;	// Lx[0]
! 		link[nb_link]->longy = link[nb_link]->mass1->posY - link[nb_link]->mass2->posY;	// Ly[0]
! 		link[nb_link]->longueur = sqrt(pow(link[nb_link]->longx,2)+pow(link[nb_link]->longy,2)); // L[0]
! 		link[nb_link]->nbr = id_link;			// id number
! 		link[nb_link]->distance_old = link[nb_link]->longueur;	// L[n-1]
! 		switch (argc)	{
! 			case 6 :	
! 				link[nb_link]->long_max = 32768;
! 				link[nb_link]->long_min = 0;
! 				break;
! 			case 7 :	
! 				link[nb_link]->long_min = GetFloat(argv[6]);
! 				link[nb_link]->long_max = 32768;
! 				break;
! 			case 8 :	
! 				link[nb_link]->long_min = GetFloat(argv[6]);
! 				link[nb_link]->long_max = GetFloat(argv[7]);
! 				break;	
! 		}
! 		nb_link++;
! 		id_link++;
! 		nb_link = min ( nb_max_link -1, nb_link );
! 		SetFloat((sortie[0]),id_link-1);
! 		SetSymbol((sortie[1]),link[nb_link-1]->Id);
! 		SetFloat((sortie[2]),GetInt(argv[1]));
! 		SetFloat((sortie[3]),GetInt(argv[2]));
! 		SetFloat((sortie[4]),link[nb_link-1]->K1);
! 		SetFloat((sortie[5]),link[nb_link-1]->D1);
! 		SetFloat((sortie[6]),link[nb_link-1]->D2);
! 		ToOutAnything(1,S_Link,7,sortie);
    }
--- 428,488 ----
    	t_atom sortie[7], aux[2];
    	t_int i;
+         	t_mass *mass1 = NULL;
+         	t_mass *mass2 = NULL;
+         	
+         	if (argc < 6 || argc > 8)
+         	    error("link : Id Nomass1 Nomass2 K D1 D2 (Lmin Lmax)");
+ 			
+         	// check for existence of link masses:
+         	for (i=0; i<nb_mass;i++)
+ 				if (mass[i]->nbr==GetInt(argv[1]))	// pointer to mass1
+ 					// we found mass1
+         	        mass1 = mass[i];
+ 				else if (mass[i]->nbr==GetInt(argv[2]))	// pointer to mass2
+ 					// ... and mass2
+         	        mass2 = mass[i];
!         	if (mass1 and mass2)
!         	{
! 			link[nb_link] = new t_link;			// New pointer
! 			link[nb_link]->Id = GetSymbol(argv[0]);		// ID
! 			link[nb_link]->mass1 = mass1; // pointer to mass1
! 			link[nb_link]->mass2 = mass2; // pointer to mass2
! 			link[nb_link]->K1 = GetFloat(argv[3]);		// K1
! 			link[nb_link]->D1 = GetFloat(argv[4]);		// D1
! 			link[nb_link]->D2 = GetFloat(argv[5]);		// D2
! 			link[nb_link]->longx = link[nb_link]->mass1->posX - link[nb_link]->mass2->posX;	// Lx[0]
! 			link[nb_link]->longy = link[nb_link]->mass1->posY - link[nb_link]->mass2->posY;	// Ly[0]
! 			link[nb_link]->longueur = sqrt(pow(link[nb_link]->longx,2)+pow(link[nb_link]->longy,2)); // L[0]
! 			link[nb_link]->nbr = id_link;			// id number
! 			link[nb_link]->distance_old = link[nb_link]->longueur;	// L[n-1]
! 			switch (argc)	{
! 				case 6 :	
! 					link[nb_link]->long_max = 32768;
! 					link[nb_link]->long_min = 0;
! 					break;
! 				case 7 :	
! 					link[nb_link]->long_min = GetFloat(argv[6]);
! 					link[nb_link]->long_max = 32768;
! 					break;
! 				case 8 :	
! 					link[nb_link]->long_min = GetFloat(argv[6]);
! 					link[nb_link]->long_max = GetFloat(argv[7]);
! 					break;	
! 			}
! 			nb_link++;
! 			id_link++;
! 			nb_link = min ( nb_max_link -1, nb_link );
! 			SetFloat((sortie[0]),id_link-1);
! 			SetSymbol((sortie[1]),link[nb_link-1]->Id);
! 			SetFloat((sortie[2]),GetInt(argv[1]));
! 			SetFloat((sortie[3]),GetInt(argv[2]));
! 			SetFloat((sortie[4]),link[nb_link-1]->K1);
! 			SetFloat((sortie[5]),link[nb_link-1]->D1);
! 			SetFloat((sortie[6]),link[nb_link-1]->D2);
! 			ToOutAnything(1,S_Link,7,sortie);
!         	}
!         	else
!             		error("link : Cannot create link: Not all masses for this link have been created yet.");
    }
***************
*** 590,594 ****
    	t_int i,j;
    	t_symbol *auxarg,*auxarg2, *auxtype;
! 		t_atom sortie[4];
    	auxtype = GetSymbol(argv[0]);
    	auxarg = GetASymbol(argv[1]);		//auxarg : & symbol, 0 else
--- 621,625 ----
    	t_int i,j;
    	t_symbol *auxarg,*auxarg2, *auxtype;
! 		t_atom sortie[5];
    	auxtype = GetSymbol(argv[0]);
    	auxarg = GetASymbol(argv[1]);		//auxarg : & symbol, 0 else
***************
*** 599,628 ****
    			for (i=0; i<nb_mass; i++)
    			{
! 					SetFloat(sortie[0],mass[i]->posX);
! 					SetFloat(sortie[1],mass[i]->posY);
! 					ToOutAnything(0,S_massesPos,2,sortie);
    			}
    		else if (auxtype == S_massesForces)	// get all masses forces
    			for (i=0; i<nb_mass; i++)
    			{
! 					SetFloat(sortie[0],mass[i]->out_forceX);
! 					SetFloat(sortie[1],mass[i]->out_forceY);
! 					ToOutAnything(0,S_massesForces,2,sortie);
    			}
    		else if (auxtype == S_linksPos)		// get all links positions
    			for (i=0; i<nb_link; i++)
    			{
! 					SetFloat(sortie[0],link[i]->mass1->posX);
! 					SetFloat(sortie[1],link[i]->mass1->posY);
! 					SetFloat(sortie[2],link[i]->mass2->posX);
! 					SetFloat(sortie[3],link[i]->mass2->posY);
! 					ToOutAnything(0,S_linksPos,4,sortie);
    			}
    		else 					// get all masses speeds
    			for (i=0; i<nb_mass; i++)
    			{
! 					SetFloat(sortie[0],mass[i]->speedX);
! 					SetFloat(sortie[1],mass[i]->speedY);
! 					ToOutAnything(0,S_massesSpeeds,2,sortie);
    			}
    	}
--- 630,663 ----
    			for (i=0; i<nb_mass; i++)
    			{
! 					SetFloat(sortie[0],mass[i]->nbr);
! 					SetFloat(sortie[1],mass[i]->posX);
! 					SetFloat(sortie[2],mass[i]->posY);
! 					ToOutAnything(0,S_massesPos,3,sortie);
    			}
    		else if (auxtype == S_massesForces)	// get all masses forces
    			for (i=0; i<nb_mass; i++)
    			{
! 					SetFloat(sortie[0],mass[i]->nbr);
! 					SetFloat(sortie[1],mass[i]->out_forceX);
! 					SetFloat(sortie[2],mass[i]->out_forceY);
! 					ToOutAnything(0,S_massesForces,3,sortie);
    			}
    		else if (auxtype == S_linksPos)		// get all links positions
    			for (i=0; i<nb_link; i++)
    			{
! 					SetFloat(sortie[0],link[i]->nbr);
! 					SetFloat(sortie[1],link[i]->mass1->posX);
! 					SetFloat(sortie[2],link[i]->mass1->posY);
! 					SetFloat(sortie[3],link[i]->mass2->posX);
! 					SetFloat(sortie[4],link[i]->mass2->posY);
! 					ToOutAnything(0,S_linksPos,5,sortie);
    			}
    		else 					// get all masses speeds
    			for (i=0; i<nb_mass; i++)
    			{
! 					SetFloat(sortie[0],mass[i]->nbr);
! 					SetFloat(sortie[1],mass[i]->speedX);
! 					SetFloat(sortie[2],mass[i]->speedY);
! 					ToOutAnything(0,S_massesSpeeds,3,sortie);
    			}
    	}
***************
*** 635,641 ****
    					if (mass[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],mass[i]->posX);
! 							SetFloat(sortie[1],mass[i]->posY);
! 							ToOutAnything(0,S_massesPosNo,2,sortie);
    					}
    		}
--- 670,677 ----
    					if (mass[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],mass[i]->nbr);
! 							SetFloat(sortie[1],mass[i]->posX);
! 							SetFloat(sortie[2],mass[i]->posY);
! 							ToOutAnything(0,S_massesPosNo,3,sortie);
    					}
    		}
***************
*** 649,655 ****
    					if (auxarg2==mass[i]->Id)
    					{
! 							SetFloat(sortie[0],mass[i]->posX);
! 							SetFloat(sortie[1],mass[i]->posY);
! 							ToOutAnything(0,S_massesPosId,2,sortie);
    					}
    				}
--- 685,692 ----
    					if (auxarg2==mass[i]->Id)
    					{
! 							SetSymbol(sortie[0],mass[i]->Id);
! 							SetFloat(sortie[1],mass[i]->posX);
! 							SetFloat(sortie[2],mass[i]->posY);
! 							ToOutAnything(0,S_massesPosId,3,sortie);
    					}
    				}
***************
*** 665,671 ****
    					if (mass[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],mass[i]->out_forceX);
! 							SetFloat(sortie[1],mass[i]->out_forceY);
! 							ToOutAnything(0,S_massesForcesNo,2,sortie);
    					}
    		}
--- 702,709 ----
    					if (mass[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],mass[i]->nbr);
! 							SetFloat(sortie[1],mass[i]->out_forceX);
! 							SetFloat(sortie[2],mass[i]->out_forceY);
! 							ToOutAnything(0,S_massesForcesNo,3,sortie);
    					}
    		}
***************
*** 679,685 ****
    					if (auxarg2==mass[i]->Id)
    					{
! 							SetFloat(sortie[0],mass[i]->out_forceX);
! 							SetFloat(sortie[1],mass[i]->out_forceY);
! 							ToOutAnything(0,S_massesForcesId,2,sortie);
    					}
    				}
--- 717,724 ----
    					if (auxarg2==mass[i]->Id)
    					{
! 							SetSymbol(sortie[0],mass[i]->Id);
! 							SetFloat(sortie[1],mass[i]->out_forceX);
! 							SetFloat(sortie[2],mass[i]->out_forceY);
! 							ToOutAnything(0,S_massesForcesId,3,sortie);
    					}
    				}
***************
*** 695,703 ****
    					if (link[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],link[i]->mass1->posX);
! 							SetFloat(sortie[1],link[i]->mass1->posY);
! 							SetFloat(sortie[2],link[i]->mass2->posX);
! 							SetFloat(sortie[3],link[i]->mass2->posY);
! 							ToOutAnything(0,S_linksPosNo,4,sortie);
    					}
    		}
--- 734,743 ----
    					if (link[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],link[i]->nbr);
! 							SetFloat(sortie[1],link[i]->mass1->posX);
! 							SetFloat(sortie[2],link[i]->mass1->posY);
! 							SetFloat(sortie[3],link[i]->mass2->posX);
! 							SetFloat(sortie[4],link[i]->mass2->posY);
! 							ToOutAnything(0,S_linksPosNo,5,sortie);
    					}
    		}
***************
*** 711,719 ****
    					if (auxarg2==link[i]->Id)
    					{
! 							SetFloat(sortie[0],link[i]->mass1->posX);
! 							SetFloat(sortie[1],link[i]->mass1->posY);
! 							SetFloat(sortie[2],link[i]->mass2->posX);
! 							SetFloat(sortie[3],link[i]->mass2->posY);
! 							ToOutAnything(0,S_linksPosId,4,sortie);
    					}
    				}
--- 751,760 ----
    					if (auxarg2==link[i]->Id)
    					{
! 							SetSymbol(sortie[0],link[i]->Id);
! 							SetFloat(sortie[1],link[i]->mass1->posX);
! 							SetFloat(sortie[2],link[i]->mass1->posY);
! 							SetFloat(sortie[3],link[i]->mass2->posX);
! 							SetFloat(sortie[4],link[i]->mass2->posY);
! 							ToOutAnything(0,S_linksPosId,5,sortie);
    					}
    				}
***************
*** 729,735 ****
    					if (mass[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],mass[i]->speedX);
! 							SetFloat(sortie[1],mass[i]->speedY);
! 							ToOutAnything(0,S_massesSpeedsNo,2,sortie);
    					}
    		}
--- 770,777 ----
    					if (mass[i]->nbr==GetInt(argv[j]))
    					{
! 							SetFloat(sortie[0],mass[i]->nbr);
! 							SetFloat(sortie[1],mass[i]->speedX);
! 							SetFloat(sortie[2],mass[i]->speedY);
! 							ToOutAnything(0,S_massesSpeedsNo,3,sortie);
    					}
    		}
***************
*** 743,749 ****
    					if (auxarg2==mass[i]->Id)
    					{
! 							SetFloat(sortie[0],mass[i]->speedX);
! 							SetFloat(sortie[1],mass[i]->speedY);
! 							ToOutAnything(0,S_massesSpeedsId,2,sortie);
    					}
    				}
--- 785,792 ----
    					if (auxarg2==mass[i]->Id)
    					{
! 							SetSymbol(sortie[0],mass[i]->Id);
! 							SetFloat(sortie[1],mass[i]->speedX);
! 							SetFloat(sortie[2],mass[i]->speedY);
! 							ToOutAnything(0,S_massesSpeedsId,3,sortie);
    					}
    				}
Index: help-msd2D.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/nusmuk/msd2D/help-msd2D.pd,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** help-msd2D.pd	21 Apr 2005 14:28:54 -0000	1.3
--- help-msd2D.pd	26 Apr 2005 16:10:07 -0000	1.4
***************
*** 15,19 ****
  #X obj 61 403 cnv 15 610 210 empty empty DYNAMIC_SETTING 20 12 0 14
  -262131 -66577 0;
- #X text 350 449 $1 : Id (symbol);
  #X text 350 467 $2 : New value;
  #X text 348 503 $1 : Id (symbol);
--- 15,18 ----
***************
*** 61,76 ****
  #X msg 84 538 Xmin $1 , Xmax $1 , Ymin $1 , Ymax $1;
  #X text 334 271 $4 , $5 : initial position;
! #X connect 1 0 46 0;
! #X connect 8 0 46 0;
! #X connect 15 0 46 0;
! #X connect 18 0 46 0;
! #X connect 20 0 46 0;
! #X connect 21 0 46 0;
! #X connect 24 0 46 0;
! #X connect 28 0 46 0;
! #X connect 31 0 46 0;
! #X connect 40 0 46 0;
! #X connect 43 0 46 0;
! #X connect 48 0 46 0;
  #X restore 221 312 pd masses;
  #X text 75 312 HELP on masses --->;
--- 60,76 ----
  #X msg 84 538 Xmin $1 , Xmax $1 , Ymin $1 , Ymax $1;
  #X text 334 271 $4 , $5 : initial position;
! #X text 350 449 $1 : Id (symbol) or No;
! #X connect 1 0 45 0;
! #X connect 8 0 45 0;
! #X connect 14 0 45 0;
! #X connect 17 0 45 0;
! #X connect 19 0 45 0;
! #X connect 20 0 45 0;
! #X connect 23 0 45 0;
! #X connect 27 0 45 0;
! #X connect 30 0 45 0;
! #X connect 39 0 45 0;
! #X connect 42 0 45 0;
! #X connect 47 0 45 0;
  #X restore 221 312 pd masses;
  #X text 75 312 HELP on masses --->;
Index: 02_msd2Dadd.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/nusmuk/msd2D/02_msd2Dadd.pd,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** 02_msd2Dadd.pd	12 Apr 2005 16:34:04 -0000	1.1
--- 02_msd2Dadd.pd	26 Apr 2005 16:10:07 -0000	1.2
***************
*** 13,239 ****
  #X msg 191 106 mass fix 0 100 50 50;
  #N canvas 177 95 946 729 synthese 0;
! #X obj 140 66 t b f;
! #X obj 55 219 print x1;
! #X obj 180 139 + 1;
! #X obj 160 107 f 0;
! #X obj 236 45 inlet;
! #X msg 214 315 $1 50;
! #X obj 214 337 line~;
! #X obj 174 341 *~;
! #X msg 309 315 $1 50;
! #X obj 309 337 line~;
! #X obj 269 341 *~;
! #X msg 402 317 $1 50;
! #X obj 402 339 line~;
! #X obj 362 343 *~;
! #X msg 494 315 $1 50;
! #X obj 494 337 line~;
! #X obj 454 341 *~;
! #X obj 311 389 dac~;
! #X obj 185 255 / 200;
! #X obj 311 261 / 200;
! #X obj 402 263 / 200;
! #X obj 499 261 / 500;
! #X msg 595 318 $1 50;
! #X obj 595 340 line~;
! #X obj 555 344 *~;
! #X msg 690 318 $1 50;
! #X obj 690 340 line~;
! #X obj 650 344 *~;
! #X msg 783 320 $1 50;
! #X obj 783 342 line~;
! #X obj 743 346 *~;
! #X msg 875 318 $1 50;
! #X obj 875 340 line~;
! #X obj 835 344 *~;
! #X obj 692 392 dac~;
! #X obj 172 285 osc~ 55;
! #X obj 268 285 osc~ 110;
! #X obj 453 286 osc~ 222;
! #X obj 566 258 / 500;
! #X obj 693 264 / 500;
! #X obj 240 161 pack f f f;
! #X obj 231 72 unpack f f;
! #X obj 236 219 unpack f f;
! #X obj 425 225 unpack f f;
! #X obj 611 222 unpack f f;
! #X obj 802 229 unpack f f;
! #X obj 880 264 / 1000;
! #X obj 783 266 / 1000;
! #X obj 180 164 mod 8;
! #X obj 517 190 route 0 2 1 3 4 5 6 7;
! #X msg 204 519 $1 50;
! #X obj 204 541 line~;
! #X obj 164 545 *~;
! #X msg 299 519 $1 50;
! #X obj 299 541 line~;
! #X obj 259 545 *~;
! #X msg 392 521 $1 50;
! #X obj 392 543 line~;
! #X obj 352 547 *~;
! #X msg 484 519 $1 50;
! #X obj 484 541 line~;
! #X obj 444 545 *~;
! #X obj 301 593 dac~;
! #X obj 175 459 / 200;
! #X obj 301 465 / 200;
! #X obj 392 467 / 200;
! #X obj 489 465 / 500;
! #X msg 585 522 $1 50;
! #X obj 585 544 line~;
! #X obj 545 548 *~;
! #X msg 680 522 $1 50;
! #X obj 680 544 line~;
! #X obj 640 548 *~;
! #X msg 773 524 $1 50;
! #X obj 773 546 line~;
! #X obj 733 550 *~;
! #X msg 865 522 $1 50;
! #X obj 865 544 line~;
! #X obj 825 548 *~;
! #X obj 682 596 dac~;
! #X obj 162 489 osc~ 55;
! #X obj 258 489 osc~ 110;
! #X obj 351 491 osc~ 166;
! #X obj 443 489 osc~ 222;
! #X obj 544 492 osc~ 444;
! #X obj 639 492 osc~ 890;
! #X obj 732 494 osc~ 1113;
! #X obj 824 492 osc~ 2229;
! #X obj 556 462 / 500;
! #X obj 683 468 / 500;
! #X obj 226 423 unpack f f;
! #X obj 415 429 unpack f f;
! #X obj 601 426 unpack f f;
! #X obj 792 433 unpack f f;
! #X obj 870 468 / 1000;
! #X obj 773 470 / 1000;
! #X obj 361 287 osc~ 165;
! #X obj 554 288 osc~ 267;
! #X obj 649 288 osc~ 311;
! #X obj 742 290 osc~ 444;
! #X obj 834 288 osc~ 509;
! #X connect 0 0 3 0;
! #X connect 0 1 40 1;
! #X connect 2 0 48 0;
! #X connect 3 0 2 0;
! #X connect 4 0 41 0;
! #X connect 5 0 6 0;
! #X connect 6 0 7 1;
! #X connect 7 0 17 0;
! #X connect 8 0 9 0;
! #X connect 9 0 10 1;
! #X connect 10 0 17 0;
! #X connect 10 0 17 1;
! #X connect 11 0 12 0;
  #X connect 12 0 13 1;
! #X connect 13 0 17 0;
! #X connect 13 0 17 1;
! #X connect 14 0 15 0;
! #X connect 15 0 16 1;
! #X connect 16 0 17 1;
! #X connect 18 0 5 0;
! #X connect 19 0 8 0;
! #X connect 20 0 11 0;
! #X connect 21 0 14 0;
! #X connect 22 0 23 0;
! #X connect 23 0 24 1;
! #X connect 24 0 34 0;
! #X connect 25 0 26 0;
! #X connect 26 0 27 1;
! #X connect 27 0 34 0;
! #X connect 27 0 34 1;
! #X connect 28 0 29 0;
  #X connect 29 0 30 1;
! #X connect 30 0 34 0;
! #X connect 30 0 34 1;
! #X connect 31 0 32 0;
! #X connect 32 0 33 1;
! #X connect 33 0 34 1;
! #X connect 35 0 7 0;
! #X connect 36 0 10 0;
  #X connect 37 0 16 0;
! #X connect 38 0 22 0;
! #X connect 39 0 25 0;
! #X connect 40 0 49 0;
! #X connect 41 0 0 0;
! #X connect 41 1 40 2;
! #X connect 42 0 18 0;
! #X connect 42 1 19 0;
! #X connect 43 0 20 0;
! #X connect 43 1 21 0;
! #X connect 44 0 38 0;
! #X connect 44 1 39 0;
! #X connect 45 0 47 0;
! #X connect 45 1 46 0;
! #X connect 46 0 31 0;
! #X connect 47 0 28 0;
! #X connect 48 0 3 1;
! #X connect 48 0 40 0;
! #X connect 49 0 42 0;
! #X connect 49 1 43 0;
! #X connect 49 2 44 0;
! #X connect 49 3 45 0;
! #X connect 49 4 90 0;
! #X connect 49 5 91 0;
! #X connect 49 6 92 0;
! #X connect 49 7 93 0;
! #X connect 50 0 51 0;
! #X connect 51 0 52 1;
! #X connect 52 0 62 0;
! #X connect 53 0 54 0;
! #X connect 54 0 55 1;
! #X connect 55 0 62 0;
! #X connect 55 0 62 1;
! #X connect 56 0 57 0;
! #X connect 57 0 58 1;
! #X connect 58 0 62 0;
! #X connect 58 0 62 1;
  #X connect 59 0 60 0;
  #X connect 60 0 61 1;
! #X connect 61 0 62 1;
! #X connect 63 0 50 0;
! #X connect 64 0 53 0;
! #X connect 65 0 56 0;
! #X connect 66 0 59 0;
! #X connect 67 0 68 0;
! #X connect 68 0 69 1;
! #X connect 69 0 79 0;
! #X connect 70 0 71 0;
! #X connect 71 0 72 1;
! #X connect 72 0 79 0;
! #X connect 72 0 79 1;
! #X connect 73 0 74 0;
! #X connect 74 0 75 1;
! #X connect 75 0 79 0;
! #X connect 75 0 79 1;
! #X connect 76 0 77 0;
! #X connect 77 0 78 1;
! #X connect 78 0 79 1;
! #X connect 80 0 52 0;
! #X connect 81 0 55 0;
! #X connect 82 0 58 0;
! #X connect 83 0 61 0;
! #X connect 84 0 69 0;
! #X connect 85 0 72 0;
! #X connect 86 0 75 0;
! #X connect 87 0 78 0;
! #X connect 88 0 67 0;
! #X connect 89 0 70 0;
! #X connect 90 0 63 0;
! #X connect 90 1 64 0;
! #X connect 91 0 65 0;
! #X connect 91 1 66 0;
! #X connect 92 0 88 0;
! #X connect 92 1 89 0;
! #X connect 93 0 95 0;
! #X connect 93 1 94 0;
! #X connect 94 0 76 0;
! #X connect 95 0 73 0;
! #X connect 96 0 13 0;
! #X connect 97 0 24 0;
! #X connect 98 0 27 0;
! #X connect 99 0 30 0;
! #X connect 100 0 33 0;
  #X restore 230 679 pd synthese;
  #N canvas 311 224 316 299 gemmouse 0;
--- 13,223 ----
  #X msg 191 106 mass fix 0 100 50 50;
  #N canvas 177 95 946 729 synthese 0;
! #X obj 268 68 inlet;
! #X msg -35 224 $1 50;
! #X obj -35 246 line~;
! #X obj -75 250 *~;
! #X msg 60 224 $1 50;
! #X obj 60 246 line~;
! #X obj 20 250 *~;
! #X msg 153 226 $1 50;
! #X obj 153 248 line~;
! #X obj 113 252 *~;
! #X msg 245 224 $1 50;
! #X obj 245 246 line~;
! #X obj 205 250 *~;
! #X obj 62 298 dac~;
! #X obj -64 164 / 200;
! #X obj 62 170 / 200;
! #X obj 153 172 / 200;
! #X obj 250 170 / 500;
! #X msg 346 227 $1 50;
! #X obj 346 249 line~;
! #X obj 306 253 *~;
! #X msg 441 227 $1 50;
! #X obj 441 249 line~;
! #X obj 401 253 *~;
! #X msg 534 229 $1 50;
! #X obj 534 251 line~;
! #X obj 494 255 *~;
! #X msg 626 227 $1 50;
! #X obj 626 249 line~;
! #X obj 586 253 *~;
! #X obj 443 301 dac~;
! #X obj -77 194 osc~ 55;
! #X obj 19 194 osc~ 110;
! #X obj 204 195 osc~ 222;
! #X obj 317 167 / 500;
! #X obj 444 173 / 500;
! #X obj -13 128 unpack f f;
! #X obj 176 134 unpack f f;
! #X obj 362 131 unpack f f;
! #X obj 553 138 unpack f f;
! #X obj 631 173 / 1000;
! #X obj 534 175 / 1000;
! #X msg -45 428 $1 50;
! #X obj -45 450 line~;
! #X obj -85 454 *~;
! #X msg 50 428 $1 50;
! #X obj 50 450 line~;
! #X obj 10 454 *~;
! #X msg 143 430 $1 50;
! #X obj 143 452 line~;
! #X obj 103 456 *~;
! #X msg 235 428 $1 50;
! #X obj 235 450 line~;
! #X obj 195 454 *~;
! #X obj 52 502 dac~;
! #X obj -74 368 / 200;
! #X obj 52 374 / 200;
! #X obj 143 376 / 200;
! #X obj 240 374 / 500;
! #X msg 336 431 $1 50;
! #X obj 336 453 line~;
! #X obj 296 457 *~;
! #X msg 431 431 $1 50;
! #X obj 431 453 line~;
! #X obj 391 457 *~;
! #X msg 524 433 $1 50;
! #X obj 524 455 line~;
! #X obj 484 459 *~;
! #X msg 616 431 $1 50;
! #X obj 616 453 line~;
! #X obj 576 457 *~;
! #X obj 433 505 dac~;
! #X obj -87 398 osc~ 55;
! #X obj 9 398 osc~ 110;
! #X obj 102 400 osc~ 166;
! #X obj 194 398 osc~ 222;
! #X obj 295 401 osc~ 444;
! #X obj 390 401 osc~ 890;
! #X obj 483 403 osc~ 1113;
! #X obj 575 401 osc~ 2229;
! #X obj 307 371 / 500;
! #X obj 434 377 / 500;
! #X obj -23 332 unpack f f;
! #X obj 166 338 unpack f f;
! #X obj 352 335 unpack f f;
! #X obj 543 342 unpack f f;
! #X obj 621 377 / 1000;
! #X obj 524 379 / 1000;
! #X obj 112 196 osc~ 165;
! #X obj 305 197 osc~ 267;
! #X obj 400 197 osc~ 311;
! #X obj 493 199 osc~ 444;
! #X obj 585 197 osc~ 509;
! #X obj 268 99 route 1 5 9 13 17 21 25 29;
! #X connect 0 0 93 0;
! #X connect 1 0 2 0;
! #X connect 2 0 3 1;
! #X connect 3 0 13 0;
! #X connect 4 0 5 0;
! #X connect 5 0 6 1;
! #X connect 6 0 13 0;
! #X connect 6 0 13 1;
! #X connect 7 0 8 0;
! #X connect 8 0 9 1;
! #X connect 9 0 13 0;
! #X connect 9 0 13 1;
! #X connect 10 0 11 0;
! #X connect 11 0 12 1;
  #X connect 12 0 13 1;
! #X connect 14 0 1 0;
! #X connect 15 0 4 0;
! #X connect 16 0 7 0;
! #X connect 17 0 10 0;
! #X connect 18 0 19 0;
! #X connect 19 0 20 1;
! #X connect 20 0 30 0;
! #X connect 21 0 22 0;
! #X connect 22 0 23 1;
! #X connect 23 0 30 0;
! #X connect 23 0 30 1;
! #X connect 24 0 25 0;
! #X connect 25 0 26 1;
! #X connect 26 0 30 0;
! #X connect 26 0 30 1;
! #X connect 27 0 28 0;
! #X connect 28 0 29 1;
  #X connect 29 0 30 1;
! #X connect 31 0 3 0;
! #X connect 32 0 6 0;
! #X connect 33 0 12 0;
! #X connect 34 0 18 0;
! #X connect 35 0 21 0;
! #X connect 36 0 14 0;
! #X connect 36 1 15 0;
  #X connect 37 0 16 0;
! #X connect 37 1 17 0;
! #X connect 38 0 34 0;
! #X connect 38 1 35 0;
! #X connect 39 0 41 0;
! #X connect 39 1 40 0;
! #X connect 40 0 27 0;
! #X connect 41 0 24 0;
! #X connect 42 0 43 0;
! #X connect 43 0 44 1;
! #X connect 44 0 54 0;
! #X connect 45 0 46 0;
! #X connect 46 0 47 1;
! #X connect 47 0 54 0;
! #X connect 47 0 54 1;
! #X connect 48 0 49 0;
! #X connect 49 0 50 1;
! #X connect 50 0 54 0;
! #X connect 50 0 54 1;
! #X connect 51 0 52 0;
! #X connect 52 0 53 1;
! #X connect 53 0 54 1;
! #X connect 55 0 42 0;
! #X connect 56 0 45 0;
! #X connect 57 0 48 0;
! #X connect 58 0 51 0;
  #X connect 59 0 60 0;
  #X connect 60 0 61 1;
! #X connect 61 0 71 0;
! #X connect 62 0 63 0;
! #X connect 63 0 64 1;
! #X connect 64 0 71 0;
! #X connect 64 0 71 1;
! #X connect 65 0 66 0;
! #X connect 66 0 67 1;
! #X connect 67 0 71 0;
! #X connect 67 0 71 1;
! #X connect 68 0 69 0;
! #X connect 69 0 70 1;
! #X connect 70 0 71 1;
! #X connect 72 0 44 0;
! #X connect 73 0 47 0;
! #X connect 74 0 50 0;
! #X connect 75 0 53 0;
! #X connect 76 0 61 0;
! #X connect 77 0 64 0;
! #X connect 78 0 67 0;
! #X connect 79 0 70 0;
! #X connect 80 0 59 0;
! #X connect 81 0 62 0;
! #X connect 82 0 55 0;
! #X connect 82 1 56 0;
! #X connect 83 0 57 0;
! #X connect 83 1 58 0;
! #X connect 84 0 80 0;
! #X connect 84 1 81 0;
! #X connect 85 0 87 0;
! #X connect 85 1 86 0;
! #X connect 86 0 68 0;
! #X connect 87 0 65 0;
! #X connect 88 0 9 0;
! #X connect 89 0 20 0;
! #X connect 90 0 23 0;
! #X connect 91 0 26 0;
! #X connect 92 0 29 0;
! #X connect 93 0 36 0;
! #X connect 93 1 37 0;
! #X connect 93 2 38 0;
! #X connect 93 3 39 0;
! #X connect 93 4 82 0;
! #X connect 93 5 83 0;
! #X connect 93 6 84 0;
! #X connect 93 7 85 0;
  #X restore 230 679 pd synthese;
  #N canvas 311 224 316 299 gemmouse 0;
***************
*** 280,289 ****
  #X obj 48 177 separator;
  #X obj 48 153 any;
- #X obj 127 57 unpack f f;
  #X obj 125 136 t b f;
! #X connect 0 0 10 0;
  #X connect 1 0 2 0;
  #X connect 3 0 4 0;
! #X connect 4 0 11 0;
  #X connect 5 0 6 0;
  #X connect 6 0 1 2;
--- 264,273 ----
  #X obj 48 177 separator;
  #X obj 48 153 any;
  #X obj 125 136 t b f;
! #X obj 127 57 unpack f f f;
! #X connect 0 0 11 0;
  #X connect 1 0 2 0;
  #X connect 3 0 4 0;
! #X connect 4 0 10 0;
  #X connect 5 0 6 0;
  #X connect 6 0 1 2;
***************
*** 291,298 ****
  #X connect 8 0 1 0;
  #X connect 9 0 8 0;
! #X connect 10 0 3 0;
! #X connect 10 1 5 0;
! #X connect 11 0 9 0;
! #X connect 11 1 1 1;
  #X restore 141 657 pd massrender;
  #N canvas 284 227 587 558 linkrender 0;
--- 275,282 ----
  #X connect 8 0 1 0;
  #X connect 9 0 8 0;
! #X connect 10 0 9 0;
! #X connect 10 1 1 1;
! #X connect 11 1 3 0;
! #X connect 11 2 5 0;
  #X restore 141 657 pd massrender;
  #N canvas 284 227 587 558 linkrender 0;
***************
*** 306,310 ****
  #X obj 44 192 any;
  #X obj 93 164 t b f;
- #X obj 93 69 unpack f f f f;
  #X obj 44 265 curve 2;
  #X obj 207 121 / 12.5;
--- 290,293 ----
***************
*** 316,341 ****
  #X obj 207 193 pack f f;
  #X msg 207 216 $1 $2 0;
! #X connect 0 0 9 0;
  #X connect 1 0 2 0;
  #X connect 2 0 8 0;
  #X connect 3 0 4 0;
! #X connect 4 0 15 1;
  #X connect 5 0 7 1;
! #X connect 6 0 10 0;
  #X connect 7 0 6 0;
  #X connect 8 0 7 0;
! #X connect 8 1 15 0;
! #X connect 9 0 1 0;
! #X connect 9 1 3 0;
! #X connect 9 2 11 0;
! #X connect 9 3 13 0;
! #X connect 11 0 12 0;
! #X connect 12 0 17 0;
! #X connect 13 0 14 0;
! #X connect 14 0 17 1;
! #X connect 15 0 16 0;
! #X connect 16 0 10 1;
! #X connect 17 0 18 0;
! #X connect 18 0 10 2;
  #X restore 52 678 pd linkrender;
  #X msg 221 231 mass mob 1 $1 $2 $3;
--- 299,325 ----
  #X obj 207 193 pack f f;
  #X msg 207 216 $1 $2 0;
! #X obj 93 69 unpack f f f f f;
! #X connect 0 0 18 0;
  #X connect 1 0 2 0;
  #X connect 2 0 8 0;
  #X connect 3 0 4 0;
! #X connect 4 0 14 1;
  #X connect 5 0 7 1;
! #X connect 6 0 9 0;
  #X connect 7 0 6 0;
  #X connect 8 0 7 0;
! #X connect 8 1 14 0;
! #X connect 10 0 11 0;
! #X connect 11 0 16 0;
! #X connect 12 0 13 0;
! #X connect 13 0 16 1;
! #X connect 14 0 15 0;
! #X connect 15 0 9 1;
! #X connect 16 0 17 0;
! #X connect 17 0 9 2;
! #X connect 18 1 1 0;
! #X connect 18 2 3 0;
! #X connect 18 3 10 0;
! #X connect 18 4 12 0;
  #X restore 52 678 pd linkrender;
  #X msg 221 231 mass mob 1 $1 $2 $3;
Index: 03_imsd2Dtest.pd
===================================================================
RCS file: /cvsroot/pure-data/externals/nusmuk/msd2D/03_imsd2Dtest.pd,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** 03_imsd2Dtest.pd	21 Apr 2005 14:28:54 -0000	1.2
--- 03_imsd2Dtest.pd	26 Apr 2005 16:10:07 -0000	1.3
***************
*** 30,60 ****
  #X obj 47 547 cnv 15 400 200 empty empty empty 20 12 0 14 -261689 -66577
  0;
- #N canvas 643 123 605 590 massrender 0;
- #X obj 127 22 inlet;
- #X obj 48 203 translateXYZ;
- #X obj 127 86 / 12.5;
- #X obj 127 109 - 4;
- #X obj 192 87 / 12.5;
- #X obj 192 110 - 4;
- #X obj 64 114 gemhead;
- #X obj 48 177 separator;
- #X obj 48 153 any;
- #X obj 127 57 unpack f f;
- #X obj 125 136 t b f;
- #X obj 48 229 sphere 0.2;
- #X connect 0 0 9 0;
- #X connect 1 0 11 0;
- #X connect 2 0 3 0;
- #X connect 3 0 10 0;
- #X connect 4 0 5 0;
- #X connect 5 0 1 2;
- #X connect 6 0 8 1;
- #X connect 7 0 1 0;
- #X connect 8 0 7 0;
- #X connect 9 0 2 0;
- #X connect 9 1 4 0;
- #X connect 10 0 8 0;
- #X connect 10 1 1 1;
- #X restore 134 591 pd massrender;
  #N canvas 284 227 587 558 linkrender 0;
  #X obj 93 25 inlet;
--- 30,33 ----
***************
*** 67,71 ****
  #X obj 44 192 any;
  #X obj 93 164 t b f;
- #X obj 93 69 unpack f f f f;
  #X obj 44 265 curve 2;
  #X obj 207 121 / 12.5;
--- 40,43 ----
***************
*** 77,102 ****
  #X obj 207 193 pack f f;
  #X msg 207 216 $1 $2 0;
! #X connect 0 0 9 0;
  #X connect 1 0 2 0;
  #X connect 2 0 8 0;
  #X connect 3 0 4 0;
! #X connect 4 0 15 1;
  #X connect 5 0 7 1;
! #X connect 6 0 10 0;
  #X connect 7 0 6 0;
  #X connect 8 0 7 0;
! #X connect 8 1 15 0;
! #X connect 9 0 1 0;
! #X connect 9 1 3 0;
! #X connect 9 2 11 0;
! #X connect 9 3 13 0;
! #X connect 11 0 12 0;
! #X connect 12 0 17 0;
! #X connect 13 0 14 0;
! #X connect 14 0 17 1;
! #X connect 15 0 16 0;
! #X connect 16 0 10 1;
! #X connect 17 0 18 0;
! #X connect 18 0 10 2;
  #X restore 53 614 pd linkrender;
  #X text 465 563 1 CREATE WINDOW -->;
--- 49,75 ----
  #X obj 207 193 pack f f;
  #X msg 207 216 $1 $2 0;
! #X obj 93 69 unpack f f f f f;
! #X connect 0 0 18 0;
  #X connect 1 0 2 0;
  #X connect 2 0 8 0;
  #X connect 3 0 4 0;
! #X connect 4 0 14 1;
  #X connect 5 0 7 1;
! #X connect 6 0 9 0;
  #X connect 7 0 6 0;
  #X connect 8 0 7 0;
! #X connect 8 1 14 0;
! #X connect 10 0 11 0;
! #X connect 11 0 16 0;
! #X connect 12 0 13 0;
! #X connect 13 0 16 1;
! #X connect 14 0 15 0;
! #X connect 15 0 9 1;
! #X connect 16 0 17 0;
! #X connect 17 0 9 2;
! #X connect 18 1 1 0;
! #X connect 18 2 3 0;
! #X connect 18 3 10 0;
! #X connect 18 4 12 0;
  #X restore 53 614 pd linkrender;
  #X text 465 563 1 CREATE WINDOW -->;
***************
*** 151,191 ****
  #X msg 216 384 setK inter 1;
  #X msg 216 404 setK inter 2;
! #X connect 0 0 36 0;
  #X connect 3 0 2 0;
  #X connect 4 0 5 0;
  #X connect 6 0 2 0;
! #X connect 7 0 42 0;
  #X connect 7 1 1 0;
  #X connect 9 0 7 0;
! #X connect 10 0 36 0;
  #X connect 11 0 9 0;
! #X connect 13 0 30 1;
  #X connect 14 0 9 0;
  #X connect 15 0 9 0;
  #X connect 17 0 18 0;
! #X connect 18 0 43 0;
  #X connect 20 0 7 0;
  #X connect 21 0 7 0;
! #X connect 30 0 32 0;
! #X connect 30 0 33 0;
! #X connect 31 0 30 0;
  #X connect 32 0 7 0;
! #X connect 33 0 7 0;
! #X connect 35 0 9 0;
! #X connect 36 0 37 0;
! #X connect 36 1 40 0;
! #X connect 36 2 13 0;
! #X connect 36 2 15 0;
! #X connect 36 3 38 0;
! #X connect 36 4 14 0;
! #X connect 36 5 11 0;
! #X connect 37 0 9 0;
! #X connect 38 0 35 0;
! #X connect 40 0 9 0;
! #X connect 41 0 5 1;
! #X connect 42 0 26 0;
! #X connect 43 0 7 0;
  #X connect 46 0 7 0;
  #X connect 47 0 7 0;
  #X connect 48 0 7 0;
- #X connect 49 0 7 0;
--- 124,164 ----
  #X msg 216 384 setK inter 1;
  #X msg 216 404 setK inter 2;
! #X connect 0 0 35 0;
  #X connect 3 0 2 0;
  #X connect 4 0 5 0;
  #X connect 6 0 2 0;
! #X connect 7 0 41 0;
  #X connect 7 1 1 0;
  #X connect 9 0 7 0;
! #X connect 10 0 35 0;
  #X connect 11 0 9 0;
! #X connect 13 0 29 1;
  #X connect 14 0 9 0;
  #X connect 15 0 9 0;
  #X connect 17 0 18 0;
! #X connect 18 0 42 0;
  #X connect 20 0 7 0;
  #X connect 21 0 7 0;
! #X connect 29 0 31 0;
! #X connect 29 0 32 0;
! #X connect 30 0 29 0;
! #X connect 31 0 7 0;
  #X connect 32 0 7 0;
! #X connect 34 0 9 0;
! #X connect 35 0 36 0;
! #X connect 35 1 39 0;
! #X connect 35 2 13 0;
! #X connect 35 2 15 0;
! #X connect 35 3 37 0;
! #X connect 35 4 14 0;
! #X connect 35 5 11 0;
! #X connect 36 0 9 0;
! #X connect 37 0 34 0;
! #X connect 39 0 9 0;
! #X connect 40 0 5 1;
! #X connect 41 0 25 0;
! #X connect 42 0 7 0;
! #X connect 45 0 7 0;
  #X connect 46 0 7 0;
  #X connect 47 0 7 0;
  #X connect 48 0 7 0;