---

SD_Rohrlaenge.txt

Hallo Zusammen.

Ich nutze dieses Forum nun schon seit längerer Zeit, und bin immer wieder auf hilfreiche Informationen gestoßen.
Da ich nun ein LISP zur schnellen Ermittlung einer Rohrlänge geschrieben habe, wollte ich das als Anlass nehmen mich hier zu registrieren. Eventuell kann ja der Ein oder Andere auch einen Nutzen daraus ziehen.

Für mich war die Ermittlung einer Rohrlänge etwas zu umständlich bisher (Schnitt, Messen Punkt zu Punkt, etc) daher habe ich dieses LISP ins Leben gerufen. Es ermittelt das Volumen eines Teils und berechnet, nach Eingabe des Innen- und Außendurchmesser, die Länge des Rohrs.

------------------
Viele Grüße
Felix

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke fürs Veröffentlichen !

Ich hab es mal hier untergebracht: http://osd.cad.de/lisp_3d_04.htm

Schön wäre wenn unter "D aussen" und "D innen" ein paar gängige Werte zur Auswahl angeboten werden.
Oder unter Geländerrohr eine Tabelle mit üblichen Durchmessern.

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Das Thema kommt mir irgendwie bekannt vor:

http://ww3.cad.de/foren/ubb/Forum29/HTML/004225.shtml#000001

Es gibt eine einfache Möglichkeit, wenn der Querschnitt des Rohres konstant ist:

Volumen des Körpers geteilt durch Querschnitt ergibt Länge.

------------------
freundliche Grüße
Achim

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Achim,

genau nach dieser einfachen Formel funktioniert das LISP. 

@highway45

Bei uns kommt zu 100% nur ein Geländerrohr zum Einsatz. Die Möglichkeit der Eingabe von Da und Di habe ich für meine Kollegen integriert. Gängige Werte gibt es hier nicht, ist von 10 bis 1000mm alles dabei 

Natürlich lässt sich alles umsetzen, aber dann müsste jemand mit konkreten Werten kommen der dies braucht und ich müsste erst rausfinden wie ich solche Vorauswahlelemente in Lisp darstellen kann.

------------------
Viele Grüße
Felix

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Konkrete Werte kenne ich jetzt auch nicht, ist sicher auch je nach Branche anders.

Ein einfacher Baustein wäre zum Beispiel dies:

Code:

---

(Da  :title "D aussen [mm]"
:range (10 20 27 30 40 50)
:initial-value 27)
(Di  :title "D innen [mm]"
:range (6 16 22.4 26 36 44)
:initial-value 22.4)

---

Schöner wäre natürlich eine logische Tabelle (sd-create-logical-table) in der Da und Di gemeinsam gewählt werden.

------------------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Eine selbstlernende Version:

Code:

---

