read_image (Audi2, 'audi2')

 fill_interlace (Audi2, ImageFilled, 'odd')

 dev_set_color('green')

 threshold (ImageFilled, Region, , )

 connection (Region, ConnectedRegions)

 select_shape (ConnectedRegions, SelectedRegions, 'width', 'and', , )

 select_shape (SelectedRegions, Letters, 'height', 'and', , )

 *dev_clear_window ()

 *dev_set_colored ()

 *dev_display (ImageFilled)

 *dev_display (Letters)

 read_ocr_class_mlp('Industrial_0-9A-Z.omc',OCRHandle)

 do_ocr_multi_class_mlp(Letters,Audi2,OCRHandle, Class, Confidence)

 *显示识别的结果

 area_center(Letters, Area, Row, Column)

 for Index :=  to  by

      disp_message(, Class[Index], 'window', Row[Index], Column[Index], 'black', 'true')

  endfor