Inserting Text ONLY in 3D

[Steven Morgan]

I am trying to run a script that create an extrude with a bit of text on it that is ONLY a 3D Symbol and contains no 2D info. The extrude part is easy but I am not able to find a way to CreateText as 3D only. Is there anyway to do this? I've tried creating the text and doing a 

ResetOrientation3D;
Rotate3D(0,0,0);
Move3D(0,0,0);

but it remains a hybrid 2d/3d symbol.

[MullinRJ]

Use:

SetObjectVariableBoolean(LNewObj, 1160, False);

after you create the text to place it on the Layer Plane.

 

I’ll post an example when my internet comes back. 
 

Raymond

[Steven Morgan]

Ah wasn't aware of that command. Works perfect. 

 

Example for anybody else:

 

PROCEDURE makeExtrude2;
BEGIN
		{ 3D EXTRUDE }
		BeginXtrd(0,STR2NUM(sHeight)); { Create extruded case }
		Rect(0",0",STR2NUM(sLength),STR2NUM(sWidth));
		EndXtrd;
		HdlExtrude:=LNewObj; { Store extrude to handle }
		
		{ ADD TEXT }
		TextSize(2);
		TextJust(2);
		TextOrigin(0,0);
		BeginText;
		'PID'
		EndText;
		HdlCasePID:=LNewObj;
		SetObjectVariableBoolean(HdlCasePID, 1160, False);
		
		
	EndSym;
	
	hdlSym:=LNewObj;
END;

 

Edited July 10, 2023 by stevenmorgan94