read_image(Image, 'F:/temp/1/1.bmp')
read_image(Image2, 'F:/temp/1/2.bmp')
dev_get_window(WindowHandle)
Execute (Image, Image2, obj,WindowHandle, Result)
main
*No0( 1 == ok 2== ng) No[1]== 123456789 No3[2] == abcdefg
Result[0] := 0
Result[1] := 123456
get_image_size (Image, Width, Height)
set_part(WindowHandle, 0, 0, Height, Width)
gen_empty_obj(obj)
gen_rectangle1(ROI, 1, 1, 100, 100)
reduce_domain(Image, ROI, ImageReduced)
threshold (ImageReduced, Regions, 0,240)
connection(Regions, ConnectedRegions)
select_shape (ConnectedRegions, SelectedRegions, ['width','height'], 'and', [1000,200], [2000,1000])
area_center(SelectedRegions, Area, Row, Column)
*
if(Area < 100)
Result[0] := 2
Result[1] :=78
else
*
endif
*
*
reduce_domain(Image2, ROI, ImageReduced_2)
*
disp_obj(Image2, WindowHandle)
set_tposition(WindowHandle, 20, 10)
set_color(WindowHandle, 'green')
write_string(WindowHandle, 'LED: ok')
return ()
Execute
image
image
object
integer