Week - 10 - Creating the midline and spot weld

Aim:

To Create a macro such that it will create a midline for tubular components and for creating the spot welds.

Procedure:

Part A

*createlistbypathpanel lines 1 "select source lines by path"
set source [hm_getlist lines 1]
*createlistbypathpanel lines 2 "select destination lines by path"
set target [hm_getlist lines 2]
foreach i $source j $target {
*linescreatemidline 1 1 2 2
*linecombine $i
}

Part B

*createlistbypathpanel nodes 1 "select source nodes by path"
set source [hm_getlist nodes 1]
*createlistbypathpanel nodes 2 "select destination nodes by path"
set target [hm_getlist nodes 2]
foreach i $source j $target {
*elementtype 5 1
*rigid $i $j 123456
}

Snippets:

Midline for tubular component is created after running the macro

Multiple Spot welds are created after running macro

* The created macro has been attached below.

Conclusion:

This macro makes CAE Engineer work life easier.