WWW.NNC.IR
Macro Reference
453
8
Appendices
Vision System FH/FZ5 Series
User’s Manual (Z340)
Example
Gets the intersection point of two gotten lines. The two lines are respectively gotten using Processing Units 1
to 4 and Processing Units 5 to 8.
Useable Modules
Unit Calculation Macro / Scene Control Macro / Communication Command Macro / Unit Macro
Supported Versions
Version 3.50 or later
Related Items
Dim POS1X#(3), POS1Y#(3), POS2X#(3), POS2Y#(3), PARAM1#(2), PARAM2#(2)
Rem Rem Initialize variables for straight line 1
For I&=0 To 3
GetUnitData I&+1, "X", POS1X#(I&)
GetUnitData I&+1, "Y", POS1Y#(I&)
Next
Rem Get the straight line 1st component.
Lsqumeth 4, POS1X#(), POS1Y#(), PARAM1#()
Rem Rem Initialize variables for straight line 2
For I&=0 To 3
GetUnitData I&+5, "X", POS2X#(I&)
GetUnitData I&+5, "Y", POS2Y#(I&)
Next
Rem Get the straight line 2nd component.
Lsqumeth 4, POS2X#(), POS2Y#(), PARAM2#()
Rem Get the intersection between 2 straight lines.
Crspoint PARAM1#(), PARAM2#(), CRSX#, CRSY#
Erase POS1X#(), POS1Y#(), POS2X#(), POS2Y#(), PARAM1#(), PARAM2#()
Erase (Reference: X Details (p.512)) GetUnitData (Reference: X Details (p.552))
Lsqumeth (Reference: X Details (p.610)) UnitData (Reference: X Details (p.778))