Nicholas Randall Forystek
unread,Aug 24, 2016, 5:18:43 AM8/24/16You do not have permission to delete messages in this group
Either email addresses are anonymous for this group or you need the view member email addresses permission to view the original message
to
Public Declare Function Test Lib "maxlandlib.dll" _
(ByVal n1 As Long, ByVal n2 As Long,
ByVal n3 As Long) As Boolean
Public Declare Function PointInPoly Lib "maxlandlib.dll" _
(ByVal X1 As Single, ByVal Y1 As Single,
_
polyX() As Single, polyY() As Single,
ByVal polyN As Long) As Long
Public Declare Function Forystek Lib "maxlandlib.dll" _
(ByVal visType As Long, _
ByVal lngFaceCount As Long, _
sngCamera() As Single, _
sngFaceVis() As Single, _
sngVertexX() As Single, _
sngVertexY() As Single, _
sngVertexZ() As Single, _
sngScreenX() As Single, _
sngScreenY() As Single, _
sngScreenZ() As Single, _
sngZBuffer() As Single) As Long
Public Declare Function Collision Lib "maxlandlib.dll" _
(ByVal visType As Long, _
ByVal lngFaceCount As Long, _
sngFaceVis() As Single, _
sngVertexX() As Single, _
sngVertexY() As Single, _
sngVertexZ() As Single, _
ByVal lngFaceNum As Long, _
ByRef lngCollidedBrush As Long, _
ByRef lngCollidedFace As Long) As
Boolean
Public Declare Function TriangleIntersect Lib "maxlandlib.dll" Alias
"tri_tri_intersect" _
(ByVal v0_0 As Single, ByVal v0_1 As
Single, ByVal v0_2 As Single, _
ByVal v1_0 As Single, ByVal v1_1 As
Single, ByVal v1_2 As Single, _
ByVal v2_0 As Single, ByVal v2_1 As
Single, ByVal v2_2 As Single, _
ByVal u0_0 As Single, ByVal u0_1 As
Single, ByVal u0_2 As Single, _
ByVal u1_0 As Single, ByVal u1_1 As
Single, ByVal u1_2 As Single, _
ByVal u2_0 As Single, ByVal u2_1 As
Single, ByVal u2_2 As Single) As Integer
'THAT WAS FUN
Public Declare Function VertexPoint_Behind_TrianglePlane Lib
"maxlandlib.dll" Alias "PointBehindPoly" _
(ByVal VertexPointX As Single, ByVal VertexPointY As
Single, ByVal VertexPointZ As Single, _
ByVal TrianglePlaneNormalX As Single, ByVal
TrianglePlaneNormalY As Single, ByVal TrianglePlaneNormalZ As Single, _
ByVal TriangleSideLength1 As Single, ByVal
TriangleSideLength2 As Single, ByVal TriangleSideLength3 As Single) As
Boolean