|
AutoLisp : command und ?-mal pause
CADwiesel am 11.01.2005 um 11:26 Uhr (0)
(command "") ist das gesuchte. aber eigentlich gehört dir mit der Klatsche auf die Finger. Du wirst doch nicht wirklich mit Pause Lisp programmieren wollen, oder? Bilde mal vorher einen gescheiten Auswahlsatz und wenn der dann endlich sertig ist, übergibst du den an _move. Sieh dir dazu auch mal meinetwegen ssadd an ------------------ Gruß CADwiesel Besucht uns im CHAT
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Makro Block neu definieren
CADwiesel am 09.01.2019 um 13:27 Uhr (1)
per Lisp wäre eine Möglichkeit einen in der Zeichnung vorhandenen Block mit einem Block der in einem Verzeichniss als Zeichnung vorhanden ist überCode:(command"_.insert" (strcat blk "=" wblk); blk- alter Blockname wblk- neuer Blockname mit Pfad z.b. C: emp
ewblock.dwg (list 0.0 0.0 0.0) 1.0 1.0 0.0 )------------------GrußCADwieselBesucht uns im CHAT
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : leere textfelder bereinigen
CADwiesel am 07.01.2003 um 16:42 Uhr (0)
Hai Mach das Lisp mal auf und nimm aus der ssget liste den Eintrag der Polylinien raus - so: (if (setq ELEM1 (ssget "X" ((-4 . " OR") (0 . "LINE") ;(0 . "LWPOLYLINE") ;(0 . "POLYLINE") (0 . "ATTDEF") (0 . "TEXT") (-4 . "OR ") ) ) ;_ end of ssget ) ;_ end of ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Lisp und dynamische Blöcke
CADwiesel am 31.01.2013 um 16:21 Uhr (0)
vielleicht helfen dir die Schagworte weiter:vla-GetDynamicBlockProperties vla-get-PropertyNamevla-get-AllowedValuesCode: (setq o (vlax-ename-vla-object (car (entsel "
Blockwahl")))) (foreach a (vlax-safearray-list (vlax-variant-value (vla-GetDynamicBlockProperties o))) (vla-get-PropertyName a) (vlax-safearray-list (vlax-variant-value (vla-get-AllowedValues a))) )------------------GrußCADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
|
Rund um Autocad : mtext lisp
CADwiesel am 15.07.2003 um 08:30 Uhr (0)
(setq as(open "C:/testdateie.log" "r") wtxt "") (while (/= (setq txt (read-line as))"") (setq wtxt(strcat wtxt txt "
")) ) (close as) (command "_-mtext" pause pause wtxt "") ------------------ Gruß CADwiesel bin auch im Urlaub: 29.07 - 27.08
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Speichern als Dxf im ACAD 12 Format
CADwiesel am 01.11.2001 um 10:14 Uhr (0)
Hai Hier Lisp (defun c:saR12dxf ( / ) (setq nam (getfiled "Was fürn Name?" "" "dxf" 1)) (if (= nam nil) (setq name (strcat (getvar "dwgprefix")(substr (getvar "dwgname") 1 (- (strlen (getvar "dwgname")) 3))"dxf")) ) (setq as (ssget)) (if as (command "dxfout" nam "V" "r12" "O" as"" "") ) ) Hier Button für R15(2000) ^C^C(initdia);_.dxfout; ------------------ Gruß CADwiesel
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : kopierfunktion einschränken
CADwiesel am 02.03.2003 um 12:53 Uhr (0)
In dem Fall, denke ich, fährst Du besser, wenn du die Arbeit deiner Kollegen im Nachhinnein überprüfst. Das ist auf alle Fälle einfacher, da Du ja eh nicht alle Möglichkeiten deiner Kollegen vorhersehen kannst, und ausserdem ist es wesentlich Zeitaufwändiger Die Geschichte mit dem Vorher überprüfen . So n Lisp, was dir hinterher die Dinger Überprüft ist wesentlich schneller zusammengekloppt als die andere Sache. ------------------ Gruß CADwiesel
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Script
CADwiesel am 07.11.2003 um 09:26 Uhr (0)
Hai auch nicht schlecht. Erstmal die anderen fragen, anstatt den, der das Programm verzapft hat. Das Forum ist doch kein Supportboard für meine Lisp s! aber da du s schonmal hier angesprochen hast, seh ich mir das prog mal an. Kann s mir aber fast nicht vorstellen, es soll sich doch eigentlich nichts in der Richtung zwischen den Versionen geändert haben ???? ------------------ Gruß CADwiesel Besucht uns im CHAT
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Open DCL: Stimmungsumfrage
CADwiesel am 24.11.2011 um 11:08 Uhr (0)
Ich setze auch immer öfter auf die OpenDCL Anwendung. Ist einfach zu handhaben und in die Lisp Programmierung einzubinden. Durch die openSource Ausprägung ist eine wesentlich bessere Entwicklung und Fehlerkorrektur als bei geschlossenen Bibliotheken/Modulen gewährleistet.@Björn die Bricscad Leute sind auch um einiges schneller und aufnahmefähiger als die Entwickler bei Adesk. Macht so langsam auch echt Spass damit zu arbeiten.------------------Gruß CADwieselBesucht uns im CHAT
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Lisp Fehlerhaft?
CADwiesel am 14.03.2002 um 13:52 Uhr (0)
Ich versuchs mal etwas genauer als CADchup. Die datei erhält die Endung *.lsp Dan wird sie in autocad geladen. Dazu den Befehl _appload ausführen (eintippen oder in R14 auch über Pulldown werkzeuge / Anwendung ) das Programm in der Dialogbox auswählen und auf laden klicken. Dann kann das Programm gestartet werden; z.B. durch eintippen des Startbefehls (das ist der name nach (defun c:[NAME] ) Dann sollte es gehen . ------------------ Gruß CADwiesel
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Achse und Lisp
CADwiesel am 05.01.2005 um 16:35 Uhr (0)
Vielleicht solltest du mal folgenden Ansatz versuchen: Du Zeigst einen klickpunkt links unten, dann einen rechts oben und gibst ein Achsmaß ein. Das Programm könnte dann beginnend am Punkt1 lienien im angegebenen Abstand innerhalb deiner beiden Punkte zeichnen, die Enden der Linien noch mit Kreisen und Buchstaben/Zahlen versehen und dein Raster ist fertig. Wie wär das? ------------------ Gruß CADwiesel Besucht uns im CHAT
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Fragen zu AutoLisps Möglichkeiten
CADwiesel am 13.09.2004 um 08:12 Uhr (0)
Willkommen hier auf CAD.de und auch gleich im richtigen Forum gelandet. So - was hamma denn? :hmm Grundsätzlich brauchst du wohl nur (V)Lisp für dein Vorhaben - denke ich - auch wenn ich nicht so richtig Verstanden habe, was du eigentlich vorhast. Falls dir noch etwas Zeit bleibt, kannst du dein Vorhaben ja mal etwas detailierter beschreiben. ------------------ Gruß CADwiesel Besucht uns im CHAT
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Text in datei schreiben
CADwiesel am 13.03.2003 um 09:34 Uhr (0)
Bin unwissend, wer kann mir bitte helfen???? Dieser Text soll aus Lisp in eine txt-Datei geschrieben werden: (strcat "(if (zerop (getvar "DBMOD"))(command "._OPEN"" item ")(command "._OPEN" "_Y"" item "))" ) Wobei allein item eine Variable ist. Ist da draußen jemand mit nem Sack voll hilfe??? ------------------ Gruß CADwiesel
|
| In das Form AutoLisp wechseln |
