|
Rund um Autocad : Suche Variable
marc.scherer am 13.04.2005 um 17:24 Uhr (0)
Hi Rabbit, oder Du verwendest das von mir für Dich geklöppelte Lisp: Code: (defun C:CNT (/ VAL) (if (setq VAL (CAD:DE:COUNT)) (princ (strcat
Anzahl Objekte: (itoa VAL) )) ) (princ) ) (defun CAD:DE:COUNT (/ SGET) (if (not (setq SGET (ssget I ))) (progn (princ
Anzahl ermitteln... ) (if (not (setq SGET (ssget))) (princ
Nichts gewählt, nichts gezählt! ) ) ) ) (if SGET (sslength SGET) ) ) Solltest Du nicht wissen wie man Lisp s in AutoC ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : autocad 2006 script
marc.scherer am 27.10.2006 um 16:00 Uhr (0)
Hi,Du kannst in Scripten und Lisp auch die englischen Befehle nutzen.Einfach vor den Befehlsnamen ein "Underline" schreiben.Also statt "circle" - "_circle"Das gleiche mit den Optionskürzeln. z.B. bei Option "lo" für lock im Befehl Layer einfach "_lo" eintragen und das rennt auch im deutschen Acad. Leider vergessen die Amis immer die Internationalisierung .Desweiteren ist die Übersetzung von englischen Befehlsnamen zu den der aktuell installierten Sprachversion und umgekehrt relativ einfach.Die Lisp Funkti ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : bei Fehler anzeigen
marc.scherer am 14.03.2006 um 10:26 Uhr (0)
Zitat:Original erstellt von SHP:Hallo,wenn ich mich so recht entsinne, gabs in ACAD13 eine Möglichkeit, bei einem Fehler die Fehlerzeile anzeigen zu lassen.Ich glaub wenn man *error* auf nil gesetzt hat.Gibt es bei den neueren Versionen in dieser Richtung etwas?Sag mal hatten wir nicht schon wegen dem Lisp-Editor PMs getauscht?Hatte ich Dir nicht empfohlen Deinen Lisp-Kram in VL-IDE zu schreiben?Dann würden sich viele Fragen erübrigen?Dazu gehört natürlich auch die Möglichkeiten der IDE auszuloten. z.B. d ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Objektdaten / Kreis zu Poly
marc.scherer am 05.05.2006 um 20:47 Uhr (0)
Zitat:Original erstellt von Brischke:...die (meiner Meinung nach) recht komisch in der Zeichnung gespeichert sind...Sind sie meiner Meinung nicht.Ich finde die sind sehr gut in der Zeichnung gespeichert.Um da mit Lisp ranzukommen gibt es eine exzellente Lisp-Api nur für Objektdaten bzw. Map-Funktionen.Will man anders an die Dinger ran wirds aber schwieriger weil die Einbindung über eine recht komplexe Dictionary Struktur geregelt ist.Außerdem werden Datenfelder als Hex-Code gespeichert.Aber für Dein spezi ...
|
| In das Form AutoLisp wechseln |
|
VBasic : Schnelle Suche in Xref s
marc.scherer am 07.02.2003 um 08:59 Uhr (0)
Hi, nachdem im Lisp-Forum viele geguckt haben aber keiner antwortet: ich suche eine Funktion die mir aus Xref s Texte und deren Koordinaten raussucht (nur 2D, nur Dtext). Diese Funktion sollte extrem schnell sein, meine Funktion ist da einfach zu lahm. Gibt es da was, oder hat einer ne Idee? Mit Hilfe von ActiveX, Arx oder VBA? Lisp pur ist da zu langsam, oder ich hab das falsch angepackt (Xref zu fassen kriegen und dann ALLE Elemente des Xref s durchhacheln). Ausgabe der Funktion sollte dann so aussehen ...
|
| In das Form VBasic wechseln |
|
Rund um Autocad : Support Pfad - Block Einfügen
marc.scherer am 28.02.2007 um 10:31 Uhr (0)
Hi Monika,ich würde den ganzen Suchen&Finden Quatsch, inklusive der Einfügung in ner Extra Lisp verwursten und dann nur noch diese im Menü aufrufen. Eben eine "Fire&Forget" Funktion.Code:^C^C^P(MonikaBInsert "MeinLieblingsBlock");Das hält Dein Menü klein und übersichtlich und Änderungen an der Art und Weise der Einfügung sind einfachst an der Funktion "MonikaBInsert" vorzunehmen, ohne das Menü zu ändern.Wie stehts mit Deinen Lisp Kenntnissen?------------------Ciao,MarcMein AG sucht u.a. Architekten und Bau ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Von lisp -> lisp aufrufen
marc.scherer am 07.06.2004 um 22:21 Uhr (0)
Hi,in dem Zusammenhang ist vielleicht folgendes Konstrukt interessant:Code:;; Funktion zum sicheren Ausführen von Code;; Beispiel:;; Normaler Aufruf:;; (setq value (MS_multiList "Titel" "Aufforderung" ("C" "F") ("A" "B" "C" "D" "E" "F" "G")));; Safe Aufruf:;; (setq retval (MS:SAFE-EVAL (MS_multiList "Titel" "Aufforderung" ("C" "F") ("A" "B" "C" "D" "E" "F" "G"))));; oder;; (setq retval (MS:SAFE-EVAL (list MS_multiList "Titel" "Aufforderung" ("C" "F") ("A" "B" "C" "D" "E" "F" "G"))))(defun MS:SAFE-EVAL (EVA ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : acad2000i-->Layerfilter
marc.scherer am 14.02.2002 um 21:22 Uhr (0)
Hi Benwisch, klar geht das: [Das C[Doppelpunkt] wird hier gefressen . Ich ersetze das mal eben durch den Text. Bitte im Lisp-COde dann wieder in den Doppelpunkt ändern] Code: (DEFUN C[Doppelpunkt]DELFIL () (progn (vl-load-com) (defun ax:GetAcadLayerFilterDictionary (/ dict) (setq dict (member (cons 3 ACAD_LAYERFILTERS ) (entget (vlax-vla-object- ename (vla-GetExtensionDictionary (vla-get-layers (vla-get-ActiveD ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Linie durch Polylinie ersetzen
marc.scherer am 26.02.2003 um 11:16 Uhr (0)
Hi, oder via Lisp: Code: (defun C:L2PL (/ SGET) (princ "Linien wählen...") (setq SGET (ssget (list (cons 0 "LINE")))) (if SGET (progn (command "_.pedit" "_m" SGET "" "_y" "") (princ (strcat "
OK, " (itoa (sslength SGET)) " Linie(n) zu(r) Polylinie(n) konvertiert !" ) ;_ end of strcat ) ;_ end of princ ) ;_ end of progn (princ "
Keine Linien gewählt !") ) ;_ end of if (princ) ) ;_ end of defun Die Lisp dann ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Blöcke suchen
marc.scherer am 17.06.2003 um 08:23 Uhr (0)
Hi Andi, wenn das alles sofort passieren soll, würde ich das ADesk-Tool "ScriptPro" mit einer Lisp-Datei (wie von Holger angesprochen...) kombinieren. "ScriptPro" wendet ein Script (welches ja auch ein Lisp laden und starten könnte) auf eine von Dir zu bestimmende (im Dialog, keine Angst ;-)) Menge von Acad-Dwg s an. Achtung: ScriptPro übernimmt zwar das Datei-Handling aber das Speichern der Änderungen an der DWG MUSS mit ins Script (am Ende ein "_.qsave" !). Hier ein Beispiel-Skript von einer meiner Scrip ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Einfügeverhalten von Blöcken
marc.scherer am 17.01.2006 um 12:03 Uhr (0)
Zitat:Original erstellt von Sir Vival:Eigentlich suche ich nach einer Möglichkeit, wie ich nachträglich alle unsere Blockdateien via Skript-Pro überarbeiten kann, so dass sie sich beim Einfügen von vorneherein nicht skalieren...Hmm,ich würde sagen, entweder setzt Du bei allen Blockdateien die AEC-Einheiten mit dem Lisp von CAD-Huebner (Vielen Dank an Dich...) mittels SkriptPro,oder Du sorgst dafür, das der AEC Schalter zum Skalieren (siehe angehängtes Bild) für jede offene Zeichnung deaktiviert ist.Das k ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : LISP STARTEN
marc.scherer am 11.02.2004 um 10:26 Uhr (0)
Nicht böse gemeint Hi Ulf, @ Ich will mich ja nicht über dieses gratis Angebot beschweren, aber es bringt ja nichts wenn die Lisp´s zum runterladen freigestellt werden aber keiner weiß wie sie funktionieren oder starten. Was willst Du? Auch noch ne komplette Doku zu den kostenlosen Pgmen? Dann bestell Dir welche beim www.defun.de Ansonsten mecker nicht! :-) Bei manchen meiner Lisp s sind 40 oder mehr defun c: s in einer Datei definiert. Soll ich die alle beim Laden der Funktion melden? Liest doch k ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Pfad einer Datei ermitteln
marc.scherer am 23.03.2005 um 12:55 Uhr (0)
Zitat: Original erstellt von Frank88: Mir geht s aber eigentlich darum, daß jeder, der von mir eine Lisp-Datei bekommt, diese hinkopieren kann, wo er will und das ganze trotzdem funktioniert. Sonst ist das immer mit ellenlangen Erklärungen verbunden und wer jetzt in Windows und seinen Ordnerstrukturen nicht so bewandert ist, verliert schonmal die ein oder andere Datei. Lieber Frank88, so einen Quatsch würde ich nicht mal in Erwägung ziehen. Ein selbstsuchendes Lisp? Dann schreib lieber eine ellen ...
|
| In das Form AutoLisp wechseln |
