InsertObject Increment

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 07/04/2012 at 01:45, xxxxxxxx wrote:

User Information:
Cinema 4D Version:
Platform:
Language(s) :

---------
Hi All,

I'm trying to insert a line of cubes along the X axis as determined by a number the user selects (via a Real gui element). Everything seems to work fine, except I can't get each cube to become a child of the previous inserted cube object. My code below:

note: Prev_Cube is just a marker for myself to fix (if that's where the fix is needed...!)

if(Cube_Count == 0){goto End;}  
for(i=1; i<=Cube_Count;)  
{  
 BaseObject *Cube = BaseObject::Alloc( Ocube );  
  if(!Cube) GePrint("Cube failure");  
 if(i!= Cube_Count){Cube->SetName("Cube " + LongToString(i));}  
 else{Cube->SetName("Cube " + LongToString(i));}  
 if(Cube_Count == 1){Cube->SetRelPos(Vector(200.0, 0.0, 0.0));}  
 else{Real Dist = 200/Cube_Count;GePrint(LongToString(Div));Cube->SetRelPos(Vector(Dist, 0.0, 0.0));}  
  if(i == 1)  
 {  
doc->InsertObject(Cube, NULL, NULL);  
 }  
 else  
 {  
doc->InsertObject(Cube, Prev_Cube???, NULL);    // what's missing in-place of Prev_Cube here???  
 }  
  EventAdd();  
 i++;  
 if(i > Cube_Count){goto End;}  
}

Cheers,

WP.

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 07/04/2012 at 02:31, xxxxxxxx wrote:

GeListNode has some methods to group objects.

InsertUnder() and InsertUnderLast() would be the one you are searching for. is there a reason why
you have to add each cube manually into the document, instead of creating the whole hierarchy
within the code and then just return the parent baseobject containing the full hierarchy ?

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 07/04/2012 at 02:47, xxxxxxxx wrote:

Hi littledevil,

I had been looking at GeListNode but couldn't quite get it to work. I'll go back and have a play with that - thanks!

Re: manually adding them to doc - you'll have to forgive my ignorance on this (learning this as I go) but are you refering to having the Baseobject and/or EventAdd inside the loop? It's just how I managed to get it all to work thus far - no other reason really! Is there a more efficient way this could be done?

Thanks again,

WP.

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 07/04/2012 at 02:56, xxxxxxxx wrote:

im refering to doc->InsertObject . you are placing each cube seperatly into the document. which
forces a rebuild of the cache each time. baseobjects are derived from BaseList2D which is derived
from GeListNode. so any baseobject can be a tree of baseobjects. just get a pointer to your last
cube and it will be something like pointer newcube.InsertUnder(pointer lastcube).

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 07/04/2012 at 03:20, xxxxxxxx wrote:

Ah - so I only need to return the initial parent cube and the rest will follow?
The experiments I did with the .InsertUnder etc must have been close - but were obviously not right. Will post something a bit more fruitful when it's going (or if it isn't!).

Cheers,

WP.

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 07/04/2012 at 03:32, xxxxxxxx wrote:

yes,

BaseObject *cube = BaseObject::Alloc( Ocube );
BaseObject *sphere = BaseObject::Alloc( Osphere );
  
cube.InsertUnder(sphere);
  
return sphere;

will return a sphere with cube as its child.

edit : i am a beginner myself, but here is an example of my plugin work in progress, it is a static method which either returns a loftnubrs>nsidespline or a loftnubrs > spline + spline structure. it
doesn't inculde the recursion / tree aspect of your example, but maybe it helps.
i

