matlab材料力学剪力图弯矩图绘制程序

matlab程序仿真材料力学剪力弯矩公式

function [QDXMDXXQM]=MAX_MIN（x1QQMM）
XQM=[x1‘QQ‘MM‘];
[Qmaxi]=max（QQ）;
Q1=[Qmaxx1（i）];
[Qmini]=min（QQ）;
Q2=[Qminx1（i）];
[Mmaxi]=max（MM）;
M1=[Mmaxx1（i）];
[Mmini]=min（MM）;
M2=[Mminx1（i）];
disp（‘剪力极值及位置‘）
QDX=[Q1;Q2]
disp（‘弯矩极值及位置‘）
MDX=[M1;M2]
t1=findobj（0‘Tag‘‘text31‘）;
str=num2str（Q1（1））;
set（t1‘String‘str）;
t2=findobj（0‘Tag‘‘text39‘）;
str=num2str（Q1（2））;
set（t2‘String‘str）;
t3=findobj（0‘Tag‘‘text32‘）;
str=num2str（Q2（1））;
set（t3‘String‘str）;
t4=findobj（0‘Tag‘‘text40‘）;
str=num2str（Q2（2））;
set（t4‘String‘str）;
m1=findobj（0‘Tag‘‘text33‘）;
str=num2str（M1（1））;
set（m1‘String‘str）;
m2=findobj（0‘Tag‘‘text41‘）;
str=num2str（M1（2））;
set（m2‘String‘str）;
m3=findobj（0‘Tag‘‘text34‘）;
str=num2str（M2（1））;
set（m3‘String‘str）;
m4=findobj（0‘Tag‘‘text42‘）;
str=num2str（M2（2））;
set（m4‘String‘str）;

 属性            大小     日期    时间   名称
----------- ---------  ---------- -----  ----

     文件        150  2008-05-23 16:13  QMP.m

     文件        257  2008-05-23 16:17  QMQ.m

     文件        186  2008-06-04 22:52  TU_QM.m

     文件       7374  2008-06-03 23:12  untitled.fig

     文件       8224  2008-06-03 23:12  untitled.m

     文件        884  2008-06-03 23:00  MAX_MIN.m

     文件        904  2008-06-03 21:55  QMDJ.m

     文件       1155  2008-06-03 21:55  QMDWL.m

     文件       1115  2008-06-03 21:55  QMDWY.m

     文件        957  2008-06-03 21:55  QMDWZ.m

     文件        797  2008-06-03 21:55  QMDXY.m

     文件        898  2008-06-03 21:55  QMDXZ.m

     文件        107  2008-05-23 16:11  QMM.m

     文件       3543  2009-02-01 16:19  使用帮助：新手必看.htm

     文件        183  2009-02-02 09:47  Matlab中文论坛--助努力的人完成毕业设计.url

----------- ---------  ---------- -----  ----

                26734                    15