topic Re: Need lisp or macro to flip pipe start & end points while holding inverts. in Civil 3D Customization Forum

Need lisp or macro to flip pipe start & end points while holding inverts.

ME42L — Fri, 21 Feb 2025 23:51:09 GMT

I do not need to change the flow direction (can be done in pipe properties), but rather I need to flip the start and end of the pipes, while holding the inverts they are set at.

There was a VBA macro "flippipe.dbv" for a while at the link below but its 404.

http://forums.augi.com/showthread.php?105211-Flip-Direction-for-Pipes

Does anyone have an alternative?

Re: Need lisp or macro to flip pipe start & end points while holding inverts.

BlackBox_ — Sat, 22 Feb 2025 15:41:09 GMT

Have you considered changing the Flow Method property to 'By Slope'?

Re: Need lisp or macro to flip pipe start & end points while holding inverts.

nkiakas — Sun, 23 Feb 2025 17:36:18 GMT

Hi @ME42L

I think this one i doable with Dynamo for C3D

Regards

Re: Need lisp or macro to flip pipe start & end points while holding inverts.

ME42L — Sun, 23 Feb 2025 17:39:53 GMT

I need to flip the start and end points for linetype purposes as well.

Re: Need lisp or macro to flip pipe start & end points while holding inverts.

ME42L — Sun, 23 Feb 2025 17:41:37 GMT

Unfortunately my dynamo skills are pretty basic now. How would you set up to do this?

Re: Need lisp or macro to flip pipe start & end points while holding inverts.

hippe013 — Mon, 24 Feb 2025 14:43:32 GMT

(defun c:PipeReverse ( / ss p0 p1) (setq ss (ssget ":s+." '(( 0 . "AECC_PIPE")))) (if ss (progn (setq pipe (vlax-ename->vla-object (ssname ss 0))) (setq p0 (vlax-safearray->list (vlax-variant-value (vlax-get-property pipe 'PointAtParam 0)))) (setq p1 (vlax-safearray->list (vlax-variant-value (vlax-get-property pipe 'PointAtParam 1)))) (vlax-invoke-method pipe 'SetStartAndEndPoints (vlax-3d-point (car p1) (cadr p1) (caddr p1)) (vlax-3d-point (car p0) (cadr p0) (caddr p0))) ) ) (princ "\nPipe has been reversed.") (princ) )

Re: Need lisp or macro to flip pipe start & end points while holding inverts.

ME42L — Tue, 25 Feb 2025 23:41:10 GMT

Thanks! I tried it, but there's an issue: it flips the start and end points of a pipe, and also flips the inverts. Is there a way to modify this so that only the start and end points are flipped, while the inverts remain unchanged?