|
Lisp : trans - was ist falsch
Geos am 08.03.2008 um 14:54 Uhr (0)
Hallo HenningIch glaube, deine Tips sind etwas zu "hoch" für mich, zumindest würde es aber viel Mühe bedeuten, mich da hinein zu knien, und das ist mir die Programmkosmetik (Neugierde) auch wieder nicht wert. Da Autocad das KoordSys wechseln kann, hatte ich erhofft, dass man das auch mit Lisp-Bordmitteln fiktiv nachspielen kann.------------------Schöne GrüßeErnst www.geopaint.at
|
| In das Form Lisp wechseln |
|
Lisp : layer eines blockes ermitteln
Geos am 26.03.2008 um 07:33 Uhr (0)
ServusBlockinfo: http://ww3.cad.de/foren/ubb/Forum259/HTML/000845.shtml#000002 bzw. http://autocad.cad.de/modules.php?name=Downloads&d_op=viewdownloaddetails&lid=88&title=Blockinfo.dvb ------------------Schöne GrüßeErnst www.geopaint.at
|
| In das Form Lisp wechseln |
|
Lisp : Layerstruktur bearbeiten
Geos am 11.04.2008 um 07:20 Uhr (0)
Zitat:Mehrere LISP-Programme in einer Zeichnung?Das sowieso!Aber auch mehrere Programme in einer LSP-Datei:(defun c:befehl (/...) code)(defun funktion (parameter / )code)Du kannst auch andere LSP-Dateien laden:(load "abc.lsp" "Meldung im Fehlerfall")Aufruf:(c:befehl) oder(funktion parameter)Du könntest sogar per Lisp andere LSP-Dateien (Programme) schreiben (print file),die Du dann laden und aufrufen kannst.------------------Schöne GrüßeErnst www.geopaint.at
|
| In das Form Lisp wechseln |
|
Lisp : DWG von Civil-Daten befreien
Geos am 08.10.2008 um 08:50 Uhr (0)
HalloIch hab hier http://ww3.cad.de/foren/ubb/Forum461/HTML/000335.shtml#000001 schon mal gefragt, ob man "Civil" auch irgendwie deaktivieren kann - anscheinend nicht.Wurde eine DWG mal mit Civil geöffnet/bearbeitet, meckert mein ACAD-Map 3D 2005 (ohne Civil) dauernd.Es gibt allerdings ein Menü namens Civil und dort findet sich ein Befehl "In Autocad exportieren", der eine neue DWG erzeugt.Ich kann dann meine DWG schliessen und die Neue öffnen um das "Gemecker" loszuwerden.Nun würd mich interessieren, ob ...
|
| In das Form Lisp wechseln |
|
Lisp : Fläche von Hatch/Solid
Geos am 30.10.2008 um 11:45 Uhr (0)
Grüß Euch@heikoHab mal ein HATCH ausgewählt:Code:Befehl: (vlax-dump-object (vlax-ename-vla-object (car (entsel))) T)Objekt wählen: ; IAcadHatch: AutoCAD Hatch-Schnittstelle (Schraffur); Eigenschaftswerte:; Application (RO) = #VLA-OBJECT IAcadApplication 00b9d604; AssociativeHatch = 0; Document (RO) = #VLA-OBJECT IAcadDocument 05400520; Elevation = 0.0; GradientAngle = 0.0; GradientCentered = -1; GradientColor1 = #VLA-OBJECT IAcadAcCmColor 1adbd4a0; GradientColor2 = #VLA-OBJECT IAcadAcCmColor 1adb95 ...
|
| In das Form Lisp wechseln |
|
Lisp : (put-var ...) (get-var ...)
Geos am 17.12.2008 um 13:02 Uhr (0)
ServusIch benutze die beiden Funktionen (put-var ...) (get-var ...) zum Schreiben/Lesen ins/aus Dictionary ja schon "ewig" und auf meinem Rechner funktioniert auch alles.Jetzt wollte ich aber ein Programm weitergeben, wo die verwendet werden und musste feststellen, dass die offensichtlich nicht mit (vl-load-com) geladen werden.Die Dos_lib Funktionen beginnen ja alle mit "dos_..." und im Ordner der Expresstools findet sich auch keine Datei mit der Zeichenfolge und selbst geschrieben sinds auch nicht.Wisst I ...
|
| In das Form Lisp wechseln |
|
Lisp : Schriftgröße bei MTEXT
Geos am 10.02.2009 um 16:06 Uhr (0)
ServusIch wollte Texte auf eine einheitliche Schriftgröße bringen.Im Prinzip eine einfache Sache. Nur wenn MTEXTE unterschiedliche Schriftgrößen haben funkts net so einfach:Hatte zuerst DXF40 auf die #txthöhe gesetzt und gemerkt, dass einge MTEXTE unverändert geblieben sind ...Objekt wählen: ; IAcadMText2: AutoCAD MText-Schnittstelle; Eigenschaftswerte:; Application (RO) = #VLA-OBJECT IAcadApplication 00b9d604; AttachmentPoint = 1; BackgroundFill = 0; Document (RO) = #VLA-OBJECT IAcadDocument 010b6c10; ...
|
| In das Form Lisp wechseln |
|
Lisp : Benutzerabfrage in einer Endlosschleife
Geos am 17.03.2009 um 18:24 Uhr (0)
Das "Messgerät" ist wohl ein GPS, das die Koordinaten liefert. Aber soweit ich weiß, kann man die Serielle nicht mit Lisp lesen (glaub nicht mal mit DosLib).Ginge wohl nur über "Zwischenspeicher" - Datei(en), wie Du schon angedeutet hast.(wechselweises Lesen und Schreiben ?)Beim Lesen:(while (read-line Datei) ..) würde dann das (exit) überflüssig machen.Weiters fällt mir "rekursiver Start" noch dazu ein ...Nur so ein paar Gedankenfetzen, aber vielleicht hilfts...------------------Schöne GrüßeErnst www.geop ...
|
| In das Form Lisp wechseln |
|
Lisp : entmake hatch
Geos am 19.06.2009 um 19:47 Uhr (0)
Ich habe hier eine Datei namens "acad_dxf.chm" (Acad-Help-Ordner) - da steht das auch drin. Kann jetzt allerdings nicht sagen, ob die in neueren Versionen auch noch vorhanden ist bzw. so heißt.------------------Schöne GrüßeErnst www.geopaint.at
|
| In das Form Lisp wechseln |
|
Lisp : Verschachtelte Elemente schieben
Geos am 01.07.2009 um 19:40 Uhr (0)
Wollt Euch noch nachliefern, was draus geworden ist - zwar eine etwas "russische" Gschichte, aber mir hats geholfen.Übrigens - die Original-Xref-Datei wird dadurch nicht verändert.Code:;Funktion (f#DeleteObjectFromBlock) von Jimmy Bergmarks http://www.jtbworld.com/lisp/axblock.htm ;;; Deletes the specified subentity from its block definition;;; Arguments: the entity name of an item within a block reference;;; Returns: the remaining item count of the block definition;;; The drawing must be regenerated for ...
|
| In das Form Lisp wechseln |
|
Lisp : DCL / list_box
Geos am 30.10.2009 um 19:27 Uhr (0)
Zitat:...erzeugen die passende DCL-Datei zur LaufzeitzB.: http://www.cadmaro.de/tipps-und-tricks/lisp/dcl-dialogdatei-direkt-aus-lisp.html ------------------Schöne GrüßeErnst www.geopaint.at[Diese Nachricht wurde von Geos am 30. Okt. 2009 editiert.]
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
Geos am 31.07.2002 um 08:08 Uhr (0)
Servus MarcIch hab noch zwei Funktionen hinzugefügt - aufbauend auf Deine.;;;*******************************************************************;;; Fügt ein Objekt zur Gruppe hinzu(defun c:addg (/ GNAME SGET) (if (setq sget (entget (car (entsel "
Gruppe zu der hinzugefügt wird wählen: ")))) (progn (setq gname (get-groupname sget)) (command "_.-group" "H" (car gname) pause) ) ;_ end progn ) ;_ end if) ;_ end defun;;;*******************************************************************;;; Entfernt ein Ob ...
|
| In das Form Lisp wechseln |
|
Lisp : Code für AutoCAD-Gruppen...
Geos am 11.03.2003 um 08:05 Uhr (0)
Hallo Marc !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!! Frage: Soll ich alle vorherigen Versionen in diesem Thread löschen? !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!Ich wäre dafür, wird dadurch übersichtlicher.Gruß, Ernst
|
| In das Form Lisp wechseln |
