matlab读取图像并用串口发送.docx
《matlab读取图像并用串口发送.docx》由会员分享，可在线阅读，更多相关《matlab读取图像并用串口发送.docx（17页珍藏版）》请在冰点文库上搜索。
matlab读取图像并用串口发送
functionvarargout=serial_communication2（varargin）
gui_Singleton=1；
gui_State=struct（'gui_Name',mfilename，。
.。
'gui_Singleton’,gui_Singleton,.。
。
’gui_OpeningFcn',＠serial_communication2_OpeningFcn，。
。
。
’gui_OutputFcn’,@serial_communication2_OutputFcn,.。
.
'gui_LayoutFcn’,[],。
。
.
'gui_Callback’，[］）；
ifnargin＆＆ischar（varargin{1}）
gui_State.gui_Callback=str2func（varargin{1}）；
end
ifnargout
［varargout{1：
nargout}]=gui_mainfcn（gui_State,varargin｛:
}）；
else
gui_mainfcn（gui_State,varargin｛：
}）；
end
functionserial_communication2_OpeningFcn（hObject,eventdata,handles，varargin）
handles.output=hObject;
warning（’off’）;
javaFrame=get（hObject,'JavaFrame'）；
javaFrame.setFigureIcon（javax。
swing.ImageIcon（'icon。
jpg'））;
%％初始化参数
hasData=false;%表征串口是否接收到数据
isShow=false;％表征是否正在进行数据显示，即是否正在执行函数dataDisp
isStopDisp=false；%表征是否按下了【停止显示】按钮
isHexDisp=false；%表征是否勾选了【十六进制显示】
isHexSend=false;%表征是否勾选了【十六进制发送】
numRec=0;%接收字符计数
numSend=0;%发送字符计数
strRec=’';％已接收的字符串
%%将上述参数作为应用数据，存入窗口对象内
setappdata（hObject，'hasData'，hasData）;
setappdata（hObject，’strRec'，strRec）；
setappdata（hObject，'numRec'，numRec）；
setappdata（hObject,’numSend',numSend）；
setappdata（hObject，’isShow’，isShow）;
setappdata（hObject,’isStopDisp'，isStopDisp）;
setappdata（hObject,’isHexDisp',isHexDisp）;
setappdata（hObject,'isHexSend'，isHexSend）；
guidata（hObject，handles）；
functionvarargout=serial_communication2_OutputFcn（hObject，eventdata,handles）
varargout{1}=handles.output；
functioncom_Callback（hObject，~,handles）
functioncom_CreateFcn（hObject,eventdata，handles）
ifispc&&isequal（get（hObject，'BackgroundColor'），get（0，’defaultUicontrolBackgroundColor'））
set（hObject，’BackgroundColor'，’white'）;
end
functionrate_Callback（hObject，eventdata，handles）
functionrate_CreateFcn（hObject,eventdata，handles）
ifispc&&isequal（get（hObject，'BackgroundColor'）,get（0，'defaultUicontrolBackgroundColor'））
set（hObject,’BackgroundColor’,'white’）；
end
functionjiaoyan_Callback（hObject，eventdata,handles）
functionjiaoyan_CreateFcn（hObject，eventdata,handles）
ifispc&&isequal（get（hObject,’BackgroundColor’），get（0,’defaultUicontrolBackgroundColor’））
set（hObject，’BackgroundColor'，'white’）;
end
functiondata_bits_Callback（hObject,eventdata,handles）
functiondata_bits_CreateFcn（hObject,eventdata，handles）
ifispc＆&isequal（get（hObject,'BackgroundColor’），get（0，’defaultUicontrolBackgroundColor’））
set（hObject,'BackgroundColor'，'white'）;
end
functionstop_bits_Callback（hObject，eventdata,handles）
functionstop_bits_CreateFcn（hObject，eventdata,handles）
ifispc&＆isequal（get（hObject，’BackgroundColor’）,get（0,'defaultUicontrolBackgroundColor’））
set（hObject，’BackgroundColor'，’white'）;
end
functionstart_serial_Callback（hObject，eventdata，handles）
％【打开/关闭串口】按钮的回调函数
%打开串口,并初始化相关参数
%％若按下【打开串口】按钮，打开串口
ifget（hObject,’value’）
％%获取串口的端口名
com_n=sprintf（’com％d',get（handles。
com,’value’））;
%％获取波特率
rates=［120024004800960019200384004300056000576001152009216001036800］;
baud_rate=rates（get（handles.rate,'value'））；
%％获取校验位设置
switchget（handles.jiaoyan,’value’）
case1
jiaoyan=’none’；
case2
jiaoyan='odd'；
case3
jiaoyan=’even’;
end
%%获取数据位个数
data_bits=5+get（handles.data_bits,’value’）；
%％获取停止位个数
stop_bits=get（handles。
stop_bits，’value'）;
%%创建串口对象
scom=serial（com_n）;
%%配置串口属性，指定其回调函数
set（scom,'BaudRate'，baud_rate，’Parity’，jiaoyan，'DataBits'，。
。
.
data_bits,’StopBits',stop_bits，'InputBufferSize’,1638400，'OutputBufferSize'，1638400,'BytesAvailableFcnCount'，10,。
..
'BytesAvailableFcnMode'，’byte',’BytesAvailableFcn'，｛＠bytes,handles}，。
..
’TimerPeriod'，0。
05，’timerfcn’,{＠dataDisp,handles}）;
％％将串口对象的句柄作为用户数据,存入窗口对象
set（handles.figure1，’UserData’,scom）；
％％尝试打开串口
try
fopen（scom）;%打开串口
catch％若串口打开失败，提示“串口不可获得！
"
msgbox（’串口不可获得！
’）;
set（hObject，’value',0）;%弹起本按钮
return;
end
％％打开串口后,允许串口发送数据，清空接收显示区，点亮串口状态指示灯,
％％并更改本按钮文本为“关闭串口”
set（handles。
period_send,'Enable'，’on'）；％启用【自动发送】按钮
set（handles.manual_send，’Enable',’on'）;％启用【手动发送】按钮
set（handles.xianshi,’string’，''）；％清空接收显示区
set（handles.activex1,’value',1）;％点亮串口状态指示灯
set（hObject，’String','关闭串口’）;%设置本按钮文本为“关闭串口”
else％若关闭串口
%％停止并删除定时器
t=timerfind;
if～isempty（t）
stop（t）；
delete（t）;
end
％％停止并删除串口对象
scoms=instrfind;
stopasync（scoms）;
fclose（scoms）；
delete（scoms）；
%％禁用【自动发送】和【手动发送】按钮，熄灭串口状态指示灯
set（handles。
period_send,’Enable','off’，'value’,0）;%禁用【自动发送】按钮
set（handles。
manual_send,'Enable’,'off'）;%禁用【手动发送】按钮
set（handles。
activex1,'value'，0）；%熄灭串口状态指示灯
end
functiondataDisp（obj，event，handles）
globalvalue
％串口的TimerFcn回调函数
%串口数据显示
％%获取参数
hasData=getappdata（handles.figure1,’hasData'）；％串口是否收到数据
strRec=getappdata（handles。
figure1，’strRec’）;%串口数据的字符串形式，定时显示该数据
numRec=getappdata（handles.figure1，'numRec’）;%串口接收到的数据个数
%%若串口没有接收到数据,先尝试接收串口数据
if～hasData
bytes（obj,event，handles）；
end
％%若串口有数据,显示串口数据
ifhasData
%％给数据显示模块加互斥锁
%%在执行显示数据模块时,不接收串口数据，即不执行BytesAvailableFcn回调函数
setappdata（handles。
figure1,'isShow’,true）;
set（handles。
xianshi,’string',strRec）;
％%更新接收计数
set（handles.rec，'string’，numRec）;
%%更新hasData标志,表明串口数据已经显示
setappdata（handles。
figure1，’hasData'，false）；
％%给数据显示模块解锁
setappdata（handles.figure1,’isShow’，false）；
end
functionbytes（obj，~,handles）
%串口的BytesAvailableFcn回调函数
%串口接收数据
%%获取参数
strRec=getappdata（handles。
figure1，’strRec’）；%获取串口要显示的数据
numRec=getappdata（handles。
figure1,'numRec’）;%获取串口已接收数据的个数
isStopDisp=getappdata（handles。
figure1，’isStopDisp'）；%是否按下了【停止显示】按钮
isHexDisp=getappdata（handles。
figure1,'isHexDisp'）；％是否十六进制显示
isShow=getappdata（handles.figure1,'isShow'）;％是否正在执行显示数据操作
％%若正在执行数据显示操作，暂不接收串口数据
ifisShow
return;
end
%%获取串口可获取的数据个数
n=get（obj，'BytesAvailable'）；
％％若串口有数据,接收所有数据
ifn
％%更新hasData参数，表明串口有数据需要显示
setappdata（handles.figure1,'hasData’,true）;
％％读取串口数据
a=fread（obj，n,’uchar’）;
％%若没有停止显示，将接收到的数据解算出来,准备显示
if～isStopDisp
％％根据进制显示的状态，解析数据为要显示的字符串
if~isHexDisp
c=char（a'）；
else
strHex=dec2hex（a'）’;
strHex2=［strHex;blanks（size（a,1））]；
c=strHex2（:
）’;
end
％%更新已接收的数据个数
numRec=numRec+size（a,1）;
％%更新要显示的字符串
strRec=[strRecc];
end
%％更新参数
setappdata（handles。
figure1，'numRec'，numRec）;%更新已接收的数据个数
setappdata（handles.figure1,’strRec'，strRec）；％更新要显示的字符串
end
functionqingkong_Callback（hObject，eventdata，handles）
%%清空要显示的字符串
setappdata（handles。
figure1，’strRec’,’’）；
％％清空显示
set（handles.xianshi，'String'，’’）;
functionstop_disp_Callback（hObject,eventdata，handles）
％%根据【停止显示】按钮的状态,更新isStopDisp参数
ifget（hObject,’Value’）
isStopDisp=true;
else
isStopDisp=false;
end
setappdata（handles.figure1,’isStopDisp’，isStopDisp）;
functionhex_disp_Callback（hObject,eventdata，handles）
％%根据【十六进制显示】复选框的状态，更新isHexDisp参数
ifget（hObject，’Value’）
isHexDisp=true；
else
isHexDisp=false;
end
setappdata（handles。
figure1,'isHexDisp',isHexDisp）;
functionmanual_send_Callback（hObject,eventdata，handles）
scom=get（handles.figure1,'UserData'）;
numSend=getappdata（handles.figure1，’numSend’）;
val=get（handles。
sends,'UserData'）;
numSend=numSend+length（val）;
set（handles。
trans，'string',num2str（numSend））;
setappdata（handles。
figure1，'numSend'，numSend）;
％％若要发送的数据不为空，发送数据
if～isempty（val）
%％设置倒计数的初值
n=2000000;
whilen
％％获取串口的传输状态，若串口没有正在写数据，写入数据
str=get（scom，'TransferStatus'）;
if～（strcmp（str,’write'）｜｜strcmp（str，’read&write’））
fwrite（scom，val,'uint8’,'async’）;％数据写入串口
break;
end
n=n—1;％倒计数
end
end
functionclear_send_Callback（hObject，eventdata，handles）
%％清空发送区
set（handles。
sends，'string’，’'）
％％更新要发送的数据
set（handles.sends，'UserData',[］）；
functionperiod_send_Callback（hObject,eventdata,handles）
%【自动发送】按钮的Callback回调函数
％%若按下【自动发送】按钮,启动定时器;否则，停止并删除定时器
ifget（hObject,’value’）
t1=0.001*str2double（get（handles。
period1,’string'））;％获取定时器周期
t=timer（'ExecutionMode'，’fixedrate'，’Period',t1,'TimerFcn’,.。
。
{＠manual_send_Callback，handles｝）；％创建定时器
set（handles。
period1，’Enable’，'off’）;%禁用设置定时器周期的EditText对象
set（handles.sends，'Enable’,'inactive’）；%禁用数据发送编辑区
start（t）;％启动定时器
else
set（handles.period1,'Enable’，'on'）；%启用设置定时器周期的EditText对象
set（handles.sends，’Enable'，'on'）;％启用数据发送编辑区
t=timerfind;％查找定时器
stop（t）;%停止定时器
delete（t）；％删除定时器
end
%functionperiod1_Callback（hObject，eventdata,handles）
functionperiod1_CreateFcn（hObject，eventdata，handles）
ifispc&＆isequal（get（hObject，’BackgroundColor'），get（0，’defaultUicontrolBackgroundColor’））
set（hObject,’BackgroundColor’，’white’）；
end
functionclear_count_Callback（hObject，eventdata,handles）
%％计数清零,并更新参数numRec和numSend
set（[handles。
rec,handles.trans］，'string'，'0'）
setappdata（handles。
figure1，'numRec’，0）;
setappdata（handles。
figure1,’numSend'，0）;
functioncopy_data_Callback（hObject，eventdata，handles）
%%设置是否允许复制接收数据显示区内的数据
ifget（hObject,’value'）
set（handles.xianshi,'enable'，'on'）；
else
set（handles.xianshi，’enable’,'inactive’）；
end
functionfigure1_CloseRequestFcn（hObject,eventdata，handles）
%关闭窗口时，检查定时器和串口是否已关闭
％若没有关闭,则先关闭
%%查找定时器
t=timerfind；
％%若存在定时器对象，停止并关闭
if～isempty（t）
stop（t）；%若定时器没有停止，则停止定时器
delete（t）；
end
％%查找串口对象
scoms=instrfind;
%%尝试停止、关闭删除串口对象
try
stopasync（scoms）；
fclose（scoms）；
delete（scoms）；
end
%％关闭窗口
delete（hObject）;
functionhex_send_Callback（hObject,eventdata，handles）
％%根据【十六进制发送】复选框的状态，更新isHexSend参数
ifget（hObject,’value'）
isHexSend=true；
else
isHexSend=false；
end
setappdata（handles。
figure1，’isHexSend’,isHexSend）;
％%更新要发送的数据
sends_Callback（handles。
sends，eventdata,handles）;
functionsends_Callback（hObject,eventdata,handles）
%数据发送编辑区的Ca
升级会员 