案例2：識別車牌號
方法流程：採集->圖像預處理（濾波、二值化處理、形態學處理）->特徵提取->仿射變換->定位->截取->字符識別
程序代碼：
dev_close_window()
dev_open_window(0, 0, -1, -1, 'black', WindowHandle)
dev_open_file_dialog('read_image', 'default', 'default', Selection)
read_image (Image,Selection)
mean_image (Image,ImageMean, 5, 5)
decompose3(ImageMean, Image1, Image2, Image3)
trans_from_rgb(Image1, Image2, Image3, ImageResult1, ImageResult2,ImageResult3, 'hsv')
threshold(ImageResult2, Regions, 144, 251)
fill_up (Regions,RegionFillUp)
closing_rectangle1(RegionFillUp, RegionClosing, 10, 10)
connection(RegionClosing, ConnectedRegions)
select_shape(ConnectedRegions, SelectedRegions, 'area', 'and', 8788.99, 13009.2)
shape_trans(SelectedRegions, RegionTrans, 'rectangle2')
orientation_region(RegionTrans, Phi)
hom_mat2d_identity(HomMat2DIdentity)
area_center(RegionTrans, Area, Row, Column)
*vector_angle_to_rigid
(Row, Column, Phi, Row, Column, 0, HomMat2D)
hom_mat2d_rotate(HomMat2DIdentity, -Phi, Row, Column, HomMat2DRotate)
affine_trans_region(RegionTrans, RegionAffineTrans, HomMat2DRotate, 'nearest_neighbor')
affine_trans_image(Image, ImageAffinTrans, HomMat2DRotate, 'constant', 'false')
reduce_domain(ImageAffinTrans, RegionAffineTrans, ImageReduced)
rgb1_to_gray(ImageReduced, GrayImage)
invert_image(GrayImage, ImageInvert)
threshold(GrayImage, Regions1, 175, 241)
opening_circle(Regions1, RegionOpening, 1)
connection(RegionOpening, ConnectedRegions1)
select_shape(ConnectedRegions1, SelectedRegions1, 'area', 'and', 95.87, 500)
closing_circle(SelectedRegions1, RegionClosing1, 2)
sort_region(RegionClosing1, SortedRegions, 'character', 'false', 'column')
read_ocr_class_mlp('Industrial_0-9A-Z_NoRej.omc', OCRHandle)
do_ocr_multi_class_mlp(RegionClosing1, ImageInvert, OCRHandle, Class, Confidence)
disp_message(WindowHandle, Class, 'window', 0, 0, 'black', 'true')
實驗結果：
圖2