关于pilot节点的小例子 ，请citybegger和几位版主指点！！

jinqinghai

请查:

http://www.simwe.com/forum/viewthread.php?tid=699654

http://www.simwe.com/forum/viewthread.php?tid=45414

对您应该有帮助, 别忘如果问题解决了, 上传您的经验和log file文件, 和大家共享. 当然应该适当的加分鼓励.

jinqinghai

见附件如下:
     
例题是用GUI做的，因此命令流有些乱，不过是个调通的程序：
/PREP7
!*
ET,1,PLANE182
!*
!*
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,6.9e4
MPDATA,PRXY,1,,0.32
TB,BISO,1,1,2,
TBTEMP,0
TBDATA,,31,200,,,,
SAVE
RECTNG,0,10,0,2,
FLST,2,2,8
FITEM,2,10,7,0
FITEM,2,10,12,0
CIRCLE,P51X, , , ,360,4,
GPLOT
SAVE
FLST,5,1,4,ORDE,1
FITEM,5,3
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,20, , , , ,1
!*
FLST,5,1,4,ORDE,1
FITEM,5,2
CM,_Y,LINE
LSEL, , , ,P51X
CM,_Y1,LINE
CMSEL,,_Y
!*
LESIZE,_Y1, , ,5, , , , ,1
!*
MSHAPE,0,2D
MSHKEY,1
!*
CM,_Y,AREA
ASEL, , , , 1
CM,_Y1,AREA
CHKMSH,'AREA'
CMSEL,S,_Y
!*
AMESH,_Y1
!*
CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2
!*
GPLOT
SAVE
!*
!*
/COM, CONTACT PAIR CREATION - START
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_LINECM,LINE
CM,_AREACM,AREA
/GSAV,cwz,gsav,,temp
MP,MU,1,0.2
MAT,1
MP,EMIS,1,7.88860905221e-031
R,1
REAL,1
ET,2,169
ET,3,172
R,1,,,1.0,0.1,,
RMORE,,,1.0E20,0.0,1.0,
RMORE,0.0,0,1.0,0,0,0.5
RMORE,,,1.0,0.0
KEYOPT,3,2,0
KEYOPT,3,3,0
KEYOPT,3,4,0
KEYOPT,3,5,0
KEYOPT,3,7,0
KEYOPT,3,8,0
KEYOPT,3,9,0
KEYOPT,3,10,0
KEYOPT,3,11,0
KEYOPT,3,12,0
KEYOPT,2,2,0
KEYOPT,2,3,0
! Generate the target surface
LSEL,S,,,5
LSEL,A,,,6
LSEL,A,,,7
LSEL,A,,,8
CM,_TARGET,LINE
TYPE,2
LATT,-1,1,2,-1
TYPE,2
LMESH,ALL
! Generate the contact surface
LSEL,S,,,3
CM,_CONTACT,LINE
TYPE,3
NSLL,S,1
ESLN,S,0
ESURF,ALL
*SET,_REALID,1
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,1
LSEL,S,REAL,,1
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,1
LSEL,S,REAL,,1
CMSEL,A,_NODECM
CMDEL,_NODECM
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM
CMSEL,S,_LINECM
CMDEL,_LINECM
CMSEL,S,_AREACM
CMDEL,_AREACM
/GRES,cwz,gsav
CMDEL,_TARGET
CMDEL,_CONTACT
/COM, CONTACT PAIR CREATION - END
*CREATE,cwzplot,mac
/COM,
/COM,PLOT CONTACT PAIR(S)
~eui,'::apdl::noprint 1'
~eui,'::apdl::nooutput 1'
CM,_CWZ_EL,ELEM
CM,_CWZ_ND,NODE
CM,_CWZ_KP,KP
CM,_CWZ_LN,LINE
CM,_CWZ_AR,AREA
CM,_CWZ_VL,VOLU
ESEL,NONE
ESEL,A,REAL,,1
ESEL,R,ENAME,,169,174
NSLE
KSLN,S
LSLK,S,1
ASLL,S,1
/PNUM,TYPE,1
/NUM,1
/PSYMB,ESYS,0
EPLOT
CMSEL,S,_CWZ_EL
CMDEL,_CWZ_EL
CMSEL,S,_CWZ_ND
CMDEL,_CWZ_ND
CMSEL,S,_CWZ_KP
CMDEL,_CWZ_KP
CMSEL,S,_CWZ_LN
CMDEL,_CWZ_LN
CMSEL,S,_CWZ_AR
CMDEL,_CWZ_AR
CMSEL,S,_CWZ_VL
CMDEL,_CWZ_VL
/PSYMB,ESYS,0
/NUM,0
/PNUM,TYPE,0
/PNUM,REAL,0
/mrep,cwzplot
~eui,'::apdl::nooutput 0'
~eui,'::apdl::noprint 0'
*END
cwzplot
SAVE
EPLOT
TYPE, 2
MAT, 1
REAL, 1
ESYS, 0
SECNUM,
TSHAP,PILO
!*
E, 127
SAVE
FINISH
/SOLU
FLST,2,1,4,ORDE,1
FITEM,2,1
!*
/GO
DL,P51X, ,UY,
FLST,2,1,4,ORDE,1
FITEM,2,4
!*
/GO
DL,P51X, ,UX,
FLST,2,1,1,ORDE,1
FITEM,2,127
!*
/GO
D,P51X, ,-0.2, , , ,UY, , , , ,
SAVE
ANTYPE,0
NLGEOM,1
NSUBST,50,500,50
OUTRES,ALL,ALL
AUTOTS,1
TIME,1
/STATUS,SOLU
SOLVE
EPLOT
FLST,2,1,4,ORDE,1
FITEM,2,4
DLDELE,P51X,UX
FLST,2,1,1,ORDE,1
FITEM,2,127
!*
/GO
D,P51X, ,1.57, , , ,ROTZ, , , , ,
SAVE
NSUBST,200,1000,200
/STATUS,SOLU
SOLVE