(Da :value-type :positive-number
:prompt-text "Außendurchmesser in mm eingeben"
:title "D aussen [mm]"
:proposals (27)
:auto-add-proposal t
:persistent-proposals t
:initial-value
(when Gelaender
(progn
(SD-SET-VARIABLE-STATUS 'Da :value 27)
(SD-SET-VARIABLE-STATUS 'Da :enable nil))
)
)
(Di :value-type :positive-number
:prompt-text "Innendurchmesser in mm eingeben"
:title "D innen [mm]"
:proposals (22.4)
:auto-add-proposal t
:persistent-proposals t
:initial-value
(when Gelaender
(progn
(SD-SET-VARIABLE-STATUS 'Di :value 22.4)
(SD-SET-VARIABLE-STATUS 'Di :enable nil))
)

---

Dann sind die zuletzt eingegebnen Werte stets verfügbar

------------------
meine LISP-Makros sind auf osd.cad.de Disclaimer
Grüße aus Wien

Walter

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo zusammen,

könnte man nicht die Frontfläche des Rohrs
(oder jeder anderen Form zB.Vierkantrohr, Vollstab usw.)
antippen, die Oberfläche der Stirnfläche ermitteln lassen und das Volumen
dadurch teilen ?

Code:

---

GET_VOL_PROP measures the properties of parts, assemblies, and faces.
                    +---------------<------------+
                    V                            |
-->--(GET_VOL_PROP)--+--(:FOR_FACE)-----|MPFSA|---+
                    |                            |
                    +--(:FOR_PART)-----|MPPASA|--+

---

------------------
Gruss Friedhelm

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Würde vom Prinzip her sicher genauso funktionieren.
Die Enden sind bei uns aber immer eingespannt bzw. verbaut, daher nicht anwählbar ohne Zusatzschritte. Daher der Weg über festgelegte Durchmesser, dann können schnell hintereinander die unterschiedlichen Längen aus der Ferne mittels Klick auf das Teil eruiert werden.

------------------
Viele Grüße
Felix

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

SD_Rohrlaenge.lsp

Der Selbstlerneffekt klappt wunderbar, habe ich gleich integriert.

Zitat:

---

Original erstellt von Walter Geppert:
Eine selbstlernende Version:

Code:

---

    (Da  :value-type  ositive-number
            rompt-text "Außendurchmesser in mm eingeben"
          :title "D aussen [mm]"
            roposals (27)
          :auto-add-proposal t
            ersistent-proposals t
          :initial-value
    (when Gelaender
  (progn
  (SD-SET-VARIABLE-STATUS 'Da :value 27)
  (SD-SET-VARIABLE-STATUS 'Da :enable nil))
    )
)
    (Di  :value-type  ositive-number
            rompt-text "Innendurchmesser in mm eingeben"
          :title "D innen [mm]"
            roposals (22.4)
          :auto-add-proposal t
            ersistent-proposals t
          :initial-value
    (when Gelaender
  (progn
  (SD-SET-VARIABLE-STATUS 'Di :value 22.4)
  (SD-SET-VARIABLE-STATUS 'Di :enable nil))
    )

---

Dann sind die zuletzt eingegebnen Werte stets verfügbar

---

------------------
Viele Grüße
Felix

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo!
Habe gerade mal das Lisp ausprobiert und steh grad etwas auf der Leitung was die Eingabemöglichkeiten angeht...
- wenn Geländerrohr angewählt ist, werden immer die voreingestellten Werte für Da und Di genommen
- wenn Geländerrohr nicht angewählt ist, kann ich eigene Da und Di eingeben
- aber was passiert, wenn Teil ausblenden an- bzw. abgewählt ist  - ich kann keinen Unterschied erkennen

Eine Ungenauigkeit gibt es allerdings noch.
Wenn in dem Rohr Bohrungen sind, wird die Länge falsch ermittelt.

Gruß Melanie

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Melanie!

Die Option "Ausblenden" ist dazu gedacht, dass wenn man mehrere Rohre am Schirm dargestellt hat, beim Anklicken und Messen das Rohr gleich aus der Darstellungsliste entfernt wird und man so eine visuelle Kontrolle hat welche Rohre noch nicht gemessen wurden.

Das mit den Bohrungen ist klar, da das Tool ja auf das Volumen des Rohres zurückgreift (Länge = Volumen durch Querschnittsfläche).
Ebenso verhält es sich mit Fasen etc. wobei sich hier die Länge meist im Nachkommabereich ändert. Ich habe leider keine Idee wie man diese Problematik kompensieren könnte.

------------------
Viele Grüße
Felix

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Da gibt es leider nicht viele Möglichkeiten. da ihr schon richtig schreibt, daß Volumen geteilt durch Querschnitt für die Länge benötigt wird. Wenn ich so ein Problem habe, kopiere ich mir den Solid, entferne die Löcher und Fasen an diesem und messe dann diesen aus, um eine Rohr- oder Kabellänge zu bekommen. Bei anderen (nicht kreisrunden) Querschnitten projiziere ich mir die Fläche auf eine Arbeitsebene und messe die Fläche dort aus und berechne das Volumen durch Abfrage der Teileeigenschaften. Die Länge berechne ich dann manuell.

------------------
freundliche Grüße
Achim

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Achim!
Nur so als Anmerkung zur Flächenmessung bei nicht kreisrunden Querschnitten.
Du mußt die Fläche zum Messen nicht erst auf eine AE projizieren. Rechte MT auf die Fläche und dann Flächenmessung auswählen. Dort gibt es dann einen Punkt Berechne Oberfläche und schon hast du die Fläche in mm².
Bei Rohren mit Bohrungen hab ichŽs genau so gemacht wie du auch.

@Felix: Das mit dem Ausblenden funktioniert bei mir irgendwie nicht. Das Rohr wird nach dem Messen immer noch dargestellt, ist aber nicht weiter schlimm. (liegt evtl. an V17?)

Gruß Melanie

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Kann sein das der Befehl in der V17 noch nicht verfügbar war. Ich nutze die 18.1

Heißt dein Modeling Fenster "1" (siehe oben in der Titelleiste)

Die Option bezieht sich nur auf das 1. Fenster

Code:

---

(sd-call-cmds (remove_from_vp_drawlist "1" (SD-INQ-OBJ-PATHNAME teil1)))

---

------------------
Viele Grüße
Felix

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Da liegt der Hund begraben...
...im Fenster 1 ein funktionierts auch bei V17 

Gruß Melanie

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo MeFi
mit projizieren meinte ich den (wahren) Querschnitt auf eine Arbeitebene projizieren. Wenn die Fläche schräg geschnitten ist, bringt das direkte Messen falsche Ergebnisse. Trotzdem danke für den Hinweis.

------------------
freundliche Grüße
Achim

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Gehrungsschnitte bzw. die Ermittlung von Flächen kann man sich aber wiederum sparen wenn man mit diesem Tool mit Da und Di arbeitet. Vorausgesetzt man kann mit der Ungenauigkeit, dass der schräge Zuschnitt das Volumen verfälscht. Aber das Problem bleibt ja auch wenn man Volumen durch Fläche rechnet.

------------------
Viele Grüße
Felix

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo Felix,

Das ist schon richtig, nur sind meine Querschnitte selten kreisrund sondern rechteckig oder sonst was (Z.B. Luftquerschnitte von Schläuchen im Klimabereich). Deshalb gehe ich den Weg über die Arbeitsebene.

------------------
freundliche Grüße
Achim

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP