APDL命令流挑战赛

mdj219

finish
/clear,nostart
pi=3.1415926
/prep7
CYLIND,1,0,0,0.2,0,360
*do,i,1,12
wpoffs,0.3*cos(i*pi/6),0.3*sin(i*pi/6)
cswpla,i+10
csys,i+10
CYLIND,0.05,0,0,0.2,0,360
wpoffs,-0.3*cos(i*pi/6),-0.3*sin(i*pi/6)
*enddo
vsbv,1,all

hrbeu221

大家都学得很好阿！我刚接触这APDL命令，请大家介绍一些好的书！

myfy

有没有详细介绍这些命令的资料？？？

有的话，麻烦发到我的邮箱，谢谢了～～～

yin_ma@163.com

lovecan

太牛了 :handshake

我是独行者

呵呵,大家都很强呀,向你们学习

jxxansys

献丑了：
fini
/clea
/filn,wheel
/title,wheel-csys
Rr=40
r1=20
r=8
nn=5
depth=10
/prep7
/view,,1,1,1
CYL4,r1, 0, r,0,0,360, DEPTH
csys,1
vgen,nn,1,,,,360/nn
cylind,rr,0,0,depth,0,360
vsbv,6,all
/replot
save,all
finish

[ 本帖最后由 jxxansys 于 2009-6-2 19:04 编辑 ]

aircraft

我也来现丑了,请各位多多指教

!环境设置
fini
/cle
/filname,wheel
/title,wheel
*afun,deg

!几何参数设置
r_o=10 !圆柱半径
r_m=5  !钻孔中心半径
r_h=1.5  !钻孔半径
num=5  !钻孔个数
t=3    !圆柱厚度

!前处理
/prep7
pcirc,0,r_o
wpoff,r_m
pcirc,0,r_h
csys,1
agen,num,2,2,1,,360/num
asba,1,all
numcmp,all
voffst,1,t

[ 本帖最后由 aircraft 于 2009-8-29 15:44 编辑 ]

winterhot129

n=5
r1=5
r2=1
depth=3
/prep7
cylind,0,5,0,3,-180/n,180/n
cyl4,3,0,0.8,,,,3
vsbv,1,2
csys,1
vsel,all
vgen,5,3,,,,360/n
vsel,all
vglue,all
finish

winterhot129

n=5
r1=5
r2=1
depth=3
centdis=3
/prep7
cylind,0,r1,0,depth,-180/n,180/n
cyl4,centdis,0,r2,,,,depth
vsbv,1,2
csys,1
vsel,all
vgen,n,3,,,,360/n
vsel,all
vglue,all
finish

[ 本帖最后由 winterhot129 于 2009-9-8 13:51 编辑 ]