@adriaGMU8Z wrote:
... I am currently drawing it using 3 manually offseted lines the side lines being a regular polyline and the central line being a dashed multiline, i set the thickness of this central line using the properties dashboard. The visual output is very good however it is a bit tedious.
The tedium can be reduced, with something like this [untested]:
(defun C:TEST (/ thk pl plobj)
(setq thk (getdist "\nDrawn thickness of waterproofing membrane: "))
(setvar 'plinewid 0)
(prompt "\nDraw center-line path of membrane section.")
(command-s "_.pline")
(setq pl (entlast) plobj (vlax-ename->vla-object pl))
(vla-offset plobj (/ thk 2))
(vla-offset plobj (/ thk -2))
(command "_.chprop" pl "" "_ltype" "dashed" "")
;; [does not require the linetype to be already loaded]
(entmod (append (entget pl) (list (cons 43 thk)))); middle-one width
(princ)
)
That is in simplest terms. It could be enhanced, for instance to save your membrane thickness and offer it as default, to save the current PLINEWID System Variable value [in case it's not 0] and restore it afterwards, etc.
If you want to first draw one of the edges rather than the middle, that can be done, though it will require a User pick of the side to which to OFFSET the initial Polyline.
Kent Cooper, AIA