Yes I am using APDL. I am working on my master thesis and my supervisor asked me to use it.

finish

/clear,start

*afun,deg

/UNITS,SI

!chord parameters

B=0.280

H=0.280

T=0.020

Len=2.80

!brace parameters

bo=0.140

ho=0.140

to=0.020

lob=0.70 !length of brace

lo=1.47 !location of brace from chord origin

linc=1.26 !location of 2nd brace from chord origin

EM=210000

PR=0.3

force=2000

/prep7

!keypoints for chord

k,1,0,0,0

k,2,B,0,0

k,3,B,H,0

k,4,0,H,0

!Keypoints at middle of outer rec.

k,5,0,H/2,0

k,6,B/2,0,0

k,7,B,H/2,0

k,8,B/2,H,0

!Keypoints at middle of inner rect.

k,9,B/2,H-T,0

k,10,T,H/2,0

k,11,B/2,T,0

k,12,B-T,H/2,0

!Keypoints for brace

!Outer sec.

k,21,0.070,H+lob,lo

k,22,0.210,H+lob,lo

k,23,0.210,H+lob,lo-0.140

k,24,0.070,H+lob,lo-0.140

!Keypoints at middle of outer rec.

k,25,0.070,H+lob,lo-0.070

k,26,0.140,H+lob,lo

k,27,0.210,H+lob,lo-0.070

k,28,0.140,H+lob,lo-0.140

!inner rec.

k,29,0.090,H+lob,lo-0.020

k,30,0.190,H+lob,lo-0.020

k,31,0.190,H+lob,lo-0.1-0.02

k,32,0.090,H+lob,lo-0.1-0.02

!keypoints for 2nd brace (outer sec. on chord end)

k,33,0.070,H,linc

k,34,0.21,H,linc

k,35,0.21,H,linc-0.2178 !(1.54+0.2178)

k,36,0.070,H,linc-0.2178

!(inner sec. on chord end)

k,37,0.090,H,1.24

k,38,0.190,H,1.24

k,39,0.190,H,1.0622

k,40,0.090,H,1.0622

!(outer sec. on free end)

k,41,0.07,H+0.4499,0.724

k,42,0.21,H+0.4499,0.724

k,43,0.21,H+0.3427,0.63401

k,44,0.07,H+0.3427,0.63401

!(inner sec. on free end)

k,45,0.090,H+0.4345,0.7111

k,46,0.190,H+0.4345,0.7111

k,47,0.190,H+0.3580,0.6468

k,48,0.090,H+0.3580,0.6468

l,5,10

l,6,11

l,7,12

l,8,9

allsel,all

!Chord cross section

rectng,0,B,0,H

rectng,T,B-T,T,H-T

asba,1,2,,delete,delete

allsel,all

vext,all,,,0,0,Len

!Brace cross section

a,21,22,23,24

a,29,30,31,32

asel,all

asba,11,12,,delete,delete

asel,all

aglue,all

allsel,all

!Extruding brace area by offset

voffst,13,-lob

!2nd brace area

a,33,34,35,36 !outer sec

a,37,38,39,40 !inner sec

!2nd brace x-area at free end

!area

a,41,42,43,44

a,45,46,47,48

asba,21,22,,delete,delete

asel,all

btol,0.10e-1 !increasing the tolerance level so that the points within increased distanced are assumed to be coincident

asba,23,24,,delete,delete

asel,all

!Creating volume for incline brace by selecting keypoints of already defined area

v,37,38,39,40,45,46,47,48

v,33,34,35,36,41,42,43,44

vovlap,3,4

vdele,3

allsel,all

adele,28

!vglue,all

!aglue,all

et,1,185

mp,ex,1,EM ! Definiere E-Modul

mp,prxy,1,PR

!esize,0.5

mat,1

type,1

mshape,0

mshkey,1

vmesh,all

!Boundary conditions (inclined brace free end)

!local,11,0,0,0.72990,0.7240,0,40,0,1,1

!allsel,all

!ksel,s,loc,z,0 !2nd brace (inclined)

!ksel,r,loc,y,0,0.140

!ksel,r,loc,x,0,0.140

!dk,all,uz,0

!ksel,all