reverbexpogui.m

非常好的数字处理教程

	reverbexpofn 'close';

% --------------------------------------------------------------------
function Untitled_2_Callback(hObject, eventdata, handles)
% hObject    handle to Untitled_2 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)


% --------------------------------------------------------------------
function fourierexpo_Callback(hObject, eventdata, handles)
% hObject    handle to fourierexpo (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
	reverbexpofn 'fourier';


% --------------------------------------------------------------------
function sonoexpo_Callback(hObject, eventdata, handles)
% hObject    handle to sonoexpo (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
	reverbexpofn 'sonoexpo';

% --------------------------------------------------------------------
function help_Callback(hObject, eventdata, handles)
% hObject    handle to help (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
	reverbexpofn 'help';


% --- Executes during object creation, after setting all properties.
function timeslider_CreateFcn(hObject, eventdata, handles)
% hObject    handle to timeslider (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    empty - handles not created until after all CreateFcns called

% Hint: slider controls usually have a light gray background, change
%       'usewhitebg' to 0 to use default.  See ISPC and COMPUTER.
usewhitebg = 1;
if usewhitebg
    set(hObject,'BackgroundColor',[.9 .9 .9]);
else
    set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor'));
end


% --- Executes on slider movement.
function timeslider_Callback(hObject, eventdata, handles)
% hObject    handle to timeslider (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)

% Hints: get(hObject,'Value') returns position of slider
%        get(hObject,'Min') and get(hObject,'Max') to determine range of slider
	reverbexpofn 'timeslider';


% --------------------------------------------------------------------
function Untitled_3_Callback(hObject, eventdata, handles)
% hObject    handle to Untitled_3 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)


% --------------------------------------------------------------------
function plainecho_Callback(hObject, eventdata, handles)
% hObject    handle to plainecho (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
	reverbexpofn('preset','plainecho');


% --------------------------------------------------------------------
function multiecho_Callback(hObject, eventdata, handles)
% hObject    handle to multiecho (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
	reverbexpofn('preset','multiecho');


% --------------------------------------------------------------------
function reverb_Callback(hObject, eventdata, handles)
% hObject    handle to reverb1 (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
	reverbexpofn('preset','reverb');


% --------------------------------------------------------------------
function cavern_Callback(hObject, eventdata, handles)
% hObject    handle to cavern (see GCBO)
% eventdata  reserved - to be defined in a future version of MATLAB
% handles    structure with handles and user data (see GUIDATA)
	reverbexpofn('preset','cavern');




% --- Creates and returns a handle to the GUI figure. 
function h1 = reverbexpogui_LayoutFcn(policy)
% policy - create a new figure or use a singleton. 'new' or 'reuse'.

persistent hsingleton;
if strcmpi(policy, 'reuse') & ishandle(hsingleton)
    h1 = hsingleton;
    return;
end

h1 = figure(...
'Units','characters',...
'Color',[0.701960784313725 0.701960784313725 0.701960784313725],...
'Colormap',[0 0 0.5625;0 0 0.625;0 0 0.6875;0 0 0.75;0 0 0.8125;0 0 0.875;0 0 0.9375;0 0 1;0 0.0625 1;0 0.125 1;0 0.1875 1;0 0.25 1;0 0.3125 1;0 0.375 1;0 0.4375 1;0 0.5 1;0 0.5625 1;0 0.625 1;0 0.6875 1;0 0.75 1;0 0.8125 1;0 0.875 1;0 0.9375 1;0 1 1;0.0625 1 1;0.125 1 0.9375;0.1875 1 0.875;0.25 1 0.8125;0.3125 1 0.75;0.375 1 0.6875;0.4375 1 0.625;0.5 1 0.5625;0.5625 1 0.5;0.625 1 0.4375;0.6875 1 0.375;0.75 1 0.3125;0.8125 1 0.25;0.875 1 0.1875;0.9375 1 0.125;1 1 0.0625;1 1 0;1 0.9375 0;1 0.875 0;1 0.8125 0;1 0.75 0;1 0.6875 0;1 0.625 0;1 0.5625 0;1 0.5 0;1 0.4375 0;1 0.375 0;1 0.3125 0;1 0.25 0;1 0.1875 0;1 0.125 0;1 0.0625 0;1 0 0;0.9375 0 0;0.875 0 0;0.8125 0 0;0.75 0 0;0.6875 0 0;0.625 0 0;0.5625 0 0],...
'IntegerHandle','off',...
'InvertHardcopy',get(0,'defaultfigureInvertHardcopy'),...
'MenuBar','none',...
'Name','Reverb Explorer',...
'NumberTitle','off',...
'PaperPosition',get(0,'defaultfigurePaperPosition'),...
'Position',[103.8 2.71153846153845 110.5 58.75],...
'Renderer',get(0,'defaultfigureRenderer'),...
'RendererMode','manual',...
'Resize','off',...
'HandleVisibility','callback',...
'Tag','reverbexpo_fig',...
'UserData',[],...
'Visible',get(0,'defaultfigureVisible'));

setappdata(h1, 'GUIDEOptions',struct(...
'active_h', [], ...
'taginfo', struct(...
'figure', 2, ...
'axes', 3, ...
'pushbutton', 5, ...
'frame', 4, ...
'text', 11, ...
'checkbox', 4, ...
'edit', 8, ...
'popupmenu', 4, ...
'slider', 2), ...
'override', 0, ...
'release', 13, ...
'resize', 'none', ...
'accessibility', 'callback', ...
'mfile', 1, ...
'callbacks', 1, ...
'singleton', 1, ...
'syscolorfig', 1, ...
'blocking', 0, ...
'lastSavedFile', '/Users/bobsturm/SSUM/reverb/reverbexpo.m'));


h2 = axes(...
'Parent',h1,...
'Units','characters',...
'CameraPosition',[0.5 0.5 9.16025403784439],...
'CameraPositionMode',get(0,'defaultaxesCameraPositionMode'),...
'Color',get(0,'defaultaxesColor'),...
'ColorOrder',get(0,'defaultaxesColorOrder'),...
'Position',[10.8333333333333 40.5 97.5 16],...
'XColor',get(0,'defaultaxesXColor'),...
'YColor',get(0,'defaultaxesYColor'),...
'ZColor',get(0,'defaultaxesZColor'),...
'Tag','freq');


h3 = get(h2,'title');

set(h3,...
'Parent',h2,...
'Color',[0 0 0],...
'HorizontalAlignment','center',...
'Position',[0.498290598290598 1.02864583333333 1.00005459937205],...
'VerticalAlignment','bottom',...
'HandleVisibility','off');

h4 = get(h2,'xlabel');

set(h4,...
'Parent',h2,...
'Color',[0 0 0],...
'HorizontalAlignment','center',...
'Position',[0.498290598290598 -0.106770833333333 1.00005459937205],...
'VerticalAlignment','cap',...
'HandleVisibility','off');

h5 = get(h2,'ylabel');

set(h5,...
'Parent',h2,...
'Color',[0 0 0],...
'HorizontalAlignment','center',...
'Position',[-0.0401709401709402 0.4921875 1.00005459937205],...
'Rotation',90,...
'VerticalAlignment','bottom',...
'HandleVisibility','off');

h6 = get(h2,'zlabel');

set(h6,...
'Parent',h2,...
'Color',[0 0 0],...
'HorizontalAlignment','right',...
'Position',[-0.111965811965812 1.1328125 1.00005459937205],...
'HandleVisibility','off',...
'Visible','off');

h7 = axes(...
'Parent',h1,...
'Units','characters',...
'CameraPosition',[0.5 0.5 9.16025403784439],...
'CameraPositionMode',get(0,'defaultaxesCameraPositionMode'),...
'Color',get(0,'defaultaxesColor'),...
'ColorOrder',get(0,'defaultaxesColorOrder'),...
'Position',[10.8333333333333 20 97.5 16],...
'XColor',get(0,'defaultaxesXColor'),...
'YColor',get(0,'defaultaxesYColor'),...
'ZColor',get(0,'defaultaxesZColor'),...
'Tag','impulse');


h8 = get(h7,'title');

set(h8,...
'Parent',h7,...
'Color',[0 0 0],...
'HorizontalAlignment','center',...
'Position',[0.498290598290598 1.0234375 1.00005459937205],...
'VerticalAlignment','bottom',...
'HandleVisibility','off');

h9 = get(h7,'xlabel');

set(h9,...
'Parent',h7,...
'Color',[0 0 0],...
'HorizontalAlignment','center',...
'Position',[0.498290598290598 -0.106770833333333 1.00005459937205],...
'VerticalAlignment','cap',...
'HandleVisibility','off');

h10 = get(h7,'ylabel');

set(h10,...
'Parent',h7,...
'Color',[0 0 0],...
'HorizontalAlignment','center',...
'Position',[-0.0401709401709402 0.4921875 1.00005459937205],...
'Rotation',90,...
'VerticalAlignment','bottom',...
'HandleVisibility','off');

h11 = get(h7,'zlabel');

set(h11,...
'Parent',h7,...
'Color',[0 0 0],...
'HorizontalAlignment','right',...
'Position',[-0.111965811965812 2.4140625 1.00005459937205],...
'HandleVisibility','off',...
'Visible','off');

h12 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','reverbexpogui(''play_Callback'',gcbo,[],guidata(gcbo))',...
'CData',[],...
'ListboxTop',0,...
'Position',[67.5 0.75 12 1.5],...
'String','Play Original',...
'Tag','play',...
'UserData',[]);


h13 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Position',[9.66666666666667 3.66666666666667 21 10],...
'String',{  '' },...
'Style','frame',...
'Tag','frame1');


h14 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'FontSize',12,...
'HorizontalAlignment','left',...
'Position',[10.8333333333333 11 17 1.66666666666667],...
'String','Filter 1',...
'Style','text',...
'Tag','text1');


h15 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','reverbexpogui(''filter1_Callback'',gcbo,[],guidata(gcbo))',...
'Position',[26.8333333333333 11.3333333333333 3 1.5],...
'String','',...
'Style','checkbox',...
'Value',1,...
'Tag','filter1');


h16 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','reverbexpogui(''filter1_a_Callback'',gcbo,[],guidata(gcbo))',...
'HorizontalAlignment','left',...
'Position',[17 9 9 1.5],...
'String','0.6',...
'Style','edit',...
'CreateFcn','reverbexpogui(''filter1_a_CreateFcn'',gcbo,[],guidata(gcbo))',...
'Tag','filter1_a');


h17 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','reverbexpogui(''filter1_D_Callback'',gcbo,[],guidata(gcbo))',...
'HorizontalAlignment','left',...
'Position',[17 7.08333333333333 9 1.5],...
'String','20',...
'Style','edit',...
'CreateFcn','reverbexpogui(''filter1_D_CreateFcn'',gcbo,[],guidata(gcbo))',...
'Tag','filter1_D');


