技巧1：：：曲柄作剛體處理，處理方法為：建立了一個剛性區(qū)域，利用命令 cerig??！

技巧2：：搖桿端點確定方法：作圓相減得到點坐標(biāo)。

這些，是我花了功夫得到的小經(jīng)驗，

希望對初學(xué)者有用：

/PREP7
*afun,deg
*SET,l0,400
*SET,l1,100
*SET,l2,330
*SET,l3,260
*SET,fai,60
k,1,
k,2,L1*cos(fai),L1*sin(fai)
k,5,L0,

*GET, bx, KP, 2, loc, x
*GET, by, KP, 2, loc, y
*GET, dx, KP, 5, loc, x
*GET, dy, KP, 5, loc, y

circle,2,l2,
circle,5,l3,

lsbl,1,6

*GET, cx, KP, 12, loc, x
*GET, cy, KP, 12, loc, y

ldele,all,,,1

k,3,cx,cy
kgen,2,3

l,2,3
l,4,5

et,1,mass21
KEYOPT,1,1,0
KEYOPT,1,2,0
KEYOPT,1,3,3
R,1,1,1,
TYPE,1
REAL,1
KMESH,1

ET,2,BEAM3
R,2,48,16,2, , , ,
R,3,120,250,5, , , ,

MP,DENS,1,7.8e-6
MP,EX,1,2.1E+8
MP,PRXY,1,0.3

lesize,all,,,1

TYPE,2
MAT,1
REAL,2
LMESH,1

REAL,3
LMESH,2

CERIG,1,2,UXYZ, , , ,

cp,1,ux,3,4,
cp,2,uy,3,4,

d,1,all
d,5,,,,,,ux,uy

FINISH
/SOL

ANTYPE,2

MODOPT,SUBSP,5
EQSLV,FRONT
MXPAND,5, , ,0

MODOPT,SUBSP,5,0,1e10, ,OFF

solve

/AUTO,1
/REP,FAST
eplot

*get,freq1,mode,1,freq

不錯，希望再接再厲！