Halcon距离计算算子
1.distance_pp(点到点距离)
算子参数:
distance_pp( : : Row1, Column1, Row2, Column2 : Distance)
1.Row1(输入第一个点的行坐标, point.y)
2.Column1(输入第一个点的列坐标, point.x)
3.Row2(输入第二个点的行坐标, point.y)
4.Column2(输入第二个点的列坐标, point.x)
5.Distance(输出点之间的距离)
实例:
dev_close_window ()
read_image (Image, 'mreut')
dev_open_window (0, 0, 512, 512, 'white', WindowID)
dev_display (Image)
dev_set_color ('black')
threshold (Image, Region, 180, 255)
* dev_clear_window ()
dev_display (Region)
connection (Region, ConnectedRegions)
select_shape (ConnectedRegions, SelectedRegions, 'area', 'and', 10000, 100000000)
get_region_contour (SelectedRegions, Rows, Columns)
RowPoint := 80
ColPoint := 250
NumberTuple := |Rows|
dev_set_color ('red')
dev_set_draw ('margin')
gen_circle (Circle, RowPoint, ColPoint, 10)
dev_display (Circle)
dev_set_color ('green')
for I := 1 to NumberTuple by 10
gen_cross_contour_xld (Cross, Rows[I], Columns[I], 6, 0.785398)
gen_contour_polygon_xld (Contour, [Rows[I],RowPoint], [Columns[I],ColPoint])
dev_set_color ('green')
dev_