如何编译子程序.pdfVIP

以下以邮件中附带的程序 lian_gan.adm 为例，在模型中使用用户自定义子程序来定义 sforce_1 创建子程序 在MSC.ADAMS 安装目录下的MSC.ADAMS/2005/Solver/Usersub 有所有可以被使用的用户 自定义子程序的模板（这些模板为只读，不能直接使用）。 1. 找到sfosub.f （这是sforce statement 所对应的用户自定义子程序，有关详细的statement 与用户自定义子程序的关系，参看help ADAMS/Solver 2. 复制sfosub.f 中的所有内容，打开Visual Fortran 6.6 ，点选File-New ，此时出现Files 菜 单，点选左上角的Files 标签，选择Fortran Fixed Format Source File （此选项对应Fortran 77 ）,在File 栏中给其命名sfosub1.f 3. 点击编译器右上角上的Compile 按钮,如上图所示。这样就完成了创建sfosub.obj Sfosub.obj 要和lian_gan.adm 在同一个目录下 4. 本例所用的sfosub1.f 附在邮件中。Sfosub1.f 通过输入量Scale 来控制力矩的输出Value = Scale*Tz*Time。很明显力矩是一个线性函数，这将会在之后Adams 中得到体现。 将子程序与MSC.ADAMS 标准子程序库相连接，已获得用户自定义动态链接库（custom dll ） 1. 点击桌面上的开始-所有程序-MSC.Software-Adams Command 2. 在进入后，先写入cr-user，按回车 3. 接下来他会问是否进入Debug 模式，写入n ，回车 4. 再将你lian_gan.obj 文件的完整地址输入（如D:\lian_gan\Debug\sfosub1.obj ），按回车 5. 如果只有一个子程序，就再按一次回车，若还有子程序，就再输入下一个的地址（我没 试过），直到所有子程序全部输入 6. 输入你要生成的名称，若只含有名称，则.dll 文件会在桌名上生成，故将完整地址输入 （如D:\lian_gan\sfosub1.dll ），按回车 7. 如果一切顺利，就会在D:\lian_gan 目录下生成sfosub1.dll 及一些其他中间文件 将用户自定义子程序加载到sforce 中去 1. 通过Import 将lian_gan.adm 打开 2. 将连杆模型中sforce_2 去掉以简化模型 3. 右击sforce_1,选中Modify ，会出现Modify Toque 对话框 4. 按下图所示设置 User Parameter ：此对话框是用来像用户自定义子程序传递参数（即输入量）。本例因为 sfosub1.f 仅需要一个输入量Scale Routine 和 Solver ID 还未真正弄懂,大家一起想办法 5. 在ADAMS 中进行设置:Settings/Solver/Solver Executable (如Executable=External, Solver Library=┅\user.dll , Choice=Fortran); 6. 进行仿真，对z 方向的Torque 进行Measure