能用ANSYS模拟出一个单质点无阻尼体系吗？

后知后觉

哪位朋友知道能用ANSYS模拟出一个单质点无阻尼体系吗？
谢谢！

多情清秋

你找一下下面的文章，看对你是否有用

基于ANSYS与MATLAB的弹簧—质量系统动力学响应计算
Dynamic calculation of spring-mass system based on ANSYS and MATLAB
<<起重运输机械 >>2003年04期  鲍务均 , 杨汾爱

在ANSYS/LS-DYNA中，利用有限元方法进行了弹簧-质量系统的动力学响应分析，采用现代控制论中的状态空间法导出了系统的状态方程，用4/5阶龙格—库塔—芬尔格算法进行了响应计算，并比较了2种环境下的结果。

tzb8309

! 7.1  单自由度弹簧质量系统的频率计算
! 本程序来源于邢静忠编著的《ANSYS应用实例与分析》，科学出版社，2006年
!
FINISH        ! 退出以前模块
/CLEAR, NOSTART        ! 清除数据，不加载初始化文件
! （1）设置工程选项、求解选项、单元类型和实常数
/FILNAME, EX7.1        ! 定义工程文件名称
/PREP7        ! 加载前处理模块
/TITLE, EX7.1, NATURAL FREQUENCY OF A SPRING-MASS SYSTEM.
ANTYPE, MODAL        ! 定义分析类型为模态（MODAL）分析
MODOPT, REDUC, 1, , , 1        ! 显示所有模态
MXPAND, 1        ! 展开第1阶频率
ET, 1, COMBIN14, , , 2        ! 定义第1类单元为2D纵向弹簧单元COMBIN14
ET, 2, MASS21, , , 4        ! 定义第2类单元为2D质量单元MASS21
R, 1, 8406.4        ! 定义第1类实常数, 弹簧刚度系数k=8406.4 N/m
R, 2, 11.121/9.8        ! 定义第2类实常数, 集中质量m=11.121/9.8 kg
! （2）定义模型节点和单元连接关系
N, 1        ! 在坐标原点（0, 0, 0）定义第1号结点
N, 2, , 1        ! 在坐标（0, 1, 0）定义第2号结点
E, 1, 2        ! 过1号节点和2号节点定义单元
TYPE, 2        ! 将默认的单元类型从弹簧单元, 改变为第2类单元（质量单元）
REAL, 2        ! 将默认的实常数从弹簧刚度, 改变为第2类实常数（集中质量）
E, 2        ! 用第2个节点定义第2个单元
M, 2, UY        ! 指定2号节点的Uy自由度为主自由度
! （3）指定输出选项, 位移约束
OUTPR, ALL, 1        ! 输出第1阶频率的所有内容
OUTRES, ALL, 0        ! 所有数据不记录到数据库
D, 1, ALL        ! 约束1号节点的所有位移自由度
D, 2, UX        ! 约束2号节点的X方向自由度UX
FINISH        ! 退出前处理模块PREP7
! （4）进入求解模块求解
/SOLU        ! 加载求解模块
SOLVE        ! 开始求解
! （5）提取计算结果
*GET, FREQ, MODE, 1, FREQ        ! 提取第1阶模态的频率计算结果, 存入变量FREQ
*STATUS, PARM          ! 显示内存变量的值
FINISH        ! 退出求解模块