|
| 判断点是否在凸包内_面积法 | 逻辑型 | |
|
| p | 点坐标 | | | |
hull | 点坐标 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| i | 整数型 | | |
| area | 双精度小数型 | | |
area ＝ 0
计次循环首 (取数组成员数 (hull
) － 1, i
)
area ＝ area ＋
三点求面积2 (p, hull
[i
], hull
[i ＋ 1
])
计次循环尾 ()area ＝ area ＋
三点求面积2 (p, hull
[1
], hull
[取数组成员数 (hull
)])返回 (取绝对值 (area
) ＝
求多边形面积 (hull
))
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| i | 整数型 | | |
| area | 双精度小数型 | | |
area ＝ 0
变量循环首 (2,
取数组成员数 (vertexes
) － 1, 1, i
)area ＝ area ＋
三点求面积 (vertexes
[1
], vertexes
[i
], vertexes
[i ＋ 1
])变量循环尾 ()返回 (取绝对值 (area
))
|
| 三点求面积2 | 双精度小数型 | |
|
| p1 | 点坐标 | | | |
p2 | 点坐标 | | | | p3 | 点坐标 | | | |
返回 ( (p1.x × p2.y ＋ p2.x × p3.y ＋ p3.x × p1.y － p1.x × p3.y － p2.x × p1.y － p3.x × p2.y
) ÷ 2
)|
| 三点求面积 | 双精度小数型 | |
|
| p0 | 点坐标 | | | |
p1 | 点坐标 | | | | p2 | 点坐标 | | | |
返回 ( ( (p1.x － p0.x
) �
� (p2.y － p0.y
) �
�� (p2.x － p0.x
) �
� (p1.y － p0.y
)) ÷ 2
)
|
| L_运算_坐标是否在多边形内 | 逻辑型 | |
|
| 多边形点 | L_坐标 | | | |
x | 整数型 | | | | y | 整数型 | | | |
| 变量名 | 类 型 | 静态 | 数组 | 备 注 |
| 局_句柄 | 整数型 | | |
| 局_返回值 | 逻辑型 | | |
局_句柄 ＝
L_CreatePolygonRgn (多边形点,
取数组成员数 (多边形点
), 2
)
如果真 (局_句柄 ≠ 0
)局_返回值 ＝
L_PtInRegion (局_句柄, x, y
) ≠ 0
L_DeleteObject (局_句柄
)返回 (局_返回值)