dispinfo.m

来自「为了下载东西」· M 代码 · 共 47 行

function dispinfo(strVarName,VarName,handle)

%  All global references removed for Matlab 5 compatibility.  Info now passed as argument
%  Hordur Kvaran, 14.10.97

%
%  Update initial value display:
%

if strcmp(strVarName,'Y'),
   set(handle,'String',[' Y:       ' num2str(VarName)     ' [m]']);
elseif strcmp(strVarName,'dY'),
   set(handle,'String',[' dY:      ' num2str(VarName)    ' [m/s]']);
elseif strcmp(strVarName,'Phi'),
   set(handle,'String',[' Phi:     ' num2str(VarName)   ' [deg]']);
elseif strcmp(strVarName,'dPhi'),
   set(handle,'String',[' dPhi:   ' num2str(VarName) ' [deg/s]']);
%
%  Update cart gains display:
%
elseif strcmp(strVarName,'G1'),
   set(handle,'String',[' Position:   ' num2str(VarName) ]);
elseif strcmp(strVarName,'G2'),
   set(handle,'String',[' Velocity:   ' num2str(VarName) ]);
elseif strcmp(strVarName,'GU1'),
   set(handle,'String',[' Output:     ' num2str(VarName)]);
%
%  Update ball gains display:
%
elseif strcmp(strVarName,'G3'),
   set(handle,'String',[' Angle:      ' num2str(VarName) ]);
elseif strcmp(strVarName,'G4'),
   set(handle,'String',[' Velocity:   ' num2str(VarName) ]);
elseif strcmp(strVarName,'GU2'),
   set(handle,'String',[' Output:     ' num2str(VarName)]);
%
%  Update step size or total time display:
%
elseif strcmp(strVarName,'Ts'),
   set(handle,'String',[' Tstep:     ' num2str(VarName) ' [s]']);
elseif strcmp(strVarName,'Ttot'),
   set(handle,'String',[' Tmax:      ' num2str(VarName) ' [s]']);
elseif strcmp(strVarName,'ConType'),
   set(handle,'String',[ VarName ' Controller']);
end;