向きに沿ってテキストを移動する

[Il filo]

おはようございます。

私はこのフォーラムに何年も前から参加しましたが、様々な理由で、私はデザインとキャドの世界から長い間離れていた。
最後の時期は、主にデザイナーとして近づいてきましたが、古くから馴染みのあるソフトウェアを取り巻く問題に遭遇していないにもかかわらず、私はすでに実行したいいくつかの操作を満たしていますが、私はそれを行うことができるかどうかわからない。

誰かが自分のオリエンテーションに沿って与えられた測定の複数のオートカードテキストを移動する方法を認識していたかどうかを知りたいと思った。
ローカル座標に沿ってより多くのオブジェクトを移動したい場合は、最大3dスタジオでアナログを見つけます。

残念ながら(予期しない) こんな操作で何も見られませんでした。

画像が千語以上の価値があるクイックスケッチを添付します。

回答したい方には事前に感謝します。

 

[Tristan]

ローカル座標の概念を自動調整するだけでは存在しません。そのため、これらの操作をサポートするために lisp や類似を持っている場合を除き、 autocad がネイティブな方法でできることを疑います

 

[Il filo]

まずは、ご回答をありがとうございました。

残念ながら、私は疑ったことだった、問題は、すでにいくつかのリスペスを使用しているにもかかわらず、私は現在それらを作成することができないということです。
そのため、または私は適切なリスペスを見つけるために望んでいるか、学習する時間を見つけるためにしようとしています。 お問い合わせ

ディスカッションを再び開くことができますか? 多分他の何人かのユーザーは私の問題への解決を持っています... お問い合わせ

 

[Legs]

確かに、その方向の通常の(または並列)に従ってテキストを移動するための直接コマンドを持たない、特に退屈なことです。

角度(プロパティにちょうど覗く)を知っているなら、単に長さと回転+90を設定することで、相対的なシフトを使うことができます。
慣行では、相対的なコーディネートは、タイプのものになります(高い90がそう念頭にしないか、計算機を取る必要があります)。
@ 距離 < (+ 角度 90)

他のソリューションは、書き込みを選択してオブジェクト鳥を設定することです。 この時点では簡単な動きで完了します(前の値にuctをリセットする必要があります)。

 

[Il filo]

これらの方法は良いですが、要素の減少量は常にあります。
私の場合、alasは、最も多様な方法で回転数千のテキストがあります。

これまで使用した方法は、10° テキストの範囲で selerapid で選択され、一時的に ucts を変更し、選択したテキストの半分を上方に移動し、他の下方 (コマンドの検索で filtrates)、すべての 36 回繰り返されます。
しかし、この方法は、ひとつのものと、もうひとつは40分から60分の間を離れます。

しかし、私は自分の向きに沿ってテキストを正確に動かす必要がある場合 (今は私には起こりませんでした) 私はその手順を繰り返す必要があります 360 回... 最後の時間になるピース!

しかし、答えのおかげで、少なくとも私はこの質問を置く唯一の人ではありませんを参照してください。 :

 

[GP.]

お問い合わせ

(defun c:tt (/txt t1 p1)
(vla-startundomark(vla-get-activedocument))))
(princ "\selezionare と testi da spostare")
(setq txt (ssget '(0 . "text"))))))))))
(setq d) (cond)
(getdist (strcat "\ndistanza di spostamento") (d (strcat "<" (rtos d 2 2) ">: "))))))))))))
( d )
) )
(と txt d)
(repeat (ssslength txt)))
(vla-move (vlax-ename->vla-object (setq t1 (ssname txt))))))))))
(vlax-3d-point(setq p1(cdr))))
(vlax-3d-point (polar p1 (+ (cdr (assoc 50 (entget t1)))))) (/pi 2)))))
)
)
(vla-endundomark(vla-get-activedocument))))
(プライアンス)
)

 

[Il filo]

お問い合わせ

(defun c:tt (/txt t1 p1)
(vla-startundomark(vla-get-activedocument))))
(princ "\selezionare と testi da spostare")
(setq txt (ssget '(0 . "text"))))))))))
(setq d) (cond)
(getdist (strcat "\ndistanza di spostamento") (d (strcat "<" (rtos d 2 2) ">: "))))))))))))
( d )
) )
(と txt d)
(repeat (ssslength txt)))
(vla-move (vlax-ename->vla-object (setq t1 (ssname txt))))))))))
(vlax-3d-point(setq p1(cdr))))
(vlax-3d-point (polar p1 (+ (cdr (assoc 50 (entget t1)))))) (/pi 2)))))
)
)
(vla-endundomark(vla-get-activedocument))))
(プライアンス)
)

お問い合わせ
私は、私ができる限りすぐにそれを証明します, 今、私はオートカドの前にいません.

超ありがとう!
試してみるとわかると思います。

 

[Il filo]

お問い合わせ

まあ、マクロ、リスペス、プログラミング全般についてかなり無視しているんです。

このコードはすべてコマンドラインに貼り付けようとしましたが、動作しているかどうかは分かりません。
これらの文字列はそこに接着されないのですか?

 

[Cristallo]

lsp 拡張子 (tt.lsp) でテキストファイルを作成し、コード全体にコピーする必要があります。 保存後、appload で autocad にロードします。
その瞬間から、キーボードから tt に続けて送信して起動します。
❖gp. もちろん(私があなたに言う)は、彼が望むスレッドとして正確に機能します。唯一のモールは、mtext(異なるエンティティティの型)ではなく、純粋なテキストでのみ動作するということです。 もっと問題がありますか? または単にssgetの質問? )

 

[Il filo]

@cristalloさんのツイート感謝の気持ちを込めて、 それは私が見逃していたものでした。
❖gp. ありがとうございます。
私は望むように正確に動作します。
時間が経つにつれて、問題の読み込みや解決にとても感謝しています。

少数のテストの後の皆のための少し情報:

• 私はまた、mtextを試してみましたし、それが動作しないことを確認します, それは通常のテキストでのみ行きます (, 自発的に言えば, 私が興味を持っていたものでした)
• 異なる理由で複数のテキストを移動しようとしましたが、この超時間は結果に最小限に影響を及ぼすように見えません。
• プラスとネガティブを両方動かすことができます。

それはおそらく少し役に立たない証拠ですが、私はとにかくそれをやった。

 

[Il filo]

❖gp.最後までお尋ねください。
私はまた、他のフォーラムでこの質問を策定しました, しかし、他のユーザーとの結果なし.
ソリューションが存在するので、そこで共有する許可を私に与えてください。
多分それは私には他の誰かを助けることができる。

プッシー もちろん、私は私の袋の小麦粉のように皮をむくことはありません, え!

 

[GP.]

...ネオだけは、mtextではなく、純粋なテキストでのみ動作するということです

...私はあまりにもcogliのmtextを提供し、それが動作しないことを確認する、それは通常のテキストでのみ行く

この行にアスタリスクを追加するだけです(setq txt) (ssget '(0) . "* 必須テキスト)

❖gp.そこで共有する許可をもらえますか?

問題ありません。