Rufen Sie eine defunct Funktion

[mazzetti68]

Guten Abend für alle
Ich habe eine kleine Frage zu stellen:
ist der Code definiert, um die lila Schicht zu erstellen, die ich im automatisierten Design in lsp, zusammen mit vielen anderen, die sich oft ändern... aber ich verstehe nicht eine Sache... das ist, wie man eine Funktion in meinem lsp...
Dies ist der Code:

(defun layer-viola)
(vl-load-com)
(setq acadobject (vlax-get-acad-object))
(setq activedocument (vla-get-activedocument acadobject))
(setq schichtbar (vla-get-layers activedocument))
(vla-put-color (vla-add schichtstabil "viola") 6)
(vla-put-activelayer activedocument (vla-item layertable "viola"))
)

anstatt meine Datei zu füllen und es zu vermasseln, wollte ich wissen, wie man diese Funktion, zum Beispiel vor der Erstellung einer Zeile, grob zu verstehen:

(Layerviola)
(Befehl "_line" ....))

Kann mir jemand helfen?
Danke im Voraus
Hi.

 

[Dr.Lube]

Sie vergessen Variablen und Eingabeparameter zu definieren

(defun layer-viola) [COLOR="#FF0000"][B](/)[/B][/COLOR].

)

zur Erinnerung an die Funktion: (Layerviolett))

 

[mazzetti68]

Gaziemille dr.lube!