|
Rund um AutoCAD : Element point durch Element circle ersetzen
CADmium am 04.05.2009 um 21:35 Uhr (0)
Hmm .. IMHO gibt es hier im Forum ein kleines Lisp für sowas... sollte programmtechnisch kein Problem sein .... einfach mal suchen, ansonsten morgen mehr...mal quick and dirty hier reingetippt:(defun c:P2C(/ ss z n) (if(setq ss (ssget((0 . "POINT")))) (progn (setq Z -1) (repeat (sslength ss) (setq ele(ssname ss (setq z (1+ z)))) (command "_.circle" (cdr (assoc 10 (entget ele))) 5.0) (entdel ele) ) ) ))------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Aus Objekt - Layer erstellen
CADmium am 03.08.2004 um 16:29 Uhr (0)
Mit Lisp ist da sicher was zu machen, aber... Layer sind eigentlich für Strukturen gedacht, also um Objekte gleicher Eigenschaften zusammenzufasse und so. Was nützen dir 1000 Layer mit je einem Objekt? Egal, Ein Algorithmus wäre z.B. Auswahlsatz bilden mit allen Blockrefrenzen, diese durchlaufen, wenn GC66 gesetzt und Attributname = Dein Attribut - Layername dann Layer anlegen und der Blockreferenz diesem Layer zuweisen usw. Willste wirklich nur n Tip oder eine Lösung?! Bei Fragen ... ------------------ ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Poylinie vs. 2D Polylinie
CADmium am 16.09.2004 um 14:46 Uhr (0)
mit konvert oder neu mit plinetype oder mit nem Lisp zu Erklärung: bei einer LW-Polylinie werden die Koordinaten innerhalb der Zeichnungsdatenbank direkt Ploylinienobjekt gespeichert. Zu der 2DPolylinien gehören zusätzliche Punktobjekte / Vertex). EIne LW-POLY in eine 2D-Poly umzuwandeln, geht ohne Probleme, umgedreht ist es schon schwieriger, da es für die 2D-Poly auch noch die Angleichoptionen gibt.(quadratisch und kubisch geht mit konvert auch nicht) ------------------ - Thomas - [Diese Nach ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Anonyme Blöcke per Lisp umbenennen
CADmium am 17.11.2009 um 15:18 Uhr (0)
anonyme Blöcke sind Blöcke , dessen Namen vom System vergeben werden und die , wenn sie nicht referenziert werden , vom System beim Speichern und Schließen der Zeichnung bereinigt werden... solche Blöcke entstehen bei u.a. bei Bemaßungen (*D..) und bei dynamischen Blöcken (*U) sowie bei einigen Konvertierern aus Fremdformaten ...die anonymen Blöcke werden von den Acad-Dialogen / Befehlen ignoriert .. man kommt da bloß programmseitig ran ( auch zur Erzeugung )------------------ - Thomas -"Bei 99% aller Pr ...
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Benutzerprofile ADT 2004
CADmium am 02.02.2004 um 16:39 Uhr (0)
Die Autocadhilfe sagt dazu : Wenn Sie eine Umgebungseinstellung mit einer Befehlszeilenoption festlegen, überschreibt diese Option die Einstellungen im Feld Optionen bzw. in der Umgebungsvariable. D.h. Wenn das Profil schon in der Registry vorhanden ist, wird bloß wieder das Profil in der Registry aktiviert. Erst wenn das Profil noch nicht existiert, wird es aus der Datei neu geladen und in die Registry geschrieben. Also erst händisch oder mit Lisp z.B. (vl-registry-delete HKEY_CURRENT_USER... Profil lö ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : addieren in autocad
CADmium am 26.10.2004 um 18:35 Uhr (0)
du hast doch Texte in der Zeichnung .... wie sehen denn die jetzt aus? am besten mal (entget(car(entsel))) in der Befehlszeile eingeben, so einen Text anklicken und das Ergebnis posten.. und was willst du dann mit den Texten machen? Ist 234.0909 - Soll +50 - 284.0909 .. also bitte genauer! Das Lisp läßt sich doch prima anpassen.. genauso , wenn du viele Zahlen hast, zu denen alle der gleiche Wert addiert werden soll.. ------------------ - Thomas - Bei 99% aller Probleme ist die umfassende Beschre ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Auswahl, bei nein abbruch
CADmium am 10.08.2010 um 09:36 Uhr (0)
(defun c:sv() (command "_purge" "_bl" "" "_n") (command "_zoom" "_e") (setvar "LIMMIN" (0 0)) (setvar "Griddisplay" 2) (setvar "Gridmode" 1) (setvar "LWDISPLAY" 1) (initget "Ja Nein") (if(=(getkword "Sind Grenzen,Limiten und Linienstärke ok? [Ja/Nein] Nein:")"Ja") (progn (setvar "Gridmode" 0) (command "_purge" "_AL" "" "_N") (command "_qsave") (command "_close" "_n") ) (progn (setvar "Gridmode" 0) (prompt"
Nacharbeiten ---LISP neu starten mit sv") ) ))------------------ - Thomas - "Be ...
|
| In das Form Lisp wechseln |
|
Rund um AutoCAD : Attribute bearbeiten
CADmium am 02.07.2008 um 13:47 Uhr (0)
Tja .. die Attribute wurden wohl nachträglich rangepappt (von ner Applikation) , und da eattedit und co auch nach der Attributsdefinition in der Blockdefinition suchen, siehts mau aus...Aber ich hänge mal als kurzzeitige schnelle Hilfe einen Attributseditor ran , der das kann. Wie man so eine Lisp laden kann , steht hier beschrieben.Eine andere Möglichkeit : bearbeite den Block mit _refedit .. füge die entsprechenden Attributsdefinitionen mittels _attdef hinzu ....usw. ( kann man sicherlich auch automatisi ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Alle Stilnamen auf Schriftart isocp setzen.
CADmium am 28.01.2019 um 07:45 Uhr (1)
Zitat:Original erstellt von Lothar1972:Guten Morgen und Danke!!Ich soweit ich das verstehe ändert das "nur" den Textstil, aber wenn im fremden Plan im M-Text die Schriftart manuell eingestellt wurde hilft das nix, oder?Ich dachte das "alte" Lisp kann da vielleicht helfen?Sicherlich nicht! ... dafür brauchst du sowas wie STRIPMTEXT ( mal nach suchen ) bzw. einen ähnlichen Codeschnipsel ..------------------Also ich finde Unities gut ... und andere sicher auch--------------------------------------- - Thomas - ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : lisp und höhenlinien
CADmium am 28.09.2004 um 16:25 Uhr (0)
kann nicht gehen .. ss enthält ja immer noch die Namen der Polylinien, und nicht der Körper. dafür mußte einen neuen Auswahlsatz kreieren.. so ungefähr ... klammern ect. mußte abgleichen.. (setq Koerper_ss(ssadd)) (setq index -1) (repeat (sslength ss) (command _extrude (ssname ss (setq INDEX (1+ INDEX))) (* (+ 1 Index) sh) ))) (ssadd (entlast Koerper-ss)) ) (command _union Koerper-ss ) ------------------ - Thomas - Bei 99% aller Problemen ist die umfassende Beschreibung des Problem ...
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : Grundeinstellungen wieder herstellen!?
CADmium am 31.10.2005 um 18:53 Uhr (0)
Es gibt Sysvars, die in der Zeichnung gespeichert werden und welche, die in der Registrierdatenbank des Systems gespeichert werden, darunter auch welche profilabhängig. Letzere kannst du mit _options - Reiter"profil" -Button "Zurücksetzen" auf die Ausgangswerte zurücksetzen. Leider ändern sich dabei auch andere von dir getätigte Einstellungen.Hilfreich ist für deinen Fall ein Lisp, wo man die Einstellungen einmal vornimmt, und was man bei Bedarf (oder in der acaddoc.lsp) aufruft. ------------------ - Tho ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Vorgabe-Wert nicht sichtbarer Attribute löschen (Acad 2004)
CADmium am 25.11.2005 um 13:29 Uhr (0)
Zitat:Original erstellt von Alybaba:Hi zusammen -gibt es eine Möglichkeit bei nicht sichtbaren (invisible) Attributen,den Vorgabe (default) Wert zu löschen und zu bearbeiten ?Ich brauch ein Tool (LISP etc.) mit dem auch alle in einer Zeichnungenthaltenen Attribute bearbeitet werden können.bis dann jo, is möglich, willste ein Angebot? oder verwechselst du auch Hilfe mit Dienstleistung? ------------------ - Thomas -"Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die H ...
|
| In das Form Rund um Autocad wechseln |
|
AutoLisp : Linien-Bruch
CADmium am 11.12.2003 um 14:36 Uhr (0)
Hallo Vision! Eins vorweg : .. erwarte nicht immer 100%-ige Komplettlösungen. Holger hat in seinem Signum z.B. einen Verweis auf defun.de . Da bekommst du wahrscheinlich genau die für dich zurechtgeschnittenen Lösung! Und wenn s wirklich Arbeitszeit spart, sollte dir das auch etwas wert sein! Weil aber nun wirklich der kreative Teil schon fertig ist, und es auch mal Ausnahmen geben muß, ist im Anhang das was du suchst. (Hoffentlich....) Ansonsten kann ich bloß meine Empfehlung wiederholen sich auf den en ...
|
| In das Form AutoLisp wechseln |
