ksstringexpogui.m

非常好的数字处理教程

%        str2double(get(hObject,'String')) returns contents of wetness_room as a double
    val = abs(str2num(get(hObject,'String')));
    if (val > 100)
        val = 100;
    end
	set(hObject,'String',num2str(val));

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

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end



function transpose_text_Callback(hObject, eventdata, handles)
% hObject    handle to transpose_text (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,'String') returns contents of transpose_text as text
%        str2double(get(hObject,'String')) returns contents of transpose_text as a double
    val = abs(str2num(get(hObject,'String')));
	set(hObject,'String',num2str(val));

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

% Hint: edit controls usually have a white background on Windows.
%       See ISPC and COMPUTER.
if ispc && isequal(get(hObject,'BackgroundColor'), get(0,'defaultUicontrolBackgroundColor'))
    set(hObject,'BackgroundColor','white');
end




% --- Creates and returns a handle to the GUI figure. 
function h1 = ksstringexpogui_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

appdata = [];
appdata.GUIDEOptions = struct(...
    'active_h', [], ...
    'taginfo', struct(...
    'figure', 2, ...
    'axes', 8, ...
    'pushbutton', 16, ...
    'popupmenu', 12, ...
    'listbox', 2, ...
    'text', 33, ...
    'slider', 5, ...
    'checkbox', 6, ...
    'radiobutton', 5, ...
    'edit', 19, ...
    'uipanel', 5), ...
    'override', 1, ...
    'release', 13, ...
    'resize', 'simple', ...
    'accessibility', 'callback', ...
    'mfile', 1, ...
    'callbacks', 1, ...
    'singleton', 1, ...
    'syscolorfig', 1, ...
    'lastSavedFile', '/Users/bobsturm/SSUM/physmodel/ksstring/ksstringexpogui.m', ...
    'blocking', 0);
appdata.lastValidTag = 'ksstringexpo_fig';
appdata.GUIDELayoutEditor = [];

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],...
'DockControls','off',...
'IntegerHandle','off',...
'InvertHardcopy',get(0,'defaultfigureInvertHardcopy'),...
'MenuBar','none',...
'Name','String Model Explorer',...
'NumberTitle','off',...
'PaperOrientation','landscape',...
'PaperPosition',get(0,'defaultfigurePaperPosition'),...
'PaperSize',[11 8.5],...
'Pointer','crosshair',...
'Position',[1 44.2692307692307 115.666666666667 26.5],...
'Renderer',get(0,'defaultfigureRenderer'),...
'RendererMode','manual',...
'Resize','off',...
'HandleVisibility','callback',...
'Tag','ksstringexpo_fig',...
'UserData',[],...
'Behavior',get(0,'defaultfigureBehavior'),...
'Visible','on',...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'FileMenu';

