!===================
!获取节点Y方向最大位移
!获取节点数目
*Get,Ncount,Node,0,num,count
!存储各个节点的最大值
*Dim,Nmax,Array,Ncount
!存储最大值对应的时间
*Dim,Tmax,Array,Ncount
!获取每一个节点在时间历程范围内的最大值
*Do,I,1,Ncount
Nsol,8,I,U,Y
Plvar,8
!获取最大值
*Get,U_Max,Vari,8,Extrem,Vmax
!获取最大值对应的时间点
*Get,T_Max,Vari,8,Extrem,Tmax
!获取最小值
*Get,U_Min,Vari,8,Extrem,Vmin
!获取最小值对应的时间点
*Get,T_Min,Vari,8,Extrem,Tmin
!绝对值与最大值相比较
U_Min=Abs(U_Min)
U_Max=Abs(U_Max)
*If,U_Max,Le,U_Min,Then
U_Max=U_Min
T_Max=T_Min
*Endif
Nmax(I)=U_Max
Tmax(I)=T_Max
*Enddo
!在所有节点的最大值中找到整个模型的最大值
Absnmax=Nmax(1)
Abstmax=Tmax(1)
Sign=1
*Do,I,1,Ncount
*If,Absnmax,Le,Nmax(I),Then
Absnmax=Nmax(I)
Abstmax=Tmax(I)
Sign=I
*Endif
*Enddo
!整个模型的最大值
*Status,Absnmax
!对应的时间点
*Status,Abstmax
!对应的节点编号
*Status,I
!===================
!获取轴力最大值
!获取单元数量
*Get,Ecount,Elem,0,Count
!存储最大值
*Dim,Emax,Array,Ecount
!存储最大值对应的时间
*Dim,Tmax,Array,Ecount
!获取每一个单元在时间历程范围内的最大值
*Do,I,1,Ecount
Esol,2,I,,Ls,1
Plvar,2
!获取最大值
*Get,U_Max,Vari,2,Extrem,Vmax
!获取最大值对应的时间点
*Get,T_Max,Vari,2,Extrem,Tmax
!获取最小值
*Get,U_Min,Vari,2,Extrem,Vmin
!获取最小值对应的时间点
*Get,T_Min,Vari,2,Extrem,Tmin
!绝对值与最大值相比较
U_Min=Abs(U_Min)
U_Max=Abs(U_Max)
*If,U_Max,Le,U_Min,Then
U_Max=U_Min
T_Max=T_Min
*Endif
Emax(I)=U_Max
Tmax(I)=T_Max
*Enddo
*Status,Emax
!在所有单元的最大值中找到整个模型的最大值
Absemax=Emax(1)
Abstmax=Tmax(1)
Sign=1
*Do,I,1,Ecount
*If,Absemax,Le,Emax(I),Then
Absemax=Emax(I)
Abstmax=Tmax(I)
Sign=I
*Endif
*Enddo
*Status,Absemax !极大值
*Status,Abstmax !对应的时间点
*Status,Sign !对应的单元编号
© 版权声明
文章版权归作者所有,未经允许请勿转载。
THE END
暂无评论内容