「易语言」2个矩形是否交集 重叠 碰撞

.版本 2

.子程序 矩形是否交集, 逻辑型
.参数 矩形1, 矩形L
.参数 矩形2, 矩形L
.局部变量 maxX, 整数型
.局部变量 maxY, 整数型
.局部变量 minX, 整数型
.局部变量 minY, 整数型

maxX ＝ 选择 (矩形1.左边 ＋ 矩形1.宽度 ≥ 矩形2.左边 ＋ 矩形2.宽度, 矩形1.左边 ＋ 矩形1.宽度, 矩形2.左边 ＋ 矩形2.宽度)
maxY ＝ 选择 (矩形1.顶边 ＋ 矩形1.高度 ≥ 矩形2.顶边 ＋ 矩形2.高度, 矩形1.顶边 ＋ 矩形1.高度, 矩形2.顶边 ＋ 矩形2.高度)
minX ＝ 选择 (矩形1.左边 ≤ 矩形2.左边, 矩形1.左边, 矩形2.左边)
minY ＝ 选择 (矩形1.顶边 ≤ 矩形2.顶边, 矩形1.顶边, 矩形2.顶边)
返回 (maxX － minX ＜ 矩形1.宽度 ＋ 矩形2.宽度 且 maxY － minY ＜ 矩形1.高度 ＋ 矩形2.高度)