【AutoLISP】四角を作成するコマンド「rectang」

はこ

こんにちは！はこです。

業務で5年以上AutoLISPを使用しています。

今回はAutoCADの標準コマンド「rectang」について解説していきます。

通常通りにrectangを実行すると必要な情報の入力をユーザーに求めてきます。複数の四角を作図したい場合は何度もrectangを実行するため、その都度ユーザー入力の手間がかかり面倒です。

AutoLISPではAutoCADのコマンドを自動で実行できるため、四角の作図を効率化できます。使用例と作図のモード毎に必要なオプションについても解説していきますのでぜひご覧ください。

【AutoLISP】四角を作成するコマンド「rectang」

rectangの動作

rectangは四角（矩形）を作成できるコマンドです。 circleなどの作図コマンドと同様で、コマンドを呼び出す関数commandにより実行することができます。また、指定するオプションによって作図のモードを変更することも可能です。

rectang以外の作図コマンドについてはこちらの記事で解説していますのでよろしければどうぞ。
【AutoLISP】円を作図するコマンド「circle」
【AutoLISP】線分を作図するコマンド「line」
【AutoLISP】ポリラインを作成するコマンド「pline」

commandについて知りたい方はこちらの記事をご覧ください。
【AutoLISP】コマンドを呼び出す関数「command」

使用例①　対角2点を指定する

四角の対角2点を指定して作図する例です。変数p1、p2にあらかじめ座標を格納しておきrectangの引数としています。単純な矩形を作図した場合は、対角の2点を指定する方法が一番楽なのでおすすめです。

(setq p1 (list 0 0))
(setq p2 (list 10 15))
(command "rectang" p1 p2)

使用例②　回転角度・面積・長さを指定する

使用例①よりも少し複雑な四角を作図する例で、回転角度・面積・長さを指定しています。

(command "rectang" (list 0 0) "R" 45 "A" 100 "L" 20 (list 1 0))

各パラメータを記述する前に対応するモードの記述が必要です。回転角度は"R"、面積は"A"、長さは"L"に対応しています。また、パラメータには記述する順番があるので注意してください。通常通りrectangを呼び出したときに、AutoCADが入力を求めてくる順番が正しい順番です。

はこ

結果は次のようになります。

「AutoCADとなんか違う？」と思われた方、上図では「ZWCAD」という互換CADを使用しています。互換CADとはAutoCADと互換性を持ち、低価格でコスパを優先したCADのことです。

ZWCADは互換CAD業界でなんと世界シェアNo1。興味をお持ちの方はこちらの記事をご覧ください。
世界シェアNo1！AutoCAD互換ソフト「ZWCAD」のメリット5選

rectangの書式

rectangを実行するときの構文と引数は次のとおりです。

まとめ