|
AutoLisp : Drehwinkel von BKS
CAD-Huebner am 04.03.2006 um 12:13 Uhr (0)
Vorgestern abend war es schon so spät - da hats nur für ein Ja gereicht. Hier mal ein LISP-Programm für diesen speziellen Fall.Für Allgemeinfunktionalität muss zuvor noch die Drehung um die Z-Achse bestimmt werden und die Verschiebung des BKS Ursprungs berücksichtigt werden.Code:; Udo Hübner alias CAD-Huebner für CAD.de Beitrag:; http://ww3.cad.de/foren/ubb/Forum145/HTML/001558.shtml ; 3.3.2006;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;(DEFUN C:UCSROTATION ( / ); Xdir Ydir) ; Unterfunktionen (D ...
|
| In das Form AutoLisp wechseln |
|
Lisp : AutoCAD 2009 und UNDOCTL
archtools am 08.05.2008 um 19:58 Uhr (0)
Zitat:Original erstellt von archtools: Das erklärt die Totalabstürze bei VLX-Programmen, die diesen Code nutzen. Das ist ein ernstzunehmender Bug, wenn es sich nicht um eine angekündigte Änderung des Verhaltens von undoctl handelt. Bei älteren AutoCAD Versionen steht undoctl auf 5.Mit dem Aufruf über eine C:TEST Funktion wollte ich prüfen, ob AutoCAD 2009 eventuell neuerdings selbst Undo-Gruppen öffnet, wenn ein Lisp-Befehl aufgerufen wird. Daran liegts also nicht.Hier der Auszug aus der Online-Hilfe von ...
|
| In das Form Lisp wechseln |
|
AutoLisp : xlspl ??? wie sieht denn die liste aus ?
Brischke am 15.03.2006 um 10:58 Uhr (0)
Hallo philipp,dann bastel dir doch eine XSLT, die das Zeugs in eine Lisp-Datei schreibt. LSP sind nur ASCIIs, was dann also mit dem Saxon-Transformator möglich sein sollte.Ich kann mir in diesem Zusammenhang aber auch eine Transformation in eine DXF-Datei vorstellen. Oder eine PHP, die dann eine DXF erzeugt. Damit wärst du Plattformunabhängig und die Geometrie kann in allen möglichen CAD-Systemen angezeigt werden.Oder du machst (wie scheinbar geplant) eine Transformation in das Punkte und Linien-Sysem. Dan ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : DCL - nesting
Brischke am 29.03.2005 um 14:27 Uhr (0)
Hallo Kenny, es gibt im Lisp keine verschachtelten Dialoge. Jedes Dialogfenster wird einzeln für sich betrachtet. Man kann jedoch einen Dialog starten und daraus einen weiteren, ohne den ersten zu beenden. Dazu ist folgendes Vorgehen notwendig Das gesamte Dialogfensterhandling wird in eine While-Schleife gepackt. In dieser wird der Wert der Variablen geprüft, welche vom (done-dialog #) zurück gegeben wird. Dieser ist der Rückgabewert aus (start-dialog). (while ( DCLSTATUS 1) (action-tile NEXT (done-dial ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : (command "_.line" pkt " lot" li)
Brischke am 20.01.2004 um 11:30 Uhr (0)
Hallo Jan, Die Fehlermeldung in der Befehlszeile, die beim Ausführen deiner Zeile erscheint sagt dir eigentlich ziemlich genau, wo der Fehler liegt. Punkt oder Optionstitel wird benötigt Du übergibst jedoch einen Elementnamen. Du musst nicht rechnen, sondern einen Punkt auf der Linie übergeben, das Lot sucht die Funktion dann selbst. (setq li (cadr (entsel)) sollte funktionieren. Hier im Forum oder auch in Rund um AutoCAD wurden bereits öfter die Vorzüge und Nachteile der (command-Programmierung diskutie ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : durch ersetzen
tappenbeck am 22.10.2004 um 12:56 Uhr (0)
hi ! ich möchte aus einer dos-pfadangabe eine LISP-konforme schreibweise machen und hierfür aus = zu machen ! hierfür nutze ich eine replace-funktion (siehe unten), die eigentlich funktioniert. vielmehr habe ich das problem mit den -zeichen. wäre klasse, wenn mir jemand von euch weiterhelfen könnte. Gruß Jan :-) hier der code (DEFUN rprof$replstr ;suchen und ersetzen eines Strings (line ;Zeichenkette oldstr ;alter String newstr ;neuer String / iline idx ;Replace Old Str ...
|
| In das Form AutoLisp wechseln |
 |
Lisp : Mehrere .DSD Publizieren / Abfrage Publizierstand
Archäologie Bubi am 18.10.2021 um 08:22 Uhr (15)
Hallo ForumIch arbeite zurzeit an einer Lisp, die für mehrere Ordner, jeweils alle DWGs pro Ordner, in eine eigene Multi-Sheet .DSD-Datei schreibt.Soweit so gut und funktional.Im Anschluss werden die zuvor erstellten .DSD-Dateien mit (command "_-PUBLISH") publiziert.Ab der zweiten DSD gibt mir AutoCAD aber aus, dass bereits ein Publiziervorgang läuft und kein zweiter gestartet werden kann.Wie könnte man den Status des Publiziervorgangs abfragen, um die nächsten Dateien erst dann zu starten, wenn der Vorgan ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Befehle bei jeder Zeichnung und nur beim Start
autocart am 29.07.2004 um 15:43 Uhr (0)
Hallo Sebastian, hab ich mich echt so unverständlich ausgedrückt?? Ich will, wenn ACAD started, ein externes Windows Programm (punkt.exe) ausführen. Das ginge zwar mit acad.lsp, wenn ich diese Lisp-Datei nicht mit jedem Öffnen einer Zeichnung ausführen würde (sondern nur beim Start von ACAD). Da ich acad.lsp aber absichtlich bei jedem Öffnen einer Zeichnung erneut ausführen lasse, würde auch punkt.exe jedesmal in einer neuen Instanz ausgeführt werden, sodass ich am Ende eines arbeitsreichen Tags 50 punkt. ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Variable mit Backslash speichern und wieder einlesen
archtools am 03.10.2023 um 14:59 Uhr (1)
Zitat:Original erstellt von Meldin:Und mit meinem Vorschlag würde sie so aussehen.Macht doch kaum einen Unterschied (N_KOMMA_L . "2")(PRAE_L . "")Ich verwende praktisch nie Dotted Pairs für meine Datenhaltung. Sinn macht das doch sowieso nur dann, wenn man wie in den DXF-Daten der Entities auch Listen als Daten haben will, und sich dafür den Overhead eigener Listen sparen will. Man kann sowohl auf (8 . "MYLAYER") als auch auf (10 1 2 3) gleichermaßen mit CDR zugreifen, und kriegt im einen Fall den Layernam ...
|
| In das Form Lisp wechseln |
Layerliste_furMegaCAD_1_.txt |
Lisp : Liste erstellen, ergänzen und Elemente hinzufügen und sortierensortieren
Werner-Maahs.de am 16.08.2017 um 08:44 Uhr (1)
Hallo Björn, danke nochmals für Deinen Einsatz. Leider hattest Du recht, die MC-Nummerierung passt nicht zu den Layern. Was ja auch mein eigentliches Problem darstellt.Ich habe mal 2 Textdateien heruntergeladen die dieses Problem vielleicht verdeutlichen. Die erste Datei habe ich mit meiner schon vorhandenen Routine erstellt. Hier stimmt zwar die Zuordnung der MC-Nummerierung aber die Zeilen sind nicht sortiert und es sind keine Gruppenköpfe eingefügt.Die 2. Datei habe ich mit Deiner Routine geschrieben, i ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Ersetzen über Lisp
tom.berger am 18.06.2004 um 15:44 Uhr (0)
Zitat: Original erstellt von Kleiner_pally: Danke tom, aber ich wüsste 1. nicht wie ich es umschreiben könnte und 2. keine Ahnung wo ich hinschreiben kann (z.B. old=%%225 new=ß) sowas in der art suche bz.w brauche ich. In der Bemaßung muss es nicht unbedingt sein... aber MTEXT und Text wäre super Oben im Kommentar des Programms steht doch drin, wie es aufgerufen wird (das Beispiel oben war für die Umsetzung des DOS-Zeichensatzes nach Windows bzw Unix): (GSR nil ( ( alt1 neu1 ) ( alt2 neu2 ) ...
|
| In das Form AutoLisp wechseln |
|
Lisp : schriftfelder via lisp (ac2005)
marc.scherer am 25.08.2009 um 11:31 Uhr (0)
Hi cadplayer,zum Thema "Textposition für automatische Beschriftung von Linien (Polylinien, Bögen usw.)" solltest Du Dir mal unbedingt die Funktionen die mit "vlax-curve" beginnen anschauen. Da kann man ne Menge Sachen bezogen auf das "Kurven Objekt" (Linien, Polylinien, Bögen usw.) ermitteln.Beispiel:Code:(defun MITTEL-PKT? (ENAME /) (setq ENAME (-VLA-OBJECT ENAME)) (vlax-curve-getpointatdist ENAME (/ (vlax-curve-getdistatparam ENAME (vlax-curve-getendparam ENAME) ) 2.0 ) ))(defun -VLA-OBJ ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Reihenfolge im Programmablauf nicht logisch!
RSt-Stahl am 13.08.2005 um 18:04 Uhr (0)
Hallo zusammen,habe mal etwas weiter herum gebastelt. Habe jetzt mal "Alerts" eingebaut damit man sieht das er das Programm nicht von oben nach unten abarbeitet. Kann es vieleicht damit zusammenhängen das alle Befehle ausser der Command Befehl Lisp befehle sind und der Command Befehl ein AutoCAD Befehl ist? Wenn man jetzt zum testen einen Bogenvermasst sieht man das er den Command Befehl "hintenan" hängt.Hier nochmal mein aktueller Programm Code: Gruß Thomas(defun c:bodim (/ PT1 PT2 CEN ma PT3 a1 a2 a ...
|
| In das Form AutoLisp wechseln |
