| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
| |
| PNY präsentiert die neue NVIDIA RTX A400 und die A1000 Grafikkarte, eine Pressemitteilung
|
Autor
|
Thema: Böschungshöhe bemaßen (1342 / mal gelesen)
|
TheWalrus Mitglied Ingenieur
Beiträge: 447 Registriert: 28.02.2006 Laptop mit 64GB; Pixelstation mit 128GB; iMac M1; MacBook Air M2 InfraStructure Design Suite Premium 2020 und Vorgänger, Autodesk Flex, Metashape Pro, Cyclone Register 360+ BLK
|
erstellt am: 26. Jul. 2016 11:20 <-- editieren / zitieren --> Unities abgeben:
Moin Civilsten, kennt jemand eine Möglichkeit, eine Höhendifferenz (Böschungshöhe) zu bemaßen / zu beschriften? Mit BKS Vorne, Lot konstruieren und dieses bemaßen würde gehen, aber vielleicht geht es noch einfacher. Danke Bruno Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADsolutions Mitglied Konstrukteur Straßenbau
Beiträge: 403 Registriert: 04.01.2013 AutoCAD Civil 3D 2018.2 Windows 7 64bit
|
erstellt am: 26. Jul. 2016 12:35 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
Hallo Bruno, hab's nicht ganz verstanden: Soll das Delta H der Böschung im Schnitt oder in der Draufsicht bemaßt werden? Brauchst Du einen Automatismus, ansonsten könntest Du ja einfach eine Linie vorweg ziehen und das Delta H (aus Start Z, Ende Z) ausrechnen. Eine "von Haus" Bemaßung für ein Delta Z kenne ich nicht. Gruß CADso Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
TheWalrus Mitglied Ingenieur
Beiträge: 447 Registriert: 28.02.2006 Laptop mit 64GB; Pixelstation mit 128GB; iMac M1; MacBook Air M2 InfraStructure Design Suite Premium 2020 und Vorgänger, Autodesk Flex, Metashape Pro, Cyclone Register 360+ BLK
|
erstellt am: 26. Jul. 2016 12:46 <-- editieren / zitieren --> Unities abgeben:
Hallo CADso. das Delta H soll im Lageplan bemaßt werden. Ein Automatismus wäre nicht schlecht: 1.Punkt auswählen, 2.Punkt auswählen, Text positionieren. Und während ich das schreibe wird mir klar, dass ich dafür ein LISPchen schreiben werde. Geht ja auch noch. Danke für's Nachdenken. Gruß Bruno Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADsolutions Mitglied Konstrukteur Straßenbau
Beiträge: 403 Registriert: 04.01.2013 AutoCAD Civil 3D 2018.2 Windows 7 64bit
|
erstellt am: 26. Jul. 2016 12:48 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
|
RL13 Ehrenmitglied V.I.P. h.c. Dipl.-Ing. Bauwesen
Beiträge: 2373 Registriert: 23.10.2008 Civil 3D 2018.1 Civil 3D 2016 64 Bit SP 3 mit DACH und Extensions W7 Professional 64Bit HP Z440 Intel Xeon CPU E5-1620 v4 32 GB RAM NVIDIA Quadro P4000
|
erstellt am: 26. Jul. 2016 13:35 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
|
CADsolutions Mitglied Konstrukteur Straßenbau
Beiträge: 403 Registriert: 04.01.2013 AutoCAD Civil 3D 2018.2 Windows 7 64bit
|
erstellt am: 26. Jul. 2016 13:49 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
|
RL13 Ehrenmitglied V.I.P. h.c. Dipl.-Ing. Bauwesen
Beiträge: 2373 Registriert: 23.10.2008 Civil 3D 2018.1 Civil 3D 2016 64 Bit SP 3 mit DACH und Extensions W7 Professional 64Bit HP Z440 Intel Xeon CPU E5-1620 v4 32 GB RAM NVIDIA Quadro P4000
|
erstellt am: 26. Jul. 2016 13:59 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
Zitat: hmm, eine Delta Z kann man sich aber nicht anzeigen lassen, oder?
Sollte eigentlich über einen eigenen Ausdruck (Projektbrowser -> Einstellungen -> Allgemein -> Beschriftungsstile -> Linie -> Ausdrücke) und die Anpassung des Vorgabestiles funktionieren ------------------ mfg Roman Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADsolutions Mitglied Konstrukteur Straßenbau
Beiträge: 403 Registriert: 04.01.2013 AutoCAD Civil 3D 2018.2 Windows 7 64bit
|
erstellt am: 26. Jul. 2016 14:49 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
|
RL13 Ehrenmitglied V.I.P. h.c. Dipl.-Ing. Bauwesen
Beiträge: 2373 Registriert: 23.10.2008 Civil 3D 2018.1 Civil 3D 2016 64 Bit SP 3 mit DACH und Extensions W7 Professional 64Bit HP Z440 Intel Xeon CPU E5-1620 v4 32 GB RAM NVIDIA Quadro P4000
|
erstellt am: 26. Jul. 2016 15:21 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
Name: Delta_h Ausdruck: {Allgemeiner Segmentanfang Z}-{Allgemeines Segmentende Z} Ich hab's aber schon versucht die Beschriftung ergibt nur ??? funktioniert also zwischen zwei getrennten Elementkanten nicht. Was aber definitiv geht ist die Beschriftung mit: _AeccAddSegmentLabel hierbei ist aber Voraussetzung dass es zumindest eine Böschungsschraffurlinie mit den ensprechenden unterschiedlichen Z-Höhen am Anfang und Ende gibt.
------------------ mfg Roman Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
TheWalrus Mitglied Ingenieur
Beiträge: 447 Registriert: 28.02.2006 Laptop mit 64GB; Pixelstation mit 128GB; iMac M1; MacBook Air M2 InfraStructure Design Suite Premium 2020 und Vorgänger, Autodesk Flex, Metashape Pro, Cyclone Register 360+ BLK
|
erstellt am: 01. Aug. 2016 09:55 <-- editieren / zitieren --> Unities abgeben:
Hallo CADso, hier das LISPchen. Ich habe mein Querneigungskeilprogramm etwas ergänzt und modifiziert. Das sieht dann so aus, wie im Anhang, Es möge nützen. Gruß Bruno (defun c:deltaz () (setq ss (ssadd)) (setq pa (getpoint "\nAnfangspunkt auswählen: ")) (setq pe (getpoint pa "\nEndpunkt auswählen: ")) (setq xa (car pa)) (setq ya (cadr pa)) (setq za (caddr pa)) (setq xe (car pe)) (setq ye (cadr pe)) (setq ze (caddr pe)) (setq dx (- xe xa)) (setq dy (- ye ya)) (setq dz (- ze za)) (setq strecke (sqrt (+ (* dx dx) (* dy dy)))) (setq slopv (/ dz strecke)) (setq slopt (strcat (rtos (abs (* slopv 100)) 2 (getvar "luprec")) "% " "\U+0394z" (rtos dz 2 (getvar "luprec"))) ) (setq WinkelEinheit (getvar "AUNITS")) (setq WinkelDrehRichtung (getvar "ANGDIR")) (setq WinkelNull (getvar "ANGBASE")) (setvar "AUNITS" 3) (setvar "ANGDIR" 0) (setvar "ANGBASE" 0) (setq Winkel (angle pa pe)) (if (and (> Winkel (* 0.5 pi)) (< Winkel (* 1.5 pi))) (setq Textwinkel (- Winkel pi)) (setq Textwinkel Winkel) ) (setq TextBasis (list (+ xa (/ dx 2)) (+ ya (/ dy 2)) (/ (+ za ze) 2)) ) (setq Abstand 2.0) ;mal Texthöhe ;Die Texthoehe des aktuellen Stils muss festgestellt werden. ;Falls ein Stil mit fester Texthoehe > 0 aktuell ist, wird im Textbefehl ;nach dieser nicht mehr gefragt. D.h., die Syntax aendert sich. ;(setq TextBasis (getpoint "Textbasis")) (setq StilName (getvar "TEXTSTYLE")) (setq StilTab (tblsearch "STYLE" StilName)) (setq StilHoehe (cdr (assoc 40 StilTab))) (if (= 0.0 StilHoehe) (setq TextHoehe (getvar "textsize")) (setq TextHoehe StilHoehe) ) (setq TextbasisNeu (polar Textbasis (- Textwinkel (/ pi 2)) (/ TextHoehe Abstand) ) ) (setq Objektfang (getvar "OSMODE")) (setvar "OSMODE" 0) (if (= 0.0 StilHoehe) (command ".TEXT" "_J" "_TC" TextBasisNeu TextHoehe TextWinkel slopt) (command ".TEXT" "_J" "_TC" TextBasisNeu TextWinkel slopt) ) (ssadd (entlast) ss) (if (/= dz 0) (progn (setq solidm (polar Textbasis (+ Textwinkel (/ pi 2)) (/ Texthoehe Abstand) ) ) (setq solidl (polar Solidm (+ Winkel pi) (* 1.5 Texthoehe))) (setq solidr (polar Solidm Winkel (* 1.5 Texthoehe))) (if (< dz 0) (setq solidh (polar solidl (+ Textwinkel (/ pi 2)) Texthoehe)) (setq solidh (polar solidr (+ Textwinkel (/ pi 2)) (* (abs slopv) 25 Texthoehe) ) ) ) (command "SOLID" solidl solidr solidh "" "") (ssadd (entlast) ss) ) ) (command "_.-GROUP" "_Create" "*" "Slope" ss "") (setvar "AUNITS" WinkelEinheit) (setvar "ANGDIR" WinkelDrehRichtung) (setvar "ANGBASE" WinkelNull) ;;; (command "SCHIEBEN" "L" "" TextBasis pause) (setvar "OSMODE" Objektfang) )
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
CADsolutions Mitglied Konstrukteur Straßenbau
Beiträge: 403 Registriert: 04.01.2013 AutoCAD Civil 3D 2018.2 Windows 7 64bit
|
erstellt am: 01. Aug. 2016 13:56 <-- editieren / zitieren --> Unities abgeben: Nur für TheWalrus
Hallo Bruno, das ist doch schon mal ganz lecker. Ein paar Kleinigkeiten hätte ich noch zu bemängeln: - Manchmal wird der QN-Keil um 90° verdreht und viel zu groß dargestellt. Eine Option zum ausschalten wäre auch nett. - Immer drei Nachkommastellen - Ein Vorzeichen brauch es eigentlich auch nicht Trotzdem volle U`s! Gruß CADso Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |