|
Rund um AutoCAD : Ojekteigenschaft Drehung aus Blockattribut übernehmen
Andreas Kraus am 07.01.2011 um 14:58 Uhr (0)
Hallo Thomas,mit diesem Lisp sollte das gehen:(defun c:insrot_attwert () (vl-load-com) (if (setq satz (ssget ((0 . "INSERT") (66 . 1)))) (progn (setq n (1- (sslength satz))) (repeat (sslength satz) (setq ent_data (entget (setq ent_name (ssname satz n)))) (setq att_data (entget (setq att_name (entnext ent_name)))) (while (/= (cdr (assoc 0 att_data)) "SEQEND") (print (cdr (assoc 2 att_data))) (if (= (strcase (cdr (assoc 2 att_data))) "ROTATION") (progn (setq ent_data (subst (cons 50 ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Bemassung
oic59 am 22.09.2004 um 13:57 Uhr (0)
Hallo Berliner, 1. ACAD 2005 (pur)ohne SP 2. Versuche mal das Problem genauer zu beschreiben. Die Zeichnung war das Ergebnis wie es aussehen sollte (händisch erstellt). Eigentlich suche ich eine Kombination zwischen Linearer und Koordinatenbemaßung. In dem liniearen Stil kann ich die Vertikale Bemassung so einstellen dass alles so fuktioniert wie es sollte, allerdings ohne die Vorzüge der Koordinatenbemaßung, daß ich einen Messpunkt nur einmal anzufassen brauche. In der Horizonalen Bemassung kann ich (ode ...
|
| In das Form Rund um Autocad wechseln |
|
Makro Programmierung : Skizze erstellen: Unzulässiger Aufruf einer Aktionsroutine
holt am 23.06.2006 um 14:39 Uhr (0)
Hallo,ich habe ein Problem beim Erstellen einer Skizze in einer LISP-Funktion: (defun ...)(sd-am-create-sketch :name "Skizze1" :owner_type :current-sheet)-Fehler "Unzulässiger Aufruf einer Aktionsroutine"Der gleiche Befehl funktioniert innerhalb einer local-function eines Dialogs.In der Eingabezeile von Annotation wird auch der Fehler ausgegeben.(oli::sd-am-create-sketch :name "Skizze1" :owner_type :current-sheet)Ich habs auch bereits mit (sd-call-cmds (AM_SKETCH_CREATE :owner :current-sheet :sketch_name " ...
|
| In das Form Makro Programmierung wechseln |
|
CoCreate Programmierung : Ausgaben von Makro time
holt am 01.07.2013 um 08:48 Uhr (0)
Hallo,weiß jemand, wie man die Ausgaben des Makros time richtig interpretiert?Das Makro gibt die abgelaufene Zeit für die Abarbeitung einer Funktion im Konsolenfenster in real time und run time aus.Die real time macht offensichtlich immer ganze Sekunden-Sprünge.z.B.:(time (setq conf-props (sd-inq-configuration-props irgendeine-config)))real time : 1.000 secsrun time : 0.124 secs(time (sd-call-cmds (CoCreate_Part_Group_Feat ...))real time : 0.000 secsrun time : 0.016 secsWoher kommts, dass die real time imm ...
|
| In das Form CoCreate Programmierung wechseln |
|
Rund um Autocad : Befehl heilen aus einem lisp funktioniert bei mir nicht
geigei am 27.04.2004 um 11:36 Uhr (0)
Zur Aufkärung: ich Arbeite mit SOFIcad dort gibt es den Befehl TRIMMEN , dieser verbindet zwei Linien, die nicht in einer Flucht liegen miteinander, in einem gemeinsamen Schnittpunkt. Ich habe festgestellt, dass es diesen Befehl (in dieser Form) bei Autocad nicht gibt. Ich habe nochmal eine DWG mitgeschickt, um klarzustellen was ich für einen Befehl suche. ... Der Befehl soll nichts mit dehnen oder stutzen oder wie auch immer zu tun haben; Der Befehl soll so funktionieren: Ich betätige den Befehl Ich wähl ...
|
| In das Form Rund um Autocad wechseln |
 |
Rund um AutoCAD : Xref Pfad per Lisp Ändern
cadplayer am 24.11.2016 um 09:51 Uhr (15)
vielleicht wäre das ein Ansatz, ich hab mir jetzt nicht die Mühe gemacht den gesamten Thread durchzulesen...Code:;;Written by Clinton Cogswell;;November 19, 2013(defun c :xReplace ( / sFullPath ) (vl-load-com) (setq oldPath (getstring t "
Enter Existing Path to be replaced: ")) (setq newPath (getstring t "
Enter New path: ")) (vlax-for x (vla-get-Blocks (vla-get-ActiveDocument (vlax-get-acad-object) ) ) (if (eq :vlax-true (vla-get-isXref x)) (progn (setq sFull ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : 3D-Strecken 2 mal Fensterauswahl
jupa am 15.01.2014 um 07:02 Uhr (15)
Hallo Siegfried, mein Gedanke dazu wäre, über das Macro zwei Operationen nacheinander auszuführen (Verschieben der Unterobjekte und Verschieben der Blöcke), wobei jedesmal die gleichen Eingabewerte für Auswahlfenster und Streckvektor benutzt werden. Nur um das Prinzip zu testen als LISP-3Zeiler (sehr grob and dirty):(defun c:3D-Strecken () (setq p1 (getpoint "
Erster Eckpunkt Auswahlfenster")) (setq p2 (getpoint "
Zweiter Eckpunkt Auswahlfenster")) (command "subobjselectionmode" "0")(command "_move" "_s ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : (setenv PrinterStyleSheetDir ... erst nach Neustart, _options sofort???
Peter2 am 07.02.2006 um 15:44 Uhr (0)
Thomasdas "Setzen" geht schon - aber der Druckbefehl reagiert nicht drauf. Mache dir einmal eine "test.ctb" - alles schwarz, alles dünn, und speichere sie in D:dünn. Dann mache dir eine "test.ctb" - alles bunt, alles dich, und speichere sie in D:dick. Dann schalte die Pfade um - bei mir reagiert das Programm nur bis zum Druckbefehl, dann nicht.Nachtrag: Nach dem Umstellen per Lisp reicht es, wenn ich "Eytras - Optionen - (Register Dateien) - OK" drücke. Etwas seltsam, aber dann hat er es geschluckt.Peter-- ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : nur teile eines String
tom.berger am 03.06.2004 um 18:16 Uhr (0)
Zitat: Original erstellt von CADmium: na wenn dann so (der Allgemeingültigkeit wegen ) [...] da Verzeichnisse in Lisp durch "" oder "/" getrennt werden können. Wo Du Recht hast, hast Du Recht :-) Und dann wird es natürlich auch Zeit für die allseits beliebte String- LIST Funktion mit beliebigem Trennzeichen: (defun string- list (string separator) (while (vl-string-search separator string) (setq string (vl-string-subst "" "" separator string)) ) (read (strcat "("" string "")")) ) Un ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Hilfe lisp Programm
carmelli76 am 13.03.2005 um 11:58 Uhr (0)
hallo elesta, wie marc schon sagt und ich auch schon vermutete, kannst du die zeichen nicht einfach weglassen und dann läuft es. du musst stattdessen programmcode einfügen! dazu sind zumindest minimale programmierkenntnisse nötig, siehe hierzu die bereits genannten seiten von mapcar. falls du komplett fertigen code suchst, dann benutze mal hier im forum die suchfunktion, vieles war so oder so ähnlich schon da bzw. es stellen einige nette menschen (die sich unter anderem auch hier im forum herumtreiben) au ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : LW-Poly -> AcDb2dPolyline
Arcuso am 09.08.2011 um 08:09 Uhr (0)
Guten Morgen Geos !Ich will versuchen, das Wesentlich aus beiden Themen zu filtern:1.) LW-Polylinien können keine zusätzlichen Scheitelpunkte zur Kurven-Anpassung aufnehmen.2.) Bei einer Kurven-Anpassung entsteht immer eine 2D-Polylinie3.) Bei einer Begradigung (Kurven löschen) einer 2D entscheidet die Systemvariable PLINETYPE (0 - es bleibt eine 2D, andernfalls wird sie in eine LW konvertiert).4.) Solange man AutoCAD-Befehle verwendet (bzw. mit command in Lisp), bleiben bei einer Konversion sowohl Entityn ...
|
| In das Form Rund um AutoCAD wechseln |
|
Lisp : MAPCAR - Listen mit unterschiedlicher Länge
archtools am 02.07.2009 um 10:44 Uhr (0)
Zitat:Original erstellt von CADmium:... der auf jeden Fall ... (while (apply or (setq tok (mapcar car lst)))also das apply aufs or anwenden find ich super. .. Ein Konstrukt, den man bestimmt auch mal woanders anwenden kann Das war der wesentliche Grund, warum ich das gepostet hatte. Diese Booleschen Operatoren werden von den meisten Lisp-Programmierern völlig unterschätzt und deshalb viel zu selten angewendet.Hier mal eine Variante, die ich häufig einsetze, um Anwender daran zu hindern, in einer Dialogbox ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Blöcke in Urprung, Bereinigen mehrfach: über VBA oder Makro?
CADesign am 26.06.2009 um 11:20 Uhr (0)
* Nein, Autodesk-Support ist leider am Schlafen!Wollte mich hier nicht unbeliebt machen, nur eine Lösung habe ichauf Anhieb nicht gefunden. Siehe *Komme aus Bentley/SolidWorks Schiene.Bin in ACAD - LISP,Makro nicht konform, sonnst würde ichnicht nochmal fragen.Falls jemand sich bereit erklärt mir offen zu helfen, wäre super!Falls nicht, kann ich auch nichts für, denn es sollte hier ein freier Austausch hier sein.Es scheint einige hier außer Mods. scheinen viel Zeit zu haben um zu nörgeln, schadeSorry noch ...
|
| In das Form Rund um AutoCAD wechseln |
