<?xml version="1.0" encoding="UTF-8"?>
|
<hdevelop file_version="1.1" halcon_version="12.0">
|
<procedure name="main">
|
<interface/>
|
<body>
|
<c>*输入图片路径，例如：'D:/test/1.tif',注意使用反斜杠'/'</c>
|
<l>Path1 := ''</l>
|
<l>read_image (Image1, 'D:/PROJECTS/M071/Images/20200819/Origin/132913772.tif')</l>
|
<l>Path2 := ''</l>
|
<l>read_image (Image2, 'D:/PROJECTS/M071/Images/20200819/Origin/132917302.tif')</l>
|
<l>Number1 := 0</l>
|
<l>Number2 := 0</l>
|
<c></c>
|
<c>*第几张图</c>
|
<l>Pic := 2</l>
|
<c>*第几个键</c>
|
<l>KeyNum := 12</l>
|
<c></c>
|
<l>SinglePic := 0</l>
|
<l>if (SinglePic == 0)</l>
|
<l> if (KeyNum <= 0 or KeyNum > 43)</l>
|
<l> throw ('KeyNum is illegal!')</l>
|
<l> endif</l>
|
<c> </c>
|
<l> if (Pic == 1)</l>
|
<l> try</l>
|
<l> M071_CutImage1 (Image1, OUTPUT_Images)</l>
|
<l> count_obj (OUTPUT_Images, Number1)</l>
|
<l> select_obj (OUTPUT_Images, ObjectSelected, KeyNum)</l>
|
<l> catch (Exception)</l>
|
<l> throw ('截图1异常')</l>
|
<l> stop ()</l>
|
<l> endtry</l>
|
<c> </c>
|
<l> elseif (Pic == 2)</l>
|
<l> try</l>
|
<l> M071_CutImage2 (Image2, OUTPUT_Images)</l>
|
<l> count_obj (OUTPUT_Images, Number2)</l>
|
<l> select_obj (OUTPUT_Images, ObjectSelected, KeyNum)</l>
|
<l> catch (Exception)</l>
|
<l> throw ('截图2异常')</l>
|
<l> stop ()</l>
|
<l> endtry</l>
|
<c> </c>
|
<l> else</l>
|
<l> throw('Image number is illegal!')</l>
|
<l> endif</l>
|
<c> </c>
|
<l> if (Number1 == 43 or Number2 == 36)</l>
|
<l> try</l>
|
<l> M071_GetResults (ObjectSelected, 0.056, 0.0008,0, OUTPUT_Results)</l>
|
<l> catch (Exception)</l>
|
<l> throw ('数据计算异常')</l>
|
<l> stop ()</l>
|
<l> endtry</l>
|
<l> endif</l>
|
<l>else</l>
|
<l> M071_GetResults (Image2, 0.056, 0.0008,0, OUTPUT_Results)</l>
|
<l>endif</l>
|
<c></c>
|
<c></c>
|
<c></c>
|
<c></c>
|
</body>
|
<docu id="main">
|
<parameters/>
|
</docu>
|
</procedure>
|
</hdevelop>
|
