|
Lisp : Lisp-Routine um Attribute auf anderen Layer legen
cadffm am 28.09.2023 um 09:26 Uhr (1)
Zitat:Original erstellt von joern bosse:ist aber ungetestet und nur schnell hingetippt.@Lviden Code von Jörn musst du noch an einer Stelle anpassen, NACH der Zeile "(JB_Layer4Bem:vla-AttList vla-obj))" gehört noch eine Zeile " (setq n (1+ n))" hinein.
|
| In das Form Lisp wechseln |
 |
Lisp : Lisp funktioniert in ACAD - In Core Console nicht?!
JohannW. am 29.10.2013 um 13:51 Uhr (15)
Hallo,zuerst mein Vorhaben: Ich habe mir ein krudes Lisp gebastelt, dass mir den Dateinamen ausliest und den Namen des einzigen Layouts (minus der Dateiendung) damit befüllt. Also z.B:Dateiname: XX_XX_XXXX_XXX_BLABLABLA.dwgGewünschter Layoutname: XX_XX_XXXX_XXX_BLABLABLA EDIT: Natürlich ohne *.dwg!Es funktioniert auch einwandfrei, wenn ich es direkt aus AutoCAD aufrufe oder es mit einer Batch Datei über ein Verzeichnis jage.Sobald ich es aber von der Core Console abarbeiten lassen will, meldet es nur lapid ...
|
| In das Form Lisp wechseln |
|
Lisp : CSV-Datei mit LISP-Programm einlesen
Theodor Schoenwald am 12.02.2013 um 18:38 Uhr (0)
Hallo,hier ist eine Datei, die aus einer CSV-Datei Punkte zeichnet:;;-----------------------------------------------------------(defun C:IMPO (/ FILE ZEILE) (setq FILE (getfiled "Ordner" "" "" 2)) (if FILE (progn (setq FILE (open FILE "r")) (while (setq ZEILE (read-line FILE)) (command "_.POINT" (cadr (read (strcat "(" ZEILE ")")))) ) ;_ while (close FILE) ) (alert "Keine Datei ausgewählt!") ))(princ);;--------------------------------------------------Zu beachten ist welches Zeichen als Trenner verwen ...
|
| In das Form Lisp wechseln |
|
Lisp : Common Lisp - Funktionen überladen
toxot am 25.09.2009 um 09:57 Uhr (0)
... ich versteh Eure Haltung sehr gut, da ich selbst auch in ähnlicher Lage bin und auch meine Methoden hab, mit denen ich gut zurechtkomm.Die Logistik für eine solche Sache, die ohne Zweifel noch weit mehr Gegenargumente entkräften müßte, als Ihr erwähnt habt, wäre sicher keine Kleinigkeit.Mir scheint auch, dass Eingefleischte nicht unbedingt die richtigen Ansprechpartner sind, obwohl sie das entsprechende know-how haben.Ihr habt sehr viel Zeug und Eure Methoden (wie ich auch).Die Massenträgheit und der W ...
|
| In das Form Lisp wechseln |
|
Lisp : Variable in Lisp aus Excel
CADchup am 30.03.2006 um 13:12 Uhr (1)
Habe mir den Code mal angesehen.Du instanziierst (schönes Wort) unnötigerweise haufenweise Excel und seine Objekte ohne sie jemals wieder zu releasen.Für einen Durchlauf deines Codes genügtCode:(if (setq excel (vlax-get-object "excel.application")) (setq ExcelCells (vlax-get-property (vlax-get-property (vlax-get-property excel "ActiveWorkbook") "ACTIVESHEET" ) "CELLS" ) ) )um an das Zellen-Objekt zu kommen.Am Ende solltest du dannexcel und ExcelCells mit vlax-release wieder freigeben, damit ...
|
| In das Form Lisp wechseln |
|
Lisp : 2 Plotfiles mit einem Lisp erstellen
Obi-Wahn am 08.05.2008 um 19:35 Uhr (0)
Hi!Ich hab mal versucht das zu überprüfen, indem ich die ZeileCode:(if (= (getvar "limmax") "1189.0 841.0") (setq fmt "A0"))einfach in die Befehlszeile kopiert hab und ausgeführt hab.Als antwort hab ich nur ein nil bekommen.Schaut also so aus, als währs das.Aber wenn ich die ZeileCode:(getvar "limmax")eingebe, bekomm ich das Format (1189.0 841.0) retour.Wo liegt also der Fehler? Is für mich irgendwie unlogisch....Danke für die GeduldAndreas[EDIT]ich habs mal schnell umgesetzt, aber jetzt bekomm ich"Fehlerh ...
|
| In das Form Lisp wechseln |
|
Lisp : Script und Lisp in Zeichnung ziehen Fehler
cadffm am 26.07.2021 um 11:12 Uhr (1)
Die Anfrage wäre super wenn du zugleich geschrieben hättest wie es sich anders verhält (wie erwartet), wenndas Script ordentlich über Befehl: SKRIPT (SR) gestartet wird.Vorab: Mir fällt für keinen Fall ein warum es auf diesem Weg nicht funktionieren sollte ein Script auszuführen.Vielleicht liegt es ja garnicht am Script, sondern am Inhalt?Aber die Info für diese Rückschlüsse fehlen uns anderen hier aktuell.
|
| In das Form Lisp wechseln |
|
Lisp : Lisp-Zugriff auf neue Excel xlss, xlsm ...
Peter2 am 17.11.2011 um 14:42 Uhr (0)
Ich befürchte, irgendwann werden mich diese "neuen" Formate heimsuchen. Kennt jemand Ansätze oder Links oder Infos, die sich mit dem Thema befasssen?Sonnigen NachmittagPeter------------------Für jedes Problem gibt es eine einfache Lösung.Die ist aber meistens falsch. ;-)
|
| In das Form Lisp wechseln |
|
Lisp : Attribute sichbar schalten mit Lisp
CADmium am 16.07.2007 um 11:53 Uhr (0)
war das Teil nicht mit auf der CD drauf ? .. nun ja ... abgesehen davon, das du kein Recht auf Weiterveröffentlichung ( was du mit dem Post hier machst, deshalb koorrigiere ich mal!) hast, solltedas (vla-put-invisible ATT:vlax-false)so (vla-put-invisible ATT :vlax-false)heißen.Zum Tool ist zu sagen, dass nur die mit dem Gegenstück ATT-INVISIBLE unsichtbar geschalteten Attribute wieder sichtbar geschaltet werden. Toll übrigens, das mal n Feedback zu den dort veröffentlichenten Tipps und Tools kommt. Der ...
|
| In das Form Lisp wechseln |
|
AutoLisp : bildeigenschaften via lisp abfragen
fuchsi am 21.10.2003 um 10:53 Uhr (0)
sorry noch ne kleine ergänzung, der U-vektor ist nur der vektor eines einzigen pixels ! und nicht der bildbreite im GC13 hast du eine liste aus (xPixel und YPixel) dir berrechnung ´des rechten oberen punktes läuft dann so (setq en1 (car (entsel))) elementname image (setq ed1 (entget en1)) elemtdaten image (setq LiUn (cdr (assoc 10 ed1))) einfügepunkt (setq u (cdr (assoc 11 ed1))) u-vektor (setq u1 (polar LiUn 0 (car u))) (setq u1 (polar u1 (/ pi 2.) (cadr u))) u-punkt abs ...
|
| In das Form AutoLisp wechseln |
|
Lisp : blöcke in lisp-funktion am cursor
marc.scherer am 02.11.2006 um 13:54 Uhr (0)
Hi Jan,quark. Es bleibt immer was anderes.Guckst Du dieses Konstrukt:Code:(defun !n50r7 (blockname /) (command "_.-insert" blockname pause "" "" ""))(if (not (VL-CATCH-ALL-ERROR-P (vl-catch-all-apply !n50r7 (list "uh")) ) ) (setq insertedblock (entlast)) (progn (setq insertedblock nil) (alert "Fehler bei Einfügung!") ))Damit hast Du immer nen definierten Zustand. Selbst wenn der User abbricht hast Du kein Error-Handling-Problem.------------------Ciao,Marc [Diese Nachricht wurde von marc.sc ...
|
| In das Form Lisp wechseln |
|
Lisp : Lisp befehl der Copy (acad.pgp) ausführt
wronzky am 27.01.2011 um 11:25 Uhr (0)
Wenns nicht geht: Zitat:Some typical reasons for returning nil are source-file is not readable source-file is a directory append? is absent or nil and destination-file exists destination-file cannot be opened for output (that is, it is an illegal file name or a write-protected file) source-file is the same as destination-fileGrüsse, Henning------------------Henning JesseVoxelManufakturComputer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Lisp wechseln |
|
Lisp : Aus Lisp ein BAT starten und darauf warten
Peter2 am 14.12.2010 um 12:44 Uhr (0)
Zitat:Original erstellt von Sanru:Könnte dir vielleicht noch DosLib mit dem Befehl dos_exewait helfen.Auch das klingt gut, danke. Ein Problem könnte es aber damit geben, dass im Handbetrieb der Druckertreiber (PDF XChange) von selbst noch Optimierungsroutinen laufen lässt, wenn AutoCAD mit dem Druck schon fertig ist. Also ist vielleicht das ohnehin erfolglos, wenn man zwar den Druckbefehl selbst überwacht, aber das dritte Unterprogramm noch was macht ....Wir werden sehen.Peter------------------Für jedes P ...
|
| In das Form Lisp wechseln |
