set display depth

[Anonymous]

Hi,

I am having a problem when trying to see a pipe but i can´t do set display depth, I am not referring to the cube . Is there any program or a plug that can be attached to auto cad and solve this problem? I am working in AUTOCAD PLANT 2018

Thank you

Elena Paisa

[Slawomir_ · Accepted solution]

3DCLIP command. Check this. Useful in some cases.

[Anonymous]

Hi 

Thank you for your reply. I heard about a program , whsich you have to pay for it and it makes the set display depth like in PDS.

Maybe you can help me and tell me what is the name of the program.

Regards ,

Elena

[Slawomir_]

I too want to have something similar to set view display depth like PDS. But dont know which Plant 3D app could do that.

[Slawomir_]

I've found something. Follow this:

• SECTIONPLANE command
• Type > Volume
• draw line, stretch box using grips
• LIVESECTION command
• select sectionplane that you have recently created.

Done.

This works for AutoCAD primitives but not for Plant 3D objects.

[Slawomir_]

Did any answer solve the problem?

[jabowabo]

Here is a LISP routine that may help.

https://www.youtube.com/watch?v=G1ePdEzVCeY

;Create a section view
(defun c:SX (/ origOrthoMode pt1 pt2 pt3 pt4)
  (setq origOrthoMode(getvar "orthomode"))
  (setvar "orthomode" 1)
  (setq origCmdEcho (getvar "cmdecho"))
  (setvar "cmdecho" 0)
  (setvar "expert" 5)ISO  
  
  ; Save original UCS
  ;(command "ucs" "s" "tempUcs")  ;  saves ucs to "tempUcs"  
  
  ; Save original View
  (command "-view" "save" "temp1")
  
  ;Set UCS to View  
  (command "ucs" "v")  
  
  ;Get points to define workplane
  (setq pt1 (getpoint "\nWork plane pt1: "))
  (setq pt2 (getpoint pt1 "\nWork plane pt2: "))
  (setq sxOrig (trans pt2 1 0))
  
  ;Get points to define clip plane locations
  (setq pt3 (getpoint "\nSection start: "))
  (setq pt4 (getpoint pt3 "\nSection end: "))

  (setq pt3 (trans pt3 1 0) pt4 (trans pt4 1 0)) ; translate points pt3 & pt4 from '1' (UCS) to '0' (WCS)
  (command "ucs" "w")
  (setvar "regenmode" 1)
  (command "dview" "" "po" pt4 pt3 "cl" "f" (distance pt4 pt3) "cl" "b" 0 "")

;  move ucs origin to middle of workplane line & sets to view
;   this causes grips to be active in dview box because ucs origin is in box  

  (command "ucs" "or" (trans sxOrig 1 0))
  (command "ucs" "v")
  (COMMAND "ZOOM" "E")
    
;  Restore original UCS
;  (command "ucs" "r" "tempUcs")   ;  restores ucs to "tempUcs"

  (setvar "orthomode" origOrthoMode)
  (setvar "regenmode" 0)
  (setvar "expert" 0)
  (setvar "cmdecho" origCmdEcho)
  (princ)
)

; End the section view
(defun c:ESX (/)
  (command "ucs" "w")
  (command "plan" "w")
  (setvar "regenmode" 1)
  
  ; Restore original View
  (command "-view" "restore" "temp1")
  (princ)
)

[skintsubby]

Hi paisaelena

Try out the CL.lsp in this post --> <<HERE>>

Mark

[Anonymous]

Hi,

I am trying to put a level gauge in Auticad Plant 3D and I can´t find anything in custom part.

Could you , please tell how can I put a level gauge ?

Thank you,

Elena Paisa

[Slawomir_]

---

@Anonymouswrote:

Hi,

I am trying to put a level gauge in Auticad Plant 3D and I can´t find anything in custom part.

Could you , please tell how can I put a level gauge ?

Thank you,

Elena Paisa

---

Post this as a new topic.

[janakkpandya]

This is really great utility.
Thanks was looking for the same.

I will tweak this little, like below...

pt3 = pt1

pt4 = pt2