%生成函數?imshowage=Require（）;將圖片中的路標提取出來，并保存為result.png保存在當前目錄；
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%將原圖象初始化為待提取的圖象；



close?all;
I=imread（‘h2.JPG‘）;%按照庫中的圖片名稱更改來顯示，已知h5出現了無法標識的情況
I=imresize（I[592?748]）;

?%?figureimshow（I）;title（‘原圖‘）;
?I=imresize（I[592?748]）;
Hsv=rgb2hsv（I）;???%將圖像由RGB顏色空間轉化為HSV顏色空間
?%figureimshow（Hsv）;title（‘Hsv‘）;
I1=Hsv（::1）;????%記錄顏色亮度為1的數據以便之后再利用顏色閥值找出紅色
?%figureimshow（I1）;title（‘Hsv（::1）‘）;
BW=roicolor（I10.02770.032）;?%利用顏色閥值將紅色對象都都顯示為白色其余都為黑色至此完成圖象的二值化
?%figureimshow（BW）;title（‘只顯示紅色‘）;
se=strel（‘disk‘10）;?%創建一個指定半徑10的平面圓盤形的結構元素
BW1=imclose（BWse）;%將圖象置白色；
SE=ones（10）;
PZ=imdilate（BW1SE）;%將二值圖象膨脹；
?%figureimshow（PZ）;title（‘膨脹后的圖象‘）;
TC=bwfill（PZ‘holes‘）;
?%figureimshow（TC）;title（‘填充后的圖象‘）;
L=bwlabeln（TC）;?%對連通對象的各個分離部分進行標注L中包含了連通對象的標注。默認值為8連通。
S=regionprops（L‘Area‘‘Centroid‘‘BoundingBox‘）;??%獲取標記圖像L中所有區域的一系列特征付給S
cent=cat（1S.Centroid）;%把S.Centroid沿第一維排列
boud=cat（1S.BoundingBox）;?%把S.BoundingBox沿第一維排列
Len=length（S）;?
t2=0;t4=0;t7=0;t8=0;

?
for?i=1:3
????Max（i）=0;
????MR（i）=0;
????MX（i）=0;
????MY（i）=0;
end
Max1=0;Max2=0;Max3=0;ttq=0;
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%提取出路標位置；
%根據各填充塊的面積，找出其中最大的三個填充塊，分別存于Max1、Max2、Max3
for?（i=1:Len）
????if?（S（i）.Area>=Max1）
????????Max3=Max2;Max（3）=Max（2）;
????????Max2=Max1;Max（2）=Max（1）;
????????Max1=S（i）.Area;Max（1）=i;
????else?if（S（i）.Area>=Max2）
????????????Max3=Max2;Max（3）=Max（2）;
????????????Max2=S（i）.Area;Max（2）=i;
??????????else?if（S（i）.Area>=Max3）
??????????????????Max3=S（i）.Area;Max（3）=i;
??????????????end
??????????end
??????end
end??
if（（Max（1）&&Max（2）&&Max（3））==0）
????imshowage=0;errordlg（‘?沒有路標！！‘‘基本信息‘）;
else
?????imshowage=1;
for?i=1:3
????tz（i）=0;
????Mblen（i）=0;
????Mbwid（i）=0;
end
[hanglier]=size（BW）;
for?i=1:3
????
????X=cent（Max（i）1）;Y=cent（Max（i）2）;%白色為1；
????MX（i）=round（X）;MY（i）=round（Y）;
????bx=boud（Max（i）1）;by=boud（Max（i）2）;blen=boud（Max（i）4）;bwid=boud（Max（i）3）;
????bx1=round（bx）;by1=round（by）;Mblen（i）=round（blen）;Mbwid（i）=round（bwid）;
????if?（blen>=bwid）
????????MR=bwid;
????else
????????MR=blen;
????end
?
????if?（MX（i）+round（MR/4）<=lie&&MY（i）+round（MR/6）<=hang&&TC（MY（i）+round（MR/6）MX（i）+round（MR/4））==1）
????????t2=1;??
????end
?
????if?（MX（i）-round（MR/4）>0&&MY（i）-round（MR/6）>0&&TC（MY（i）-round（MR/6）MX（i）-round（MR/4））==1）???
????????t4=1;
????end
????
???if?（MY（i）+round（MR/6）<=hang&&MX（i）-round（MR/4）>0&&TC（MY（i）+round（MR/6）MX（i）-round（MR/4））==1）
????????t7=1;
????end
?????if?（MY（i）-round（MR/6）>0&&MX（i）+round（MR/4）<=lie&&TC（MY（i）-round（MR/6）MX（i）+round（MR/4））==1）
????????t8=1;
????end
????
???
????if（t2&&t4&&t7&&t8&&S（Max（i））.Area/（hang*lie）>0.01）?%當對象的象素少于1000的時候默認他不是路標
????????tz（i）=1;?
????????t2=0;t4=0;t7=0;t8=0;
????end
end??
end
?
if?tz（3）==1??
????YC=bwareaopen（TCMax3）;
elseif?tz（2）==1
????????YC=bwareaopen（TCMax2）;
elseif??tz（2）==0
?????????YC=bwareaopen（TCMax1）;

