|
Lisp : (entget(car(entsel Mtext Hintergrund zuweisen
archtools am 13.08.2009 um 19:34 Uhr (0)
Zitat:Original erstellt von fuchsi:Da dies jedoch optionale Gruppencodes sind, muss vor dem SUBSTen abgefragt werden, ob dieser überhaupt vorhanden ist. Ansonsten muss er nämlich mit APPEND angehängt werden.Weil das bei der Bearbeitung von Gruppencodes ja öfter vorkommt, empfiehlt es sich, eine spezielle Version von SUBST zu schreiben, die dann, wenn der Code schon vorhanden ist, den vorhandenen mittels SUBST durch den neuen ersetzt, und die andernfalls den neuen einfach mit CONS hinten dran setzt.Code:(d ...
|
| In das Form Lisp wechseln |
|
Lisp : XRef - abgreifen
steppe2000 am 06.01.2011 um 20:37 Uhr (0)
jetzt wäre ich eigentlich überzegt gewesen richtig zu kochen... aber leider Code:(defun c:xrlist () (setq entlist_blkdef (tblnext "block" T)) (while entlist_blkdef (if (member (cdr (assoc 70 entlist_blkdef)) (4 12 36 44)) (progn (setq xrname (cdr (assoc 2 entlist_blkdef)) xrpfad (cdr (assoc 1 entlist_blkdef)) xrelm (entget (tblobjname "BLOCK" xrname)) ) (setq xrpfadn (strcat (substr xrpfad 1 (- (strlen xrpfad) 4)) "_.dwg")) (if (findfile xrpfadn) (progn (setq xrelm (subst (cons 1 xrpfadn) (ass ...
|
| In das Form Lisp wechseln |
|
Lisp : Finddir oder so, gibt es so was?
Andreas Kraus am 14.06.2016 um 10:08 Uhr (1)
Hallo, hab eben erst gelesen was du vorhast.Ich verwende auch Teilmenüs und LISP und Pfade in den Optionen usw. und habe für jedes Teilmenü eine MNL in der der Pfad der entsprechenden Menüdatei (wenn nicht schon geschehen) in die Supportpfade eingetragen wird. Auch gleich noch andere Pfade die relativ zum Menüpfad ermittelt weden.Funktioniert schon Jaaaahhhhre einwandfrei, kann ich nur empfehlen .Teilmenü laden und ALLES ANDERE ist automatisiert .Das Argument, dass vielleicht ein User Appload oder Menulo ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Bearbeitungszeit ändern
CADmium am 25.11.2004 um 23:01 Uhr (0)
Hier mal 2 Routinen, wie es gehen sollte: (defun c:GET-BEARBEITUNGSZEIT(/ DICT PROPS ZEIT STUNDE MINUTE SEKUNDE) (if(and (setq DICT (dictsearch (namedobjdict) "DWGPROPS")) (setq PROPS (entget(cdr(assoc -1 DICT)))) (setq ZEIT (cdr(assoc 40 PROPS))) ) (progn (setq TAGE (fix ZEIT)) (setq ZEIT (* 24.0 60 60 (- ZEIT TAGE))) (setq ZEIT (+ ZEIT 0.0005)) (setq STUNDE (fix (/ ZEIT 3600.0))) (setq MINUTE (fix (/ (- ZEIT (* STUNDE 36 ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Eigene Zeichnungseigenschaften definieren
tom.berger am 27.08.2004 um 14:23 Uhr (0)
Zitat: Original erstellt von CADmium: Hatte mal was angefangen .. gucke hier - sonst: Siehe Cadffm Mhmm .. sehe gerade bei 2004 er Dateien gibts kein Dictionary DWGPROPS mehr !??! ... muß ich die Speicherstelle erst wieder und-color: #FFFF99'>suchen.. Warum sollte man auch sowas verwenden, wenn man mit demselben Aufwnad eigene Dictionaries anlegen udn verwalten kann? Damit macht man sich nur ein Stück weiter von Adesk abhängig. Jeder LISP-Programmierer wird sich Bibliotheksroutinen der Art (DICTIONARY-PUT K ...
|
| In das Form AutoLisp wechseln |
|
Lisp : LISP für FelixCAD???
danielboukreev am 21.09.2007 um 19:45 Uhr (0)
Hiallzusehr scheinst du ja Google nicht bemüht zu haben - oder du hattest einfach Pech... ich hab beim ersten und-color: #FFFF99'>Suchen folgendes gefunden:LINKund dort steht folgendes:Whats the difference between FelixCAD LT and PowerCAD?A FelixCAD LT and PowerCAD use the same core technology, and both offer exceptional power and value to simplify the computer-aided design process. PowerCAD offers considerably more 2D/3D functionality and customization. Features include the ability to save in AutoCAD DWG and DXF formats, ad ...
|
| In das Form Lisp wechseln |
|
Lisp : Blockwahl / Filter setzten
cadwomen am 23.04.2012 um 22:43 Uhr (0)
Hallo zusammen,ich hab es über "Bordmittel" versuch in Form von zusammengesetzten Befehlen, aber da klappt es nichtwas ich möchte istich klicke einen Block an ,der Einfügelayer wird als aktuellen Layer gesetztalle Blöcke die mit dem selben Namen und auf dem gleichen Layer weden in einem Auswahlsatz bereit gestelltdas wäre schon allesdie Auswahl hab ich bis jetzt über Filter *Blockname & Layer gemacht, das Layersetzten über *_Laymcur aber in Kombi bekomm ich das nicht hinso was in der Art hab ich hier gefun ...
|
| In das Form Lisp wechseln |
|
AutoLisp : lisp parameter
Brischke am 13.04.2004 um 17:17 Uhr (0)
Hallo, ungeduldig bist du gar nicht (mail, PM und Posting) ??? Es gibt viele verschiedene Möglichkeiten, denn ich denke, du willst wie im AutoCAD-Magazin-Forum bereits diskutiert nur eben Sicherheit haben, dass niemend deine Script-Datei versaut - richtig? Dann schreibe dir ein Lisp, welches dir die Script-Datei immer wieder neu schreibt, egal, ob jemand darin etwas geändert hat oder eben auch nicht. Suchworte: open, close, princ, prin1, write-line Noch n Vorschlag. Behalte die 2 Zeilenb als Script bei, we ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Command läuft nicht durch.
Archäologie Bubi am 17.03.2021 um 12:20 Uhr (1)
Ich habe schon zuerst eine sehr ausführliche und einsteigerfreundliche Anleitung gelesen. Aber ohne genauen Zusammenhang für meine Arbeit und nur mit den zahlen Rechnereien verstehe ich davon immer noch so gut wie nichts.Der Plot Befehl soll dann auch nur ein Teil in einer längeren Ausführung sein.Den ACAD Befehl (-Plot) habe ich mir inzwischen schon unzählige Male durchgeschaut und auch das Textfenster habe ich immer im Blick.Deswegen bin ich auch ins LISP Forum gegangen und nicht ins ACAD. Der Command sc ...
|
| In das Form Lisp wechseln |
|
Lisp : Blockhuckepack
cadoc am 07.11.2018 um 10:39 Uhr (1)
Hallo Andreas,leider funktioniert das Lisp irgendwie nicht so ganz bei mir (Acad Map 2017).Bekomme immer ein "nil".Wozu das Ganze?A-Blöcke repräsentieren digitalisierte Objekte mit vielen Attributen die noch ihre richtige Lage und-color: #FFFF99'>suchen.B-Blöcke sind vermessene Punkte, davon haben aber nicht alle immer eine/die richtige Bezeichnung(deswegen die Identifikation mit dem nächstgelegenen B-Block) und es werden auch nicht immer alle Objekte in der Natur gefunden(deswegen bleiben immer ein paar A-Blöcke übrig).Beim ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Schon wieder mapcar
Dea am 25.06.2003 um 12:31 Uhr (0)
Hilfe! Jetzt habe ich mir auch Ärger mit mapcar, dem Befehl, aufgehalst. Ich habe wieder versucht, die Autolisp-Seiten weiter durchzuarbeiten. Als Beispiel für mapcar und lambda wollte ich die Koordinaten eines Umfassungsquaders im 3D ermitteln. Der erste Versuch noch ohne die beiden Befehle zur Ermittlung des Punktes mit den größten Koordinaten hat ja noch funktioniert. (defun Aussen1 (punktliste / pmax pmin) (setq pmax (list (max (car (car punktliste)) (car (cadr punktliste)) (car (caddr punktl ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Mit Isolieren Gruppen nach der Reihe anzeigen
cadffm am 25.05.2016 um 07:32 Uhr (1)
Erst lässt du dir die Zeilen geben zum "leere Gruppen erstellen"und nun hängt es wieder an IF und SSGET oder dem Zugriff auf GruppenInfos?Schau dir doch bitte noch einmal IF und SSGET an,wenn du am englischen scheiterst: R14 hatte noch eine deutsche Lisp-Hilfe,die findest du im Lisp Forum beim und-color: #FFFF99'>suchen nach BUCH."Ordentliche" Wege um aufbGruppenInfos zuzugreifen gibt es im Forum zBhier: http://forum.cad.de/foren/ubb/Forum145/HTML/003673.shtml (und Links beachten)Falls es noch immer undokumentiert ist: Wie di ...
|
| In das Form Lisp wechseln |
|
Lisp : Hilfe bei command schleife
spider_dd am 29.08.2012 um 15:47 Uhr (0)
Hallo Dirk,folgender Fehler steckt noch in Deinem Prog:mit dem Werten aus dem ersten Element der Punktliste gehts Du in die (while (/= CLIST nil) ... Schleife.Dort findest Du irgenwann die zugehörige Farbe und den Layer, dann machst Du aber weiter, jedesmal mit (setq CLIST (cdr CLIST)) bis CLIST leer ist.Wenn Du dann beim nächsten Element aus PLIST an die (while CLIST Schleife kommst gibt es CLIST nicht mehr!!!Also wird diese Schleife gleich übersprungen und Layer und Farbe ändern sich nicht!Du musst also ...
|
| In das Form Lisp wechseln |