h2 = uimenu(...
'Parent',h1,...
'Callback','ksstringexpogui(''FileMenu_Callback'',gcbo,[],guidata(gcbo))',...
'Label','File',...
'Tag','FileMenu',...
'Behavior',get(0,'defaultuimenuBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'save';

h3 = uimenu(...
'Parent',h2,...
'Callback','ksstringexpogui(''save_Callback'',gcbo,[],guidata(gcbo))',...
'Label','Save',...
'Tag','save',...
'Behavior',get(0,'defaultuimenuBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'CloseMenuItem';

h4 = uimenu(...
'Parent',h2,...
'Callback','ksstringexpogui(''CloseMenuItem_Callback'',gcbo,[],guidata(gcbo))',...
'Label','Close',...
'Separator','on',...
'Tag','CloseMenuItem',...
'Behavior',get(0,'defaultuimenuBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'Untitled_1';

h5 = uimenu(...
'Parent',h1,...
'Callback','ksstringexpogui(''Untitled_1_Callback'',gcbo,[],guidata(gcbo))',...
'Label','Send to...',...
'Tag','Untitled_1',...
'Behavior',get(0,'defaultuimenuBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'fourierexpo';

h6 = uimenu(...
'Parent',h5,...
'Callback','ksstringexpogui(''fourierexpo_Callback'',gcbo,[],guidata(gcbo))',...
'Label','Fourier Explorer',...
'Tag','fourierexpo',...
'Behavior',get(0,'defaultuimenuBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'sonoexpo';

h7 = uimenu(...
'Parent',h5,...
'Callback','ksstringexpogui(''sonoexpo_Callback'',gcbo,[],guidata(gcbo))',...
'Label','Sonogram Explorer',...
'Tag','sonoexpo',...
'Behavior',get(0,'defaultuimenuBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'reverbexpo';

h8 = uimenu(...
'Parent',h5,...
'Callback','ksstringexpogui(''reverbexpo_Callback'',gcbo,[],guidata(gcbo))',...
'Label','Reverb Explorer',...
'Tag','reverbexpo',...
'Behavior',get(0,'defaultuimenuBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'text10';

h9 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'FontSize',14,...
'HorizontalAlignment','right',...
'Position',[77.6666666666667 24.1666666666667 35 1.83333333333333],...
'String','The Karplus_Strong String',...
'Style','text',...
'Tag','text10',...
'Behavior',get(0,'defaultuicontrolBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'play';

h10 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','ksstringexpogui(''play_Callback'',gcbo,[],guidata(gcbo))',...
'CData',[],...
'ListboxTop',0,...
'Position',[100.666666666667 2.08333333333333 10 1.5],...
'String','Play',...
'Tag','play',...
'UserData',[],...
'Behavior',get(0,'defaultuicontrolBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'excite_menu';

h11 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','ksstringexpogui(''excite_menu_Callback'',gcbo,[],guidata(gcbo))',...
'Position',[4.66666666666667 18.3333333333333 11 1.5],...
'String',{  'Pluck'; 'Strike'; 'Noise'; 'Bow' },...
'Style','popupmenu',...
'Value',1,...
'CreateFcn', {@local_CreateFcn, 'ksstringexpogui(''excite_menu_CreateFcn'',gcbo,[],guidata(gcbo))', appdata} ,...
'Tag','excite_menu',...
'Behavior',get(0,'defaultuicontrolBehavior'));

appdata = [];
appdata.lastValidTag = 'model_menu';

h12 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'Callback','ksstringexpogui(''model_menu_Callback'',gcbo,[],guidata(gcbo))',...
'Position',[4.66666666666667 7.83333333333334 11 1.5],...
'String',{  'Ideal'; 'Lossy'; 'Loss(f)' },...
'Style','popupmenu',...
'Value',1,...
'CreateFcn', {@local_CreateFcn, 'ksstringexpogui(''model_menu_CreateFcn'',gcbo,[],guidata(gcbo))', appdata} ,...
'Tag','model_menu',...
'Behavior',get(0,'defaultuicontrolBehavior'));

appdata = [];
appdata.lastValidTag = 'text13';

h13 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'HorizontalAlignment','left',...
'Position',[18.1666666666667 9.41666666666667 10 1.5],...
'String','Loss Factor',...
'Style','text',...
'Tag','text13',...
'Behavior',get(0,'defaultuicontrolBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'loss_text';

h14 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'BackgroundColor',[1 1 1],...
'Callback','ksstringexpogui(''loss_Callback'',gcbo,[],guidata(gcbo))',...
'HorizontalAlignment','left',...
'Position',[18.1666666666667 7.83333333333334 10 1.5],...
'String','0.0',...
'Style','edit',...
'CreateFcn', {@local_CreateFcn, 'ksstringexpogui(''loss_CreateFcn'',gcbo,[],guidata(gcbo))', appdata} ,...
'Tag','loss_text',...
'Behavior',get(0,'defaultuicontrolBehavior'));

appdata = [];
appdata.lastValidTag = 'text15';

h15 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'HorizontalAlignment','left',...
'Position',[4.66666666666667 16.25 12 1.5],...
'String','Frequency (Hz)',...
'Style','text',...
'Tag','text15',...
'Behavior',get(0,'defaultuicontrolBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'frequency_text';

h16 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'BackgroundColor',[1 1 1],...
'Callback','ksstringexpogui(''frequency_text_Callback'',gcbo,[],guidata(gcbo))',...
'HorizontalAlignment','left',...
'Position',[4.66666666666667 14.8333333333333 10 1.5],...
'String','440.0',...
'Style','edit',...
'CreateFcn', {@local_CreateFcn, 'ksstringexpogui(''frequency_text_CreateFcn'',gcbo,[],guidata(gcbo))', appdata} ,...
'Tag','frequency_text',...
'Behavior',get(0,'defaultuicontrolBehavior'));

appdata = [];
appdata.lastValidTag = 'text17';

h17 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'HorizontalAlignment','left',...
'Position',[19.3333333333333 19.8333333333333 12 1.5],...
'String','Excite Position',...
'Style','text',...
'Tag','text17',...
'Behavior',get(0,'defaultuicontrolBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'excitepos_text';

h18 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'BackgroundColor',[1 1 1],...
'Callback','ksstringexpogui(''excitepos_text_Callback'',gcbo,[],guidata(gcbo))',...
'HorizontalAlignment','left',...
'Position',[19.3333333333333 18.3333333333333 10 1.5],...
'String','0.5',...
'Style','edit',...
'CreateFcn', {@local_CreateFcn, 'ksstringexpogui(''excitepos_text_CreateFcn'',gcbo,[],guidata(gcbo))', appdata} ,...
'Tag','excitepos_text',...
'Behavior',get(0,'defaultuicontrolBehavior'));

appdata = [];
appdata.lastValidTag = 'text14';

h19 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'CData',[],...
'HorizontalAlignment','left',...
'Position',[4.66666666666667 19.8333333333333 10 1.5],...
'String','Excitation',...
'Style','text',...
'Tag','text14',...
'UserData',[],...
'Behavior',get(0,'defaultuicontrolBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'text19';

h20 = uicontrol(...
'Parent',h1,...
'Units','characters',...
'CData',[],...
'HorizontalAlignment','left',...
'Position',[4.66666666666667 9.25 10 1.5],...
'String','Model',...
'Style','text',...
'Tag','text19',...
'UserData',[],...
'Behavior',get(0,'defaultuicontrolBehavior'),...
'CreateFcn', {@local_CreateFcn, '', appdata} );

appdata = [];
appdata.lastValidTag = 'uipanel1';

h21 = uipanel(...
'Parent',h1,...
'Units','characters',...
'Title','String Model',...