|
Rund um Autocad : Richtungsvektor verändern
schachtelmacher am 02.02.2005 um 06:58 Uhr (0)
Guten Morgen, nun folgt der Report: Zitat: Original erstellt von CADmium: Vielleicht hilft dir das weiter ?! (defun c:set-Z-Vektor ( / AW I OBJ) (if (setq AW (ssget)) (progn (setq I -1) (repeat (sslength AW) (setq OBJ (entget(ssname AW (setq i(1+ i))))) (entmod (subst (210 0.0 0.0 1.0)(assoc 210 OBJ)OBJ)) ) ) ) ) Danke an Euch für Eure Bemühungen, besonderen Dank an CADmium! Das kleine Lisp und anschließendes spiegeln bringen alles wieder i.O. Danke ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : wollen sie wirklich
wronzky am 25.04.2006 um 17:46 Uhr (0)
Eine Idee hätte ich auch noch:laufen irgendwelche Makros, Lisp oder so?gib z. B. mal (command "_pline" p1 p2 p3 "_close") einfach in der Befehlszeile ein. Dann kommt auch die Abfrage, da p1 p2 p3 leer sind, und _pline folglich bereits beendet, wenn der _close-Befehl kommt. Dieser will dann nicht die Polylinie, sondern die AutoCAD-Sitzung schliessen...Grüsse, Henning------------------VoxelManufaktur Computer-Dienstleistungen für Architekten und Ingenieure http://www.voxelman.de
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Texte werden in PDF-Plot falsch dargestellt
Schachinger am 25.09.2025 um 07:33 Uhr (1)
Hallo Bernd,Ja das funktioniert! Problem das ich noch habe: Ich kann den Befehl FLATTEN nicht über einen anderen Lisp-Code aufrufen ( z.B. ganz einfach mal über Code:(command "FLATTEN") probieren. Mag nicht... Ich will tunlichst vermeiden das man bei jeder aus Inventor exportierten DWG manuell Befehle eingeben muss. Ich hab hierfür eine LSP die alles in einem Rutsch macht. Nur das FLATTEN bockt. ------------------mfg Siegfried Schachingerhttp://www.tbschatz.at
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Lisp Nuke aber mit Linieneigenschaften Von Block
cadffm am 22.03.2012 um 14:06 Uhr (0)
KJ hat damit angefangen, dann soll er es auch zuende bringen ..er hat vergessen die Prüffunktion zu ändern, so sieht es derzeit aus:Wenn Objektfarbe nicht VONLAYER ist dann stelle VONBLOCK ein , nicht ganz zielführend in dem Fall PS: Nutze doch mal gängige Suchmechanismen: BYBLOCK (oder vonblock) und NUKE ,ich denke das sollte ggf. schon eine fertige Nuke-Variante aufpoppen.------------------CAD.de System-Angaben - CAD on demand - User:FAQ(Acad)
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Klothoiden-Erstellung. Letzte Hoffnung!
eugen am 24.09.2001 um 09:32 Uhr (0)
Hi, Leute, verzweifelt suche ich eine Lisp-Routine für Klothoiden-Erstellung unter AutoCad 2000-2002. Einziges Programm, dass ich gefunden habe war klot_win.lsp von Dipl.Ing. J.J. Holok auf Service-Diskette 4/99 (AutoCad-Magazin). Das ist aber erstens für AutoCad 13-14 und außerdem funktioniert in meiner 14-te Version auch nicht korrekt (Fehlermeldung "Falscher Argumententyp"). Wer kann helfen, etwas richtiges zu finden? Danke im Voraus. Eugen
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Stutzen und Dehnen in einem Befehl
CADchup am 03.07.2002 um 16:12 Uhr (0)
Hi, Du hast den Befehl bereits (fast): Stutzen oder Dehnen. Schau mal in die Befehlszeile bei der Ausführung: Zu stutzendes Objekt wählen bzw. zum Dehnen mit der Umschalttaste wählen oder [Projektion/Kante/ZUrück]: Ein Lisp, das selbständig stutzt oder dehnt hab ich noch nicht gesehen... Da war der Martin doch glatt ein paar Sekunden schneller.... [Diese Nachricht wurde von CADchup am 03. Juli 2002 editiert.]
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : lsps für dummies...
cadffm am 07.09.2005 um 15:02 Uhr (0)
Schau mal hier im Forum nach dem User FAQ (Suchfunktion/User nutzen)Oder direkt: FAQ: APPLOAD Ansonsten funktioniert das Lisp, nur mußt du vor "Defun c:kol...."noch eine öffnende Klammer einsetzen, also:Code:(defun c:kol ()(AUSWAHL)(command "._copy" ausw "" "0,0,0" "0,0,0")(command "._erase" ausw "")(princ))(defun AUSWAHL ()(princ "
Bitte die zu bearbeitenden Elemente auswählen" )(setvar "cmdecho" 0)(setq ausw(ssget)))
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Linie kopieren
Theodor Schoenwald am 12.03.2012 um 16:46 Uhr (0)
Hallo Dirk,dazu gibt es bestimmt fertige Tools, im Lisp-Forum wird Dir dort geholfen.Vorab:;;------------------------------------------------------------(defun C(hier Doppelpunkt)C2C (/ CURLAY SS1) (setq CURLAY (getvar "clayer")) (setq SS1 (ssget)) (command "_copy" SS1 "" "" "") (command "_chprop" (entlast) "" "_layer" CURLAY "_lt" "_bylayer" "_s" "1.0" "") (princ))(princ);;--------------------------------------------------GrußTheodor[Diese Nachricht wurde von Theodor Schoenwald am 12. Mrz. 2012 edit ...
|
| In das Form Rund um AutoCAD wechseln |
 |
Rund um AutoCAD : Überprüfen von Zeichnungen auf zu bereinigende Elemente
CADdalog am 30.10.2015 um 08:49 Uhr (15)
Stimmt. Deswegen bin ich auf der Suche nach einer Lisp-Routine die mir so etwas liefert. Natürlich ist das Bereinigen an sich kein Problem, aber ich soll halt für eine große Anzahl Zeichnungen die Frage mit Ja oder Nein beantworten, ob die Zeichnungen bereinigt abgegeben wurden oder nicht. Würde ja schon reichen, wenn ich z.B. die Textausgabe des Bereing-Befehls in einen String oder eine Datei umleiten könnte - irgendwas in der Art.
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : setenv in AutoCad 2000
Andreas_Felix am 21.05.2003 um 21:43 Uhr (0)
Also ich arbeite auf Acad 2000LT. Schaltflächen und Menü s mit zu Hilfe nahme von setenv sind also kein problem! Nur leider auf Acad 2000 (Kollege) funktioniert das "ach sooo schöne" Macro nicht. Acad 2000 kennt anscheinend setenv einfach nicht!?! Was habe ich sonst noch für Möglichkeiten??? Möglichst ohne LISP! Woran werden meine "Macrao s" sonst noch scheitern???
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Lisp-Datei kann nicht ausgeführt werden
Darkrondo am 13.11.2012 um 15:34 Uhr (0)
Hier ein Beispiel für eine Datei, die von Anfang an nicht mochte:_________________________________________________________________; cnc-Bemassung(defun cncbem () (setq p (getpoint "
Zu bemassenden Punkt eingeben: ")) (setq a (getpoint "Textbeginn eingeben: ")) (setq b (strcat (rtos (car p) 2 2)";"(rtos (cadr p) 2 2)";"(rtos (caddr p) 2 2))) (command "text" a 1 0 b))(defun C:CNC () (cncbem))___________________________________________________________________
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Konstruktionshilfsmittel für Winkelhalbierende
StephanJP am 01.05.2003 um 12:41 Uhr (0)
Werkzeugkasten? ^C^C^P_xline;_bi oder als Lisp: (defun c:wh (/ p1 p2 p3) (setq p1 (getpoint "
Scheitelpunkt: ") p2 (getpoint "
erster Schenkelpunkt: ") p3 (getpoint "
zweiter Schenkelpunkt: ") ) (while p1 (command "_xline" "_bi" p1 p2 p3 "") (setq p1 nil p2 nil p3 nil) (setq p1 (getpoint "
Scheitelpunkt: ") p2 (getpoint "
erster Schenkelpunkt: ") p3 (getpoint "
zweiter Schenkelpunkt: ") ) ) ;endwhile ) ------------------ gruß Stephan
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Text automatisch mehrfach übernehmen?
marc.scherer am 09.04.2003 um 09:59 Uhr (0)
Hi, Das was Du willst ist via Lisp oder VBA oder C kein Problem. Mußt nur einen finden der es Dir baut, ist halt SEHR speziell. Da wirst Du nix fertiges finden. Wenn Du es nicht selber programmieren willst: Guck doch mal auf diese Website... www.cadlon.de Da könntest Du für kleines Geld so ein Pgm. in Auftrag geben. ------------------ Ciao, Marc [Diese Nachricht wurde von marc.scherer am 09. April 2003 editiert.]
|
| In das Form Rund um Autocad wechseln |
