SSA66
【機能】
半径を指定して直線と円に接する円の情報を得る(2D)
【使用形式】
CALL SSA66(XS,YS,XE,YE,XC,YC,R0,R,XYC,IR)
【引数説明】
[INPUT]
XS, YS, XE, YE : 直線の通過点座標
XC, YC : 円の中心座標
R0 : 円の半径
R : 指定半径
[OUTPUT]
XYC(6, 8) : 接円情報テーブル
┼───┼───┼────┼────┼────┼────┼
│XC1│YC1│XT11│YT11│XT21│YT21│
┼───┼───┼────┼────┼────┼────┼
│XC2│YC2│XT12│YT12│XT22│YT22│
┼───┼───┼────┼────┼────┼────┼
│ ・ │ ・ │ ・ │ ・ │ ・ │ ・ │
│ ・ │ ・ │ ・ │ ・ │ ・ │ ・ │
┼───┼───┼────┼────┼────┼────┼
↓ ↓ ↓ ↓ ↓ ↓
(接円の中心) (直線との接点) (円との接点)
IR : リターンフラグ
0〜8 ; 接円の数
-1 ; 入力エラー
【機能説明】
・半径を指定して直線と円に接する円の中心座標と直線、円
との接点座標を出力する。
・(XS, YS)=(XE, YE)、またはR0≦0、またはR≦0の場合のみ
IR=-1を出力する。
【使用ルーチン】
SSG40, SSG42, SSA20