AutoCADマクロ屋本舗 掲示板

こんにちは。
AutoCAD Mechanical2025を使用しています。
AutoLISPを使ってコマンドを作成しています。
円の中心線を描く[AMCENCRINHOLE]コマンドですが
以下の様にコーディングしましたが
そのようなコマンドはありません！とAutoCADに怒られます。
どうしてでしょうか？

(command "._AMCENCRINHOLE" "F" "NONE" (list x_min y_min) "NONE" (list x_max y_max) "" "")

AMで始まるコマンドなので、mechanical独自のものですね。
おそらく、そのコマンドは通常使用される際にロードされるものなのだと思われます。
（多分、そのファイルで一度そのコマンドを普通に実行した後なら、Lispが使えると思います。）

なので、command関数を使う前にそのコマンドのファイルをロードできればいいんですが、Mechanicalを持ってないので、どのファイルをロードすればそのコマンドが使えるようになるかは、ちょっと分かりかねます。

>おそらく、そのコマンドは通常使用される際にロードされるものなのだと思われます。

であるなら、ネイティブなコマンドではない事になりますので、command関数では実行できないかもしれません。
（Mechanicalを持ってないので想像です）

その場合、vla-SendCommandを使用することで可能になると思いますが、
AMCENCRINHOLEコマンドを実行した後にLISPの処理が続くのなら、適さないです。
（LISPがvla-SendCommandを実行して終了なら大丈夫）

(setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))

(vla-SendCommand doc (strcat "._AMCENCRINHOLE F NONE " (rtos x_min) "," (rtos y_min) " NONE " (rtos x_max) "," (rtos y_max) " " " " " "))

LUNEさん、さかなさん貴重なアドバイスありがとうございます。

以下を実行したところお陰様でイメージ通りの処理ができました。
本当にありがとうございました。

(setq doc (vla-get-ActiveDocument (vlax-get-acad-object)))
(vla-SendCommand doc (strcat "._AMCENCRINHOLE F NONE " (rtos x_min) "," (rtos y_min) " NONE " (rtos x_max) "," (rtos y_max) " " " " " "))