VS:OverlapLineLine: Difference between revisions

From Vectorworks Developer
Jump to navigation Jump to search
No edit summary
 
m (1 revision)
 
(2 intermediate revisions by the same user not shown)
Line 5: Line 5:
-----------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------
<desc>
<desc>
Returns two points the lap zone of two lines. Returns true if lines overlap.
Returns two points the lap zone of two lines.</desc>
</desc>


-----------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------
<def>
<def>
<funcDef lang="vs">
<funcDef lang="vs">
FUNCTION OverlapLineLine(begPt1X, begPt1Y, begPt1Z :REAL; endPt1X, endPt1Y, endPt1Z :REAL; begPt2X, begPt2Y, begPt2Z :REAL; endPt2X, endPt2Y, endPt2Z :REAL; VAR lapPt1X, lapPt1Y, lapPt1Z :REAL; VAR lapPt2X, lapPt2Y, lapPt2Z :REAL; tolerance :REAL) :BOOLEAN
FUNCTION OverlapLineLine(begPt1:VECTOR; endPt1:VECTOR; begPt2:VECTOR; endPt2:VECTOR; VAR lapPt1:VECTOR; VAR lapPt2:VECTOR; tolerance:REAL) : BOOLEAN;
</funcDef>
</funcDef>
<funcDef lang="py">
<funcDef lang="py">
Line 23: Line 22:
<lineList ident=1>
<lineList ident=1>
<line>
<line>
begPt1X, begPt1Y, begPt1Z
begPt1
REAL
VECTOR


</line>
</line>
<line>
<line>
endPt1X, endPt1Y, endPt1Z
endPt1
REAL
VECTOR


</line>
</line>
<line>
<line>
begPt2X, begPt2Y, begPt2Z
begPt2
REAL
VECTOR


</line>
</line>
<line>
<line>
endPt2X, endPt2Y, endPt2Z
endPt2
REAL
VECTOR


</line>
</line>
<line>
<line>
lapPt1X, lapPt1Y, lapPt1Z
lapPt1
REAL
VECTOR
Output parameter.
 
</line>
</line>
<line>
<line>
lapPt2X, lapPt2Y, lapPt2Z
lapPt2
REAL
VECTOR
Output parameter.
 
</line>
</line>
<line>
<line>
Line 59: Line 58:
</lineList>
</lineList>
</params>
</params>


-----------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------
<return>
<remark></remark>
</return>


-----------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------
<remark>
<sample></sample>
 
</remark>


-----------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------
<sample>
<seeAlso></seeAlso>
<code lang="pas">
PROCEDURE Example;
VAR
  beg_pt1, END_pt1, beg_pt2, END_pt2, lap_pt1, lap_pt2 :VECTOR;
BEGIN
  CallTool(-201);
  GetSegPt1(FSActLayer, beg_pt1.x, beg_pt1.y);
  GetSegPt2(FSActLayer, END_pt1.x, END_pt1.y);
  CallTool(-201);
  GetSegPt1(FSActLayer, beg_pt2.x, beg_pt2.y);
  GetSegPt2(FSActLayer, END_pt2.x, END_pt2.y);
  IF OverlapLineLine(beg_pt1, end_pt1, beg_pt2, end_pt2, lap_pt1, lap_pt2, .1) THEN BEGIN
      Locus(lap_pt1.x, lap_pt1.y);
      Locus(lap_pt2.x, lap_pt2.y);
  END;
END;
RUN(Example);</code>
 
</sample>


-----------------------------------------------------------------------------------------------------------
-----------------------------------------------------------------------------------------------------------
<version>
<version>
Availability: from All Versions
Availability: from Vectorworks 2014


This is drop-in function.
</version>
</version>
-----------------------------------------------------------------------------------------------------------
<seeAlso>
</seeAlso>


</vwDoc>
</vwDoc>

Latest revision as of 17:35, 18 September 2013

.VectorScript|VectorScript ..VS:Function Reference|Function Reference ..VS:Function_Reference_Appendix|Appendix

Description

Returns two points the lap zone of two lines. 

FUNCTION OverlapLineLine(
             begPt1       :VECTOR;
             endPt1       :VECTOR;
             begPt2       :VECTOR;
             endPt2       :VECTOR;
             VAR lapPt1   :VECTOR;
             VAR lapPt2   :VECTOR;
             tolerance    :REAL) : BOOLEAN;
def vs.OverlapLineLine(begPt1, endPt1, begPt2, endPt2, tolerance):
    return (BOOLEAN, lapPt1, lapPt2)

Parameters

begPt1 VECTOR
endPt1 VECTOR
begPt2 VECTOR
endPt2 VECTOR
lapPt1 VECTOR
lapPt2 VECTOR
tolerance REAL

Version

Availability: from Vectorworks 2014

Retrieved from "http://developer.vectorworks.net/index.php?title=VS:OverlapLineLine&oldid=17215"