用ANSYS怎样画椭圆

水幽寒 发表于 2006-11-25 20:18:57 | 显示全部楼层 | 阅读模式
用ANSYS怎样画椭圆
! where x**2/a**2 + y**2/b**2 = 1
! and the whole elliptic arc is divided into N parts
! equally by the angle at origin
! define the parameter:a,b&N,this command flow will creat a ellipse for you.
/filename,ellipse
/title,user's ellipse
/prep7
*ask,a,"Long axis(Default:30)",30
*ask,b,"Short axis(Default:15)",15
*ask,N,"Division angle(Default:64)",64
*afun,deg
theta=360.0/N
k,1,a,0
*get,kmin,kp,,num,max
*do,i,1,N
angx=i*theta
X=a*cos(angx)
Y=b*sin(angx)
k,,X,Y
*get,kmax,kp,,num,max
l,kmax-1,kmax
*enddo
lplot
!
如果加下以下几个命令就可以画出椭圆面
*get,lmax,line,,num,max
lmin=lmax-N+1
nummrg,all
lsel,s,line,,lmin,lmax
al,all
aplot
精彩评论倒序浏览

3686查看6评论

yyxxgg000 发表于 2007-5-11 17:28:18
羡慕lz,我师兄曾经作过一个鸡蛋,非常羡慕 呵呵
举报 回复
范科举 发表于 2008-8-2 15:38:45
我好像也碰到过这样的问题,不过我不会
举报 回复
范科举 发表于 2008-8-2 15:53:49
我好像也碰到过这样的问题,不过我不会
举报 回复
范科举 发表于 2008-8-5 17:08:21
我好像也碰到过这样的问题,不过我不会
举报 回复
范科举 发表于 2008-8-5 18:27:30
我好像也碰到过这样的问题,不过我不会
举报 回复
sunhao2006 发表于 2008-10-31 15:35:37
呵呵,其实可以在cad里面画好导入的,不必这么麻烦!
举报 回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则

 
 
  • QQ:56984982
  • 点击这里给我发消息
    电话:13527553862
    站务咨询群桥头堡站务咨询桥梁专业交流群:
    中国桥梁专业领袖群
    工作时间
    8:00-18:00