 |
Lisp : Setvar und acaddoc
nebuCADnezzar am 31.08.2023 um 09:46 Uhr (15)
Schöne guten Moorgen meine HerrenVielen, vielen Dank! Hab alle vertipper und "" von den Integers weggenommen (ja manchmal sieht man den Wald vor Bäumen nicht...)Dann das ganze in ne andere Lisp integriert die schön brav mit jeder Zeichnung läd (wiso die acaddoc.lisp nicht geladen wird mit jeder Zeichnung habi nicht rausbekommen...)Also Läuft!PS: die viecube einstellung kann nicht gemacht werden wenn die Zeichnung in einem Layout geöffnet wird, darum die Zeile mal abgeschalten.Schöne Grüsse!---------------- ...
|
| In das Form Lisp wechseln |
|
Lisp : Layermanager
nebuCADnezzar am 05.01.2022 um 11:05 Uhr (1)
hast du den Befehl standards schon mal probiert ?Ja habi au kurz angeschaut, aber da ich mit m Marketing erstmal Strichstärken etc. ausfummeln musste bin ich beim Layerstaus-Manager hängengeblieben, is halt auch gut, Varianten Testen, wieder zurückschalten und die Zeichnung ist wieder wie gewohnt und kannst weiterfurwerken...Homeoffice im Estrich vom 100 Jahre alten Haus mit Einscheiben Fenster, ja es zieht recht fies und Schneit im 45° Winkel ------------------Es ist kein Zeichen geistiger Gesundheit, gu ...
|
| In das Form Lisp wechseln |
|
Lisp : Layer Ansichtsfenster Farbe mit lisp ändern
nebuCADnezzar am 25.09.2025 um 12:06 Uhr (1)
HihiAlso glaube der command Knopf funktioniert (bin nur am Rande itnegriert da... :-) Auch kann das Ansichstfenster in der dwt Vorlage richtig voreingestellt werden und bei neuen Ansichtfenstern mittels "eigenschaften übertragen" übernommen werden. Ist halt nicht ganz so automatisiert wies schön wär, aber geht...Hintergrund ist im übrigen dass die dwgs in so nem Autodesk webviewer gezeigt wereden sollen und der Viewer kann scheinbar nix darum muss das optische Erscheinungsbild im Ansichtsfenster eingestell ...
|
| In das Form Lisp wechseln |
|
Lisp : Block und Schraffuren auflösen, speichern unter
nebuCADnezzar am 02.11.2021 um 16:06 Uhr (1)
Vielen Dank Hatte es gerade irgendwie geschafft das selbst zum rennen zu bringen! Danke für die Erklärung (da ich trie and error arbeite versteh ich manchmal nicht was ich gemacht hab aber es klappt (manchmal))Hatte es mit und ohne Klammern versucht (setq praefix ("werb-")) aber das falsche car (command "_SAVEAS" "2018" (car name)) hat da scheinbar rein gestört und immer "Fehler: Fehlerhafte Funktion: "werb-"" geliefert.Und den falschen car hatte ich mir halt auch aus einer meiner alten lisps rausgeklaut. ...
|
| In das Form Lisp wechseln |
|
Lisp : Stapelverarbeitung
nebuCADnezzar am 20.07.2023 um 16:43 Uhr (1)
HallöchenHab mal wieder selbst nicht gut genug dokumentiert... Wiedereinmal muss ich n paar tausend .dwgs ändern, dafür hab ich meine paar Jahre alte acaddoc.lsp ausgegraben und aufgepeppt.Code:(defun-q S::STARTUP ( ) (princ "
Losgets
") (princ) ;(load "c:WorkSpaceSettings ForsterAutoCADCustomizationFORSTER comands.LSP") (command "FORSTERRBP") (command "FORSTERLAYERS") (command "FORSTERCLEAN") (command "_qsave") ;(command "_close") )die dann schöne in ne Supportordner geworfen dammit die bei ...
|
| In das Form Lisp wechseln |
|
Lisp : Block und Schraffuren auflösen, speichern unter
nebuCADnezzar am 02.11.2021 um 14:39 Uhr (1)
Hallo liebe LisplerAlle Jahre wieder versuch ich mir mal wieder was zusammen zu bastelen. Hab das auch soweit wieder hinbkommen, nicht weil ich dass kann sondern mein Gefühl mir sagt dass könnt so klappen Funktioniert soweit bisher auch (vieln Dank an die Coder bei denen ich kopiert hab) aber ich bekomm das speichern unter nicht hin, ich hatte n sehr ähnliches Problem schonmal und hatte es wohl mit eurer Hilfe gelöst.Das Programm löst erstmal alle Blöcke auf (sollte auch verschachtelte) um dann alle Schra ...
|
| In das Form Lisp wechseln |
|
Lisp : Stapelverarbeitung
nebuCADnezzar am 21.07.2023 um 09:18 Uhr (1)
Schönen guten MorgenHa ja sowas hat ich mir doch fast gedacht...Wiso ich "meine" befehle nicht auch einfach als comand "blabalabna" starten kann verste ich grade nicht aber tut auch nichts zu sache.Dein Trick hat funktioniert! Läuft jetz durch, zumindest "meine" Befehle, schliessen tut er auch, aber speichern hats keine lust zu...Mein neuer liebling:Code:Befehl: _QSave Unbekannter Befehl "QSAVE". Drücken Sie F1-Taste für Hilfe.Danke mal soweit, ich glaub ich geh mal erst in die Ferien ;) ;) PS: Ja hast d ...
|
| In das Form Lisp wechseln |
|
Lisp : Positionsnummern
nebuCADnezzar am 03.11.2023 um 10:22 Uhr (1)
Hallo zusammenBlock Nummerieren / neu Nummereieren / Positionsnummernhttps://ww3.cad.de/foren/ubb/Forum145/HTML/003480.shtmlhttps://ww3.cad.de/foren/ubb/Forum54/HTML/002821.shtmlhttps://ww3.cad.de/foren/ubb/Forum54/HTML/001902.shtmlDie Post sind alle eeeeetwas älter Aber eigentlich wiedermal sowaswo ich mir denke wiso the fuck gibts sowas nicht als Standardfunktion, brauchen sicher 1000e Zeichner in 4000 verschienden Variationen...Ich kann mich erinnern dass ich dass in Acad14 (nein nicht 2014 ) im Bewehr ...
|
| In das Form Lisp wechseln |
|
Lisp : 3d länge
nebuCADnezzar am 06.02.2013 um 11:43 Uhr (0)
Hallo zusammen.Ich bin gerade drann n paar alte LISPs ins neue ACAD 2013 anzupassen. Eins davon macht mir gerade etwas schwierigkeiten (naja meine LISP skills waren schonmal besser...)Code:(defun C:3dlength () (setq LENGTH 0) (setq C nil) (setq PT2 nil) (setq ENAME (car (entsel "
3d Polyline: "))) (setq E (entget ENAME)) (if (= (cdr (assoc 0 E)) "POLYLINE") (progn (if (= (logand (cdr (assoc 70 E)) 1) 1) (setq C 1) ) (setq T C) (setq ENAME (entnext ENAME)) (setq E (entget ENAME)) ...
|
| In das Form Lisp wechseln |
