GuidoForm frm05011 {
-default_buttons
-label "Define A New Ramp"
-layout BoxLayout Y_AXIS
-tip "05011_TIP_001"
GuidoPanel frm05011_32 {
-layout BoxLayout Y_AXIS
GuidoPanel frm05011_30 {
-border etched true
-label "Define the ramp characteristics"
-layout CentreLineLayout
GuidoField ramp_name {
-display_length 13
-format none
-label "Ramp name"
-max_length 10
-null false
-tip "05011_TIP_002"
}
GuidoField ramp_string {
-display_length 13
-format integer
-label "Ramp String"
-low_bound 1
-max_length 10
-null false
-tip "05011_TIP_003"
}
GuidoComboBox ramp_type {
-label "Ramp type"
-width 10
-value_in clockwise anti-clockwise "all cut"
-tip "05011_TIP_004"
}
GuidoField ramp_width {
-display_length 13
-format double
-label "Ramp width"
-low_bound 1.000000
-max_length 10
-null false
-tip "The width of the ramp is required to determine the relative locations of the ramp edge segments."
}
GuidoField ramp_gradient {
-display_length 13
-format double
-label "Ramp gradient 1:"
-low_bound 0.010000
-max_length 10
-null false
-tip "05011_TIP_006"
}
GuidoPanel ramp_grade_calc_method_label_panel {
-dependency {"[ $ramp_type getCurrentValue]" != "all cut"}
-layout BoxLayout X_AXIS
GuidoLabel ramp_grade_calc_method_label {
-label "Gradient method"
-height 1
}
}
GuidoPanel frm05011_17 {
-dependency {"[ $ramp_type getCurrentValue]" != "all cut"}
-layout BoxLayout X_AXIS
-tip "05011_TIP_007"
GuidoButtonGroupPanel ramp_grade_calc_method {
-layout BoxLayout Y_AXIS
GuidoRadioButton frm05011_14 {
-caption "inside edge"
-selected_value "inside edge"
}
GuidoRadioButton frm05011_15 {
-caption "outside edge"
-selected_value "outside edge"
}
GuidoRadioButton frm05011_16 {
-caption "centre of ramp"
-selected_value "centre of ramp"
}
}
}
}
GuidoFiller frm05011_34 {
-width 1
}
GuidoPanel frm05011_31 {
-border etched true
-dependency {"[ $ramp_type getCurrentValue]" != "all cut"}
-label "Define the berm crossing characteristics"
-layout CentreLineLayout
GuidoLabel berm_crossing_method_label {
-label "exit at:"
-height 1
}
GuidoPanel berm_crossing_method_panel {
-layout BoxLayout X_AXIS
set berm_tip "Whenever a ramp crosses a berm special considerations must be made to facilitate exit opportunities from the ramp to the berm. You can choose to have berm exit opportunities on either the toe side, the crest side, both sides or neither side of the ramp. Exiting on the toe side of the ramp is the most common choice. If no exit opportunity to the berm is created, the berm width will taper from ZERO at the berm crossing up to the full berm width at some distance from the berm crossing."
GuidoButtonGroupPanel berm_crossing_method {
-layout BoxLayout Y_AXIS
GuidoRadioButton berm_crossing_method_at_crest {
-caption "crest"
-default true
-selected_value "exit at crest"
-tip $berm_tip
}
GuidoRadioButton berm_crossing_method_at_toe {
-caption "toe"
-selected_value "exit at toe"
-tip $berm_tip
}
GuidoRadioButton berm_crossing_method_at_crest_and_toe {
-caption "crest and toe"
-selected_value "exit at crest and toe"
-tip $berm_tip
}
GuidoRadioButton berm_crossing_method_at_neither {
-caption "neither"
-selected_value "no berm exit"
-tip $berm_tip
}
}
}
GuidoField berm_taper_distance {
-display_length 12
-format double
-label "Berm taper distance"
-low_bound 0.000000
-max_length 10
-null false
-tip "05011_TIP_012"
}
}
GuidoPanel frm05011_33 {
-border etched true
-dependency {"[ $ramp_type getCurrentValue]" != "all cut"}
-label "Define the switchback characteristics"
-layout CentreLineLayout
GuidoField switchback_angle {
-display_length 10
-format decimal_angle
-label "Switchback angle"
-low_bound 2.7925268031909273230779052295818
-default 180.0
-high_bound 3.4906585039886591538473815369772
-max_length 10
-null false
-tip SWITCHBACK_ANGLE_TIP
}
GuidoField switchback_inner_radius {
-display_length 10
-format double
-label "Switchback inner radius"
-low_bound 0.0
-default 0.0
-max_length 10
-null false
-tip SWITCHBACK_INNER_RADIUS_TIP
}
}
GuidoFiller frm05011_34 {
-width 1
}
}
}
