autocad dynamic block with constraints - knee brace gusset plate

[shortkrish]

Dear all,

 

I am half way through making dynamic block with constraints for gusset of knee brace.

I followed the link. I am stuck @ adding vertical dimension of gusset. Kindly help. Please find attached.

 

 

knee brace.dwg

[BIGAL]

Do you need it to be a dynamic block ? I tend to just work out the shape and draw it. Do you have code for drawing the other objects ? If so can use the beam size and offsets, angles etc with this as part of other code.

[SLW210]

I have moved your thread to the AutoCAD Drawing Management & Output Forum. Please post in the most appropriate forum.

[shortkrish]

Only shapes are there.

The gusset plate and bolts are challenging part.

This is the most repetitive tasks in autocad.

It takes lot of time to do this in structural drawings. 

I have gone one step and fixed it uc305X305 col which is attached.

At this stage one problem is the parameter arrows are skewed, but stretches correctly.

for other sizes visibility states could be created.

I wonder whether all this can be done block properties table.

 

knee brace.dwg

[CyberAngel]

Just to clarify, the plate has to keep its shape even when it changes scale. So you can't scale it along one dimension. And if you move the outer edge, you may not get the upper edge in the right place, so the dimension goes askew.

 

I suppose it might work if you had a couple of constraints at the corners. Or use visibility states, as you suggest.

[BIGAL]

As I said can just be drawn using a lisp and could include bolt hole patterns. For me much easier than spending time trying to get a dynamic block working.

 

Ok some questions why is offset from angle beam 27.3665 and other side 26.7743. Why not say 25 or 30 etc ?. Distance along beam is 152.07 why not 150 ?

 

So for me select vertical edge of column, select end of angled beam. Work it out from there. 5 points. I did structural dwg's but a long time ago if you can set the rules about sizes etc then can do something.

 

You talk about bolts but no bolt holes in dwg again need rules min edge distance to bolt and spacing. 

 

[shortkrish]

this is only parametric block, hope to improve on this only parameter @ edge of brace angle is problem

knee brace - pa (1).dwg

[BIGAL]

Adding a front end dcl to enter the parameters to be used is easy, thats why I wrote Multi getvals.lsp that can be used in any code, it has default values you set  like 25 and 150.

 

If I can find time will do the bracket for you as a non block. Just pick 2 lines.  

 

Try this pick angle end line 1st 

 

; End plate by AlanH March 2024

(defun c:endpl ( / oldsnap ent1 d1 d2 tmp end1 end2 start1 start2 obj1 obj2 pt1 pt2 pt3 pt4 pt5)

(setq oldsnap (getvar 'osmode))
(setvar 'osmode 0)

(setq ent1 (entsel "\nPick line of angle beam near top end "))

(setq pt3 (cadr ent1))
(setq obj1 (vlax-ename->vla-object (car ent1)))
(setq start1 (vlax-curve-getstartPoint obj1))
(setq end1 (vlax-curve-getEndPoint obj1))
(setq d1 (distance pt3 end1))
(setq d2 (distance pt3 start1))
(if (< d1 d2)
(progn
(setq temp end1)
(setq end1 start1)
(setq start1 temp)
)
)

(if (not AH:getvalsm)(load "Multi Getvals.lsp"))
(setq ans (AH:getvalsm (list "Enter values " "Beam Offset " 7 6 "25" "Offset length " 7 6 "150" "End offset " 7 6 "80")))

(setq off1 (atof (car ans))
      off2 (atof (cadr ans))
	  off3 (atof (caddr ans))
)

(setq pt1 (polar (polar start1 ang off2) (+ ang (/ pi 2.)) off1))
(setq pt2 (polar (polar end1 ang off2) (- ang (/ pi 2.)) off1))

(setq obj3 (vlax-ename->vla-object (car (entsel "\nPick vertical edge "))))

(setq pt3 (polar pt2 (- ang pi) (+ off2 off3)))
(setq pt4 (vlax-curve-getclosestpointto obj3 pt3))
(setq pt5 (vlax-curve-getclosestpointto obj3 pt1))

(command "Pline" pt5 pt1 pt2 pt3 pt4 "")

(setvar 'osmode oldsnap)
(princ)
)
(c:endpl)

 

Multi GETVALS.lsp

[shortkrish]

hi, i am getting this error after loading both files 

[BIGAL]

Just check picking correct points, the P1 finds both ends of the beam vertical end line if you draw non 90 will screw up.