|
Rund um AutoCAD : Textstil ändern
Andreas Kraus am 24.02.2012 um 14:11 Uhr (0)
Hallo Horni43,probier mal das Lisp aus. Absolut 100%ig ist es nicht, nur malso runtergetippt, etwas älter, ohne Fehlerbehandlung usw... .Code:(defun c:tformat () (command "_undo" "_be") (setq alt_stil (getstring "alter Textstil : ")) (setq neu_stil (getstring "neuer Textstil : ")) (if (setq satz (ssget ((0 . "TEXT")))) (progn (setq n (1- (sslength satz))) (repeat (sslength satz) (setq ent_name (ssname satz n)) (setq ent_data (entget ent_name));;; Drehwinkel zur Bearbeitung auf 0° (setq w (cdr (assoc 5 ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Zeichnungen schnell umfärben
AsSchu am 24.11.2003 um 08:21 Uhr (0)
oder so: (defun C:einfarb (/ SS1 SS1Len i NumChg EName Elist EType ZNACZNIK MD_ERR M:FEHLER m:farbe ) ;_ end of / ;_ end of / (setq MD_ERR *ERROR* *ERROR* M:FEHLER ) ;_ end of setq ;;Marke für Zurück nach Abbruch setzen (command "_.UNDO" "_MARK") (setvar "cmdecho" 0) (setvar "tilemode" 1) (command "_.-Layer" "_unlock" "*" "") (prompt "
Elemente wählen zum ändern, oder Return für alle... " ) ;_ end of ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : pljoin-Problem
AB am 08.10.2002 um 08:02 Uhr (0)
Guten Morgen, ich habe ein merkwürdiges pljoin-Problem, beim Verbinden von Kurven. Ich habe folgendes LISP-Programm: (defun c:abc () (vl-load-com) (Querschnitte(entlast)50) ; Abstand veränderbar (ss-foreach(ssget"X" ((0 . "LINE"))) ; löscht Linien xy-Ebene (lambda(line) (if(line-in-xy-plane? line)(entdel line)) ) ) (BKS_drehen) (verb_Linien) ) ;..................................................................... (defun get-bbox(ent / pmin pmax) ; erzeugt Querschnitte ...
|
| In das Form Rund um Autocad wechseln |
|
PTC Creo Elements/Direct Modeling : Model Manager - wirklich erforderlich? Alternativen?
blini-crisis89 am 14.01.2019 um 07:45 Uhr (12)
Hallo,erstmal Vielen Dank für eure vielen Antworten.Das diese vielen LISP-Dateien nicht von einer einzigen Personen zusammengetragen wurden hatte ich mir schon fast gedacht. Aber ihr habt natürlich recht, man sollte da schon korrekt sein. Es wirkt auf jedenfall toll, was ihr da alles so zusammengetragen habt als Community. Nun nochmal ein paar Rückfragen zu euren Posts.Zitat:mit 3D-Daten, 3D geändert könnten mehrere Kollegen arbeiten, wenn jeder in sein eigenes Verzeichnis speichert. .Aber besteht denn hie ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
Lisp : Koordinatenexport
Bauvermesser am 11.07.2006 um 22:46 Uhr (0)
hallo,alle zusammenich bitte um hilfe für folgende problem,habe eine LSP aus diesem forum welche sich für mich sehr gut zum Koordinatenauslesen eignet weil die jeweiligen punkte gleich markiert und beschriftet werden, es gibt nur ein paar probleme mit enigen zeilen welche ich gern geändert haben möchte, kann mir jemand helfen, vielleicht sogar der verfasser selbst? ;habe überall wo ich eine änderung benötige ???? rangehängt;;;;(defun C:test (/) (setq clay (getvar "CLAYER")) (setq OSM (getvar "osmode")) (se ...
|
| In das Form Lisp wechseln |
|
OneSpace Modeling : Umfärben Behälter in Annotation
RainerH am 02.10.2006 um 15:26 Uhr (0)
@BehaelterumfaerberHinweise dazu:1.) Muss das LISP: "am_part_color.lsp" von Walter Geppert zuvor geladen sein2.) Wir nach dem Aktualisieren diese Funktion automatisch aufgerufen 3.) Kommt am Ende manchmal eine Meldung: "Widerrufen nicht möglich. Zustand nicht vorhanden." Habe aber keine Ahnung warum ...4.) Hoffe ich, dass es einigermassen funktioniert ... Probiert es einfach mal aus !Code:(in-package :custom)(use-package li);;--------------------------------------------------------------------------- ...
|
| In das Form OneSpace Modeling wechseln |
|
Lisp : Blöcke verbinden
Brischke am 11.04.2011 um 15:14 Uhr (0)
Zitat:Original erstellt von O2CAD: ... Wie lange würde denn ein erfahrener Lisp-Programmierer schätzen, daß ich brauchen werde bis ich diese Sprache so weit beherrsche um oben genannte Aufgabe zu programmieren?es führen viele Wege nach Rom. Willst du quick und dirty Rom erreichen, dann schätze ich den Zeitaufwand zum alleinigen erlernen mal auf 3-4 Wochen (reine Lernzeit). Danach wirst du allerdings noch viele Fragen offen haben.Was du für diese Aufgabe benötigst ist für einen Anfänger nicht ganz trivial. ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehl Breaker verbessern
Jonapap am 30.08.2011 um 22:41 Uhr (0)
Hi,ich habe in den Befehl jetzt mal den Error-Handler von mapcar eingebaut. Alles, was meiner Meinung nach durch den Handler in dem Befehl c:Breaker überflüssig geworden ist, habe ich auskommentiert.Erste Versuche haben wie gewünscht funktioniert Da ich mich mit Lisp nicht so gut auskenne:Könnte jemand von euch noch einmal einen Blick drauf werfen?Ich bin mir nämlich nicht ganz sicher, ob ich nicht doch etwas übersehen habe.Vielen Dank im voraus!Code:(defun c:Breaker (/ acdoc varlist echo pmode psize ent p ...
|
| In das Form Lisp wechseln |
|
AutoCAD Architecture ACA (ADT) : alte Wandstile und neue Versionen
zimcad am 02.10.2007 um 17:29 Uhr (0)
Hallo,ich habs mir abgewöhnt _einfache_ Stile in die neuen Versionen zu importieren. Die aufwändigeren schreibe ich mir in eine extra Stildatenbank und prüfe manuell was sich geändert hat. (der Aufwand ist aber teils nicht ohne). Irgendwas haben die adeskler immer mal wieder unverhofft geändert, dann kann man das hinüberretten in die neue Version vergessen (das letzte mal von 2006 nach 2007 die Materialien, wenn ich mich recht erinnere).Ich hatte mal irgendwann gehofft, dass wenigstens ein Tool (ähnlich de ...
|
| In das Form AutoCAD Architecture ACA (ADT) wechseln |
|
Lisp : AcCoreConsole mit Script in ACAD24
Archäologie Bubi am 17.10.2023 um 10:51 Uhr (1)
Hallo ZusammenIch muss mich mal wieder an euch wenden, da ich mich seit einigen Tagen mit der AcCoreConsole.exe (ACC) rumschlage ohne das Problem überhaupt zu verstehen.Situation:Wir nutzen im Betrieb ein selbstgeschriebenes LISP zur Stapelbearbeitung. In diesem wählt der Nutzer die Dateien und den gewünschten Befehl.Das Programm erstellt dann ein passendes Skript und startet für jede Datei eine ACC-Instanz mit dem Script.Soweit so gut, soweit so bewährt. Wir nutzen das nun schon seit einigen Jahren, aber ...
|
| In das Form Lisp wechseln |
|
Excel : VBA-Code und OpenSource/GPL
Paulchen am 27.07.2009 um 13:52 Uhr (0)
Danke für die Rückmeldungen.Wen es interessiert: Meine Frage bezog sich bei genauerer Betrachtung weniger auf Excel, sondern mehr auf eine Textpassage der GPL. Darin heißt es sinngemäß, dass unter GPL gestellte Werke nicht in proprietäre [Closed Source-] Programme eingebaut werden dürfen. Die Devise der GPL lautet: Einmal offen, immer offen. Zitat:Diese General Public License gestattet nicht die Einbindung Ihres Programms in proprietäre Programme. Wenn Ihr Programm eine Funktionsbibliothek ist, dann kann e ...
|
| In das Form Excel wechseln |
|
AutoLisp : Befehl Plot / Treiber SHPGL
Bernd10 am 12.10.2004 um 10:23 Uhr (0)
Hallo, Zitat: Original erstellt von Peter2: Am besten, du startest genauso wie dein Lisp den Plotbefehl in der Befehlszeile mit _.plot und notierst dir genau, was das Programm fragt - in 2002 und 2005, und dann siehst du die (allfälligen) Unterschiede. Das habe ich nun gemacht und es ist wieder der Dialog Suchen nach Plotdatei nach der Option Plotten fortsetzen erschienen. Im Dialog kann ich zwar ein Verzeichnis wählen, aber nach dem Beenden mit Speichern ist die Plotdatei im Verzeichnis ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Konstruktionslinien
Theodor Schoenwald am 29.01.2005 um 18:16 Uhr (0)
Hallo Vision,hier mit Dialog.Einige Zeilen sind aus Deinem Listing.GrußTheodor Schönwald;; Die Lisp-Datei:;; X-Linie zeichnen;; Mit Dialog Datei K_LINIE.DCL;; 29.1.2005;;(defun C:K_LINIE (/ RICHT PT EN P1 P2 WIN D DH MP AS) (defun NEUERR (MSG) (princ LEER) (princ MSG) (command "_REGEN") (command) (command "_LAYER" "_SET" C_L "" "_REGEN") (command "_UCS" "_N" W_K) (setq *ERROR* ALTERR) (setvar "CMDECHO" C_E) (exit) (princ) ) (setq ALTERR *ERROR* *ERROR* NEUERR DUMMY_1 (entlast) C_E (getvar "CMDEC ...
|
| In das Form Rund um AutoCAD wechseln |
