|
Lisp : ssget und Punkte außerhalb der Ansicht
Bernd10 am 11.01.2005 um 08:58 Uhr (0)
Hallo Stephan, Zitat:Original erstellt von autocart:was meinst du mit mathematisch die Objekte ermitteln?Vielleicht hilft Dir dabei mein beigelegte Lisp-Funktion. Hier ein Beispiel für deren Verwendung:(setq lpktreflu (list 0.0 0.0 0.0)) ; Punkt links/unten(setq lpktrefro (list 100.0 100.0 0.0)) ; Punkt rechts/oben(setq lboxref nil) ; Referenzfläche(setq lboxref (append lboxref (list lpktreflu)))(setq lboxref (append lboxref (list lpktrefro))) (setq lpktvgllu (list 20.0 20.0 0.0)) ; Punkt link ...
|
| In das Form Lisp wechseln |
 |
Lisp : VLisp-Editor / Bei Fehler unterbrechen
Bernd10 am 01.02.2018 um 13:46 Uhr (1)
Hallo Meldin,danke für Deine Antwort.Zitat:Original erstellt von Meldin:und teste dann mal (MYUTIL "Test") in Acad nicht aus dem VLIDE und siehe was passiert.Ich habe nun Deinen Programmcode in eine Lisp-Datei kopiert, diese geladen und in der Befehlsziele in Mechanical 2017 die Funktion entsprechend ausgeführt (siehe Anlage). Dabei passiert dann Folgendes:1.) Es wird automatisch in den VLisp-Editor gesprungen.2.) Der Debug-Lauf wird angehalten, wobei ich jetzt noch nicht die fehlerhafte Stelle im Programm ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Command
Bernd10 am 28.02.2005 um 16:05 Uhr (0)
Hallo, Zitat: Original erstellt von CADmium: OK: einen kleinen: nach der Analyse der Datei overkill.lsp , die Datei overkillsup.lsp öffnen .. die Argumente der Funktion acet-overkill2 angucken und diese dann in deiner LSP mit der entsprechenden Liste ( - alst ) aufrufen. ich habe folgendes in meinen Lisp-Code hinzugefügt: (setvar peditaccept 0) (setq palle (ssget x )) (setq rfuz 0.00001) (setq lignorieren (list 390 ; PlotStyleName 370 ; Lineweight ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Fehler Systemvariable dimblk1
Bernd10 am 14.11.2012 um 13:53 Uhr (0)
Hallo cadffm,Zitat:Original erstellt von cadffm:Was zeigt denn Bild1 für einen Zustand/Stil/Zeitpunkt undwas zeigt Bild2 (wobei hier wohl eher 3 gemeint ist ja ?)Ja, Bild 3 ist gemeint. Die Beschreibung in den roten Rechtecken ist unterschiedlich. Daraus schließe ich, dass sich der Bemaßungsstil von vorher (= Bild 1) zu nachher (= Bild 3) geändert hat, obwohl ich nur die vorgeschlagenen Einstellungen mit OK bestätitgt habe.Zitat:Original erstellt von cadffm:[BDafür müßte ich erst das Problem kennen und das ...
|
| In das Form Lisp wechseln |
|
AutoLisp : acad_strlsort
Bernd10 am 10.05.2004 um 11:26 Uhr (0)
Hallo Achim, Zitat: Original erstellt von Dabrunz: Code: .. ((and (or (= ibuken1 4) (= ibuken2 4)) (or (= ibuken1 3) (= ibuken2 3))) (setq svglwinexpl t) ; -- das ist unnötig - siehe (1) ) .. Diesen bisherigen Code habe ich wie folgt ersetzt: ((and (= ibuken1 4) (= ibuken2 3)) (setq svglwinexpl t) ) ((and (= ibuken1 3) (= ibuken2 4)) (setq svglwinexpl nil) ) Zitat: Original erstellt von Dabrunz: Versuche hiermit einmal ( 1 7 _ - 1 : 0 ) ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : Plotten / Beschriftungs-Maßstab / Plotmaßstab
Bernd10 am 06.11.2008 um 10:18 Uhr (0)
Hallo,ich bekomme beim Befehl Plotten folgende Meldung:Der Beschriftungs-Maßstab entspricht nicht dem Plotmaßstab. Wollen Sie fortfahren?Inzwischen habe ich in der Objekteigenschaften von "Gedrehte Bemaßung" (= DIMENSION) festgestellt, dass es unter Sonstiges die Eigenschaften Beschriftung und Beschriftungs-Maßstab gibt. Dort ist der Wert für Beschriftung = Nein und für Beschriftungs-Maßstab = 1:1. Beim Befehl Plotten ist der Wert für Plotmaßstab 1=25. Wenn ich es bis hierher richtig verstanden habe, erklä ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : Funktion AnsiToOem
Bernd10 am 17.07.2008 um 15:27 Uhr (0)
Hallo Anton, Zitat:Original erstellt von fuchsi: Kapier ich nicht.Wieso soll man [b]+ - = _ umschlüsseln. Die sind doch eh in beiden Systemem gleich, oder nicht ?Zumindest wärs mir noch nie anders aufgefallen.[/B]Du hast recht. Ich habe inzwischen diese C++-Funktion geschrieben, die die Datei in der Anlage erstellt:void CDateiExport::TabelleAnsiToOem(){ // Der Tabelle die Überschriften entsprechend dem Lisp-Format hinzufügen CStringListDbh strlTabelle; strlTabelle.AddTail("[ASCII-Zeichen Windows - DOS]"); ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Befehl Plot / Plotter SHPGL
Bernd10 am 20.12.2004 um 16:30 Uhr (0)
Hallo cadffm, Zitat: Original erstellt von cadffm: Wenn deine Analyse mit dem wenn kein Objekt.. stimmt !? Sicher bin ich mir dabei nicht. Zitat: dann wohl nur indem du immer ein Objekt zur Verfügung stellst! Ich gehe mal davon aus das du das im Batchlauf erstellst !? -dann wäre es mehr oder minder ein leichtes.. Ich mache es eigentlich in Lisp. Da der Systemfehler auch kommt, wenn ich die Ploteinstellungen per Hand beim Befehl Plot verwende, habe ich es hier gepostet. Zitat: - ...
|
| In das Form Rund um Autocad wechseln |
 |
Lisp : Sonderzeichen aus edit_box ermitteln
Bernd10 am 30.10.2013 um 10:56 Uhr (1)
Hallo,ich bin jetzt einen Schritt weiter. Aus firmeninternen Gründen besteht unser Text aus Einzelbuchstaben, die zu einem Block zusammengefügt und als Objekt Insert in der Zeichnung verwendet wird.Ich habe deshalb im ersten Schritt die Unicode-Zeichen so in meinem Lisp-Code berücksichtigt:(setq cbust (substr ctxt izler 1)) ; Buchstabe(if (and (= cbust "") (= (substr ctxt (+ izler 1) 1) "U") (= (substr ctxt (+ izler 2) 1) "+")) ; Unicode berücksichtigen (progn (setq ilenunicode 7) (setq cbust (substr ctx ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehl Zurück (_undo)
Bernd10 am 15.10.2008 um 13:26 Uhr (0)
Hallo Heiko, Zitat:Original erstellt von Dorfy:Kannst ja mal munter Haltepunkte verteilen und UNDOCTL überwachen...ich habe durch die Kontrolle von UNDOCTL festgestellt, dass es an meinen geschachtelten Befehlen liegt, d.h. ich rufe in Befehl1 auf den Befehl2 auf (siehe unten). Dadurch verändert sich UNDOCTL von 57 auf 49 und dann werden die Lisp-Ausdrücke in die Liste des Zurück-Befehls eingetragen.( defun c:Befehl1 ( / ) ; Den Beginn der Gruppe für den AutoCAD-Befehl "zurück" setzen (vla-startundomark ( ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Befehl Umgrenzung / Meldung
Bernd10 am 29.01.2018 um 10:00 Uhr (1)
Hallo Michi, hallo Robert,danke für Eure Antworten.Zitat:Original erstellt von Fiedelzastrow:Ansonsten hilft auch manchmal das verändern des Bildausschnittes.Verschiedene Bildausschnitte habe ich bereits vor meinem Beitrag getestet, leider ohne Erfolg. Deshalb habe ich das dann als Grund ausgeschlossen.Zitat:Original erstellt von Fiedelzastrow:sind beide Objekte auf der gleichen Höhe (Z-Ebene)?Das habe ich auch schon vor meinem Beitrag untersucht. Dabei habe ich die Kommastellen der Einheiten auf das Maxim ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : Dateien overkill.lsp und overkillsup.lsp
Bernd10 am 09.10.2012 um 15:53 Uhr (0)
Hallo,ich habe bisher unter AutoCAD Mechanical 2009 folgenden Programmcode verwendet, um doppelte Objekte zu entfernen: (load "acettest.fas" "Fehler beim Laden") (load "acetutil.fas" "Fehler beim Laden") (load "acetutil2.fas" "Fehler beim Laden") (load "acetutil3.fas" "Fehler beim Laden") (load "acetutil4.fas" "Fehler beim Laden") (load "overkill.lsp" "Fehler beim Laden") (load "overkillsup.lsp" "Fehler beim Laden") (setq rfuz (acet-overkill-fuz-get)) (setq lignoriere ...
|
| In das Form Lisp wechseln |
|
Lisp : Befehl _.-group / Hinzufügen
Bernd10 am 23.11.2020 um 15:43 Uhr (1)
Hallo an euch beide,leider besteht der Fehler auch mit der englischen Option.1. Version ---------------------------------------------------------------------------Lisp-Befehl:(command "_.-group""_add" cgruppename pgruppe "") ; HinzufügenGrößerer Asschnitt im Textfenster bei der Ausführung in meiner VLX-Anwendung:Befehl: _.-layerAktueller Layer: "AW-A_schwarz250!42.41.42!RALCLASSIC$RAL9017"Option eingeben [?/Machen/SEtzen/Neu/Umbenennen/EIN/AUS/FArbe/Ltyp/LStärke/TRansparenz/MATerial/Plot/PStil/Frieren/Taue ...
|
| In das Form Lisp wechseln |
