【数学建模】冰山运输系统matlab源码含GUI

一、简介

基于matlab GUI模拟冰山运输系统(参可调数)

二、源代码

``` function varargout = bingshan(varargin) % BINGSHAN MATLAB code for bingshan.fig % BINGSHAN, by itself, creates a new BINGSHAN or raises the existing % singleton. % % H = BINGSHAN returns the handle to a new BINGSHAN or the handle to % the existing singleton. % % BINGSHAN('CALLBACK',hObject,eventData,handles,...) calls the local % function named CALLBACK in BINGSHAN.M with the given input1 arguments. % % BINGSHAN('Property','Value',...) creates a new BINGSHAN or raises the % existing singleton*. Starting from the left, property value pairs are % applied to the GUI before bingshanOpeningFcn gets called. An % unrecognized property name or invalid value makes property application % stop. All inputs are passed to bingshanOpeningFcn via varargin. % % *See GUI Options on GUIDE's Tools menu. Choose "GUI allows only one % instance to run (singleton)". % % See also: GUIDE, GUIDATA, GUIHANDLES

% Edit the above text to modify the response to help bingshan

% Last Modified by GUIDE v2.5 14-Dec-2015 15:09:14

% Begin initialization code - DO NOT EDIT guiSingleton = 1; guiState = struct('guiName', mfilename, ... 'guiSingleton', guiSingleton, ... 'guiOpeningFcn', @bingshanOpeningFcn, ... 'guiOutputFcn', @bingshanOutputFcn, ... 'guiLayoutFcn', [] , ... 'guiCallback', []); if nargin && ischar(varargin{1}) guiState.gui_Callback = str2func(varargin{1}); end

if nargout [varargout{1:nargout}] = guimainfcn(guiState, varargin{:}); else guimainfcn(guiState, varargin{:}); end % End initialization code - DO NOT EDIT

% --- Executes just before bingshan is made visible. function bingshan_OpeningFcn(hObject, eventdata, handles, varargin) % This function has no output args, see OutputFcn. % hObject handle to figure % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % varargin command line arguments to bingshan (see VARARGIN)

% Choose default command line output for bingshan handles.output = hObject;

%题目要求的输入参数 global r0; r0=100000; global u; u=1; global s; s=1000; global a1; a1=0.08; global a2; a2=50; global d0 d0=500; global b; b=1;

%用于判断是否按下结束仿真按钮 global p; p=0;

%时间+1的延时 global deltime; deltime=0.01;

% Update handles structure guidata(hObject, handles);

% UIWAIT makes bingshan wait for user response (see UIRESUME) % uiwait(handles.figure1);

% --- Outputs from this function are returned to the command line. function varargout = bingshan_OutputFcn(hObject, eventdata, handles) % varargout cell array for returning output args (see VARARGOUT); % hObject handle to figure % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA)

% Get default command line output from handles structure varargout{1} = handles.output;

function time_Callback(hObject, eventdata, handles) % hObject handle to time (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 time as text % str2double(get(hObject,'String')) returns contents of time as a double

% --- Executes during object creation, after setting all properties. function time_CreateFcn(hObject, eventdata, handles) % hObject handle to time (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 r_Callback(hObject, eventdata, handles) % hObject handle to r (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 r as text % str2double(get(hObject,'String')) returns contents of r as a double

% --- Executes during object creation, after setting all properties. function r_CreateFcn(hObject, eventdata, handles) % hObject handle to r (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 sleft_Callback(hObject, eventdata, handles) % hObject handle to sleft (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 sleft as text % str2double(get(hObject,'String')) returns contents of sleft as a double

% --- Executes during object creation, after setting all properties. function sleft_CreateFcn(hObject, eventdata, handles) % hObject handle to sleft (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

% --- Executes on selection change in del. function del_Callback(hObject, eventdata, handles) % hObject handle to del (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA)

% Hints: contents = cellstr(get(hObject,'String')) returns del contents as cell array % contents{get(hObject,'Value')} returns selected item from del

%获取时间+1延时时长

global deltime; deltime1=get(handles.del,'String'); val=get(handles.del,'Value'); deltime=str2double(deltime1{val}); % set(handles.test,'String',deltime);

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

% Hint: listbox 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

% --- Executes on button press in input1. function input1_Callback(hObject, eventdata, handles) % hObject handle to input1 (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) global r0; global u; global s; global a1; global a2; global d0 global b;

%输入数据 按钮，读取用户输入的数据 str={'r0','u','s','a1','a2','d0','b'}; inputdata=inputdlg(str,'输入',1);

% if ~isempty(inputdata); %如果输入数据存在缺省值，则视其为1 % if ~isempty(inputdata(1)); % set(handles.test1,'String','数据不全'); % elseif isempty(inputdata(1)); % set(handles.test1,'String','数据可行'); % end

%按顺序赋值给各参数 r0=str2double(inputdata(1)); u=str2double(inputdata(2)); s=str2double(inputdata(3)); a1=str2double(inputdata(4)); a2=str2double(inputdata(5)); d0=str2double(inputdata(6)); b=str2double(inputdata(7)); % end ```

三、运行结果

四、备注

版本：2014a