|
Lisp : Daten von verschachtelten XData auslesen
mAciD am 18.12.2008 um 14:55 Uhr (0)
Hallo Leute,ich möchte gerne in Blöcke Punkte einbauen, und diese mit div. XData versehen damit ich sie später nach diesen Attributen aus der Zeichnung lesen kann und somit ihre Koordinaten verwenden kann.Ich bin schon so weit, die Punkte zu erstellen. Ich habe ihnen auch einen eindeutigen Text zugewiesen. Gruppencode 1000.Diese Punkte kann ich auch finden, aber nur wenn sie nicht in einem Block stecken.Ich kann via entget vom Block die Daten ansehen, aber wie komme ich an die Block-Unterelemente ran.Also ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Aufbau DCL-Masken
mapcar am 05.09.2005 um 23:32 Uhr (0)
So, nun habe ich mal Zeit gehabt, mir das auszupacken und anzusehen.Zunächst mal ein paar Erläuterungen: In allen möglichen Programmiersprachen gibt es globale Variablen und lokale Variablen. Wenn man mal von komplizierteren Mechanismen wie Packages und Namespaces absieht, bedeutet das: Globale Variablen sind immer und überall sichtbar, lokale Variablen ausschließlich in der Funktion, in der sie deklariert werden. Und dann gibt es noch eine dritte Variante - da mir keine bessere Bezeichnung einfällt, nenne ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Mit Lisp Blöcke auslesen und Teile des Inhalts in Textzeilen abbilden
joern bosse am 26.11.2024 um 08:11 Uhr (1)
Hallo 100dpi,ich habe auch mal ChatGPT gefragt was mein Code so alles macht, eine erstaunlich gute Erklärung (finde ich):Erkläre mit bitte folgenden AutoLISP-Programmcode:(defun TextMitteZentrisch (ename / P VLA-OBJ)(setq vla-obj (vlax-ename-vla-object ename))(setq p (vla-get-InsertionPoint vla-obj))(vla-put-alignment vla-obj 10)(vla-move vla-obj (vla-get-InsertionPoint vla-obj)p)(vla-update vla-obj))ChatGPT:ChatGPTDieser AutoLISP-Code definiert eine Funktion namens TextMitteZentrisch, die darauf abzielt, ...
|
| In das Form Lisp wechseln |
|
AutoLisp : rtos - Error?
Zweistein am 07.07.2005 um 14:12 Uhr (0)
Hallo! Das folgende Lisp-Modul soll Messpunkte aus einer *.txt lesen und auswerten. Dabei sollen Attribute eines Blocks mit den Einzelinformationen Punktnummer, x-Wert, y-Wert,z-Wert,bestückt werden. Wenn z.B. pkt-re (atof (substr zeile 14 11)) an den Block übergeben wird, dann habe ich zu viele sichtbare Nachkommastellen in den Attributen eingetragen. = mein Versuch mit (setq pkt-re (rtos (atof (substr zeile 14 11)) 2 3)) führt zwar zu dem gewünschten Format, jedoch scheint rtos hier falsch umzurec ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Layer die eine Farbe haben eine andere Farbe sowie eine Linienstärke zuweisen
-ikarus- am 25.04.2014 um 07:24 Uhr (1)
Hab noch was ergänzt.Das Lisp schreibt jetzt erst ein Sicherungs DWG raus.Außerdem kann kann man den INI Pfad angeben.Code:; mit dem Viewer http://www.noliturbare.com/plot-print/print-ctbs-and-more die CTB in eine *.INI speichern; und in der letzten Zeile der INI ENDE eintragen(princ "
Am Ende der INI in die letzte Zeile bitte ENDE eintragen konvlayer" )(defun parse_nums (st / a k lst)(setq k 1)(setq a "")(setq lst nil)(repeat (strlen st)(if (= (substr st k 1) " ")(progn(setq lst (append lst (list a)))(set ...
|
| In das Form Lisp wechseln |
|
Lisp : Mtext mit Führung umrechnen
cadffm am 23.06.2021 um 23:01 Uhr (1)
Hi,zunächst: Der Code sollte an und für sich funktionieren!"Leider werden die MText mit Führungslinie bei der ersten Auswahl völlig fasch berechnet, denn es wird der Wert der vorgegeben Konstanten eingesetzt."Das mag im Ergebnis so aussehen, aber ich bin GANZ sicher es wird das Ergebnis von (atof (cdr(assoc 1 OBJEKTDATEN))) zu dem Wert von Z1 addiert,also muss der Wert von Z2 nicht das von dir erwartete sein, nämlich 0."Ich habe hier gelesen das es sich bei meinem Mtext um einen manipulierten Text handelt. ...
|
| In das Form Lisp wechseln |
|
Lisp : Blinkendes Zeichnungs-Objekt
benwisch am 17.02.2009 um 10:46 Uhr (0)
Zitat:Was meinst du aber mit "Siehe hierzu auch die Hilfe "Visual Basic Referenz bzgl. dem Argument BUTTONS (z.B. hier vbQuestions)"?Auszug aus der Visual Basic Referenz Zitat:Das Argument buttons hat die folgenden Einstellungen:Konstante Wert Beschreibung vbOKOnly 0 Nur die Schaltfläche OK anzeigen. VbOKCancel 1 Schaltflächen OK und Abbrechen anzeigen. VbAbortRetryIgnore 2 Schaltflächen Abbruch, Wiederholen und Ignorieren anzeigen. VbYesNoCancel 3 Schaltflächen Ja, Nein und Abbrechen anzeigen. VbYesNo 4 ...
|
| In das Form Lisp wechseln |
|
AutoLisp : viel Blöcke ersetzten durch einen
SebZ am 24.02.2005 um 12:28 Uhr (0)
Hallo miteinand, habe mir mittlerweile die verschiedenen Bausteine hier im Thread runtergeladen und erste Erfahrungen gesammelt. Im Lisp BLOCK_NEW_BASISPUNKT_AUTO (BNBA) hab ich folgende Verallgemeinerung eingebaut (***** = geänderte Zeile): (defun C:BLOCK_NEW_BASISPUNKT_AUTO ( / AWS OBJEKT OBJEKTDATEN NAME ORIGIN ROTATION SKALIERUNG MOD1 MOD2 #el#) (startErrorHandler BLOCK_NEW_BASISPUNKT T (( cmdecho 0)( expert 0) ( HIGHLIGHT 1)( OSMODE 639)( ATTREQ 0))) ***** (setq Sch ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Reaktor für :VLR-endDwgOpen
mapcar am 17.12.2004 um 23:46 Uhr (0)
Hi Torsten, die Frage passt gut in die Weihnachtszeit - das ist nämlich was, wo auch keiner so richtig dran glaubt;-) Schau dir das kleine Beispielprogramm an: Es werden ein paar charakteristische DWG -reaktoren gesetzt. :vlr-beginClose funktioniert erstmal problemlos, aber :vlr-beginDwgOpen und :vlr-endDwgOpen feuern überhaupt nicht (weder in der bisherigen noch in der neuen Zeichnung). Möglicherweise tun die nur in persistenten Reaktoren was, aber kein Mensch macht sich mehr Gedanken über persistente Re ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Block mit Attribut mit Inhalt eines anderen Blockes füllen (Indexfeld)
riqo am 08.12.2017 um 09:47 Uhr (1)
Liebe Community,Nachdem ich schon häufig auf den Seiten der CAD-Foren auf Lösungen zum Thema "AutoCAD" gestoßen bin, wurde es nun mal Zeit, mich hier anzumelden und "Hallo!" zu sagen.Nichtsdestotrotz benötige ich eure Hilfe zum Thema "Datenextraktion" aus einem Block, in diesem Falle einen Index-Block ( mit Eintragung des letzten Index-Eintrags in einen anderen Block (Plankopf). Hintergrund ist der, dass im Büro zunächst das Index-Feld ausgefüllt wird, aber hinterher vergessen wird, den entsprechenden Eint ...
|
| In das Form Lisp 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 |
|
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 |