?屬性????????????大小?????日期????時間???名稱
-----------?---------??----------?-----??----

?????文件?????193669??2019-01-01?20:06??TSR\1.fig

?????文件?????193817??2019-01-01?20:06??TSR\2.fig

?????文件???????9183??2019-01-01?15:09??TSR\background.jpg

?????文件???????9376??2019-01-01?17:58??TSR\background.png

?????文件???????8121??2019-01-01?18:05??TSR\background1.jpg

?????文件???????4689??2019-05-06?13:41??TSR\main.m

?????文件????????373??2019-01-01?16:32??TSR\Readme.txt

?????文件??????28590??2019-01-02?10:15??TSR\result_1.bmp

?????文件???????1792??2019-05-06?13:51??TSR\svm.m

?????文件???????1993??2013-05-21?08:57??TSR\svm_images\test_image\11.JPG

?????文件??????94146??2007-05-31?21:09??TSR\svm_images\test_image\7.jpg

?????文件?????100855??2007-05-31?20:58??TSR\svm_images\test_image\h1.jpg

?????文件??????77609??2007-05-31?21:13??TSR\svm_images\test_image\h4.jpg

?????文件??????71068??2007-05-31?22:25??TSR\svm_images\test_image\h6.jpg

?????文件??????33814??2019-01-01?07:34??TSR\svm_images\test_image\u=4319566833611468215&fm=26&gp=0.jpg

?????文件???????6077??2019-01-01?07:27??TSR\svm_images\train_images\會車讓行\timg.jpg

?????文件??????13123??2019-01-01?07:28??TSR\svm_images\train_images\會車讓行\u=16414818162780565269&fm=11&gp=0.jpg

?????文件??????13785??2019-01-01?07:27??TSR\svm_images\train_images\會車讓行\u=18230557063731824075&fm=26&gp=0.jpg

?????文件??????17466??2019-01-01?07:28??TSR\svm_images\train_images\會車讓行\u=3586134859314106098&fm=26&gp=0.jpg

?????文件??????14964??2019-01-01?07:27??TSR\svm_images\train_images\會車讓行\u=38102060213399778444&fm=26&gp=0.jpg

?????文件??????24075??2019-01-01?07:28??TSR\svm_images\train_images\會車讓行\u=4140381821870224931&fm=26&gp=0.jpg

?????文件??????35381??2019-01-01?07:28??TSR\svm_images\train_images\會車讓行\u=71167738565138802&fm=26&gp=0.jpg

?????文件???????1892??2013-05-20?18:18??TSR\svm_images\train_images\會車讓行\會車讓行.png

?????文件??????15480??2019-01-01?07:28??TSR\svm_images\train_images\減速讓行\1.jpg

?????文件???????9650??2019-01-01?07:29??TSR\svm_images\train_images\減速讓行\download.jpg

?????文件??????16494??2019-01-01?07:30??TSR\svm_images\train_images\減速讓行\u=25683711991582602141&fm=26&gp=0.jpg

?????文件??????14313??2019-01-01?07:29??TSR\svm_images\train_images\減速讓行\u=27321297501334864576&fm=26&gp=0.jpg

?????文件??????12375??2019-01-01?07:30??TSR\svm_images\train_images\減速讓行\u=36842331633702330352&fm=26&gp=0.jpg

?????文件??????23814??2019-01-01?07:29??TSR\svm_images\train_images\減速讓行\u=3844782273946177847&fm=26&gp=0.jpg

?????文件??????29420??2019-01-01?07:30??TSR\svm_images\train_images\減速讓行\u=479873800379030793&fm=26&gp=0.jpg

............此處省略94個文件信息