AutoCAD LISP ~ PAUSE について

質問

(defun c:TEST() (command "_DIM" "OVERRIDE" "DIMTP" PAUSE "DIMTM" PAUSE ) (princ))

DIMTMはデフォルトがマイナスのため、プラスが必要となる場合、-5　というようにユーザー入力の際、マイナスを付ける必要がある。

このマイナスをとりたい。
　ユーザー入力　5　としたら、入る値は　+5 となるようにしたい
　（現状では -5 となる）

どうすれば良いのか、教えてください。よろしくお願いいたします┏○))

回答No.2

hahaha8635 · ベストアンサー

(defun c:TEST() (command "_DIM" "OVERRIDE" "DIMTP" PAUSE "DIMTM" PAUSE ) (princ))

DIMTM が　文字列(コマンドとして)で渡され　ユーザー入力だから
てるので　
入力数を変数に代入して
符号を反転
DIMTMに渡せばいいんじゃない

補足

すみません。変数？…LISPは始めたばかりで、よくわかっておりません。具体的にどうすればよいのか教えて頂けないでしょうか。
よろしくお願いいたします┏○))

回答No.3

hahaha8635

>>https://www.vector.co.jp/soft/win95/business/se118034.html?_ga=2.77607060.1056100567.1644464774-1516849316.1644054025

こちらを参考にしてみてください
歯車作成用LISPです
バグがあって動きませんが　｝　が確か足りない

お礼

最初の方の行、(/ p0 x0 x0 e2 ～)が未定義関数とのエラーをはき、認識しませんでしたが、消したらうまく動きました。

ありがとうございます。助かりました。

回答No.1

hahaha8635

https://knowledge.autodesk.com/ja/support/autocad-lt/learn-explore/caas/CloudHelp/cloudhelp/2018/JPN/AutoCAD-LT/files/GUID-E2AAD7FB-C563-42A8-B7B4-3A3EC8AA8C68-htm.html

-1を掛ければいいんでない

補足

ご回答ありがとうございます。
LISPのプログラム内で、どうやって-1をかければよいのでしょうか？
(* -1 PAUSE)ではできませんでした。
お手数ですが、教えていただけると幸いです。
よろしくお願いいたします┏○))