GuidoPanel selectedObjectPanel {
-border etched true
-label "Selected object"
-layout BoxLayout X_AXIS
-width 45
GuidoPanel leftPanel {
-layout CentreLineLayout
GuidoFiller f6 {
-height 0.1
}
GuidoFiller f6 {
-height 0.1
}
GuidoComboBox layer {
-label "Active layer:"
-display_length 12.6
-tip STOPESSLICINGTAB_7
-exclusive true
-null false
}
GuidoField selectedObject {
-label "Object"
-null false
-display_length 15
-format integer
-tip "Object ID of the solid you wish to slice"
}
GuidoField selectedTrisolation {
-label "Trisolation"
-null false
-display_length 15
-format integer
-tip "Trisolation ID of the solid you wish to slice"
}
}
GuidoPanel rightPanel {
-layout BoxLayout Y_AXIS
GuidoFiller f6 {
-height 0.002
}
GuidoButton selectObjectSelectButton {
-caption "Select"
-legacy_button
-selected_value select_object
-legacy_no_validate
-height 1.1
-tip STOPESSLICINGTAB_1
}
}
}
GuidoPanel slicepanel_layout {
-layout CentreLineLayout
GuidoButtonGroupPanel sliceMethod {
-label "Slice"
-layout BoxLayout Y_AXIS
GuidoRadioButton levelsAndStopes {
-caption "Levels and Stopes"
-selected_value "levelsandstopes"
-default true
-tip STOPESSLICINGTAB_2
}
GuidoRadioButton levelsOnly {
-caption "Levels only"
-selected_value "levels"
-tip STOPESSLICINGTAB_3
}
GuidoRadioButton stopesOnly {
-caption "Stopes only"
-selected_value "stopes"
-tip STOPESSLICINGTAB_4
}
}
GuidoComboBox stopeMethod {
-display_length 15
-null false
-dependency {"[$sliceMethod getCurrentValue]" != "levels"}
-label "Stope method"
-exclusive false
-default "Planes"
-action initial {[setStopeMethods $stopeMethod]}
-tip STOPESSLICINGTAB_5
}
}
GuidoPanel levelsOverlay {
-layout OverlayLayout
GuidoPanel singleLevelPanel {
-dependency { ("[$sliceMethod getCurrentValue]" == "stopes") && ("[$stopeMethod getCurrentValue]" == "Centreline and length" || "[$stopeMethod getCurrentValue]" == "Centreline, length and target")}
-border etched true
-label Centreline
-layout BoxLayout Y_AXIS
-width 45
GuidoButton singleLevelPanelSelectCentrelineButton {
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" || "[$sliceMethod getCurrentValue]" == "stopes"}
-caption "Select centreline"
-legacy_button
-legacy_no_validate
-selected_value select_centreline_single
-tip STOPESSLICINGTAB_6
}
GuidoPanel evalPanel {
-layout borderlayout
GuidoScrollPane singleLevelElevationScroll {
-height 5
-width 45
-vertical_scroll_bar never
GuidoTable singleLevelElevationTable {
-instances 1 1 1
-interactive false
-position centre
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" || "[$sliceMethod getCurrentValue]" == "stopes"}
GuidoComboBox singleLevelLayer {
-label "Layer"
-display_length 25
-tip STOPESSLICINGTAB_7
-exclusive true
-null true
}
GuidoField singleLevelString {
-label "String"
-display_length 5
-format integer
-tip STOPESSLICINGTAB_8
}
GuidoField singleLevelSegment {
-label "Segment"
-display_length 5
-format integer
-tip STOPESSLICINGTAB_9
}
}
}
}
}
GuidoPanel levelsPanel {
-border etched true
-label Levels
-layout BoxLayout Y_AXIS
-width 45
-dependency { ("[$sliceMethod getCurrentValue]" != "stopes") }
GuidoPanel centrelinePanel {
-layout BoxLayout X_AXIS
GuidoPanel leftSection {
-layout CentreLineLayout
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
GuidoPanel spacer {
-layout BoxLayout Y_AXIS
GuidoFiller filler {
-height 0.1
}
GuidoLabel sliceUsingLabel {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-label "Slice using"
}
}
GuidoPanel spacer {
-layout BoxLayout Y_AXIS
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
GuidoFiller filler {
-height 0.1
}
GuidoComboBox sliceUsing {
-null false
-default "Elevation"
-display_length 12.6
-action initial {[setSliceOptions $sliceUsing]}
-tip STOPESSLICINGTAB_10
-exclusive false
}
}
GuidoPanel planeGroupLabelPanel {
-layout OverlayLayout
GuidoPanel planeGroupPanel {
-layout CentreLineLayout
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-dependency {"[$sliceUsing getCurrentValue]" == "Planes"}
GuidoLabel planeGroupLabel {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-label "Plane Group"
}
}
}
GuidoPanel planeGroupComboPanel {
-layout OverlayLayout
GuidoPanel planeComboLevelsPanel {
-layout BoxLayout Y_AXIS
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-dependency {"[$sliceUsing getCurrentValue]" == "Planes"}
GuidoComboBox planeGroupLevels {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-display_length 12.6
-tip STOPESSLICINGTAB_11
-exclusive false
}
}
}
}
GuidoPanel rightSection {
-layout BoxLayout Y_AXIS
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" && ("[$stopeMethod getCurrentValue]" == "Centreline and length" || "[$stopeMethod getCurrentValue]" == "Centreline, length and target")}
GuidoFiller filler {
-height 0.002
}
GuidoButton selectCentrelineLevelsButton {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-caption "Select centreline"
-legacy_button
-legacy_no_validate
-selected_value select_centreline
-height 1.1
-tip STOPESSLICINGTAB_12
}
GuidoField hiddenRowField {
-max_length 10
-null true
-display_length 10
-visible false
}
}
}
GuidoFiller filler {
-height 0.5
}
GuidoPanel planeEvalOverlay {
-layout OverlayLayout
GuidoPanel evalPlanePanel {
-dependency { ("[$sliceMethod getCurrentValue]" != "stopes" && "[$sliceMethod getCurrentValue]" == "levels" && "[$sliceUsing getCurrentValue]" == "Planes") || (("[$sliceUsing getCurrentValue]" == "Planes") && ("[$stopeMethod getCurrentValue]" == "Planes" || "[$stopeMethod getCurrentValue]" == "Start plane, length and target" || "[$stopeMethod getCurrentValue]" == "Start plane and length"))}
-layout borderlayout
GuidoScrollPane elevationPlaneScroll {
-height 8
-width 45
GuidoTable elevationPlaneTable {
-instances 1 1 999
-interactive true
-position Centre
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
GuidoComboBox elevationPlaneFromPlane {
-label "From plane"
-width 15
-tip STOPESSLICINGTAB_13
-exclusive true
}
GuidoComboBox elevationPlaneToPlane {
-label "To plane"
-width 14
-tip STOPESSLICINGTAB_14
-exclusive true
}
}
}
}
GuidoPanel evalCenterLinePanel {
-dependency { (("[$sliceMethod getCurrentValue]" == "levels") && ("[$sliceUsing getCurrentValue]" == "Elevation")) || (("[$sliceMethod getCurrentValue]" == "levelsandstopes") && ("[$sliceUsing getCurrentValue]" == "Elevation") && ("[$stopeMethod getCurrentValue]" == "Planes" || "[$stopeMethod getCurrentValue]" == "Start plane, length and target" || "[$stopeMethod getCurrentValue]" == "Start plane and length"))}
-layout borderlayout
GuidoScrollPane elevationLineScroll {
-height 8
-width 45
GuidoTable elevationLineTable {
-instances 1 1 999
-interactive true
-position Centre
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
GuidoField elevationLineFromLine {
-label "From"
-width 15
-decimals 3
-format double
-tip STOPESSLICINGTAB_15
}
GuidoField elevationLineToLine {
-label "To"
-width 14
-decimals 3
-format double
-tip STOPESSLICINGTAB_16
}
}
}
}
GuidoPanel evalPanel {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes" && ("[$sliceMethod getCurrentValue]" != "levels" && "[$sliceUsing getCurrentValue]" == "Elevation") && ("[$stopeMethod getCurrentValue]" == "Centreline and length" || "[$stopeMethod getCurrentValue]" == "Centreline, length and target") }
-layout borderlayout
GuidoScrollPane elevationLinesScroll {
-height 8
-width 45
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
GuidoTable elevationLinesTable {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-instances 1 1 999
-interactive true
-position Centre
GuidoField elevationLinesFrom {
-label "From"
-display_length 5
-decimals 3
-format double
-action focusGained {[setEditingRow $elevationLinesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_15
}
GuidoField elevationLinesTo {
-label "To"
-decimals 3
-display_length 5
-format double
-action focusGained {[setEditingRow $elevationLinesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_15
}
GuidoComboBox elevationLinesLayer {
-label "Layer"
-display_length 15
-action focusGained {[setEditingRow $elevationLinesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_7
-exclusive true
-null true
}
GuidoField elevationLinesString {
-label "String"
-display_length 5
-format integer
-action focusGained {[setEditingRow $elevationLinesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_8
}
GuidoField elevationLinesSegment {
-label "Segment"
-display_length 5
-format integer
-action focusGained {[setEditingRow $elevationLinesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_9
}
}
}
}
GuidoPanel planeLevelCenterPanel {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes" && ("[$sliceMethod getCurrentValue]" != "levels" && "[$sliceUsing getCurrentValue]" == "Planes") && ("[$stopeMethod getCurrentValue]" == "Centreline and length" || "[$stopeMethod getCurrentValue]" == "Centreline, length and target")}
-layout borderlayout
GuidoScrollPane elevationPlanesScroll {
-height 8
-width 45
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
GuidoTable elevationPlanesTable {
-dependency {"[$sliceMethod getCurrentValue]" != "stopes"}
-instances 1 1 999
-interactive true
-position Centre
GuidoComboBox elevationPlanesFromPlaneCentre {
-label "From"
-display_length 5
-action focusGained {[setEditingRow $elevationPlanesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_13
-exclusive true
}
GuidoComboBox elevationPlanesToPlaneCentre {
-label "To"
-display_length 5
-action focusGained {[setEditingRow $elevationPlanesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_14
-exclusive true
}
GuidoComboBox elevationPlanesLayerPlaneCentre {
-label "Layer"
-display_length 15
-action focusGained {[setEditingRow $elevationPlanesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_7
-exclusive true
-null true
}
GuidoField elevationPlanesStringPlaneCentre {
-label "String"
-display_length 5
-format integer
-action focusGained {[setEditingRow $elevationPlanesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_8
}
GuidoField elevationPlanesSegmentPlaneCentre {
-label "Segment"
-display_length 5
-format integer
-action focusGained {[setEditingRow $elevationPlanesTable $hiddenRowField]}
-tip STOPESSLICINGTAB_9
}
}
}
}
}
GuidoLabel crownLabel {
-label STOPE_PILLAR_GAP_INFO
-font_style bold
}
$planeGroupLevels setActionCallback initial {[loadPlanOrInclinedPlanes $planeGroupLevels]}
$planeGroupLevels setActionCallback initial {[setPlaneSeries $elevationPlaneFromPlane [$planeGroupLevels getCurrentValue]]}
$planeGroupLevels setActionCallback initial {[setPlaneSeries $elevationPlaneToPlane [$planeGroupLevels getCurrentValue]]}
$planeGroupLevels setActionCallback initial {[setPlaneSeries $elevationPlanesFromPlaneCentre [$planeGroupLevels getCurrentValue]]}
$planeGroupLevels setActionCallback initial {[setPlaneSeries $elevationPlanesToPlaneCentre [$planeGroupLevels getCurrentValue]]}
$planeGroupLevels setActionCallback valueChanged {[setPlaneSeries $elevationPlaneFromPlane [$planeGroupLevels getCurrentValue]]}
$planeGroupLevels setActionCallback valueChanged {[setPlaneSeries $elevationPlaneToPlane [$planeGroupLevels getCurrentValue]]}
$planeGroupLevels setActionCallback valueChanged {[setPlaneSeries $elevationPlanesFromPlaneCentre [$planeGroupLevels getCurrentValue]]}
$planeGroupLevels setActionCallback valueChanged {[setPlaneSeries $elevationPlanesToPlaneCentre [$planeGroupLevels getCurrentValue]]}
$elevationPlanesFromPlaneCentre setActionCallback initial {[set_plane_from_value_initial $elevationPlanesTable $elevationPlanesFromPlaneCentre $elevationPlanesToPlaneCentre]}
$elevationPlanesFromPlaneCentre setActionCallback initial {[set_layer_string_segment_from_value_initial $elevationPlanesTable $elevationPlanesLayerPlaneCentre $elevationPlanesStringPlaneCentre $elevationPlanesSegmentPlaneCentre]}
$elevationLinesFrom setActionCallback initial {[set_line_from_value_initial $elevationLinesTable $elevationLinesFrom $elevationLinesTo]}
$elevationLinesFrom setActionCallback initial {[set_layer_string_segment_from_value_initial $elevationLinesTable $elevationLinesLayer $elevationLinesString $elevationLinesSegment]}
$elevationPlaneFromPlane setActionCallback initial {[set_plane_from_value_initial $elevationPlaneTable $elevationPlaneFromPlane $elevationPlaneToPlane]}
$elevationLineFromLine setActionCallback initial {[set_line_from_value_initial $elevationLineTable $elevationLineFromLine $elevationLineToLine]}
}
}
GuidoPanel overlayPanel {
-layout OverlayLayout
GuidoPanel stopesPanelCal {
-label "Stopes"
-border etched true
-layout CentreLineLayout
-width 45
-dependency {"[$stopeMethod getCurrentValue]" == "Centreline and length"}
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" || "[$sliceMethod getCurrentValue]" == "stopes"}
GuidoField stopesPanelCalStopeLength {
-label "Stope length"
-display_length 10
-format double
-tip STOPESSLICINGTAB_17
}
GuidoField stopesPanelCalPillarLength {
-label "Pillar length"
-display_length 10
-format double
-tip "Enter the pillar length"
}
}
GuidoPanel stopesPanelCalat {
-label "Stopes"
-border etched true
-layout CentreLineLayout
-width 45
-dependency {"[$stopeMethod getCurrentValue]" == "Centreline, length and target"}
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" || "[$sliceMethod getCurrentValue]" == "stopes"}
GuidoField stopesPanelCalatStopeLength {
-label "Stope length"
-display_length 10
-format double
-tip STOPESSLICINGTAB_17
}
GuidoField stopesPanelCalatPillarLength {
-label "Pillar length"
-display_length 10
-format double
-tip "Enter the pillar length"
}
GuidoButtonGroupPanel stopesPanelCalatTarget {
-label "Target"
-layout BoxLayout Y_AXIS
GuidoRadioButton stopesPanelCalatTonnage {
-caption "Tonnage"
-selected_value "tonnage"
-default true
-tip STOPESSLICINGTAB_18
}
GuidoRadioButton stopesPanelCalatVolume {
-caption "Volume"
-selected_value "volume"
-tip STOPESSLICINGTAB_19
}
}
GuidoField stopesPanelCalatTargetVal {
-label "Target value"
-display_length 10
-format double
-tip "Enter the target value to aim for"
}
}
GuidoPanel stopesPanelPlanes {
-label "Stopes"
-border etched true
-layout BoxLayout Y_AXIS
-width 45
-dependency {"[$stopeMethod getCurrentValue]" == "Planes"}
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" || "[$sliceMethod getCurrentValue]" == "stopes"}
GuidoPanel planeGroupPanel {
-layout CentreLineLayout
GuidoComboBox stopesPanelPlanesPlaneGroup {
-label "Plane group"
-display_length 12.6
-exclusive false
-tip STOPESSLICINGTAB_20
}
}
GuidoPanel borderLayout {
-layout borderlayout
GuidoScrollPane stopesPanelPlanesPlaneTable {
-height 10
-width 45
GuidoTable stopesPanelPlanesTable {
-instances 1 1 999
-interactive true
-position Centre
GuidoComboBox stopesPanelPlanesFromPlane {
-label "From plane"
-width 15
-tip STOPESSLICINGTAB_21
-exclusive false
}
GuidoComboBox stopesPanelPlanesToPlane {
-label "To plane"
-width 14
-tip STOPESSLICINGTAB_22
-exclusive false
}
}
}
}
$stopesPanelPlanesPlaneGroup setActionCallback initial {[loadVerticalAndInclinedPlanes $stopesPanelPlanesPlaneGroup]}
$stopesPanelPlanesPlaneGroup setActionCallback initial {[setPlaneSeries $stopesPanelPlanesFromPlane [$stopesPanelPlanesPlaneGroup getCurrentValue]]}
$stopesPanelPlanesPlaneGroup setActionCallback initial {[setPlaneSeries $stopesPanelPlanesToPlane [$stopesPanelPlanesPlaneGroup getCurrentValue]]}
$stopesPanelPlanesPlaneGroup setActionCallback valueChanged {[setPlaneSeries $stopesPanelPlanesFromPlane [$stopesPanelPlanesPlaneGroup getCurrentValue]]}
$stopesPanelPlanesPlaneGroup setActionCallback valueChanged {[setPlaneSeries $stopesPanelPlanesToPlane [$stopesPanelPlanesPlaneGroup getCurrentValue]]}
}
GuidoPanel stopesPanelPal {
-label "Stopes"
-border etched true
-layout CentreLineLayout
-width 45
-dependency {"[$stopeMethod getCurrentValue]" == "Start plane and length"}
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" || "[$sliceMethod getCurrentValue]" == "stopes"}
GuidoComboBox stopesPanelPalPlaneGroup {
-label "Plane group"
-display_length 12.6
-exclusive false
-tip STOPESSLICINGTAB_23
}
GuidoComboBox stopesPanelPalStartAtPlane {
-label "Start at plane"
-display_length 12.6
-exclusive false
-tip STOPESSLICINGTAB_24
}
GuidoField stopesPanelPalStopeLengthPal {
-label "Stope length"
-display_length 15
-format double
-tip STOPESSLICINGTAB_17
}
GuidoField stopesPanelPalPillarLengthPal {
-label "Pillar length"
-display_length 15
-format double
-tip "Enter the pillar length"
}
$stopesPanelPalPlaneGroup setActionCallback initial {[loadVerticalAndInclinedPlanes $stopesPanelPalPlaneGroup]}
$stopesPanelPalPlaneGroup setActionCallback initial {[setPlaneSeries $stopesPanelPalStartAtPlane [$stopesPanelPalPlaneGroup getCurrentValue]]}
$stopesPanelPalPlaneGroup setActionCallback valueChanged {[setPlaneSeries $stopesPanelPalStartAtPlane [$stopesPanelPalPlaneGroup getCurrentValue]]}
}
GuidoPanel stopesPanelSPlaneLT {
-label "Stopes"
-border etched true
-layout CentreLineLayout
-width 45
-dependency {"[$stopeMethod getCurrentValue]" == "Start plane, length and target"}
-dependency {"[$sliceMethod getCurrentValue]" == "levelsandstopes" || "[$sliceMethod getCurrentValue]" == "stopes"}
GuidoComboBox stopesPanelSPlaneLTPlaneGroup {
-label "Plane group"
-display_length 12.6
-exclusive false
}
GuidoComboBox stopesPanelSPlaneLTStartAtPlane {
-label "Start at plane"
-display_length 12.6
-exclusive false
-tip STOPESSLICINGTAB_24
}
GuidoField stopesPanelSPlaneLTStopeLength {
-label "Stope length"
-display_length 15
-format double
-tip STOPESSLICINGTAB_17
}
GuidoField stopesPanelSPlaneLTPillarLength {
-label "Pillar length"
-display_length 15
-format double
-tip "Enter the pillar length"
}
GuidoButtonGroupPanel stopesPanelSPlaneLTTargetpanel {
-label "Target"
-layout BoxLayout Y_AXIS
GuidoRadioButton stopesPanelSPlaneLTTonnage {
-caption "Tonnage"
-selected_value "tonnage"
-default true
-tip STOPESSLICINGTAB_18
}
GuidoRadioButton stopesPanelSPlaneLTVolume {
-caption "Volume"
-selected_value "volume"
-tip STOPESSLICINGTAB_19
}
}
GuidoField stopesPanelSPlaneLTTargetVal {
-label "Target value"
-display_length 15
-format double
-tip "Enter the target value to aim for"
}
$stopesPanelSPlaneLTPlaneGroup setActionCallback initial {[loadVerticalAndInclinedPlanes $stopesPanelSPlaneLTPlaneGroup]}
$stopesPanelSPlaneLTPlaneGroup setActionCallback initial {[setPlaneSeries $stopesPanelSPlaneLTStartAtPlane [$stopesPanelSPlaneLTPlaneGroup getCurrentValue]]}
$stopesPanelSPlaneLTPlaneGroup setActionCallback valueChanged {[setPlaneSeries $stopesPanelSPlaneLTStartAtPlane [$stopesPanelSPlaneLTPlaneGroup getCurrentValue]]}
$stopesPanelPlanesFromPlane setActionCallback initial {[set_plane_from_value_initial $stopesPanelPlanesTable $stopesPanelPlanesFromPlane $stopesPanelPlanesToPlane]}
}
}