h18 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'FontSize',12,...
'HorizontalAlignment','left',...
'Position',[13.8333333333333 9.41666666666667 3 1],...
'String','a',...
'Style','text',...
'Tag','text2');


h19 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'FontSize',12,...
'HorizontalAlignment','left',...
'Position',[13.8333333333333 7.33333333333333 3 1],...
'String','D',...
'Style','text',...
'Tag','text3');


h20 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Position',[37.1666666666667 3.66666666666667 21 10],...
'String',{  '' },...
'Style','frame',...
'Tag','frame2');


h21 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'FontSize',12,...
'HorizontalAlignment','left',...
'Position',[38.1666666666667 11 17 1.66666666666667],...
'String','Filter 2',...
'Style','text',...
'Tag','text4');


h22 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','reverbexpogui(''filter2_Callback'',gcbo,[],guidata(gcbo))',...
'Position',[53.8333333333333 11.3333333333333 3 1.5],...
'String','',...
'Style','checkbox',...
'Tag','filter2');


h23 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','reverbexpogui(''filter2_a_Callback'',gcbo,[],guidata(gcbo))',...
'HorizontalAlignment','left',...
'Position',[45.3333333333333 9 9 1.5],...
'String','0.6',...
'Style','edit',...
'CreateFcn','reverbexpogui(''filter2_a_CreateFcn'',gcbo,[],guidata(gcbo))',...
'Tag','filter2_a');


h24 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','reverbexpogui(''filter2_D_Callback'',gcbo,[],guidata(gcbo))',...
'HorizontalAlignment','left',...
'Position',[45.3333333333333 7.08333333333333 9 1.5],...
'String','20',...
'Style','edit',...
'CreateFcn','reverbexpogui(''filter2_D_CreateFcn'',gcbo,[],guidata(gcbo))',...
'Tag','filter2_D');


h25 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'FontSize',12,...
'HorizontalAlignment','left',...
'Position',[41.6666666666667 9.41666666666667 3 1],...
'String','a',...
'Style','text',...
'Tag','text5');


h26 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'FontSize',12,...
'HorizontalAlignment','left',...