円と円
バッチファイルは、任意名で保存してください。
------------------
@REM 円と円
@echo off
REM
REM #jww
REM #cd
REM #1ci 円を指示してください (L)クリック
REM #2ci 円を指示してください (L)クリック
REM #hr
REM #e
jgawk 'BEGIN{pi=atan2(0,-1);n=0}/^^ci/{n=n+1;x[n]=$2;y[n]=$3;r[n]=$4;x1=x[1];y1=y[1];r1=r[1];x2=x[2];y2=y[2];r2=r[2];th=atan2((y2-y1),(x2-x1))}END{xs=x1+r1*cos(th);ys=y1+r1*sin(th);xe=x2-r2*cos(th);ye=y2-r2*sin(th);printf "%%.15g %%.15g %%.15g %%.15g\n",xs,ys,xe,ye}' jwc_temp.txt>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
#####
## 円中心を通る直線と円との交点間を結ぶ外部変形
## 2011.9.6 by somem
:end
| 固定リンク
コメント