[平面上の傾きは一定だと仮定し]の意味が判らなかったので、ご希望とは違うかもしれません。
[その高さを書き込む]が、どこにどの様に書き込むのか判らなかったので、計測値をコマンドラインに表示するだけにしてます。
[仮想線]は、何をもって仮想線なのかが判りませんので、普通に現在の設定で線を引いてます。
ということで、
「任意のA点とB点をクリックしそれぞれの高さ(標高)を入力し、A点からB点へ線を書き、C点を押さえると、C点から線分ABに対する垂線を引き、その長さをコマンドラインに表示する」
マクロです。
但し、線分ABに対して交差している他のオブジェクトが有る場合は誤作動する可能性が高いです。
まぁ、たたき台のマクロと思って、あとは自由に書き換えて使いやすい様にして下さい。
^C^Cline;.XY;\.XY;\;lengthen;dy;;;l;;^Cucs;e;l;id;$M=$(/,$(getvar,perimeter),3),0;ucs;p;id;non;@;$M=line;\per;"$(getvar,lastpoint)";;lengthen;dy;;;l;;^Cperimeter^M
以上、通りすがりのオジサンでした。
- Lon
- 2017/05/27 (Sat) 11:21:24