Leaderboard

Steven P, I could not get yours to work <for me> unfortunately. Seems like it got stuck in a loop. (princ "\nNext block: ") My test was this and a crossing gave me this.. <I had to cancel to get out of the loop> I do appreciate it! And the help elsewhere!!

I moved your thread to the AutoCAD 3D Modelling & Rendering Forum. Feedback is not a place to post your work and ask for recommendations, it for feedback about the CADtutor forum as noted in the description.

I would like to express my gratitude first. I used Lisp you made for 3 days. It definitely works better than the previous one. Is it possible that the problem areas you mentioned cannot be improved? 'Adjacent lines are found from an area round the end of the last one, however if there are very short lines this currently makes an error, and similarly a small gap between adjacent lines also has an error (I think I know the fix for these ' We also found that the hole became larger with some use. I also found areas where the lines overlap. We also discovered areas where Lisp was not applicable. We also found cases where the results were different when the shape was the same but scaled differently. Thank you to everyone who helps us every time. NG sample 24.03.04.dxf

Try this: (defun c:foo ( / accm c ly nm) (setq accm (vla-getinterfaceobject (vlax-get-acad-object) (strcat "AutoCAD.AcCmColor." (substr (getvar 'ACADVER) 1 2)) ) ) (while (setq ly (tblnext "layer" (not ly))) (and (wcmatch (setq nm (cdr (assoc 2 ly))) "~*|*") (setq c (cdr (assoc 62 ly))) (progn (vla-put-ColorIndex accm c) (entmod (append (entget (tblobjname "layer" nm)) (list (cons 420 (apply 'LM:RGB->True (mapcar 'vlax-get-property (list accm accm accm) '(red green blue) ) ) ) ) ) ) ) ) ) (vlax-release-object accm) (princ) ) ;; RGB -> True - Lee Mac 2011 ;; Args: r,g,b - Red,Green,Blue values (defun LM:RGB->True (r g b) (+ (lsh (fix r) 16) (lsh (fix g) 8) (fix b) ) )

@zwonko Try this if you might be interested. CONE_BATTER.lsp

I think the edge bean would have a shelf incorporated into its design to support the slab which would remain independent.

You need to talk to a structural engineer who does slab designs, can have slab on uncompacted material but the slab is designed to take that into account with a thicker slab and top and bottom reinforcement. Your edge and internal beams would have taper edges.