Omron FZ4 Series User Manual page 199

<Straight Line 2nd
Component>
<X Coordinate>
<Y Coordinate>
Return Value
None.
Description
Store the a, b, c parameters that meet the conditions of the straight line equation: ax+by=c in the
<Straight Line 1st Component> and <Straight Line 2nd Component>.These parameters are the same
type of array that is gotten using the Lsqumeth command to get <Line Components>.
This is mainly used to get the intersection of lines gotten by the Lsqumeth command.
Reference: Lsqumeth command (p.238)
Example
Get the intersection coordinates between the 2 straight lines that were gotten. Each of the 2 straight
lines will be gotten using Units 1 to 4 and Units 5 to 8.
Dim POS1X#(3),POS1Y#(3),POS2X#(3),POS2Y#(3),PARM1#(2),PARM2#(2)
For I&=0 To 3
GetUnitData I&+1,"X",POS1X#(I&)
GetUnitData I&+1,"Y",POS1Y#(I&)
Next
Lsqumeth 4,POS1X#(),POS1Y#(),PARM1#()
For I&=0 To 3
GetUnitData I&+5,"X",POS2X#(I&)
GetUnitData I&+5,"Y",POS2Y#(I&)
Next
Lsqumeth 4,POS2X#(),POS2Y#(),PARM2#()
Crspoint PARM1#(),PARM2#(),CRSX#,CRSY#
Erase POS1X#(),POS1Y#(),POS2X#(),POS2Y#(),PARM1#(),PARM2#()
Reads in the date from the internal clock
Date$
Parameters
None.
FZ4 User's Manual
The parameter of Straight Line 2 for getting the intersection (double-precision type
array)
X coordinate storage region for the intersection that was gotten (double-precision).
Y coordinate storage region for the intersection that was gotten (double-precision).
Using Custom Command
4
197