|
PTC Creo Elements/Direct Modeling : statistisches Füllen eines Volumenkörper mit Fasern
Walter Geppert am 10.02.2016 um 20:37 Uhr (3)
OK, das sieht schon weitaus friedlicher aus. In einen gegebenen quadratischen Querschnitt willst du also zufällig so viele Kreismittelpunkte einpassen, dass einerseits ihre Gesamtanzahl mit gegebenem Kreisdurchmesser ca 60% der Quadratfläche entspricht und jeder Punkt von jedem Anderen mindestens um den Kreisdurchmesser entfernt ist. Das sollte programmtechnisch einigermassen zu stemmen sein. Ein paar Iterationen mehr oder weniger hält die CPU schon aus Dann einen Faserzylinder der Reihe nach entsprechend ...
|
| In das Form PTC Creo Elements/Direct Modeling wechseln |
|
AutoLisp : ENTSEL Linie
vision am 21.04.2004 um 21:28 Uhr (0)
Hallo, wie ich oben angemerkt habe, ist das Lisp-Prg. nicht von mir. Ich möchte aber das Prg. so anpassen, dass es auch mit den von uns hauptsächlich benutzten 2D-Polylinien funktioniert. Das kompl. Prg. benutzt die Angabe um eine parallele Linie zu erzeugen. Leider verstehe ich das Prg. auch nur ganz grob. Also, wenn ich auf eine normale Linie klicke bekomme ich Koordinaten angezeigt (x, y, z) die zur weiteren Berechnung so benötigt werden. Diese Koordinaten müssten so auch aus einer 2D-Polylinien generie ...
|
| In das Form AutoLisp wechseln |
|
Autodesk GIS Produkte : Von 2D-Shape nach 3D-Shape
Wala am 12.08.2010 um 08:37 Uhr (0)
Vielen Dank für eure Hilfe!Das LISP würde ja perfekt funktionieren, nur habe ich nach meinem Shape-Import keine Linien sondern Polylinien mit Objektdaten, und da ist nichts mehr mit Anfangs- und Endpunkt auf Höhe setzen. Wenn ich die Polylinien auflöse, habe ich keine Verbindung mehr zu den Objektdaten. Werde mit meinen bescheidenen Fähigkeiten mal versuchen, zusätzlich zu den Höhen auch X und Y auszulesen, neue Linien zu generieren und meine Objektdaten wieder an die Linie zu schreiben.Danke!------------- ...
|
| In das Form Autodesk GIS Produkte wechseln |
ASCII_PRHS.zip |
Lisp : Punktkoordinaten aus Datei auslesen
Fennik am 25.11.2008 um 10:49 Uhr (0)
Hallo zusammen,ich bin super neu hier im Forum (Denk mal, dass ich an der richtigen Stelle bin) und habe Civil 2008 / AutoCAD 2008 bekommen (und einen Schulungstag).Leider reicht das nicht aus um meine neue Aufgabe zu meistern.Und da hab ich bei euch gesehen, dass es LISP-Dateien gibt um seine Arbeit zu erleichtern.Ich habe aber keine Ahnung wie man die schreibt (benutzen kann ich sie schon).Ich hoffe, dass Ihr mir da weiterhelfen könnt.Problem:Ich erzeuge einen Excel-Datei (siehe Anhang) die aus Punktnumm ...
|
| In das Form Lisp wechseln |
|
AutoLisp : Umschalten zwischen geöffneten Zeichnungen
startrek am 01.08.2004 um 17:26 Uhr (0)
Hi Wilfried, mit Lisp kann ich Dir nicht dienen, hier ein gruseliger VBA-Code - hoffentlich bekomm ich keine Prügel hier ;-) CU Nancy -- Userform1.frm Code: Option Explicit Private Sub UserForm_Initialize() Dim i% For i = 0 To Documents.Count - 1 ListBox1.AddItem Documents.Item(i).Name Next End Sub Private Sub ListBox1_Click() Dim i% With ListBox1 For i = 0 To .ListCount If .Selected(i) Then if Documents(i).WindowState = acMin then Documents(i).Window ...
|
| In das Form AutoLisp wechseln |
|
AutoCAD VBA : Gruppenbeschreibung auslesen
CAD-Huebner am 31.01.2013 um 12:39 Uhr (0)
Hier auch noch eine Variante ohne Active XCode:;; Erstellt eine Liste mit allen Gruppennamen und deren Beschreibung;; Udo Hübner(defun C:ListGroupnamesAndDescription () (foreach entry (dictsearch (namedobjdict) "ACAD_GROUP") (cond ((= 3 (car Entry)) ; Gruppenname (prompt (Strcat "
Gruppenname: " (cdr Entry)))) ((= 350 (car Entry)) ; Gruppenbeschreibung (prompt (Strcat " Gruppenbeschreibung: " (cdr (assoc 300 (entget (cdr Entry))))))) (T nil) ) ) (prin1)); gleich ausführen(C:ListGroupnamesAndDescri ...
|
| In das Form AutoCAD VBA wechseln |
|
Rund um AutoCAD : Autocad 13_ 2 verschiedene Benutzerprofile
CADmium am 21.09.2012 um 10:07 Uhr (0)
... eigentlich sollte eine 2. acad.pgp in einem anderen Suchorder reichen .. acad verwendet die zuerst gefundene ... also bräuchte man via setenv ect . bloß die reihenfolge der Suchordner ändern und via neuinit die andere acad.pgp initialisieren ... Würde mittels kleinem Lisp und Button gehen oder sogar via Reaktor automatisch beim BKS wechseln oder ähnlichem ...Profilwechsel wurde vor kurzem hier beschrieben:http://ww3.cad.de/foren/ubb/Forum54/HTML/029348.shtml#000001------------------ - Thomas - ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : Schriften als Pfade + verbinden
CADmium am 15.12.2008 um 08:03 Uhr (0)
Vielleicht hat ein chinesisches Autocad sowas ....Wenn es nicht gerade Sonderzeichen ect. sind, würde sich doch für euer Problem ein Programm anbieten , das den Text ausliest, sich dessen Eigenschaften und Inhalt merkt und jedes Zeichen duch (eine) entsprechende Polylinie ersetzt und dann den Text löscht. Das sollte sich z.B. mit Lisp realisieren lassen.Aber wie gesagt, bei den chinesischen Schriftzeichen ist da ( auch wenn es möglich wäre) sicher Schluß..------------------ - Thomas -"Bei 99% aller Probl ...
|
| In das Form Rund um AutoCAD wechseln |
|
OneSpace Modeling : Notebook für OSDM14
Walter Geppert am 11.12.2006 um 09:51 Uhr (0)
Zitat:Original erstellt von Gerhard Deeg:... sind ja immerhin 1.000,--Euronen nur für Präsentationen usw.Also grade, wenn Kunden im Spiel sind, ist ein zuverlässiges Gerät mit guter Performance wärmstens zu empfehlen. Ich hab vor ca. 3 Jahren ein HP NW 800 für ein Schweinegeld gekauft, aber noch nie bereut. Läuft mit jedem Beamer problemlos, hat alles drin und alles dran was man sich nur vorstellen kann, bis auf den Zehnerblock, den jetzt seine Nachfolger für weniger Geld auch noch haben. Billig ist immer ...
|
| In das Form OneSpace Modeling wechseln |
|
Autocad VBA : alle Blöcke (und deren Werte) einer Zeichnung in Datei auslesen
mapcar am 23.11.2004 um 21:25 Uhr (0)
Tobias, bitte versuch mal, nur das zu zitieren, worauf du dich beziehst. Ich habe deinen letzten Beitrag dahingehend geändert (wie schon ein paarmal). Wiederholungen gibt es schon genug, und wenn Codepassagen dann auch immer noch in Zitaten wiederholt werden, wird das alles sehr schwer lesbar. ------------------ (defun - Lisp over night - AutoLisp-Programmierung für AutoCad - Da weiß man, wann man s hat Meine AutoLisp-Seiten Mein Angriff auf dein Zwerchfell Mein Lexikon der Fotografie Mei ...
|
| In das Form Autocad VBA wechseln |
|
Rund um AutoCAD : Lisp Linien Winkel 45 Grad filtern
cadffm am 17.12.2012 um 16:44 Uhr (0)
Code:(defun c:W45Lines (/ SS DO CT OB NAME) (princ "
Es werden nur Linien im Winkel 45,135,225 und 315° gefiltert!") (setq SS (ssget ((0 . "LINE")))) (setq CT 0) (setq DO (ssadd)) ;leeren auswahlsatz erzeugen (while (setq NAME (ssname SS CT)) (setq OB (entget NAME)) (if (member (read(angtos (angle (cdr(assoc 10 OB)) (cdr (assoc 11 OB))))) (45.0 135.0 225.0 315.0)) (setq CT (1+ CT)) (ssdel NAME SS) );if );while (if (zerop(sslength ss)) (princ"
Keine Linie gewählt") ( ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um AutoCAD : mehrere Blocks um Basispunkt drehen
cadffm am 12.02.2010 um 11:39 Uhr (0)
Was ist daran geändert ? (will mich nicht groß einlesen, es wäre nur nett wenn du dasgleich mal dazu schreibst, besonders für die nicht-Lisp´ler)Wenn ich es richtig sehe hast du es sogar verschlimmerbessert !?Der Code wurde hier ursprünglich (gleube ich) von Otterloh gepostet, so wie ich es oben auch verlinkt habe,man sollte es nicht Stück für Stück auseinandernehmen, lieber im ganzen editieren (wenn "nötig")und KOMMENTIEREN !Hier nochmal der Link zum eigentlichen Beitrag von otterloh: KLICK!-------- ...
|
| In das Form Rund um AutoCAD wechseln |
|
Rund um Autocad : Nicht auffindbare Blöcke
CADchup am 13.05.2003 um 14:24 Uhr (0)
Hi, ich hab was gefunden. Vielleicht kannst Du damit etwas anfangen. Das Lisp schreibt die anonymen Blöcke, deren Namen mit *M anfangen mit WBLOCK raus. Zur Kontrolle schon mal nicht schlecht. (defun C:AnonWblock (/ c-err ss ssp) (setq ssp (getpoint "
Basispunkt:")) (command "_-block" "TMPblock" ssp (ssget "X" ((2 . "`*M*"))) ; hier anstatt *M* das gewünschte Muster eintragen "" ) (initdia) (command "_-wblock" "TMPblock") (command "_oops") (command "_purge" "_bl" "TMPblock" ...
|
| In das Form Rund um Autocad wechseln |
