SSB48
【機能】
2つの円又は円弧間の最短距離を求める(2D)
【使用形式】
CALL SSB48(PC1,R1,ZK1,PS1,PE1,PC2,R2,ZK2,PS2,
PE2,NI,XYTB,ISE,ZDI,IR)
【引数説明】
[INPUT]
PC1(2) : 円1又は円弧1の中心座標
R1 : 円1の半径(円弧のときはR1=0)
ZK1 : 円弧1の回転方向(円の時は使用しない)
>0 ; 反時計廻り
<0 ; 時計廻り
PS1(2), PE1(2) : 円弧1の始終点座標(円の時は使用しな
い)
PC2(2) : 円2又は円弧2の中心座標
R2 : 円2の半径(円弧の時はR2=0)
ZK2 : 円弧2の回転方向(円の時は使用しない)
>0 ; 反時計廻り
<0 ; 時計廻り
PS2(2), PE2(2) : 円弧2の始終点座標(円の時は使用しな
い)
[OUTPUT]
NI : 交点数(交点以外のときNI=1)
XYTB(4, NI) : アイテム上の最短距離点座標
1 2 3 4
+---+---+---+---+
1 |X1 |Y1 |X2 |Y2 |
+---+---+---+---+
+---+---+---+---+
NI +---+---+---+---+
円1又は円弧1 円2又は円弧2
ISE(2, NI) : アイテム上の点位置フラグ
-1 ; 同心円
0 ; 始終点以外
1 ; 始点
2 ; 終点
1 2
+--------------+--------------+
1 |円1又は円弧1|円2又は円弧2|
: +--------------+--------------+
: +--------------+--------------+
NI +--------------+--------------+
ZDI : 最短距離
IR : リターンコード
0 ; 正常
1 ; 入力エラー