append_ocr_trainf

read_image (Image, 'D:/图像文件/字符识别/1-1.bmp')

access_channel (Image, Image1, 1)

* draw_rectangle2 (3600, Row, Column, Phi, Length1, Length2)

gen_rectangle2 (Rectangle, 96.0436, 715.9526, 0.0173917050943654, 110.186941, 18.041084)

reduce_domain (Image1, Rectangle, ImageReduced)

scale_image_max (ImageReduced, ImageScaleMax)

TmpCtrl_Orientation :=0.0173917050943654

* OCR 02: Build rotation matrix

hom_mat2d_identity (TmpCtrl_MatrixIdentity)

hom_mat2d_rotate (TmpCtrl_MatrixIdentity, -TmpCtrl_Orientation, 0, 0, TmpCtrl_MatrixRotation)

get_domain (ImageReduced, TmpObj_Domain)

get_system ('clip_region', TmpCtrl_ClipRegion)

set_system ('clip_region', 'false')

dilation_circle (TmpObj_Domain, TmpObj_DomainExpanded, 25)

affine_trans_region (TmpObj_DomainExpanded, TmpObj_DomainTransformedRaw, TmpCtrl_MatrixRotation, 'true')

smallest_rectangle1 (TmpObj_DomainTransformedRaw, TmpCtrl_Row1, TmpCtrl_Col1, TmpCtrl_Row2, TmpCtrl_Col2)

hom_mat2d_translate (TmpCtrl_MatrixIdentity, -TmpCtrl_Row1, -TmpCtrl_Col1, TmpCtrl_MatrixTranslation)

hom_mat2d_compose (TmpCtrl_MatrixTranslation, TmpCtrl_MatrixRotation, TmpCtrl_MatrixComposite)

affine_trans_region (TmpObj_Domain, TmpObj_DomainTransformed, TmpCtrl_MatrixComposite, 'true')

affine_trans_image (ImageReduced, TmpObj_ImageTransformed, TmpCtrl_MatrixComposite, 'constant', 'true')

dilation_circle (TmpObj_Domain, TmpObj_DomainExpanded, 25)

affine_trans_pixel (TmpCtrl_MatrixComposite, TmpCtrl_Col1, TmpCtrl_Row1, RowTrans, ColTrans)

expand_domain_gray (TmpObj_ImageTransformed, TmpObj_ImageTransformedExpanded, 25)

reduce_domain (TmpObj_ImageTransformed, TmpObj_DomainTransformed, TmpObj_ImageTransformedReduced)

crop_part (TmpObj_ImageTransformedReduced, TmpObj_MonoReduced_OCR_02_0, 0, 0, TmpCtrl_Col2-TmpCtrl_Col1+1, TmpCtrl_Row2-TmpCtrl_Row1+1)

char_threshold (TmpObj_MonoReduced_OCR_02_0, TmpObj_DomainTransformed, Characters, 1,100, Threshold)

connection (Characters, ConnectedRegions1)

partition_dynamic (Characters, Partitioned, 29, 90)

connection (Partitioned, ConnectedRegions)

select_characters (ConnectedRegions, RegionCharacters, 'false', 'medium', 26, 28, 'false', 'false', 'none', 'false', 'medium', 'false', 0, 'completion')

* select_shape (ConnectedRegions, SelectedRegions, 'width', 'and', 10, 49)

* select_shape (SelectedRegions, SelectedRegions1, 'height', 'and', 10, 47)

sort_region (RegionCharacters, SortedRegions, 'character', 'true', 'column')

count_obj (SortedRegions, Number)

Chars := ['1','2','3']

for i := 1 to Number by 1

select_obj (SortedRegions, TrainSingle, i)

append_ocr_trainf (TrainSingle, TmpObj_MonoReduced_OCR_02_0, Chars[i - 1], 'D:/ocr/WR.trf')

endfor

read_ocr_trainf_names ('D:/ocr/WR.trf', CharacterNames, CharacterCount)

create_ocr_class_mlp (8, 10, 'constant', 'default', ['1','2','3'], 80, 'none', 10, 42, OCRHandle)

trainf_ocr_class_mlp (OCRHandle, 'D:/ocr/WR.trf', 200, 1, 0.01, Error, ErrorLog)

write_ocr_class_mlp (OCRHandle, 'D:/ocr/WR.omc')

clear_ocr_class_mlp (OCRHandle)

相关推荐
晚云与城1 天前
今日分享:C++ Stack和queue(栈与队列)
开发语言·c++
小莞尔1 天前
【51单片机】【protues仿真】基于51单片机停车场的车位管理系统
c语言·开发语言·单片机·嵌入式硬件·51单片机
张烫麻辣亮。1 天前
golang-gin包
开发语言·golang·gin
yuluo_YX1 天前
Go Style 代码风格规范
开发语言·后端·golang
百锦再1 天前
脚本语言的大浪淘沙或百花争艳
java·开发语言·人工智能·python·django·virtualenv·pygame
上位机付工1 天前
C#与倍福TwinCAT3进行ADS通信
开发语言·c#
励志不掉头发的内向程序员1 天前
STL库——二叉搜索树
开发语言·c++·学习
至此流年莫相忘1 天前
设计模式:模板方法模式
java·开发语言·设计模式
土了个豆子的1 天前
02.继承MonoBehaviour的单例模式基类
开发语言·visualstudio·单例模式·c#·里氏替换原则
qq_172805591 天前
Go 自建库的使用教程与测试
开发语言·后端·golang