|
Lisp : geringsten Abstand zwischen 3D-Polylinien ermitteln
Andreas Kraus am 09.07.2010 um 16:11 Uhr (0)
Ist zwar schon etwas her, aber ich habs nicht vergessen (hatte nur so viel anderes zu tun)Hier meine Idee wie ich das rausbekommen möchte:Wenn ich zwei Geraden im Raum habe und drehe die beiden zusammen so daß die eine Gerade (egal welche) identische Z-Koordinaten im Anfangs und Endpunkt hat (Drehwinkel lässt sich ja berechnen) und drehe dann nochmal in Achse dieser Geraden so daß die andere auch identische Z-Koordinaten im Anfangs und Endpunkt hat haben sich die Geraden relativ zueinander nicht verändert ...
|
| In das Form Lisp wechseln |
|
Lisp : Start- und Endparameter des Ellipsenbogens
Dorfy am 09.07.2010 um 19:23 Uhr (0)
wieso raten?CADmium hat dir doch schon alles gesagt?!wenn nicht gibt oft die Hilfe Auskunft (habe gerade aber nicht nachgeschaut )oder hier------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : Drucker(name) vom letzten Befehl _plot
Dorfy am 09.07.2010 um 20:01 Uhr (0)
ungetestet und nur als Idee...Logfile und/oder Registry - es ist einfach zu warm ------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : AutoLisp-Funktion in DWG-Datei integrieren
archtools am 09.07.2010 um 23:44 Uhr (0)
Zitat:Fügt man den Programmcode 1:1 in ein Textelement ein, werden Strings beim lesen des Textes und umwandeln zu Programmcode, nicht mehr als Solche erkannt.Aber natürlich wird Text als Programmcode erkannt, wenn im Text Programmcode steht.(setq str "(defun c:test () (alert "HALLO"))")Das speicherst Du jetzt auf eine Dir genehme Weise in einer Zeichnungsdatei ab (als Textelement macht sich das nicht besonders vorteilhaft, als Dictionary schon etwas besser), und holst es dann auf die passende Weise wieder ...
|
| In das Form Lisp wechseln |
|
Lisp : Drucker(name) vom letzten Befehl _plot
Dorfy am 12.07.2010 um 11:48 Uhr (0)
vllt. ist hier was bei------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
|
Lisp : Block auf anderen Layer legen und Fehler wenn Block nicht vorhanden
Daniel Möller am 13.07.2010 um 12:00 Uhr (0)
Hallo miteinander,durch eure Hilfe hat das ganze bis jetzt super funktioniert allerdings habe ich jetzt ein Problem.In einer Zeichnung möchte ich alle Blöcke mit mit dem Namen AQA_did auf den Layer Pumpenblock legen.Da ich einen Button mit ca. 30 solcher Funktionen hab kann ich das nicht manuell auswählen.Wenn ich jetzt in einer Zeichnung den Button drücke läuft es soweit durch bis er eine Funktion hat bei der der Block nicht vorhanden ist. ;legt alle genannten Blöcke auf den Layer Pumpenblock(defun C:Pump ...
|
| In das Form Lisp wechseln |
|
Lisp : ShortPath / LongPath
fuchsi am 13.07.2010 um 15:40 Uhr (0)
wie ich gedacht habe.Aber ich kapiere nicht, wozu Du vom kurzen zum langen namen konvertieren willst.Im Lisp arbeitest Du immer mit langen Dateinamen. Nur wenn Du den kurzen Namen zum Bedienen der Schnittstelle brauchst, kannst Du dir den ja eh eruieren.
|
| In das Form Lisp wechseln |
|
Lisp : Block- Ursprung- Gruppe
MARTINLE am 13.07.2010 um 06:38 Uhr (0)
Guten Morgen!Folgende Fragestellung ergab sich bei der Arbeit:Immer wieder werden Blöcke eingefügt und dann einzeln in Ursprung zerlegt.Nachher wird aus den Einzelteilen wieder eine Gruppe erstellt damit man eben diesen ursprünglichen Block bzw. Blöcke noch greifen kann. Aus diesem Grund habe ich mal folgendes Lisp "gebastelt". Dieses verwendet auch ein Lisp ("MG") hier aus dem Forum! Danke an dieser Stelle auch mal an den Verfasser für dieses tolle Lisp. (defun c:Urgruppe (/ AWS)(if (null C:mg) (load "mg. ...
|
| In das Form Lisp wechseln |
|
Lisp : Punkte markieren Schnellauswahl
CADmium am 14.07.2010 um 10:21 Uhr (0)
????in Lisp wäre das sowas(sssetfirst nil (ssget "_x" (list (0 . "POINT")(cons 410 (getvar "CTAB")))))------------------ - Thomas - "Bei 99% aller Probleme ist die umfassende Beschreibung des Problems bereits mehr als die Hälfte der Lösung desselben."
|
| In das Form Lisp wechseln |
|
Lisp : alles klar mit AutoCAD 2011?
Dorfy am 15.07.2010 um 08:56 Uhr (0)
[Edit: auch wenn es nicht ganz zur Überschrift passt ]die dcl-Variante sieht gut aus und man braucht keine andere Umgebung (mein Favorit)Die Expresstools bringen auch was mithier ein Bsphier noch was zum Thema mit VBA oder doslibmit .net findet man sicher auch noch wasauch interessant [Edit: da war Jörn schneller ]------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."[Diese Nachricht wurde von Dor ...
|
| In das Form Lisp wechseln |
|
Lisp : savedata.lsp
Dorfy am 15.07.2010 um 11:47 Uhr (0)
Zitat:Original erstellt von cad4fun:Meine ACADVER = "17.1s (LMS Tech)" (schreibgeschützt)Das Ersetzen von 16 durch 17.1s hilft nicht weiter und meine LISP-Kenntnisse sind auf einem zu niedrigem Niveau, um die notwendigen Anpassungen zu treffen.Hat jemand einen Rat - besser eine Lösung - für mich? dann schau dir mal an wie1. substr funktioniert2. was getvar in Verbindung mit acadver bewirkt3. und Listen unter Lisp ... And have more fun ------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Program ...
|
| In das Form Lisp wechseln |
|
Lisp : savedata.lsp
cad4fun am 15.07.2010 um 11:36 Uhr (0)
von Vladimir NesterovskyIch bekomme beim Laden der Datei die Meldung:Fehler: no function definition: DICT-GETDer Ausschnitt dazu:;; Get A [Key] Value From Dictionary [Name](cond ((member (substr (getvar "acadver") 1 2) ( "13" "14")) (defun dict-get ( name key ) ;; name and key As strings (x-relist ;; decode the data! (cdr (member (100 . "AcDbXrecord") (dict-getrawdata name key)))))) ((member (substr (getvar "acadver") 1 2) ( "15" "16")) (defun dict-get ( name key ) ;; name and key As strings ...
|
| In das Form Lisp wechseln |
|
Lisp : BKS Im- und Export
Dorfy am 19.07.2010 um 14:50 Uhr (0)
Zitat:Original erstellt von joern bosse:Weiß einer von Euch, wie ich noch mehr Genauigkeit in einer Textdatei speichern kann???vllt "hochmultiplizieren"(mal 10^n und beim import wieder teilen)------------------Mfg Heiko Elefantenjagd in Afrika "... LISP-Programmierer bauen einen Irrgarten aus Klammern und hoffen, dass sich der Elefant darin verirrt..."
|
| In das Form Lisp wechseln |
