|
Rund um AutoCAD : XREFs von Sheets zum Ursprung zurückverfolgen
gmk am 11.02.2009 um 10:09 Uhr (0)
Hier mal was mit lisp(DEFUN c:xn (/ xref)(SETQ xref (CDR(ASSOC 1 (TBLSEARCH "BLOCK" (CDR(ASSOC 2 (ENTGET (CAR (ENTSEL)))))))))(ALERT (SUBSTR xref (- (STRLEN (vl-filename-directory xref)) 1)) )) Ciao Georg------------------ http://www.xx-tausend.info
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : mehrere pläne in einem dwg zusammenfügen
gmk am 05.04.2006 um 11:54 Uhr (0)
sind die dateien 1-320 alle gleich groß? (vom layout her?)wenn ja, schreib dir doch ein script in excel (block oder xref einfügen), in dem kannst du den einfügepunkt über eine verknüpfung aus dateiname (1-320) breite und höhe des layouts leicht berechnen (geht natürlich auch in lisp).ciao georg
|
| In das Form AutoLisp wechseln |
|
Rund um Autocad : Eindeutiges identifizieren von Einfügepunkten
gmk am 03.12.2004 um 14:11 Uhr (0)
hallo lary, hab dir mal was angehängt. lisp mit appload laden und mit raum starten. fügt den block "lampe" ein. aus dem block raum wird die raumnummer übernommen. mit umfahrungspolygon meinte ich die geschlossene kontur um den einfügepunkt, innerhalb dem der punkt bei deiner überlegung liegen müßte. (entspricht bei einem raum wohl den wänden) ciao georg
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Transformation
gmk am 19.08.2003 um 13:40 Uhr (0)
hi! _align ist die einzige transformation die in acad integriert ist. ein maßstab, eine drehnung, eine verschiebung, also die klassische transf. über zwei identische punkte. zwei maßstäbe in x und y kannst du nur über den umweg block erreichen. alle andere transf.: kaufen oder lisp! ciao georg
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : dwg analyse
gmk am 10.02.2003 um 16:48 Uhr (0)
Hi! Kennt jemand ein Prog. (lisp etc.) das mir in Listenform die in einer Zeichnung enthaltenen Elemente darstellt (möglichst nach layer sortiert); so was wie LISTE aber schöner formatiert. Hintergrund: Ich habe alle Elemente eines layers gelöscht (modell- und layoutbereich), kann ihn aber nicht löschen da sich irgendwo noch was darauf befindet (evtl. attrib. ....). Ciao Georg
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Attribute zu Text ??
gmk am 26.11.2004 um 09:16 Uhr (0)
@aschu wieso müssen die gleich sein? du kannst zu jedem insert ein x-beliebiges attribut hinzufügen. einziger nachteil: insert + attrib passen nicht mehr mit der blockdefinition zusammen. (dazu gibt es allerdings die unterschiedlichsten meinungen ... siehe lisp forum) @goofy007 das was du suchst steckt im gruppencode 2 des attributs (SETQ ele (SUBST (CONS 1 (CDR (ASSOC 2 ele)) ) (ASSOC 1 ele) ele)) ciao georg
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Attribute von Block lösen
gmk am 17.12.2007 um 16:25 Uhr (0)
Servus! Zitat:Original erstellt von Goofy007:Aber in diesem speziellen Fall hat der Block gar keine Attribute Ich würde den "Wildwuchsblock" löschen und an gleicher Stelle den Block nochmal einfügen (dann natürlich ohne Attribute, da nicht in der Blockdefinition enthalten). Hast mit ein paar Zeilen lisp erledigt (einfach die Gruppencodes übertragen).Ciao Georg------------------ http://www.xx-tausend.info
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : element drehen
gmk am 12.03.2003 um 14:36 Uhr (0)
hi cadwiesel! sorry, hab vergessen dass an dem block noch ein attribut hängt, das sich auch drehen soll. gibt s eine lisp-funktion, die mir den block samt attr. auf einmal dreht, oder muss ich die attr. extra drehen? (dummerweise ist der basispinkt des attr. nicht gleich dem basispunkt des blocks; drehung wird dann wohl auf eine transformation rauslaufen). gruss georg
|
| In das Form AutoLisp wechseln |
GMK_RT.txt |
Lisp : Bögen in POLYLINIEN -> X Geraden
gmk am 18.05.2004 um 21:54 Uhr (1)
hi mario!ich könnte dir ein lisp anbieten das bögen in abhängigkeit von der pfeilhöhe in linien aufteilt (bogen wird anschließend gelöscht). jetzt mit _pedit noch drüber und die pl aus linien wäre fertig. ich nehme aber mal schwer an du brauchst das für höhenlinien, dann ist mein vorschlag bestimmt nicht der angenehmste, aber es wäre ein anfang bis einer der hiesigen experten :-) was anderes anbietet.ciao georg
|
| In das Form Lisp wechseln |
|
Rund um Autocad : Layer aus XLS importieren + Xref kopieren
gmk am 01.02.2005 um 15:33 Uhr (0)
(SETQ bl_tb (TBLSEARCH BLOCK (CDR(ASSOC 2 ele)))) ; hier reinkopieren (ALERT (ITOA (CDR(ASSOC 70 bl_tb)))) ; hier reinkopieren (IF (= (CDR(ASSOC 70 bl_tb)) 36) kopier mal die ALERT-zeile zwischen die beiden zeilen, lisp neu laden, eine xref anklicken und poste den wert, den das fenster anzeigt. bei mir läuft s ohne probleme. ciao georg
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Layouts automatisch anlegen
gmk am 16.01.2005 um 23:39 Uhr (0)
hallo dominik, hab auch oft so einen berg von dina4 blättern zum plotten. bei mir sind die einzelnen blätter matizenartig im modell-bereich angeordnet (konstanter abstand vertikal und horizontal). mittels eines lisp klicke ich das erste blatt oben links an und berechne für jedes blatt das plotfenster. mit command _-plot ... und einer schleife werden dann alle blätter mit gleicher ctb und pc3 im a4-laserdrucker geplottet. bei interesse kann ich es dir morgen schicken. ciao georg
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : aus kreis+text => automatisch einen block erstellen
gmk am 17.11.2004 um 15:02 Uhr (0)
dann sind es keine kreise oder auf dem falschen layer. oder: wieviele kreise sind es? es gab mal eine beschränkung für auswahlsätze auf 32767 elemente. hallo lisp-experten: gilt das noch?? [edit] gilt offensichtlich nicht mehr, test mit 36100 kreisen ergibt 36100 blöcke [edit] ciao georg [Diese Nachricht wurde von gmk am 17. Nov. 2004 editiert.]
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Invertieren einer Matix
gmk am 11.06.2007 um 16:51 Uhr (0)
Zitat:Original erstellt von CAD-Huebner:Anders hätten wir große Matritzen (200x200 Elemente) vor 15 Jahren gar nicht (in Echtzeit) rechnen können bei 640 KB Arbetisspeicher.[/B]Mit nem Co-Prozessor um 500DM warst dann aber dafür wieder der König :-))200/3, 66 Punkte, war wohl eine längere Messung, oder :-)Wäre super wenn du noch was findest, evtl. kann mans ja kompilieren und einbinden wenns mit den Zeigern zu schwierig wird für eine Umsetzung nach lisp.Ciao Georg
|
| In das Form Lisp wechseln |
