?? mk_load.m
字號:
% mk_load.m
% modified by D. G. Childers 7/14/98
%top=ceil(max(max((temp(:,4)+1000)/1000)));
top=ceil(max(max((temp(:,4))/1000)));
val=get(m3_2_h,'Value');
if val==1
cwd=pwd;
cd data;
[mkname pathname]=uigetfile('*fmrk.mrk','Load mark file');
if mkname ~= 0
S=sprintf('Loading data into %s%s',pathname,mkname);
disp(S);
s=sprintf('load %s%s',pathname,mkname);
eval(s);
o_mkname=mkname;
o_pname=pathname;
mkname=basename(mkname);
else
mkname=o_mkname;
pathname=o_pname;
end
% If an Input file is not specified ( mkname ), return to main menu
if exist('mkname') ~= 1 | length(mkname) == 0
disp('Input file is not specified. Returning to main menu.');
cd ..;
return;
end
cd ..;
s=sprintf('cd %s',cwd);
eval(s);
s=sprintf('[m1,n1]=size(%s);',mkname);
eval(s);
if exist('m2_h')==1;
figure(m2_h);
end
%t=1/100:1/100:m/100;
hold;
for j=1:m1
s=sprintf('%s(%d)',mkname,j);
% plot([eval(s)/100,eval(s)/100],[0,top*1000],'y--');
plot([eval(s)/100,eval(s)/100],[0,top*1000],'linestyle','-.',...
'color',TEXT_COLOR);
% 100=Fs/frame_step=10000.0/100;
end
pause(0.01);
hold;
if exist('TESTFMRK')==1
s=sprintf('%s=[%s;TESTFMRK];',mkname,mkname);
eval(s);
s=sprintf('%s=sort(%s);',mkname,mkname);
eval(s);
end
elseif val==2
figure(m2_h);
[x,y]=ginput(1);
hold;
plot([x,x],[0,top*1000],'linestyle','-.','color',TEXT_COLOR);
if exist('mkname')==0
mkname='TESTFMRK';
end
x=round(x*100);
s=sprintf('%s=[%s;x];',mkname,mkname);
eval(s);
s=sprintf('%s=sort(%s);',mkname,mkname);
eval(s);
hold;
%end
end
%return;
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -