|
Lisp : Aktuellen Layer ändern
cadffm am 05.04.2007 um 08:55 Uhr (0)
Also dafür ist ja tatsächlich nicht einmal Lisp nötig und wo deinProblem liegt kann ich nicht nachvolltihen da du nicht angibstWIE die das auf mehrere Dateien anwendest.Wenn ich deine Frage mal umformulieren darf auf:Wie stelle ich in 1000 Dateien den aktuellen Layer auf XXXDann wäre meine Antwort so:Start Programme Zubehör Editordort schreibst du dann rein:;-----------------------------_.-LAYER _TH AM_0 _M AM_0_.QSAVE;-----------------------------Wobei man in Scripten sehr auf Leehrueichen achten muß weil ...
|
| In das Form Lisp wechseln |
|
AutoCAD Civil 3D : urplötzliche warnung während des öffnens
runkelruebe am 23.01.2010 um 14:14 Uhr (0)
Mahlzeit,Weil der Deutsche an sich ja gerne ne 2. Meinung einholt, obwohl die erste schon top ist ;-)Code:_recover:Reading handle 7D9D8A object type AeccDbAlignmentParcelNodeError 67 (eDwgObjectImproperlyRead) Object discarded[...]2 Blöcke geprüft0 Fehler gefunden, 0 behoben1 Objekte gelöschtbeim Speichern kommt noch einAktualisiert Indizes für Block *Model_SpaceDanach (als 2010 gespeichert) Verwendung der Datei ohne weitere Fehlermeldungen.Getestet mit C3D-2010-Version3Publiziert hab ich jed ...
|
| In das Form AutoCAD Civil 3D wechseln |
|
Lisp : Steigung einer 3d-Linie anschreiben
mueller-spies am 07.09.2012 um 14:40 Uhr (0)
Hallo zusammen,erstmal danke für die Hilfe.Nun aber das nächste Problem.Ich habe die Routine in die Routine von CADwiesel eingefügt, aber sie läuft nicht richtig. Hier die geänderte Routine:; Lisp-Programm zum Absetzen eines Textes für %o-Angabe(defun c rozenthoehe ( / ech sli li proz sel el diff L P1 P2 X1 X2 Y1 Y2 Z1 Z2 S) (setq ech (getvar "CMDECHO")) (setvar "CMDECHO" 0) (princ "") (princ "Angabe über %-Neigung einer Linie") (princ "Wert durch Ersetzen eines vorhandenen Textes absetzen") (princ "von tg ...
|
| In das Form Lisp wechseln |
|
Lisp : Common Lisp - Funktionen überladen
toxot am 25.09.2009 um 02:20 Uhr (0)
Zitat:Original erstellt von archtools:Lisp-Programmierer schaffen sich ihre eigene Welt... schau, ich habs ja auch so gemacht ... siehe Anmerkung CadWiesel.Aber Linux - und viele andere Beispiele - sind einen besseren Weg gegangen.Und Du selbt? Hast Du nicht auch ........ ?Oder liegts vielleicht daran, dass die Idee und Kombination von mir kam?Mit einem LOADER haben haben wir DEN Schlüssel, für die VERWALTUNGSFREIE Ausführung von Lisp-Programmen!Auch Du könntest den Code anderer in deinen Programmen gut e ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Block ändern
C4DP4P57 am 21.03.2019 um 10:48 Uhr (1)
Hallo Namensvetter,Zitat:Original erstellt von Jörg:Nun musste ich wirklich einen Block (P.57001) durch einen anderen (P.57017) ersetzen (beide in der Zeichnung vorhanden)Im AutoCAD Magazin auf Tool-CD 05/2015 gab es ACM-Blockersetzen.Blockreplace schieß ja öfters mal über das Ziel hinaus, weil es eben alle Blockreferenzen in der Zeichnung Tauscht. ACM-Blockersetzen geht da behutsamer vor und tauscht nur die ausgewählten Blöcke.Meldung Sonderzeichen nicht erlaubt!Daraufhin beide Blöcke umbenannt ("." entfe ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : Reihenfolge im Programmablauf nicht logisch!
CADwiesel am 12.08.2005 um 08:21 Uhr (0)
eine Klammer war außerdem zuvielmehr als 2 Punkte kann mann aber nicht bemaßen - da mußt du nochmal nacharbeiten.Du solltest sowiso den gesamten code überarbeiten und den Unterfunktionen entweder die benötigten Parameter übergeben, oder wenigstens die Rückgabe der Unterfunktionen in lokalen Variablen übergeben lassen.Code:(Defun c:bodim ( / oldCmde oldOs ma cen pt1 pt2 a1 a2 ad r d x pt3) (defun Bogma () (setq oldCmde (getvar "CMDECHO")) (setq oldOs (getvar "OSMODE")) (setvar "CMDECHO" 0) (setq ma (getvar ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : EPS-Dateien in ACAD 2000 einfügen
Theodor Schoenwald am 05.02.2003 um 22:50 Uhr (0)
Hallo, das Programm hatte noch Fehler. Es wird in den nächsten Tagen auch auf meiner Hompage zur Verfügung stehen. http://www.lehrer.uni-karlsruhe.de/~za685 Wenn es Cadwiesel auch zur Verfügung stellen will, ist es mir recht. Gruß Theodor Schönwald Hier die Verbesserung: ------------------------------------------------------------------- ;;; EPS-Datei einfügen ;;; Hilfsprogramm: PSTOEDIT ;;; 5.2.2002 V 1.1, (d) Theodor Schönwald ;; (defun C:EPSIN (/ DAT_EPS DAT_DXF AUFRUF S_F_X S_F_Y) (setq ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Datum überprüfen
mapcar am 15.10.2005 um 11:01 Uhr (0)
Das ist ein nichttriviales Problem, dessen Lösung vor allem davon abhängt, wie das Ziel definiert ist: Soll nur geprüft werden, ob die Eingabe ein gültiges Datum sein könnte (z.B. 29.02.2001), der ob es auch ein gültiges Datum IST. Wenn ich mich recht erinnere, gab es einen 29.2.2000, aber keinen 29.2.1900). Solche Probleme fängt man sich ruckzuck ein, wenn historische Daten ins Spiel kommen, und das kann bei solchen Anwendungen durch alte Zeichnungen/Baugenehmigungen/... usw. durchaus mal der Fall werden. ...
|
| In das Form AutoLisp wechseln |
|
Lisp : bitte beachtet Urheberrechte
CADwiesel am 23.06.2004 um 20:53 Uhr (0)
Du brauchst nicht immer die vorangegangenen Beiträge zu zitieren. Ich und vermutlich auch die andern wissen was ich/sie geschrieben haben.Und wo bitte liegt hier der Kommertz in den Programmen?Wenn hier ein User durch ein Programm, was er hier her hat sein Acad zerschießt, ist das doch sein Problem.Hier in den Foren werden keine Programme verkauft. Es sollte auch keine Handelsplatform sein, sondern rein eine Hilfeplatform. Un wer, bitte sollte hier irgendein Interesse haben irgendeinen anderen Abzumahnen. ...
|
| In das Form Lisp wechseln |
|
Lisp : Eigenschaften einer Polylinei als Text ausweisen
Brischke am 24.02.2010 um 12:21 Uhr (0)
Zitat:Original erstellt von kilmar:...Ich bin zwar beim CADWiesel schon fast fündig geworden, und zwar die "FLA_BER" lisp Datei. Aber mir fehlt da eben etwas, und zwar:- das der LAYERNAME im Text auch eingebaut wird- die Zusatzinfo der Länge der Polylinie bzw. die Abwicklung- und dass das ganze auf 3 Kommastellen ausgewiesen wird (d.h. 800.151 EH2 und nicht 800.15 EH2)- und eben alle Polylinien welche zum auswerten sind seperat je Polylinie hinzuschreiben, und nicht zu addierenWenn mir da jemand helfen kö ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Attribute ausfüllen im Batch
CADwiesel am 27.04.2006 um 11:44 Uhr (0)
sowas?Code:(defun c:attaend (/ tt) (defun bau_elemli (asatz / n elemli) (setq n 0) (repeat (sslength asatz) (setq elemli (cons (ssname asatz n) elemli) n (1+ n) ) ;_ end of setq ) ;_ end of repeat elemli ) ;_ end of defun (mapcar (lambda (x / ATTRIBUT) (foreach ATTRIBUT (vlax-safearray-list (vlax-variant-value (vla-getattributes (vlax-ename-vla-object x)) ) ;_ end of vlax-variant-value ) ;_ end of vlax-safearray-list (co ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Problem mit textomtex
T.B. am 23.06.2009 um 13:42 Uhr (0)
Hallo,ich habe früher immer problemlos folgende Lisp-Datei genutzt:;;;****** Sicherungsroutine gesetzter Variablen **************;;;(defun START ()(setq CMDOLD (getvar "CMDECHO"))(setvar "CMDECHO" 0)(setq OSOLD (getvar "OSMODE"))(setvar "OSMODE" 0)(setq LAOLD (getvar "CLAYER")));;;;;;****** Rcksetzen gesicherter Variablen *******************;;;(defun ENDE ()(setvar "CMDECHO" CMDOLD)(setvar "OSMODE" OSOLD)(setvar "CLAYER" LAOLD)(setvar "CELTSCALE" 1)(princ));;;;;;;;;****** Programm zur einfacheren Textmani ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : vba oder lisp?? oder eine einfache frage
Brischke am 10.02.2004 um 14:16 Uhr (0)
Hallo luky, welche Antwort erwartest du im Lisp(AutoLISP)-Forum? Meine Meinung: Wenn man überhaupt zum ersten mal mit Programmieren zu tun hat, dann solltest du mit LISP anfangen. Da werden kleine Fehler eher Verziehen als in VB/VBA. Für AutoLISP findest du unmassen an Codes im Internet. Du kannst also aus anderen Tools lernen. Tutorials gibt es auch einige im Netz: Das Umfassendste ist sicher: http://www.autolisp.mapcar.net/ Als Einstieg gibts auf meiner Seite http://www.defun.de unter Hilfe- Trainu ...
|
| In das Form AutoLisp wechseln |
