|
Rund um Autocad : Nationalflaggen
Proxy am 29.05.2004 um 18:44 Uhr (0)
Entweder aus irgend einer DXF-CD, aus einer anderen Anwendung (Corel, MS-Office Cliparts, O pen O ffice etc) oder ge lisp lt Code: ;; ***** USA.LSP ***** ;; ;; Creates the United States of America banner. ;; Use black screen background for best results. ;; ;; W. Kilbourne, CompugraphX, Revised October 1, 2001 ;; (defun c:USA (/ CE BM OS OE SP HT XD XA EP YA D1 D2 D3 D4 RP RH XZ YZ P1 P2 P3 P4 P5 P6 P7 P8 P9 PX PY PZ S1 S2 S3 S4 S5 S6) (setq CE (getvar CMDECHO ) BM ( ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : linien verschmelzen
Proxy am 03.06.2004 um 09:58 Uhr (0)
hmmm, vielleicht hilft dir dieses Lisp: Code: (defun c:POLYJOIN (/ en ed ln s1 s2) (terpri) (lisp_set) (setq undoit t) (princ
Objekte zum Verbinden auswählen: ) (setq s1 (ssget ((-4 . OR ) (0 . LINE ) (0 . LWPOLYLINE ) (0 . POLYLINE ) (0 . ARC ) (-4 . OR ) ) ) ) (while s1 (setq en (ssname s1 0) ed (entget en) ln (CDR (assoc 0 ed)) ) ;end setq (if (or (= ln POLYLINE ) (= ln LWPOLYLINE )) (command ._pedit en ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Spline in Polyline ???
Proxy am 17.11.2004 um 08:45 Uhr (0)
Ja einfach die Stützpunkte auslesen und dann die Polylinie damit erstellen = führt natürlich zur "optischen" Unterschieden Code: ;;;(prompt "
Type "VL-POLY" to run........") (defun c: pline2file (/ theobj thelist n xval yval fname fn) ;;;load the visual lisp extensions (vl-load-com) ;;;get the entity and entity name (setq theobj (car (entsel "
Polylinie auswählen: "))) ;;;convert to vl object (setq theobj (vlax-ename- vla-object theobj)) ;;;check if it s a polyline (if (= (vlax-get-property ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : layersteuerung speichern im AutoCad 2006
Proxy am 25.01.2006 um 08:43 Uhr (0)
Wen du eine DWG-Datei in eine andere DWG-Datei einfügst als "Block" dann werden die LAyerfilter automatisch mitimportiert, bei Layergruppen ist es leider nicht so .. somit 50 % der Aufgabenstellung bereits fertig. Das mit den Layergruppen ist imho locker mit lisp machbar. siehe oben.------------------ MfG Proxy
|
| In das Form Rund um Autocad wechseln |
|
Rund um Autocad : Text in MText-Editor nicht gedreht darstellen.
Proxy am 07.02.2006 um 10:01 Uhr (0)
Oder als Button (lisp) zum rumschalten:Code:(defun c:MTextEdToggle () (if (= (strcase (getvar "MTextEd") T) "oldeditor") (progn (setvar "MTextEd" "Internal") (princ "
M-Text Editor auf den neumodischen Stil umgestellt." ) ;_ end of princ ) ;_ end of progn (progn (setvar "MTextEd" "OldEditor") (princ "
M-Text Editor auf den altmodischen Stil umgestellt." ) ;_ end of princ ) ;_ end of progn ) ;_ end of if (princ) ) ;_ end of defun ;|«Visual LISPc Format Options»(110 1 70 2 nil "End ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Dynamische Blöcke über Excel-Liste steuerbar?
Proxy am 04.09.2007 um 13:53 Uhr (0)
Vielleicht meinst du die Verschachtelungsoption bei der Extraktion.ansonsten kannst du dyn. Blocks auch über Access, Datenbanken und auch sogar Excel, dazu ist jedoch 100% eine angepasste Programmierung nötig.Stichwörter: vlax-put-property , vla-getdynamicblockproperties, Lisp-Forum auf CAD.DE Am besten du postest mal die DWG hier rein ... und es kann dann auch für den Anfänger schnell ein Setz-Mal-Den-DynBlock-Status-Lisp gebaut werden (nur als Grundgerüst). ------------------ MfG ProxyBitte beachten ...
|
| In das Form Rund um AutoCAD wechseln |
|
Autocad VBA : Rechteck schraffieren
Proxy am 19.10.2004 um 22:10 Uhr (0)
Und wieder eine geniale Mapcar- Meisterwerk -Erkärung der Zahlentheorie und Einsichten in seine Relation zur Umwelt ! Nur es ich echt heftig so ein Text auf ein armes Viereck und dann auch noch auf VBA-Basis loszulasen. P.S. Leg dir beim Scanne einen 100% Samtstoff unter den Deckel oder Mattschwarzpapier, das behebt die Durchlichtigkeit des einzuscannenden Originals. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-computer-science-de ...
|
| In das Form Autocad VBA wechseln |
|
Rund um Autocad : Höhenkoten verknüpft
Proxy am 23.11.2006 um 13:00 Uhr (0)
Versuch mal es mit dynamischen Blöcken und Feldfunktionen. Du kannst auch hier im Forum nach Höhenkoten suchen und es gibt IMHO ein Lisp das bereits viele erfolgreich benutzen.Es ist relativ einfach zu erstellen wenn es eine liniear Parameter und Felder in den H-Koten gibt die die Höhe innerhalb von Feldern anzeigen.Kleines optisches Beispiel ------------------ MfG ProxyBitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird oh ...
|
| In das Form Rund um Autocad wechseln |
|
Lisp : Short Cuts sind nicht mehr sichtbar
Proxy am 03.07.2007 um 11:34 Uhr (0)
Prüfe doch mal wirklich:die 100%ige Windows-Einstellung, bzw. mit Lisp und reg-writeHKEY_CURRENT_USER Software Microsoft Windows CurrentVersion Policies ExplorerNoChangeKeyboardNavigationIndicators ändern.oder mit Maus. ------------------ MfG ProxyBitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspruch auf Support zur Verfügung gestellt.
|
| In das Form Lisp wechseln |
|
Rund um Autocad : PAN mit Mausrad
Proxy am 09.01.2004 um 15:31 Uhr (0)
Zitat: Original erstellt von marvin101010: hallo da lob ich mir meine microsoft maus... keine speziellen treiber, kein stress... ok, damit macht man billy boy noch reicher, aber irgendwas is ja immer Für die stressfreien Treiber hast du schon wie gesagt, längst mehrmals, obwohl auch bereits im OS als Beta enthalten, bezahlt (OS-Kosten) und darfst sie ja auch höhstwahrscheinlich in ca. 2 Jahren wegschmeissen wenn M$ keine Hardware/ Software-Zertifizierung für ein Produkt ohne Supportanspruch (=$ ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Text bei Bemassung auf dem Kopf
Proxy am 10.05.2005 um 11:47 Uhr (0)
Code:(defun C:DIMMIRROR (/ ;;local symbols ename ent gripset i flag j oldeko olderr ss ;;local functions ++ *lerror* ) ;;local error handler (defun *lerror* (msg) (if (member msg ("console break" "Function cancelled")) (princ) (princ (strcat "
Error " (itoa (getvar "ERRNO")) ": " msg)) ) ;if ;;restore old error handler (setq *error* olderr olderr nil ) (princ) ) ;*lerror* ;; ++ Increment counter &a .;;;call: (++ a) --note the ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Ausrichten mehrere Elemente
Proxy am 14.09.2006 um 15:47 Uhr (0)
Ja, mit Lisp ... einfach ein BKS-Anlegen ... dann die Blöcke mit Lisp am Bassispunkt entlang rotieren (sieht aus wie ausrichten) . Lisp müsste auch hier im Forum rumfliegen ... Suchbegriffe _allign, bks / ucs ... wenn nicht kann es ja schnell geschrieben werden.------------------ MfG ProxyBitte beachten Sie: Die Verwendung der hier bereitgestellten Signatur geschieht auf Ihre eigene Verantwortung. Diese Signatur wird ohne Gewähr auf Richtigkeit, Vollständigkeit und/oder Funktionalität, sowie ohne Anspru ...
|
| In das Form Rund um Autocad wechseln |
|
Rund um AutoCAD : Faktoren von Blöcken auslesen
Proxy am 11.07.2007 um 14:39 Uhr (0)
Oder via Lisp ....kleiner Denkanreiz für diese ile Aufgabe.Code:(defun C:CAD_DE_54_017297( / k name x y z) (setq k (entget (car (last (nentsel "
Selektieren Sie bitte einen verschachtelten Block: "))))) (setq name (cdr (assoc 2 k))) (setq x (rtos (cdr (assoc 41 k)) 2)) (setq y (rtos (cdr (assoc 42 k)) 2)) (setq z (rtos (cdr (assoc 43 k)) 2)) (alert (strcat "Blockname: " name "
X-Faktor: " x "
Y-Faktor: " y "
Z-Faktor: " z)) (princ))Funktion mit CAD_DE_54_017297 starten, oder umbenennen.------------------ ...
|
| In das Form Rund um AutoCAD wechseln |
