線分で線分をカットするコマンド
AutoCADR12J、13JまたはR14Jの動作環境にて使用可能なAutoLispで作成されたコマンドです。
プロテクトなどかかっていないのでテキストエディタなど使用し改造して使用できます。
機能
最初に選択された線分で次以降に選択された線分をカットする。(計算はZ=0の2次元で行う)
オペレーション
メッセージ 『カットする線分を選択(1線分):』
オペレーション 線分を1本選択する。
メッセージ 『カットする幅を入力:』
オペレーション カット幅(正の実数)を入力後、Enterキーを押す。
メッセージ 『カットされる線分を選択(複数線分可):』
オペレーション カットしたい線分を選択する。
実行する上での注意事項
・選択対象図形
線分。
・処理図形の表示
コマンド実行の際は画面に選択した図形が表示されている状態で行う。
・作図
元図形の色、画層、線種を使用する。
・他
カットする線分とカットされる線分が平行の場合は、『交点が見つかりません。』とメッセージが表示され次のカットされる線分の処理を行う。
カットされる線分のなかにカットする線分が含まれていても、自動的に省きメッセージは表示されないカットする線分は無限延長線分として処理を行う。