AutoCADマクロ屋本舗 掲示板

いつもお世話になっております。

LTmemoで値(寸法値では無く値)に文字を追加する事は可能でしょうか？
AutoCAD2018 LTです。

今使用しているマクロが
*^C^C_select;$M=$(if,$(getvar,"CMDACTIVE"),\,)_'cmddia;0;dim1;new;<>深12;_p;;cmddia;1^Mで使用すると
(例)M4[LTmemo <>]➡M4深12[LTmemo <>深12]になります。

2-M4[LTmemo 2-<>]に使用するとM4深12[LTmemo <>深12]になります。

これを2-M4[LTmemo 2-<>]に使用して2-M4深12[LTmemo 2-<>深12]にする事は可能でしょうか？

宜しくお願いします。

LTmemo(外部エディタ？)はどこで入手できますか？

それを使ってみないと判らないです。

単純に「文字の上書き」に対する回答であれば、
全てを同様に書き換える事は出来ますが、
いま入力してある文字を読み取って、それに文字を追加するのはマクロでは無理です。

つまり、「2-」を付けたければそれ用のマクロを別途作る。という事です。
何も無ければ何もつけず、「2-」が有れば「2-」を付けて、「4-」があれば「4-」を付けて・・・なんて可変処理は無理なんです。

LTmemoを使えばそれが可能になるのか？
LTmemoがどんな機能を有しているのかが判れば、マクロで対応できるかどうかも、調べる事ができると思います。

回答ありがとうございます。

LTmemoは昔会社の人に入れてもらったので入手先は不明です。
画像を添付していますがただの文字修正だと思います。

いま入力してある文字を読み取って、それに文字を追加するのはマクロでは無理です。
➡そうなんですね。寸法値が<>だったのでエディタ内のテキストを記入する記号みたいな物が
　あるのかなと思っていました。

親切な回答有難うございます。

今後ともよろしくお願いします。

*^C^C_select;$M=$(if,$(getvar,"CMDACTIVE"),\,)DIMOVERRIDE;DIMPOST;M<>深12;;P;^M

とりあえず。これでダメですか？

2-M4[LTmemo 2-<>]に使用して2-M4深12[LTmemo 2-<>]となってしまうと思いますが。

ありがとうございます。
教えて頂いた物で試してみます。

あともう一つあるのですが画像の様にマクロで公差を入れることは可能ですか？
二段にしたり、文字サイズの変更方法が分からなかったです。

その様な表記にするには、"寸法値の優先"か"寸法値の接頭接尾表記"に
「%%C<>P6({\H0.5x;\S-0.019^-0.017;})」と入力する事で可能ですが、
マクロでその表現を記入する事が困難です。
その記述の中の「\」と「;」がマクロ内では特殊な意味を持っており、文字列として扱ってもらえない為です。

そこで、マクロではなくスクリプトを利用すれば、可能です。
下記の構文をスクリプトファイルで保存します。

;ここから
filedia
1
DIMOVERRIDE
DIMPOST
%%C<>P6({\H0.5x;\S-0.019^-0.017;})

P

;ここまで

目的の寸法をselectコマンド等で選択後（pオプションで再選択できる状態にした後）
そのスクリプトを実行すれば良いです。

選択とスクリプト実行をセットで実行するマクロを作っても良いかもしれないので、挑戦してみては？