小ワザ/対応する四辺が平行な矩形同士の交差判定

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17

//  x : 矩形の左上の点の水平方向座標。
//  y : 矩形の左上の点の垂直方向座標。
//  cx : 矩形の水平方向の大きさ。
//  cy : 矩形の垂直方向の大きさ。
//  cndx : 各状態の該当フラグ。状態に該当していれば 1、該当していなければ 0。
//  result : 結果。交差していれば 1、交差していなければ 0。
 
    //  状態１に該当するかどうかを調べる。
    if ( (x(r1) + cx(r1) - 1) < x(r2) ) { cnd1 = 1 } else { cnd1 = 0 }
    //  状態２に該当するかどうかを調べる。
    if ( x(r1) > (x(r2) + cx(r2) - 1) ) { cnd2 = 1 } else { cnd2 = 0 }
    //  状態３に該当するかどうかを調べる。
    if ( (y(r1) + cy(r1) - 1) < y(r2) ) { cnd3 = 1 } else { cnd3 = 0 }
    //  状態４に該当するかどうかを調べる。
    if ( y(r1) > (y(r2) + cy(r2) - 1) ) { cnd4 = 1 } else { cnd4 = 0 }
    //  状態１から４のどれにも該当していなければ交差している。
    if ( (cnd1 == 0) & (cnd2 == 0) & (cnd3 == 0) & (cnd4 == 0) ) { result = 1 } else { result = 0 }

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31

 
 
 
 
 
 
 
-
|
-
|
|
-
|
-
|
|
-
|
-
|
|
-
|
-
|
|
!
!
!
!

//  x : 矩形の左上の点の水平方向座標。
//  y : 矩形の左上の点の垂直方向座標。
//  cx : 矩形の水平方向の大きさ。
//  cy : 矩形の垂直方向の大きさ。
//  result : 結果。交差していれば 1、交差していなければ 0。
 
    //  状態１に該当するかどうかを調べる。
    if ( (x(r1) + cx(r1) - 1) < x(r2) ) {
        result = 0
    } else {
        //  状態１に該当しない場合。
        //  状態２に該当するかどうかを調べる。
        if ( x(r1) > (x(r2) + cx(r2) - 1) ) {
            result = 0
        } else {
            //  状態１と状態２に該当しない場合。
            //  状態３に該当するかどうかを調べる。
            if ( (y(r1) + cy(r1) - 1) < y(r2) ) {
                result = 0
            } else {
                //  状態１と状態２と状態３に該当しない場合。
                //  状態４に該当するかどうかを調べる。
                if ( y(r1) > (y(r2) + cy(r2) - 1) ) {
                    result = 0
                } else {
                    //  状態１と状態２と状態３と状態４に該当しない場合。
                    result = 1
                }
            }
        }
    }

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24

 
 
 
 
 
 
 
 
-
|
|
-
|
|
-
|
|
-
|
|
!
!
!
!

//  x : 矩形の左上の点の水平方向座標。
//  y : 矩形の左上の点の垂直方向座標。
//  cx : 矩形の水平方向の大きさ。
//  cy : 矩形の垂直方向の大きさ。
//  result : 結果。交差していれば 1、交差していなければ 0。
 
    result = 0
    //  状態１に該当しないかどうかを調べる。
    if ( (x(r1) + cx(r1) - 1) >= x(r2) ) {
        //  状態１に該当しない場合。
        //  状態２に該当しないかどうかを調べる。
        if ( x(r1) <= (x(r2) + cx(r2) - 1) ) {
            //  状態１と状態２に該当しない場合。
            //  状態３に該当しないかどうかを調べる。
            if ( (y(r1) + cy(r1) - 1) >= y(r2) ) {
                //  状態１と状態２と状態３に該当しない場合。
                //  状態４に該当しないかどうかを調べる。
                if ( y(r1) <= (y(r2) + cy(r2) - 1) ) {
                    //  状態１と状態２と状態３と状態４に該当しない場合。
                    result = 1
                }
            }
        }
    }

  1
  2
  3
  4
  5
  6
  7
  8
  9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26

;
;	実装例動作テスト用スクリプト
;
 
r1 = 0 : r2 = 1
cx = 100,100
cy = 100,100
x = 0, (ginfo_winx-cx)/2
y = 0, (ginfo_winy-cy)/2
 
*main
    redraw 1 : await 16 : redraw 0 : color 255, 255, 255 : boxf : color : pos 0,0
 
    x(r1) = mousex
    y(r1) = mousey
    color 255,0,0
    boxf x(r1),y(r1), x(r1)+cx(r1),y(r1)+cy(r1)
    color 0,0,255
    boxf x(r2),y(r2), x(r2)+cx(r2),y(r2)+cy(r2)
 
    //
    //	ここに実装例のスクリプトを挿入する。
    //
 
    if result!0 : color : pos 0,0 : mes "Hit!"
    goto *main