Geruest fuer Einzelmodul + Geruestoption bei Foerderer, Gefaellestrecke und Eckrad ergaenzt
Kreisel hatte GERUEST_EINZELMODUL bereits; ergaenzt um die neue Combobox GERUEST_TYP (IPE-Geruest abgestuft / Obergeruest oben / Schoenenberger Geruest / nur Doppelrohrtraeger, Default Schoenenberger Geruest) im KreiselEdit-Dialog. VarioFoerderer (Standard-Dialog) und Gefaellestrecke (Modus 1) erhalten beide Attribute neu in ihren DCL-Dialogen inkl. Edit-Vorbelegung. ILS_Eckrad (kein Dialog vorhanden) fragt beide Werte per Kommandozeilen-Menue ab. Konsolen-only-Pfade ohne Dialog (VF Etage/Linienzug, GF Linienzug/3D-Objekte) bleiben auf Schema-Default, analog zum bisherigen Kreisel-Verhalten. Gemeinsame Optionsliste/Helper (*ssg-geruest-optionen*, ssg-geruest-typ-to-idx/idx-to-typ, ssg-ask-geruest-typ) in ssg_core.lsp war bereits durch einen parallelen Commit (120e26a) mit eingeflossen. Co-Authored-By: Claude Sonnet 5 <noreply@anthropic.com>
This commit is contained in:
+10
-1
@@ -1073,8 +1073,11 @@
|
||||
(defun vf-block-erstellen (anlage-typ seite vf-nummer n-scanner
|
||||
hoehe-von hoehe-bis deltaH deltaL L_VF L_GF1 L_GF2
|
||||
richtung best-winkel startpunkt lastEnt hz
|
||||
geruest-einzelmodul geruest-typ
|
||||
/ vf-bname vf-ss vf-e vf-insert montagehoehe-m attdef-ypos L_GF_m-str)
|
||||
(if (null hz) (setq hz 0.0))
|
||||
(if (null geruest-einzelmodul) (setq geruest-einzelmodul "0"))
|
||||
(if (null geruest-typ) (setq geruest-typ (ssg-geruest-idx-to-typ (ssg-geruest-typ-to-idx nil))))
|
||||
;; Beschriftungstext erzeugen
|
||||
(vf-make-label vf-nummer hoehe-von hoehe-bis deltaH deltaL L_VF L_GF1 L_GF2
|
||||
richtung best-winkel 2 n-scanner startpunkt hz)
|
||||
@@ -1145,6 +1148,8 @@
|
||||
(cons "VF_WINKEL" (itoa best-winkel))
|
||||
(cons "ANZAHL_SEPARATOR" "2")
|
||||
(cons "ANZAHL_SCANNER" (itoa n-scanner))
|
||||
(cons "GERUEST_EINZELMODUL" geruest-einzelmodul)
|
||||
(cons "GERUEST_TYP" geruest-typ)
|
||||
)
|
||||
)
|
||||
;; Typ-spezifische Bogen-Zaehler (Etage: 2x Gefaellebogen je Seite)
|
||||
@@ -1447,10 +1452,14 @@
|
||||
(list deltaL deltaH richtung best-winkel L_GF1 L_GF2 L_VF startpunkt seite hz))
|
||||
|
||||
;; Gemeinsame VF_*-Block-Erstellung
|
||||
;; Geruest fuer Einzelmodul/Geruestoption sind in diesem interaktiven
|
||||
;; Konsolen-Ablauf (Etage/Linienzug) nicht abfragbar - bleiben auf
|
||||
;; Schema-Default (analog Kreisel: nur ueber Dialog editierbar).
|
||||
(setq vf-insert
|
||||
(vf-block-erstellen anlage-typ seite vf-nummer n-scanner
|
||||
hoehe-von hoehe-bis deltaH deltaL L_VF L_GF1 L_GF2
|
||||
richtung best-winkel startpunkt lastEnt hz))
|
||||
richtung best-winkel startpunkt lastEnt hz
|
||||
"0" "Schoenenberger Geruest"))
|
||||
|
||||
;; Standard-Bloecke aus dem interaktiven Konsolen-Ablauf ebenfalls mit der
|
||||
;; SSG_VF_EDIT-XDATA markieren - sie sind (wie die Dialog-Variante) aus
|
||||
|
||||
Reference in New Issue
Block a user