|
Lisp : Ploteinstellungen per Lisp
Geos am 02.06.2009 um 13:53 Uhr (0)
HiWeils grad wieder aktuell ist ...Code:(defun c lt () (vla-put-configname (f#actlay) "DesignJet 750C.pc3") (vla-RefreshPlotDeviceInfo (f#actlay)) (vla-put-PaperUnits (f#actlay) 1) (vla-put-usestandardscale (f#actlay) :vlax-true) (vla-put-CanonicalMediaName (f#actlay) "UserDefinedMetric (430.00 x 310.00MM)") (vla-put-PlotRotation (f#actlay) 1) (vla-put-PlotWithLineweights (f#actlay) :vlax-true) (vla-put-ScaleLineweights (f#actlay) :vlax-true)bis hierher läufts, aber dann verursachen sowohlCode:(vla-put-plo ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Höhenkote Lisp Code 3 Fragen
mapcar am 04.09.2004 um 16:58 Uhr (0)
Leute, jetzt läuft hier aber einiges aus dem Ruder! Das Thema einfach mit kaputtlach und wegschmeiss als erledigt zu betrachten, ist reichlich daneben - und auch der Link auf meine Seite trifft nicht so richtig: Da rede ich nämlich von einem Beispiel-Einzeiler, und es geht ausschließlich um die Begründung, warum ich meinen Code als public domain freigebe. Hier geht es aber um ein komplettes Programm, das geistiges Eigentum von Otterloh ist. Und der beschwert sich nicht mal darüber, dass es hier veröffent ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Führung mit Spline als Grundeinstellung
CADmium am 14.11.2006 um 20:15 Uhr (0)
das Objekt "Leader" ist vom Aufbau ähnlich einer LW-Polylinie, IMHO auch davon abgeleitet .. also nix mit Spline!!!Was Autodesk -nicht du per Lisp !!! - beim Spline und auch 2D-Polylinienobjekt , welche ja ihre Stützpunkte in extra "VERTEX"-Objekten speichern , erweitern könnte , wäre eine Art "Punktstil", der die Darstellung des Stützpunktes ( und des nächsten Segmentes) steuert .. z.B. als Pfeil .. oder nächstes Segment unsichtbar usw. .. Solche Erweiterung sollte auch relativ kompatibel zu Vorgängervers ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Wo ist die Datei Filter.dcl
s.wickel am 31.01.2005 um 08:37 Uhr (0)
Hallo Forum! Wo ist die Datei Filter.dcl abgeblieben? Ich benutze immer noch sehr gerne den alten Befehl Filter, weil ich finde dass der tausendmal besser ist als die Schnellauswahl. Ich hatte mir das Dialogfeld ein wenig angepasst . Jetzt probiere ich gerade mit ACAD 2005 rum. Hier sieht das Dialogfeld natürlich wie vorher aus . Ich würde es gerne wieder anpassen. Aber wo ist die Datei ? Die zugehörige LISP-Datei sieht genauso aus wie vorher. Suchen brachte bisher auch nichts . Danke im Voraus für ...
|
| In das Form AutoLisp wechseln |
|
Lisp : Lisp Station einer Gradiente
joern bosse am 12.04.2023 um 13:59 Uhr (1)
Hallo Hea,nur auf die Schnelle, vielleicht kommst Du mit folgendem Gedanken weiter:Wenn ich davon ausgehe, dass Deine Gradiente eine Polylinie ist, dann würde ich von Deinen Markierungspunkten startend temporäre Linien nach oben zeichen. Dann kannst Du pro Linie den jeweiligen Schnittpunkt mit der Polylinie ermitteln = Methode INTERSECTWITHWenn Du die Schnittpunkt hast kannst Du mit VLAX-CURVE-GETDISTATPOINT die Station ermitteln, die Differenz der Station ist die schräge Länge.------------------viele Grüß ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Massenhafter Ursprung
WolfgangGutke am 24.11.2005 um 15:42 Uhr (0)
Wie Thomas, deine Glaskugel ist defekt???Nein, mal im Ernst:Es läuft folgendermaßen ab: Zurerst suche alle INSERT, setze sie mit EXPLODE in einer foreach-Schleife in Ursprung. Dann suche ich wieder alle INSERT, setze sie .... usw., bis es keine Blöcke mehr gibt. Das ganze ist in einer while-Schleife eingepackt.Ich wollte hier nicht ganze Prog reinpacken, da es noch ne ganze Menge Unterprogs und if-Entscheidungen usw. enthält. Ich hoffe, dass dir diese Erklärung ausreicht.VGWolfgang------------------ LISP ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Umschalten zwischen geöffneten Zeichnungen
CADmium am 02.08.2004 um 09:45 Uhr (0)
(vl-load-com) (defun DOCUMENT-ACTIVATE (DOCUMENT / FOUND) (vlax-for ITEM (vla-get-documents (vlax-get-acad-object) ) (if (and(not FOUND) (=(strcase(vla-get-name ITEM))(strcase DOCUMENT)) ) (setq DOCUMENT ITEM FOUND T ) ) ) (if FOUND (vla-activate DOCUMENT)) ) Aufruf dann mit (document-activate Zeichnung1.dwg ) Zu bedenken ist allerdings, das das Lisp normalerweise in eine Zeichnung geladen wird, und ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : rätselhaftes rem
Proxy am 28.12.2004 um 14:18 Uhr (0)
The el allmighty onlinehelp said once: Return Values A number. If any number argument is a real, rem returns a real; otherwise, rem returns an integer. If no arguments are supplied, rem returns 0. If a single number argument is supplied, rem returns number. So ist es leider oder auch gottsei dank der einfach dabei achten ob die Funktionsargumente auch alle keine Reals bzw. Ints sind. ------------------ Lisp?!?! Why the Hell did you pick the most arcane, obscure, and hopelessly-rooted-in-the-co ...
|
| In das Form AutoLisp wechseln |
|
AutoLisp : Fehlermeldung
Waldemar am 04.06.2003 um 11:07 Uhr (0)
Hallo zusammen, habe nachfolgenden Bereich in einem Lispprogramm vor einigen Jahren geschrieben (noch unter R14). (Defun DKL () (Setq KL (Getstring (Strcat
Kanallänge VKL : ))) (If (/= KL ) (Setq VKL KL)) (Setq KL VKL) (Setq KL (Atof KL)) (If ( = KL 0) (And (Princ
Wert muss positiv und ungleich Null sein. ) (DKL)) );If ) Seitdem habe ich mich mit Lisp nicht beschäftigt. Unter R2000 bekomme ich nachfolgende Fehlermeldung: ; Fehler: Fehlerhafter Argumenttyp: stringp nil Offensichtlich lieg ...
|
| In das Form AutoLisp wechseln |
Att-Clone.txt |
Lisp : Attributwerte kopieren & einfügen
vision am 10.03.2017 um 19:46 Uhr (1)
Hallo,ich möchte die Attributwerte von einem Block in einen anderen Block kopieren und einfügen.Das funktioniert mit dem Lisp Att-Clone von CADwiesel soweit einwandfrei, wenn die Attributnamen bei beiden Blöcken gleicht sind. Ich möchte aber, wenn AutoCAD das zulässt, in einen Block kopieren der andere Attributnamen hat.Besteht die Möglichkeit, im Programmabschnitt ";;; Funktion tauscht Attributwerte aus. / (setq ATTNAME ... " andere Attributnamen anzugeben und wenn ja, wie.Für Eure Unterstützung bedanke i ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Alles auswählen ausser... mit Lisp
marc.scherer am 11.01.2006 um 17:47 Uhr (0)
Zitat:Tom Berger schrub:Schreib Dir also ein paar elementare Umwandlungsfunktionen (selset-entityliste usw) und ein paar passendeHallo Tom,mal ne grundsätzliche Frage:Ist das immer der richtige Weg?Geht bei wirklich großen Objektmengen nicht eine Menge Zeit für die Umwandlung von Selset nach Liste und später eventuell wieder zurück drauf? Ist bei großen Selsets ein ss-foreach (siehe Mapcars Seiten...) nicht deutlich effizienter?Ich weiß es nicht, bin nicht so der Laufzeit-Analytiker, aber vielleicht kanns ...
|
| In das Form AutoLisp wechseln |
|
Lisp : DXF-Code Abfragen
CAD-Huebner am 11.09.2006 um 14:34 Uhr (0)
Zitat:Original erstellt von PBPaul:Hallo,ich möchte gern zwischen 3D-Drahtmodel und Gouraud-Schattierung toggeln.Nun weiß ich inzwischen, dass der DXF-Gruppencode 281 für Viewportsfür Draht =1 und für Gouraud-Schattiert = 4 ist.Wie kann ich mit LISP diesen Status abfragen und ändern ?MfG PaulSicher wäre es sinnvoll gewesen, deinen Beitrag zum gleichen Thema hier zu verlinken, http://ww3.cad.de/foren/ubb/Forum54/HTML/014762.shtml und http://ww3.cad.de/foren/ubb/Forum259/HTML/001002.shtml damit du keine do ...
|
| In das Form Lisp wechseln |
|
Lisp : grread / grdraw
Dorfy am 31.07.2009 um 09:47 Uhr (0)
Zitat:Original erstellt von Steff179:... nur das wenn ich Pan dazwischen verwende (mittlere Maustaste) dann zeichnet es immer das letzte neu wenn ich mal still halte (auf die letzte Cursor Position),was schräg aussieht ...Sehr schwer zu verstehen was du da willst Was möchtest du denn genau?! Die Linie soll von Punkt zu Punkt im BKS gehen und sich bei pan nicht verändern?" grdraw - Draws a vector between two points, in the current viewport"------------------Mfg HeikoElefantenjagd in Afrika "... LISP-Progr ...
|
| In das Form Lisp wechseln |
