選択したオブジェクトの面積と合計面積を計算して書き出すAutoLISP関数

コマンド名: ALn
°°° LWPolyline、3DPolyline、Polyline、Spline、Ellipse（楕円）、Circle（円）、Region（リージョン）、Hatch（ハッチング） オブジェクトを、個別またはグループとしてまとめて選択できます。
°°° 単一のオブジェクトが選択された場合、指定された基準に従ってその面積がオブジェクトの中心に書き込まれ、コマンドが終了します。複数のオブジェクトが選択された場合は、各オブジェクトの面積がその中心に書き込まれた後、ユーザーが指定した位置に合計面積が書き込まれます。
°°° 計算された面積は、現在アクティブな色、画層（レイヤ）、および文字スタイルを使用して、選択したオブジェクトの中心に書き込まれます。合計面積は、ユーザーが選択した位置に書き込まれます。
°°° 合計面積の文字列を配置する際、生成された文字列が画面上に表示され、ドラッグして目的の位置に配置することができます。ドラッグ中、ピックボックスの下に既存の Text（単一行文字） または MText（マルチテキスト） オブジェクトがある場合、ユーザーが認識しやすいようにその文字がハイライト表示されます。そのポイントをクリックすると、選択した Text または MText オブジェクトの内容が合計面積に置き換わります。空白の領域が選択された場合は、新しい Text オブジェクトが作成され、合計面積が書き込まれます。
°°° 交差選択（Crossing） または 窓選択（Window） を使用した場合、選択エリア内にある上記のリストに該当するオブジェクトタイプのみが含まれます。
°°° 選択中は、追加/除外（Add/Remove） 機能がアクティブになります。必要に応じて、選択セットからオブジェクトを除外したり追加したりできます。
°°° Polyline、Spline、および Ellipse オブジェクトについては、それらが閉じている（平滑に閉じている）かどうかはチェックされません。これはユーザーの責任となります。
°°° 3DPolyline の頂点がそれぞれ異なる Z 座標 を持っている場合、その面積は計算されず、合計にも含まれず、書き込みも行われません。
°°° 面積単位 / 図面単位、小数点以下の桁数、文字高さ、および面積文字列の**接頭語（プレフィックス）と接尾語（サフィックス）は、ダイアログボックスから簡単に指定できます。これらの設定は図面ファイルが閉じられるまで記憶され、次回関数を実行したときに復元されます。
°°° 図面がセンチメートル（cm）**単位で作成されており、面積を m² で表示したい場合は、以下のように入力する必要があります：
面積単位 / 図面単位 → m/cm → 100/1 = 100
°°° 接頭語と接尾語の値は自由に入力できます。また、一方または両方のフィールドを空欄にして、数値の面積値のみを表示することも可能です。接頭語や接尾語にはスペース（空白）を含めることができます。
例：
"A="、"A= "、"m²" または " m²"

* オプションとして、選択したオブジェクトの面積とともに周囲長（長さ）の値も同時に表示できるように機能が拡張されました。合計の周囲長は計算および表示されません。
それでは、良い一日（業務）をお過ごしください。

作成者: cizimokulu.com
説明: 選択したオブジェクトの面積と合計面積を計算して書き出すAutoLISP関数
タグ:

ダウンロード