基于MATLAB实现的串口发送接收数据可配置端口，波特率等+使用说明文档

function varargout = comdraw(varargin) % COMDRAW M-file for comdraw.fig % COMDRAW, by itself, creates a new COMDRAW or raises the existing % singleton*. % % H = COMDRAW returns the handle to a new COMDRAW or the handle to % the existing singleton*. % % COMDRAW('CALLBACK',hObject,eventData,handles,...) calls the local % function named CALLBACK in COMDRAW.M with the given input arguments. % % COMDRAW('Property','Value',...) creates a new COMDRAW or raises the % existing singleton*. Starting from the left, property value pairs are % applied to the GUI before comdraw_OpeningFunction gets called. An % unrecognized property name or invalid value makes property application % stop. All inputs are passed to comdraw_OpeningFcn 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 comdraw % Last Modified by GUIDE v2.5 29-May-2007 16:33:53 % Begin initialization code - DO NOT EDIT gui_Singleton = 1; gui_State = struct('gui_Name', mfilename, ... 'gui_Singleton', gui_Singleton, ... 'gui_OpeningFcn', @comdraw_OpeningFcn, ... 'gui_OutputFcn', @comdraw_OutputFcn, ... 'gui_LayoutFcn', [] , ... 'gui_Callback', []); if nargin & isstr(varargin{1}) gui_State.gui_Callback = str2func(varargin{1}); end if nargout [varargout{1:nargout}] = gui_mainfcn(gui_State, varargin{:}); else gui_mainfcn(gui_State, varargin{:}); end % End initialization code - DO NOT EDIT global handle_com; global serial_buf; % --- Executes just before comdraw is made visible. function comdraw_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 comdraw (see VARARGIN) % Choose default command line output for comdraw handles.output = hObject; % Update handles structure guidata(hObject, handles); % UIWAIT makes comdraw wait for user response (see UIRESUME) % uiwait(handles.figure1); % --- Outputs from this function are returned to the command line. function varargout = comdraw_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; % --- Executes during object creation, after setting all properties. function popup_com_port_CreateFcn(hObject, eventdata, handles) % hObject handle to popup_com_port (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles empty - handles not created until after all CreateFcns called % Hint: popupmenu controls usually have a white background on Windows. % See ISPC and COMPUTER. if ispc set(hObject,'BackgroundColor','white'); else set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor')); end function comport_callback(obj, event) %warning( 'COM recevice 16 bytes' ); global seriala_buf; %get( obj ) send_len = get( obj, 'BytesAvailable' ); serial_buf = fread( obj, 16,'uint8') %get( event ) % --- Executes on selection change in popup_com_port. function popup_com_port_Callback(hObject, eventdata, handles) global handle_com; % hObject handle to popup_com_port (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles structure with handles and user data (see GUIDATA) % Hints: contents = get(hObject,'String') returns popup_com_port contents as cell array % contents{get(hObject,'Value')} returns selected item from popup_com_port sel_val = get(hObject,'Value'); com_str = get(hObject,'String'); %get COM ports list sel_str = com_str{ sel_val }; %get old COM port name handle_com = serial( sel_str ); baud_rate = get( handles.popup_baud_rate,'Value' ); data_bit = get( handles.popup_data_bit,'Value' ); stop_bit = get( handles.popup_stop_bit,'Value' ); parity = get( handles.popup_parity,'Value' ); %warning( 'COM port set-----------------------------' ); try switch baud_rate case 1 handle_com.BaudRate=115200; case 2 handle_com.BaudRate=57600; case 3 handle_com.BaudRate=38400; case 4 handle_com.BaudRate=19200; otherwise handle_com.BaudRate=9600; end % warning( 'COM baud rate-----------------------------' ); switch data_bit case 1 handle_com.DataBits=8; case 2 handle_com.DataBits=7; case 3 handle_com.DataBits=6; case 4 handle_com.DataBits=5; otherwise handle_com.DataBits=8; end switch stop_bit case 1 handle_com.StopBits=1; case 2 handle_com.StopBits=1.5; case 3 handle_com.StopBits=2; otherwise handle_com.StopBits=1; end switch parity case 1 handle_com.Parity='none'; case 2 handle_com.Parity='odd'; case 3 handle_com.Parity='even'; otherwise handle_com.Parity='none'; end handle_com.InputBufferSize=1024; handle_com.timeout=0.5; handle_com.Terminator='LF'; handle_com.FlowControl='none'; handle_com.BytesAvailableFcnMode = 'byte'; handle_com.BytesAvailableFcnCount = 16; handle_com.BytesAvailableFcn = @comport_callback; % handle_com.BytesAvailableFcn = @instrcallback; % handle_com.OutputEmptyFcn = @instrcallback; get( handle_com ) fopen( handle_com ); % warning( 'open COM ok' ); set( hObject, 'Enable', 'off' ); set( handles.popup_baud_rate,'Enable','off' ); set( handles.popup_data_bit,'Enable','off' ); set( handles.popup_stop_bit,'Enable','off' ); set( handles.popup_parity,'Enable','off' ); % fwrite(handle_com,'COM init OK'); % out_data=fread(handle_com,16,'uint8')%接收32个数据（8位），并存入out数组中 % warning( out_data ); % fclose( handle_com ); % delete( handle_com ); % clear( handle_com ); catch fclose( handle_com ); info_str = sprintf( '%s open failure, please select another!\n', sel_str); errordlg( info_str,'COM PORT ERROR','modal'); end % --- Executes during object creation, after setting all properties. function popup_baud_rate_CreateFcn(hObject, eventdata, handles) % hObject handle to popup_baud_rate (see GCBO) % eventdata reserved - to be defined in a future version of MATLAB % handles empty - handles not created until after all CreateFcns called % Hint: popupmenu controls usually have a white background on Windows. % See ISPC and COMPUTER. if ispc set(hObject,'BackgroundColor','white'); else set(hObject,'BackgroundColor',get(0,'defaultUicontrolBackgroundColor')); end % --- Executes on selection change in popup_baud_rate. function popup_baud_rate_Callback(hObject, eventdata, handles) % hObject handle to popup_baud_rate (see GCBO) % eventdata reserved - to be defined in a future vers