SSB45
【機能】
直線と円又は円弧間の最短距離を求める(2D)
【使用形式】
CALL SSB45(PS1,PE1,PC,R,ZK,PS2,PE2,NI,XYTB,
ISE,ZDI,IR)
【引数説明】
[INPUT]
PS1(2), PE1(2) : 直線の始終点座標
PC(2) : 円又は円弧の中心座標
R : 円の半径(円弧のときR=0)
ZK : 円弧の回転方向(円のとき使用しない)
>0 ; 反時計廻り
<0 ; 時計廻り
PS2(2), PE2(2) : 円弧の始終点座標(円のときは使用しな
い)
[OUTPUT]
NI : 交点の数(交点以外ならばNI=1)
XYTB(4, NI) : 最短距離点
交点セットのときは 直線 円OR円弧
XYTB(1, )=XYTB(3, ) 1 2 3 4
XYTB(2, )=XYTB(4, ) +---+---+---+---+
1 |X1 |Y1 |X2 |Y2 |
+---+---+---+---+
+---+---+---+---+
NI +---+---+---+---+
ISE(2, NI)(1, NI) : 最短距離点位置フラグ(直線)
(2, NI) : 最短距離点位置フラグ(円又は円弧)
0 ; 始終点以外
1 ; 始点
2 ; 終点
ZDI : 最短距離
IR : リターンコード
0 ; 正常
1 ; 入力エラー
【機能説明】
・直線と円又は円弧の最短距離を求める。
・直線と円又は円弧が指示範囲で交わっているとき、最短距離は
ゼロとなる。