怎样把ansys中命令流转化为gui方式?
/SOLUANTYPE,TRANSnlgeom,off!大变形选项eqslv,pcg,1e-5,!设置求解器为PCG,收敛精度为1e-5kbc,1!设置载荷类型,为阶跃载...
/SOLU
ANTYPE,TRANS
nlgeom,off !大变形选项
eqslv,pcg,1e-5, !设置求解器为 PCG,收敛精度为 1e-5
kbc,1 !设置载荷类型,为阶跃载荷
time,t1 !设置载荷终止时间
deltim,delt !设置时间步长
OUTPR,basic, ! 输出所有的的基本求解结果
OUTRES,all,all !写所有的结果到数据库中
nsel,s,loc,z,l-le/10,l+le/10
d,all,all,0 !约束另一端的所有自由度
NSEL,S,LOC,Z,0
*dim,disuy,table,Nsub,1,1 !用表参数定义位移 disuy
tst=delt !初始加载时间
*do,i,1,Nsub,1 !分成了 Nsub 段,则有 Nsub+1 个数据
t=tst+(i-1)*delt !table 的 0 行和 0 列要赋值,不同于数组 array.
disuy(i,0,1)=t
*if,t,lt,TSIN,then
tcalcu=t-tst !计算激励信号的时间
disuy(i,1,1)=a*0.5*sin(2*pi*f*tcalcu)*(1-cos(2*pi*nint(tcalcu/delt)/(n1+1)))
*else
disuy(i,1,1)=0
*endif
*enddo
csys,1
d,all,uz,%disuy% !轴向加载
d,all,ux,0
d,all,uy,0
allsel,all
solve
!!!!!!!!!!!!!!!!!!end!!!!!!!!!!!!!!!!!
(2)部分后处理命令:
*do,i,1,ntotal
nsol,i+1,ndnum(i),u,z,
! !定义变量 i+1,存放节点 ndnum(i)的 z 向位移 Uz
*enddo
vardel,200 !删除变量 200,用于存放监测位置
*do,i,1,ntotal
add,200,i+1,200
*enddo
/GTHK,curve,0 !细线绘制曲线
plvar,200 !输出变量 200 的波形,即接收信号的波形
prvar,200 !输出变量 200 的数据,lis 文本格式的
/IMAGE,SAVE,dissum,bmp
*get,size,vari,,nsets !获得变量的长度/SOLU
ANTYPE,TRANS
nlgeom,off !大变形选项
eqslv,pcg,1e-5, !设置求解器为 PCG,收敛精度为 1e-5
kbc,1 !设置载荷类型,为阶跃载荷
time,t1 !设置载荷终止时间
deltim,delt !设置时间步长
OUTPR,basic, ! 输出所有的的基本求解结果
OUTRES,all,all !写所有的结果到数据库中
nsel,s,loc,z,l-le/10,l+le/10
d,all,all,0 !约束另一端的所有自由度*dim,uysum200,array,size !定义数组 uysum200 来存储变量 200.
vget,uysum200(1),200
*dim,avguy,array,size,2
! !定义数组 avguy 来存储位移和平均后的值,
! 即为接收位置处各个节点的平均周向位移
*do,i,1,size
avguy(i,1)=tst+(i-1)*delt
avguy(i,2)=uysum200(i)/ntotal
*enddo
*dim,uynode,array,size,ntotal+1
*do,i,1,ntotal+1
vget,uynode(1,i),i
*enddo
/input,writedis,txt,,0,0 !位移数据导入 dis.txt 文件中,
! !按照 writedis.txt 文档中的要求写。
*vplot,avguy(1,1),avguy(1,2)
/IMAGE,SAVE,avguy1,bmp
!!!!!!!!!! end!!!!!!! 展开
ANTYPE,TRANS
nlgeom,off !大变形选项
eqslv,pcg,1e-5, !设置求解器为 PCG,收敛精度为 1e-5
kbc,1 !设置载荷类型,为阶跃载荷
time,t1 !设置载荷终止时间
deltim,delt !设置时间步长
OUTPR,basic, ! 输出所有的的基本求解结果
OUTRES,all,all !写所有的结果到数据库中
nsel,s,loc,z,l-le/10,l+le/10
d,all,all,0 !约束另一端的所有自由度
NSEL,S,LOC,Z,0
*dim,disuy,table,Nsub,1,1 !用表参数定义位移 disuy
tst=delt !初始加载时间
*do,i,1,Nsub,1 !分成了 Nsub 段,则有 Nsub+1 个数据
t=tst+(i-1)*delt !table 的 0 行和 0 列要赋值,不同于数组 array.
disuy(i,0,1)=t
*if,t,lt,TSIN,then
tcalcu=t-tst !计算激励信号的时间
disuy(i,1,1)=a*0.5*sin(2*pi*f*tcalcu)*(1-cos(2*pi*nint(tcalcu/delt)/(n1+1)))
*else
disuy(i,1,1)=0
*endif
*enddo
csys,1
d,all,uz,%disuy% !轴向加载
d,all,ux,0
d,all,uy,0
allsel,all
solve
!!!!!!!!!!!!!!!!!!end!!!!!!!!!!!!!!!!!
(2)部分后处理命令:
*do,i,1,ntotal
nsol,i+1,ndnum(i),u,z,
! !定义变量 i+1,存放节点 ndnum(i)的 z 向位移 Uz
*enddo
vardel,200 !删除变量 200,用于存放监测位置
*do,i,1,ntotal
add,200,i+1,200
*enddo
/GTHK,curve,0 !细线绘制曲线
plvar,200 !输出变量 200 的波形,即接收信号的波形
prvar,200 !输出变量 200 的数据,lis 文本格式的
/IMAGE,SAVE,dissum,bmp
*get,size,vari,,nsets !获得变量的长度/SOLU
ANTYPE,TRANS
nlgeom,off !大变形选项
eqslv,pcg,1e-5, !设置求解器为 PCG,收敛精度为 1e-5
kbc,1 !设置载荷类型,为阶跃载荷
time,t1 !设置载荷终止时间
deltim,delt !设置时间步长
OUTPR,basic, ! 输出所有的的基本求解结果
OUTRES,all,all !写所有的结果到数据库中
nsel,s,loc,z,l-le/10,l+le/10
d,all,all,0 !约束另一端的所有自由度*dim,uysum200,array,size !定义数组 uysum200 来存储变量 200.
vget,uysum200(1),200
*dim,avguy,array,size,2
! !定义数组 avguy 来存储位移和平均后的值,
! 即为接收位置处各个节点的平均周向位移
*do,i,1,size
avguy(i,1)=tst+(i-1)*delt
avguy(i,2)=uysum200(i)/ntotal
*enddo
*dim,uynode,array,size,ntotal+1
*do,i,1,ntotal+1
vget,uynode(1,i),i
*enddo
/input,writedis,txt,,0,0 !位移数据导入 dis.txt 文件中,
! !按照 writedis.txt 文档中的要求写。
*vplot,avguy(1,1),avguy(1,2)
/IMAGE,SAVE,avguy1,bmp
!!!!!!!!!! end!!!!!!! 展开
2个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询