Matlab车牌识别&停车场车辆

function car_park_managerment % persistent list; capacity=100; a=0; list=[]; editFlag=0; % global axes1; % global axes2; % list=[list,car(1,'gffg')]; % list=[list,car(1,'gfdsggddf')] % clear,clc%要保留重要变量注释此处 f=figure('Visible','off','color','white','Position',[360 500 1200 720]); axes1 = axes('Parent',f,'Position',[0.52 0.56 0.4 0.32]); axes2 = axes('Parent',f,'Position',[0.52 0.17 0.4 0.32]); % axes3 = axes('Parent',f,'Position',[0.05 0.06 0.42 0.45]); axes1.YAxis.Visible = 'off'; axes1.XAxis.Visible = 'off'; axes2.YAxis.Visible = 'off'; axes2.XAxis.Visible = 'off'; set(f,'Name','停车场管理系统（模拟）') movegui(f,'center') % data={'aa',3,5} cnames = {'车牌号码(licenseNumber)','出入情况(Access)','操作时间(ActionTime)'}; global uitableRecord; uitableRecord=uitable(f,'Data',[],'Position',[40 30 470 360],'ColumnName',cnames); set(uitableRecord,'ColumnEditable',true) % uitableRecord.Position(3) = uitableRecord.Extent(3); % uitableRecord.Position(4) = uitableRecord.Extent(4); text11=uicontrol('Style','text','BackgroundColor','w','Position',... [30 650 120 50],'String','计费规则：2元/小时','ForegroundColor','r'); text22=uicontrol('Style','text','BackgroundColor','w','Position',... [0 470 180 150],'String','','FontSize',12,'ForegroundColor','r'); button1=uicontrol('Style','pushbutton','BackgroundColor',[0.3 0.9 0.9],'Position',... [190 620 160 42],'String','模拟汽车进出','FontSize',18,'Callback',@callbackfn); % textEdit=uicontrol('Style','edit','BackgroundColor','w','Position',... % [620 80 160 36],'String','输入车牌号','FontSize',12,'ForegroundColor','g'); buttonEdit=uicontrol('Style','pushbutton','BackgroundColor',[0.3 0.9 0.9],'Position',... [620 40 160 36],'String','修改车牌信息','FontSize',14,'Callback',@callbackEdit); % textSearch=uicontrol('Style','edit','BackgroundColor','w','Position',... % [800 80 160 36],'String','输入车牌号','FontSize',12,'ForegroundColor','g'); buttonSearch=uicontrol('Style','pushbutton','BackgroundColor',[0.3 0.9 0.9],'Position',... [800 40 160 36],'String','查询车辆去留信息','FontSize',14,'Callback',@callbackSearch); buttonExportExcel=uicontrol('Style','pushbutton','BackgroundColor',[0.3 0.9 0.9],'Position',... [980 40 160 36],'String','导出记录excel','FontSize',14,'Callback',@callbackExportExcel); text1=uicontrol('Style','text','BackgroundColor',[0.3 0.6 0.9],'Position',... [84 510 81 21],'String','入','FontSize',13); text2=uicontrol('Style','text','BackgroundColor',[0.3 0.6 0.9],'Position',... [370 510 81 21],'String','出','FontSize',13); text3=uicontrol('Style','text','BackgroundColor','w','Position',... [10 435 270 60],'String','','FontSize',12,'ForegroundColor','r'); text4=uicontrol('Style','text','BackgroundColor','w','Position',... [280 435 270 60],'String','','FontSize',12,'ForegroundColor','r'); text5=uicontrol('Style','text','BackgroundColor','w','Position',... [0 400 270 21],'String',['当前汽车数量：' num2str(a)],'FontSize',12,'ForegroundColor','b'); text6=uicontrol('Style','text','BackgroundColor','w','Position',... [270 400 270 21],'String',['剩余车库容量：' num2str(capacity)],'FontSize',12,'ForegroundColor','b'); set(f,'Visible','on') function callbackfn(source,eventdata) % set(text3,'String','测试改变文本') cla(axes1) cla(axes2) axes1.YAxis.Visible = 'off'; axes1.XAxis.Visible = 'off'; axes2.YAxis.Visible = 'off'; axes2.XAxis.Visible = 'off'; [fn pn]=uigetfile('*.jpg','选中一张车牌图像'); if fn==0 return end [II r2 f_list]=main([pn fn]);%调用车牌识别Matlab程序 for k=1:length(f_list) close(f_list(k)) end % axes1 = axes('Parent',f,'Position',[0.45 0.54 0.4 0.32]); axes(axes1) imshow(imread([pn fn]),[0,255]); text(32,-22, '原始图象','Color','b'); % axes2 = axes('Parent',f,'Position',[0.45 0.15 0.4 0.32]); axes(axes2) imshow(II,[0,255]); text(32,-12, ['处理后图象 ','识别结果：',r2],'Color','r'); axes1.YAxis.Visible = 'off'; axes1.XAxis.Visible = 'off'; axes2.YAxis.Visible = 'off'; axes2.XAxis.Visible = 'off'; flag=0; for ii=1:length(list) if list(ii).license_car_number==r2 %检查数据库(list)是否存储有该车牌号码数据 break; else flag=flag+1; end end if flag==length(list) %检查数据库(list)没有存储有该车牌号码数据，则开始往数据库list存储该车牌号码数据 list=[list,car(0,r2)]; list(length(list)).timeRecord_in=clock; end for j=1:length(list) if list(j).license_car_number==r2 if list(j).edit_license_car_number~=0 r2=list(j).edit_license_car_number; end if list(j).times==0 list(j).times=1; list(j).timeRecord_in=clock; set(text3,'String',[r2,sprintf('\n'),'车主您已驶入本停车场',sprintf('\n'),datestr(list(j).timeRecord_in,31)]) set(text4,'String',[]) set(text22,'String',[]) a=a+1; capacity=capacity-1; set(text5,'String',['当前汽车数量：' num2str(a)]); set(text6,'String',['剩余车库容量：' num2str(capacity)]); newArray={r2,'入',datestr(list(j).timeRecord_in,31)}; oldData=get(uitableRecord,'Data'); newData=[oldData;newArray]; set(uitableRecord,'Data',newData); editFlag=j; else list(j).times=0; list(j).timeRecord_out=clock; set(text4,'String',[r2,sprintf('\n'),'车主您已驶出本停车场',sprintf('\n'),datestr(list(j).timeRecord_out,31)]) set(text22,'String',['共停留',num2str(etime(list(j).timeRecord_out,list(j).timeRecord_in)/3600+1),'小时',sprintf('\n'),'收您停车费用：',num2str((etime(list(j).timeRecord_out,list(j).timeRecord_in)/3600+1)*2),'元']) set(text3,'String',[]) a=a-1; capacity=capacity+1; set(text5,'String',['当前汽车数量：' num2str(a)]); set(text6,'String',['剩余车库容量：' num2str(capacity)]); newArray={r2,'出',datestr(list(j).timeRecord_out,31)}; oldData=get(uitableRecord,'Data'); newData=[oldData;newArray]; set(uitableRecord,'Data',newData); editFlag=j; end end end end function callbackExportExcel2(source,eventdata) prompt={'a','b','c'}; title='请输入数据'; lines=[1,1,1]; def={'sdf','5','5'}; tab=inputdlg(prompt,title,lines,def); nr1=tab{1}; nr2=tab{2}; nr3=tab{3}; newArray={nr1,nr2,nr3}; oldData=get(uitableRecord,'Data'); newData=[oldData;newArray]; set(uitableRecord,'Data',newData); end function callbackEdit(source,eventdata) if editFlag==0 msgbox('未有车辆进出，不能修改！','Prompt'); else prompt={'原车牌号码：','改动车牌号码：'}; title='请输入数据'; def={list(editFlag).license_car_number,''}; tab=inputdlg(prompt,title,[1 30;1 30],def); lcn=tab{2}; list(editFlag).edit_license_car_number=lcn; data=get(uitableRecord,'Data'); [r1 c1]=size(data); data(r1,:)=[]; set(uitableRecord,'Data',data); if list(editFlag).times==1 newRow={list(editFlag).edit_license_car_number,'入',datestr(list(editFlag).timeRecord_in,31)}; newData=[data;newRow]; set(uitableRecord,'Data',newData); set(text3,'String',[list(editFlag).edit_license_car_number,sprintf('\n'),'车主您已驶入本停车场',sprintf('\n'),datestr(list(editFlag).timeRecord_in,31)]) else