求解后，进入后处理

/POST1

-999,-999,
ANDATA,0.5, ,1,1,2,1,0,1

jinqinghai

在您的楼上,就是我贴的

jinqinghai

是这个么?
简单的模拟一个圆柱在平台上滚动，定义接触时在圆柱的中心定义了pilot节点，按理说，只要控制pilot节点的运动就能控制整个刚性面的运动，我从初始条件中加了速度和角速度，另外在pilot节点上加了集中力，可是算的时候刚性面并不向前运动，试了其他的方法，比如加位移等，应力变化都不对（应力应该随着刚性面向前滚动随之变化的），另外由于速度较快，我用的是瞬态分析。单位
/PREP7
ET,1,SOLID45
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,EX,1,,2.4e6
MPDATA,PRXY,1,,0.3
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,DENS,1,,2.7e-9
MPTEMP,,,,,,,,
MPTEMP,1,0
MPDATA,MU,1,,0.3
RECTNG,0,20,0,4,
CYL4,10,6,2
VOFFST,2,2, ,
APLOT
ALLSEL,ALL
VOFFST,1,2, ,
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
/PNUM,KP,0
/PNUM,LINE,0
/PNUM,AREA,1
/PNUM,VOLU,0
/PNUM,NODE,0
/PNUM,TABN,0
/PNUM,SVAL,0
/NUMBER,0

/PNUM,ELEM,0
/REPLOT
/ANG,1,-30,XS,1
/REP,FAST
/ANG,1,-30,XS,1
/REP,FAST
ESIZE,0.4,0,
MSHAPE,0,3D
MSHKEY,1

CM,_Y,VOLU
VSEL, , , , 2
CM,_Y1,VOLU
CHKMSH,'VOLU'
CMSEL,S,_Y

VMESH,_Y1

CMDELE,_Y
CMDELE,_Y1
CMDELE,_Y2

VPLOT
CM,_NODECM,NODE
CM,_ELEMCM,ELEM
CM,_KPCM,KP
CM,_LINECM,LINE
CM,_AREACM,AREA
CM,_VOLUCM,VOLU
/GSAV,cwz,gsav,,temp
MP,MU,1,0.3
MAT,1
MP,EMIS,1,7.88860905221e-031
R,3
REAL,3
ET,2,170
ET,3,174
R,3,,,1.0,0.1,0,
RMORE,,,1.0E20,0.0,1.0,
RMORE,0.0,0,1.0,,1.0,0.5
RMORE,0,1.0,1.0,0.0,,1.0
KEYOPT,3,4,0
KEYOPT,3,5,1
KEYOPT,3,7,0
KEYOPT,3,8,0
KEYOPT,3,9,0
KEYOPT,3,10,1
KEYOPT,3,11,0
KEYOPT,3,12,0
KEYOPT,3,2,0
KEYOPT,2,1,0
KEYOPT,2,2,0
KEYOPT,2,3,0
KEYOPT,2,5,0
! Generate the target surface
ASEL,S,,,4
ASEL,A,,,5
ASEL,A,,,6
ASEL,A,,,7
CM,_TARGET,AREA
AATT,-1,3,2,-1
TYPE,2
AMESH,ALL
! Create a pilot node
! At center of mass of target geometric entities
N,8513, 10.0,6.0,1.0
TSHAP,PILO
E,8513
! Generate the contact surface
ASEL,S,,,11
CM,_CONTACT,AREA
TYPE,3
NSLA,S,1
ESLN,S,0
ESURF
*SET,_REALID,3
ALLSEL
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,3
ASEL,S,REAL,,3
/PSYMB,ESYS,1
/PNUM,TYPE,1
/NUM,1
EPLOT
ESEL,ALL
ESEL,S,TYPE,,2
ESEL,A,TYPE,,3
ESEL,R,REAL,,3
ASEL,S,REAL,,3
CMSEL,A,_NODECM
CMDEL,_NODECM
CMSEL,A,_ELEMCM
CMDEL,_ELEMCM
CMSEL,S,_KPCM
CMDEL,_KPCM
CMSEL,S,_LINECM
CMDEL,_LINECM
CMSEL,S,_AREACM
CMDEL,_AREACM
CMSEL,S,_VOLUCM
CMDEL,_VOLUCM
/GRES,cwz,gsav
CMDEL,_TARGET
CMDEL,_CONTACT
/MREP,EPLOT
FINISH
/SOL
FLST,2,1,5,ORDE,1
FITEM,2,9
DA,P51X,ALL,
FLST,2,2,5,ORDE,2
FITEM,2,10
FITEM,2,12
DA,P51X,SYMM
/VIEW,1,1,1,1
/ANG,1
/REP,FAST
FINISH
ALLSEL,ALL
FLST,2,1,1,ORDE,1
FITEM,2,8513
IC,P51X,ROTZ,0,7.56
FLST,2,1,1,ORDE,1
FITEM,2,8513
F,P51X,FY,-11500

/SOLU
FLST,2,1,1,ORDE,1
FITEM,2,8513
IC,P51X,UX, ,100,
FLST,2,1,1,ORDE,1
FITEM,2,8513
IC,P51X,ROTZ, ,7.89,

ANTYPE,4

TRNOPT,FULL
LUMPM,0

ANTYPE,4
NLGEOM,1
NSUBST,50,100,50
AUTOTS,1
KBC,0
LNSRCH,1
TIME,0.1
ALLSEL,ALL

jinqinghai

only this post is encrypted with 5 credit points, no other to choose

ahua326

真的是给长好的例子谢谢分先了  先学习了