円中心線
円の中心線を作図する外部変形です。単独で円を選択することもできます。
軸角/楕円には対応していません。
原寸以外で作図する場合は、円の外側の長さS=2.5を変更してください。
<単独で円を選択する場合>
読取範囲外でLクリック⇒円をLクリック
<複数の円を選択する場合>
読取範囲外でRクリック⇒矩形範囲を指定⇒左AM0時「確定基点(free)」
----------------
@REM 円中心線
@echo off
goto %1
REM #jww
REM #cd
REM #hm|単 (L)|範囲 (R)|
REM #:1
REM #2ci 円を選択してください。(L)
REM #hr
REM #e
REM #:2
REM #h1 範囲を指定してください。(矩形)
REM #hr
REM #e
:1
:2
echo lt5 線種5>temp.txt
echo lc1 線色1>>temp.txt
jgawk /^^ci/'{S=2.5;print $2-$4-S " " $3 " " $2+$4+S " " $3;print $2 " " $3-$4-S " " $2 " " $3+$4+S}' jwc_temp.txt>>temp.txt
copy temp.txt jwc_temp.txt
del temp.txt
goto end
:END
---------------
スクリプトは、円データ ci X Y Rを選択し、
水平線の始点/終点座標(X-R-S,Y)/(X+R+S,Y)
垂直線の始点/終点座標(X,Y-R-S)/(X,Y+R+S)に変換しています。
Sは、円外側の中心線長さです。
| 固定リンク
コメント
somemさん、こんばんは。
この一行スクリプトは、完璧に実施に使用できます!
建築の場合、1/1はほとんど無く、1/100以上ですが、
Sの値設定が縮尺によりさまざまだったりします。
(一行スクリプトでのオプションは、難しいし、ありえないかも)
同じ外変では、sugiさんのrubyスクリプトなどがあります。
投稿: 住職 | 2007年4月29日 (日) 21時33分
住職さん、お疲れ様です。
メカ図面でも、縮尺は1/1,2/1,5/1,10/1・・・いろいろあります。
縮尺は取込みたかったのですが、まだまだ未熟ゆえ断念。
次のステップに進むには、もう少しスクリプトの勉強が必要ですね。
ではまた。
投稿: somem | 2007年4月29日 (日) 22時53分