lisp から lisp を起動する

[Angelo2449]

皆さんこんにちは。
下のコードでは、> コマンド < は Windows のクリップボードから抽出され、実行する lisp コマンド名が含まれています。
コマンド = "line" はコマンド "line" を実行します。
これを得るには(xxxxxxxxx)ではなく書き込むことができますか?
機能しない!
お問い合わせ

 (defun パネル(/ コマンド))

(runapp "c:\autocadsupporto\\\libertytre\\pannelloicone.exe"c:\\\\\\autocadsupport\\\\\\\\\\\\\\\\pannelloicone.tkn" :vlax-true)
(setq コマンド (getcliptext))

(princ "\n")
(princ "command xxxxxxxxx")
(princコマンド)
(princ "\n")

(xxxxxxxxxxxxxxx)

;;;

 

[GP.]

(コマンドコマンド)

 

[Angelo2449]

お問い合わせ

しかし、>(コマンドコマンド)<または(コマンドコマンド))は動作しません。
> コマンド < は認識されません。
また、<with> コマンド < を < に置換しました。 < は、アナログを避けるためではなく、動作しません。

 

[GP.]

スタートポイントと終了ポイントを与えなければ、ラインを描画する場所を知っている方法

(setqコマンド "line")
(コマンド "0,0" "3,8")

 

[Angelo2449]

ケースではなく、
実行したいコマンドは > 参照 < コマンドバータイプ> 参照 < です。
> 入る < , すべての作品.
そのため、コードはどのように機能するか?

 (defun パネル(/ commandx commandy))

(runapp "c:\autocadsupporto\\\libertytre\\pannelloicone.exe"c:\\\\\\autocadsupport\\\\\\\\\\\\\\\\pannelloicone.tkn" :vlax-true)

(setq コマンド x (getcliptext))

(princ "\n")
(プロキシ "comandoxxxxxxxxxx")
(princコマンドx)
(princ "\n")

(setq commandy コマンド)
(comandoy)

;;;

このコードの実行が原因となります。

コマンド: パネル
commandxxxxxxxxxxxxxリファレンス
; エラー: 間違った関数: "referral"

お問い合わせ

 

[GP.]

実行したいコマンドは > 参照 < コマンドバータイプ > 参照 < で < を > 入る < , 全てが動作します。
そのため、コードが動作するように書かれている必要があります

しかし、どのコマンドが参照ですか??
lisp (autocad コマンド、libs 関数ではなく) で渡されたコマンドは、コマンドラインから導入するシーケンスに対応する必要があります。
後者は、それが(コマンドコマンドコマンドコマンドコマンド)で動作すると言うので

 

[Angelo2449]

> 参照 < は lisp コマンドです!
コードが機能するところ、私が試した唯一の方法は次のとおりです。

(defun パネル(/ commandx))

(runapp "c:\autocadsupporto\\\libertytre\\pannelloicone.exe"c:\\\\\\autocadsupport\\\\\\\\\\\\\\\\pannelloicone.tkn" :vlax-true)
(setq コマンド x (getcliptext))

(princ "\n")
(プロキシ "comandoxxxxxxxxxx")
(princコマンドx)
(princ "\n")

(コンド)
((= commandx "reference")) (参考)
((= commandx "chargerif") (loadrif)))
........................................................................
........................................................................
........................................................................
;;;

;;;

誠に誠意をこめて満足しません!

 

[GP.]

> 参照 < は lisp コマンドです!

もちろんです。

コマンド = "linea" "line" コマンドを実行するお問い合わせ

起動したい 関数 lisp, これは別のファイル (lsp) に所属している場合 (c:comandoy)

 

[GP.]

証拠と:
(eval (コマンドを読み込みます)))

 

[Angelo2449]

> cond < 私は結果を得る>の使用だけで、今では動作しません。

 

[GP.]

(無効)

 

[Angelo2449]

パーフェクト!
ありがとうございます!