jw_cad 外部変形 - (1625-10-1) jw.rbで1点1線1円に接する円を描く(CLP 線と円が接触、点が円の内側、円の中心点から線に下した垂線上に点) -

外部変形は データのやり取りをテキストファイルで行うので プログラム言語は 自由に選ぶことができます。図形は機能的かつシンプルなため、数多くのユーザーに受け入れられています。

 

setuens(ci1, ln2, hp3) は 1点1線1円に接する円を返す
  ci1 : 円データ
  ln2 : 線データ
  hp3 : 座標データ
  :all : すべての接円を返す

 

使用例

:jw.rbで1点1線1円に接する円を描く(CLP 線と円が接触、点が円の内側、円の中心点から線に下した垂線上に点)
@echo off
ruby -x %0
goto:eof

REM #jww
REM #1ci 円を指示して下さい
REM #2ln 線を指示して下さい
REM #3 点を指示して下さい
REM #e

#!ruby -Ks -rjw
jww
plot setuens(1.ci, 2.ln, 3.hp, :all)
__END__

 

・解円数は1つ