|
Lisp : Simulation beschleunigen / command Befehl ersetzen
THE_ONE am 09.06.2009 um 17:06 Uhr (0)
Hallo!Habe hier eine kleine Simulation mit Lisp geschrieben! Habe später vor etwas größeres (aufwendigeres) zu machen.Code:(defun C:Dreh(/ x) (setq x 30) ;(command "_.pline" "950,500" "1050,500" "1000,500" "1000,550" "1000,450" "") (command "_.rectang" "975,475" "1025,525") (command "_.pline" "950,500" "1050,500" "1050,550" "1000,550" "1000,450" "950,450" "950,550" "1050,550" "1050,450" "1000,450" "") (setq y 0) (while (= y 89) (command "_.rotate" (entlast) "" "1000,500" "1") (setq y (+ y 1)) ( ...
|
| In das Form Lisp wechseln |
|
Lisp : Schraffuren nach Farben auswählen
muntafuner am 22.10.2019 um 15:15 Uhr (1)
Hallo zusammen,ich bin auf der Suche nach einer Lösung (wahrscheinlich am besten mittels einer Lisp-Datei) für folgende Problemstellung:Derzeit bin ich beschäftigt erhaltene Zeichnungen auf meinen Layer-Standard zu bringen. Dabei liegen alle Schraffuren der erhaltenen Zeichnung auf dem Layer "Poly_Muster" jedoch mit verschiedenen Farben.Nun möchte ich zum Beispiel alle Schraffuren auf dem Layer Poly_Muster mit der Farbe 241,227,215 auswählen und auf meinen Layer "Poly_Stahlbeton" mit der Farbe VonLayer set ...
|
| In das Form Lisp wechseln |
|
Lisp : Wenn Dann
Martin Henkel am 28.11.2007 um 09:31 Uhr (0)
Hallo Jörn und Cadwiesel,erstmal Guten Morgen (an Alle) und Danke.Allerdings bin ich jetzt erstmal gefrustet.Grund meiner ganzen Anfragen, war die Ergänzung der afkoord.lsp die hier schon geraume Zeit herumschwiert. Aber ich werfe jetzt erstmal das Handtuch (Respekt für die, die Lisp verstehen).Bei meiner Ergänzung ging es darum Koordinatenkreuze für das gewählte Ansichtsfenster einzufügen und anschließend vom Modellbereich in den Layoutbereich zu schieben. Zuerst hat es noch für ein Layout funktioniert. B ...
|
| In das Form Lisp wechseln |
|
OneSpace Modeling : OSD und Historie (ausnahmsweise?)
MagnusDeininger am 19.07.2006 um 12:27 Uhr (0)
Hi,also ich kämpfe immer noch mit Spritzgussteile und OSDM herum.Eure Beiträge und mein ursprünglicher Wunsch haben mein Ideenreichtum beflügelt und ich habe ein Vorschlag:Wenn nach dem Erstellen der Ausformschrägen die Rundungen am Teil erstellt werden, so ist die Reihenfolge dieser Rundungen für spätere Änderungen sehr wichtig.Jetzt habe ich angefangen immer nach einem erfolgreichen Verrunden diese Rundungsflächen in einem fortnummerierten Formelement (DefFormElem) zu sammeln (zB. Radien_01, Radien_02 .. ...
|
| In das Form OneSpace Modeling wechseln |
|
Lisp : Wo liegt hier der Fehler ???
romi1 am 04.05.2007 um 09:29 Uhr (0)
Hi!Habe mich scheinbar schon zu früh gefreut ....Brauche bitte nochmals Eure Hilfe bzw. Eure Meinung:Habe nun das Programm nach den Angaben von Herrn Hübneradaptiert und es zeichnet nun auch brav die Längsabwicklungder 3D-Polyline. Wenn ich allerdings die Funktion nochmalsaufrufe, und die gleiche 3D-Polyline wähle und den Einsetzpunktetwas oberhalb angebe, bekomme ich ein anderes Ergenis.Beim 3. Durchlauf wirds wieder etwas anders gezeichnet, usw...Meistens wird (unerklärlicherweise) ein Punkt auf die zuvo ...
|
| In das Form Lisp wechseln |
|
CoCreate Modeling : Plötzlich ungenaue Masse im 3D
NOBAG am 01.08.2010 um 15:39 Uhr (0)
Hallo Michi,ich kenne das Problem Lies dazu bitte auch folgenden Thread "verdrehte Teileso ein Fehler ist nicht wieder vollständig zu entfernen. Der Support sagt dazu, man solle halt nichts an solchen Flächen/Teilen ausrichten und diese nicht benutzen um andere Teile zu bewegen ...Vielleicht hilft Dir das erwähnte Lisp im Thread, um die schiefen Flächen wenigstens zu finden.Es wurde von unserem Support erstellt und ich habe die ausdrückliche Genehmigung es weiterzugeben.Mögliche Ursachen (meines Wissens): ...
|
| In das Form CoCreate Modeling wechseln |
|
BricsCad : -einfüge verlangt Zwischenoption für Blockwahl
Peter2 am 20.02.2017 um 15:46 Uhr (8)
Ich habe ein Lisp, dass unter V16 und Acad 2017 gut läuft. Darunter gibt es auch Blockeinfügen auf diese Art:Code:(if (findfile zielblock) (command-s "_.-insert" (findfile zielblock) schacht_pos "1" "1" "0")jetzt in V17 fällt er aber die Nase und meckert die fehlende Eingabe von ? oder ~ an:Code:: _.-insert?, um Blöcke in der Zeichnung aufzulisten/~ um den Explorer Dialog zu öffnen/Einzufügender Block: : 1Der Befehl wurde nicht erkannt "1". Bitte versuchen Sie es erneut.TIrgendwann (ich weiss noch nicht, ...
|
| In das Form BricsCad wechseln |
|
OneSpace Modeling : Tolerierung 3D-Modelle
Walter Geppert am 07.04.2008 um 15:46 Uhr (0)
Zitat:Original erstellt von Frauke N.: Würde die ganze Sache vielleicht vereinfachen und man würde sich ein paar Zeichnungen sparen...Tja, die Möglichkeit, Bemassungen (und auch Toleranzen) gleich im 3D-Modell anzubringen besteht, sie lässt sich dann auch auf 2D-Zeichnungen bei Bedarf übernehmen, aber meiner Meinung nach überlädt man damit das 3D-Modell mehr als es vielleicht Nutzen bringt.Allenfalls bei einer wirklich komplett integrierten Fertigungslösung, wo tatsächlich die Geometriedaten vom 3D überno ...
|
| In das Form OneSpace Modeling wechseln |
|
Lisp : Bögen im Raum Endpunkt per DXF Gruppencode 210
THE_ONE am 05.03.2007 um 13:34 Uhr (0)
allo!Nein, erster Grund warum ich das wissen wollt ist dass ich den Befehl trans nicht gekannt habe, und ich aber versuche 3d Objekte in Lisp zu erstellen. Der ja, glaube ich, genau das macht. Funktionieren tut trans glaube ich so:(trans zu_transformierender_Punkt von_Koordinatensystem zu_Koordinatensystem disp)von_Koordinatensystem und zu_Koordinatensystem können die Werte: 0 Weltkoordinatensystem (WCS)1 Benutzerkoordinatensystem (UCS)2 Display Koordinatensystem (DCS)3 Papierbereich Display Koordinatensys ...
|
| In das Form Lisp wechseln |
|
Lisp : LISP Novice sucht Hilfe zu ATTOUT
Smiley1302 am 07.07.2015 um 15:39 Uhr (1)
ja das ist so gewollt. zur erleuterung.Ziel ist es:Aus einem plan mit rauminformationen (raumnummer, abteilung, qm usw.) die in einem block mit attributen vorkommen auszulesen. diese ausgelesenen informationen werden dann über eine excel datein geöffnet und sollten optimalerweise bearbeitbar sein (hatten mal sowas mit Planstämeliformationen. das war in einer anderen firma. da ging das über eine csv datei die von exel erzeugt wurde und diese wurde dann über einen befehl wieder eingeladen).Es werden dann z.b ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Koordinatenbemassung mit Ergänzung
Bassi am 16.11.2005 um 20:58 Uhr (0)
Hallo,ich wollte das ganze noch einwenig verbessern und erweitern, aber irgendwie klappt das nicht. Es kommt immer wieder Syntaxfehler.(DEFUN c:ordi (/ nprpfpcpDXXDXDYYDYP1P2P3)(COMMAND "bks" "o" pause)(COMMAND "_dimordinate" (SETQ np (GETPOINT "
Startpunkt")) (setq fp (GETPOINT "
Führungspunkt"))) (if fp (progn (setq DXX (- (car fp) (car np)) DX (- (car np) (car fp)) DYY (- (cadr fp) (cadr np)) DY (- (cadr np) (cadr fp)) ) (if (and ( DYY DXX) ( DX ...
|
| In das Form AutoLisp wechseln |
|
Rund um AutoCAD : suche online Literatur über AutoCAD 2004
CADmium am 20.07.2007 um 21:39 Uhr (0)
naja .. ich kenne die Bücher aus deinen Links nicht, aber .. 1. bist du im englischen so fit? 2. .. Reference ist meistens ein NAchschlagewerk, das nicht auf Feinheiten, Machbarkeiten, Herangehensweisen bei der Programmierung einget.Das "Autocad programmieren mit VBA" hatte ich schon mal durchgeblättert. Machte einen ordentlichen Eindruck. Geht auf das Objektmodell in ACAD und die ganzen Manipulationsmöglichkeiten ein. Grundlagen des VB werden auch behandelt.Um eine wirkliche Empfehlung auszusprechen müßte ...
|
| In das Form Rund um AutoCAD wechseln |
|
AutoLisp : Koordinatenbemassung mit Ergänzung
Bassi am 14.11.2005 um 08:11 Uhr (0)
Hi,ich möchte mir gerne einen Zusatz zur Koordinatenbemassung von AutoCAD lt 2000 schreiben (ähnlich der von AutoCAD mechanical). Da ich leider ein absoluter Anfänger bin, erweist das ganze ziemlich schwierig für mich. Eine kurze Erklärung zum Bild:Wenn das Lisp gestartet wird:Frage nach dem Startpunkt und dem Abstand der Bemassung, wenn der Startpunkt die Koordinate null hat (egal ob Achse X oder Y) soll ein Kreis Ø2 in einem Abstand 1,25 vom Endpunkt der Bemassung erstellt und eine Linie aktiviert werde ...
|
| In das Form AutoLisp wechseln |
