|
Rund um AutoCAD : Block nach Raster einfügen
xem am 30.04.2009 um 13:43 Uhr (0)
also so funzt esCode:(defun c:bel (/ Blockn corner1 corner2 columns rows roomwidth roomheight colspacing rowspacing)(setq corner1 (getpoint "erste Ecke im Raum: ")corner2 (getpoint "gegenüber liegende Ecke: ")columns (getint "Anzahl X Richtung: ")rows (getint "Anzahl Y Richtung: ")roomwidth (abs (- (car corner1) (car corner2)))roomheight (abs (- (cadr corner1) (cadr corner2)))colspacing (/ roomwidth columns)rowspacing (/ roomheight rows)lowerleft(list(min (car corner1) (car corner2))(min (cadr corner1) (ca ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Farbe im Block VONLAYER
xem am 11.05.2009 um 14:40 Uhr (0)
Hallo,ich habe mehere Blöcke in denen die Farbe der Linien nicht alle auf VONLAYER liegen.Mir war so als wenn ich mal was von einem LISP gelsen habe das in allen Blocken alles auf VONLAYER legt.Weiß jemand ob es so ein LISP gibt und wo ich es finde?
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Rahmen um Text mit gleichem Layer
xem am 19.05.2009 um 09:59 Uhr (0)
Zitat:Original erstellt von CADmium:tcircle ist ein Befehl der Expresstools und wird in der acettxt.lsp definiert .... dein wunsch kann man da in den code integrieren.Ich habe mir mal die acettxt.lsp angeschaut und muß ehrlich sagen ich hab überhaupt nicht durchgesehen. Einfache LISP verstehe ich ja Stück für Stück, aber das ist doch zu hoch.Ich gehe mal davon aus das bei einem so großen LISP der Einbau nicht mal fix erledigt ist und sich keiner die Arbeit macht.?Gibts denn was anderes, schon fertiges?
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Blockattribute so einfach wie dtext bearbeiten
xem am 26.06.2009 um 12:05 Uhr (0)
Ich habe noch mal gesucht und ein LISP gefunden, mit dem man Text mit einem Doppelklick ändern kann ohne den Text nach dem Doppelklick auswählen zu müssen.Code:(defun c:func (/ selset loc:get_txt_point) (defun loc:get_txt_point (ent) (if (/= (cdr (assoc 72 (entget ent))) 0) (cdr (assoc 11 (entget ent))) (cdr (assoc 10 (entget ent))) ) ;_ end of if ) ;_ end of defun (if (setq selset (ssget "_:L" ((0 . "TEXT")))) (foreach txt (vl-sort (vl-remove-if listp (mapcar cadr (ssnamex selset))) ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Blockattribute so einfach wie dtext bearbeiten
xem am 24.06.2009 um 10:23 Uhr (0)
Hallo,ich hab schon viel gesucht und nix gefunden. Wie kann ich Blockattribute mit einem Doppelklick (ohne Dialogbox) bearbeiten und mit einem Rechtsklick beenden? Von der Sache her so wie ein dtext.Mit -attedit kann ich die Blockattribute ohne Dialogbox ändern, aber damit wird nicht nur der Text abgefragt sondern etwas mehr.Gibt es dazu vieleicht ein LISP?
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Blockattribute so einfach wie dtext bearbeiten
xem am 26.06.2009 um 11:18 Uhr (0)
@CADmiumaxo - einfach mal reinschaun geht net ...Das Rad wieder neu erfinden ist auch nicht schön und das es nicht mal eben erledigt ist kann ich mir gut vorstellen. Das aufwändige an der Sache wird sicher das Testen und Fehlersuchen sein.Gibt es denn vieleicht die benötigte Programmierung schon in einem LISP, aus dem man sie kopieren kann und anpassen?Die Programmierung müßte doch dann so aussehen, daß sie auf die letzten klick-Koordinaten einen der Befehle oben anwendet. - oder?
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Blockattribute so einfach wie dtext bearbeiten
xem am 24.06.2009 um 12:02 Uhr (0)
@CADmiumnicht genau diese - hab sie angehänt.Würde es mit -attedit in einen LISP denn funzen?
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Linientypfaktor in Blöcken
xem am 13.07.2009 um 17:22 Uhr (0)
@GargarotDas ist es ja was mich nervt - das ewige anpaßen von Plänen um eine vernünftige Grundlage zu haben. Was ich schon an Sch... in Plänen gefunden habe...Es liegt aber nicht immer am Zeichner - einige Programme geben auch nur Mißt als *.dwg aus oder können nur *.dxf anno Version 1.0 Um das Skalieren des Planes und des Linientypfaktor zu sparen wäre es ja schön wenn das zusammen mit dem Block möglich wäre.@CADmiumDas man AutoCAD anpaßen kann ist schon was echt gutes, aber gewisse Sachen sollten bei dem ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Kopieren und Nummerieren
xem am 30.07.2009 um 16:07 Uhr (0)
Hallo,gibt es was wo beim Kopieren gleich mit nummeriert wird. Also ich habe einen Text Baum 1 und wenn ich den kopiere wird Baum 2, Baum 3 usw. drauß?Ich habe hier ein LISP zum Nummerieren. Es ist eigendlich ganz gut. Nur habe ich den Kreis nicht raus bekommen und eine Abfrage zur Position bezogen auf den ersten Klick wäre nicht schlecht. Denn wenn ich z.B. Leuchten nummerier, klicke ich immer auf den Mittelpunkt, aber der Text soll mittig oberhalb der Leuchte stehen. (z.B. Klick 0,0 und Text 0,5)Code:(de ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Schnellauswahl mit einem Klick
xem am 11.08.2009 um 18:18 Uhr (0)
Jetzt wollte ich Trick 17 anwenden und es geht net.Habe auf einen Button:_xplode;(ssget "_X" ((0 . "INSERT")));;g;n;Dann kommt:Befehl: _xplodeAufzulösende Objekte wählen.Objekte wählen: (ssget "_X" ((0 . "INSERT")))Kann nicht zu LISP zurückkehren.*Ungültige Auswahl*Warum geht das denn jetzt net? Ich wollte alle Blöcke mit _xplode auflösen.------------------
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Schnellauswahl mit einem Klick
xem am 07.08.2009 um 14:12 Uhr (0)
Zitat:Original erstellt von charlieBV:Und Tubas Beitrag hat dir warum nicht gefallen? ich geht mal davon aus du meinst Zitat:Original erstellt von tunnelbauer:Für Solids:Code:_erase;(ssget "X" ((2 . "SOLID")))Für Bemaßungen:Code:_erase;(ssget "X" ((0 . "DIMENSION")))Habe kein Plan wie ich es verwenden soll Zitat:Original erstellt von xem:Danke tunnelbauer,aber wie bekomme ich die Befehle jetzt auf einen Button oder in einen Befehl?Darum habe ich weiter gesucht und eine LISP gefunden was schon in die Ric ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Schnellauswahl mit einem Klick
xem am 10.08.2009 um 16:51 Uhr (0)
Zitat:Original erstellt von xem:Hallo,habe mir jetzt folgendes zusammengebasteltCode:(defun c:test ( / as) ; lokale Variable(setq as (ssget "_X" ((-4 . "OR") (2 . "SOLID") (0 . "DIMENSION") (-4 . "OR"))))(if as (command "._erase" as ""))(setq as nil) ; as wird freigeben(princ))Wenn ich jetzt noch das LISP:Code:(defun c:testt ( / as) ; lokale Variable(setq as (ssget "_X" ((-4 . "OR") (0 . "Hatch") (-4 . "OR"))))(if as ( ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Schnellauswahl mit einem Klick
xem am 11.08.2009 um 09:30 Uhr (0)
Danke CADmium!Ich habe grade noch etwas gebastelte und probiert.Warum kennt er den Befehl _burst aus den Expresstolls nicht? Genauso eigene Befehle die ich über ein LISP erstellt habe?------------------
|
| In das Form Rund um AutoCAD wechseln |