static BaseObject *GetDisc(BaseObject *op)
{
	BaseContainer *bc = op->GetDataInstance();
	BaseObject *loft = NULL, *inner = NULL, *outer = NULL;
  
	switch (bc->GetLong(PLIGHT_DISC_TYPE))
	{
		case PLIGHT_DISC_TYPE_DISC :
			{
				loft = BaseObject::Alloc(Oloft);
				inner = BaseObject::Alloc(Osplinearc);
				outer = BaseObject::Alloc(Osplinearc);
				BaseContainer *loftbc = loft->GetDataInstance();
				BaseContainer *innerbc = inner->GetDataInstance();
				BaseContainer *outerbc = outer->GetDataInstance();
  
				loft->SetName("Light");
				loftbc->SetBool(LOFTOBJECT_ADAPTIVEY , FALSE);
				loftbc->SetLong(LOFTOBJECT_SUBX, bc->GetReal(PLIGHT_DISC_SEGMENTS_ROTATION) * 4 + 1);
				loftbc->SetLong(LOFTOBJECT_SUBY, bc->GetReal(PLIGHT_DISC_SEGMENTS_DISC) + 2);
				loftbc->SetLong(CAP_START, CAPTYPE_NOCAP);
				loftbc->SetLong(CAP_END, CAPTYPE_NOCAP);
				outer->SetName("Outer");
				outerbc->SetReal(PRIM_ARC_RADIUS , bc->GetReal(PLIGHT_DISC_OUTER_SIZE_X));
				outerbc->SetReal(PRIM_ARC_START , bc->GetReal(PLIGHT_DISC_SLICE_START));
				outerbc->SetReal(PRIM_ARC_END , bc->GetReal(PLIGHT_DISC_SLICE_END));
				if (bc->GetBool(PLIGHT_DISC_ISELLIPTICAL))
					if (bc->GetReal(PLIGHT_DISC_OUTER_SIZE_X) > 0)
						outer->SetAbsScale(Vector(1 , (bc->GetReal(PLIGHT_DISC_OUTER_SIZE_Y)/bc->GetReal(PLIGHT_DISC_OUTER_SIZE_X)) , 1));
					else
						outer->SetAbsScale(Vector(1 , 1 , 1));
				outer->InsertUnder(loft);
				inner->SetName("Inner");
				innerbc->SetReal(PRIM_ARC_RADIUS , bc->GetReal(PLIGHT_DISC_INNER_SIZE_X));
				innerbc->SetReal(PRIM_ARC_START , bc->GetReal(PLIGHT_DISC_SLICE_START));
				innerbc->SetReal(PRIM_ARC_END , bc->GetReal(PLIGHT_DISC_SLICE_END));
				if (bc->GetBool(PLIGHT_DISC_ISELLIPTICAL))
					if (bc->GetReal(PLIGHT_DISC_INNER_SIZE_X) > 0)
						inner->SetAbsScale(Vector(1 , bc->GetReal(PLIGHT_DISC_INNER_SIZE_Y)/bc->GetReal(PLIGHT_DISC_INNER_SIZE_X) , 1));
					else
						inner->SetAbsScale(Vector(1 , 1 , 1));
				inner->InsertUnderLast(loft);
			}
			break;
		case PLIGHT_DISC_TYPE_NSIDE :
			{
				loft = BaseObject::Alloc(Oloft);
				outer = BaseObject::Alloc(Osplinenside);
				BaseContainer *loftbc = loft->GetDataInstance();
				BaseContainer *outerbc = outer->GetDataInstance();
  
				loft->SetName("Light");
				loftbc->SetLong(CAP_TYPE , CAP_TYPE_NGON);
				outerbc->SetLong(SPLINEOBJECT_INTERPOLATION , SPLINEOBJECT_INTERPOLATION_NATURAL);
				outerbc->SetLong(SPLINEOBJECT_SUB , bc->GetLong(PLIGHT_NSIDE_SEGMENTS));
				outerbc->SetReal(PRIM_NSIDE_RADIUS, bc->GetReal(PLIGHT_NSIDE_SIZE_X));
				outerbc->SetBool(PRIM_NSIDE_ROUNDING , TRUE);
				outerbc->SetReal(PRIM_NSIDE_RRADIUS, bc->GetReal(PLIGHT_NSIDE_ROUNDING));
				outerbc->SetLong(PRIM_NSIDE_SIDES, bc->GetReal(PLIGHT_NSIDE_SIDES));
				if (bc->GetBool(PLIGHT_DISC_ISELLIPTICAL))
					if (bc->GetReal(PLIGHT_DISC_INNER_SIZE_X) > 0)
						outer->SetAbsScale(Vector(1 , bc->GetReal(PLIGHT_NSIDE_SIZE_Y)/bc->GetReal(PLIGHT_NSIDE_SIZE_X) , 1));
					else
						outer->SetAbsScale(Vector(1 , 1 , 1));
				outer->SetAbsRot(Vector(0 , 0 , bc->GetReal(PLIGHT_NSIDE_ROTATION)));
				outer->InsertUnder(loft);			
			}
			break;
	}
	return loft;
}

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 07/04/2012 at 05:47, xxxxxxxx wrote:

Try it this way:

if(Cube_Count == 0L){goto End;}  
BaseObject*    Cube =    NULL;  
BaseObject* Parent_Cube = NULL;  
for(i = 1L; i <= Cube_Count; ++i)  
{  
  Cube = BaseObject::Alloc( Ocube );  
  if (!Cube) { GePrint("Cube failure"); break; }  // Or continue but you can't continue down from here if Cube equals NULL unless you want a definite crash!  
  if (i != Cube_Count)    Cube->SetName("Cube " + LongToString(i));  
  else Cube->SetName("Cube " + LongToString(i));  
  if (Cube_Count == 1L) Cube->SetRelPos(Vector(200.0, 0.0, 0.0));  
  else  
  {  
      Real Dist = 200.0/Cube_Count;  
      GePrint(LongToString(Dist));  
      Cube->SetRelPos(Vector(Dist, 0.0, 0.0));  
  }  
  doc->InsertObject(Cube, Parent_Cube, NULL);  
  Parent_Cube =    Cube;  
  EventAdd();  
}

Note that if Parent_Cube is NULL then Cube (at i == 1L) is inserted at the root. Then each subsequent Cube is inserted as a child of the previously created Cube as set by Parent_Cube in the loop;

Helper

THE POST BELOW IS MORE THAN 5 YEARS OLD. RELATED SUPPORT INFORMATION MIGHT BE OUTDATED OR DEPRECATED

On 08/04/2012 at 02:39, xxxxxxxx wrote:

Aha -adding a null BaseObject that you change the newly inserted object over too in the loop as you've suggested Rob with the "BaseObject Parent = NULL" line did the trick.

I've got to work a bit more on this gelistnode tree business as I think I could utilise that somewhere else - but for now I'm a happy camper!

Thanks to both of you - your help is much appreciated!

WP.