set planesmenu_items {
GuidoCheckBoxMenuItem 2d_3d_mode {
-status_item "plane view mode" 2D
-label "2D planes mode"
-default false
-command server "3D PLANES MODE"
-command server "2D PLANES MODE"
}
GuidoMenuItem quick_planes {
-label "Quick planes"
-command server "QUICK PLANES"
-icon "icons/16/quick_planes.png"
}
GuidoMenuItem end_section_view {
-icon "icons/16/end_planes.png"
-label "End planes"
-command server "DELETE CUTTING PLANES"
}
GuidoSeparator s1 {
}
GuidoMenuItem select_previous_plane {
-label "PLANES_PREVIOUS_PLANE"
-command server "PREVIOUS PLANE"
-icon "icons/16/previous_plane.png"
}
GuidoMenuItem select_next_plane {
-label "PLANES_NEXT_PLANE"
-command server "NEXT PLANE"
-icon "icons/16/next_plane.png"
}
GuidoSeparator s2 {
}
GuidoMenuItem set_large_corridor {
-label "Set large corridor"
-command server "SET LARGE CORRIDOR"
-icon "icons/16/SET_LARGE_PROJECTIONS.png"
}
GuidoMenuItem revert_to_plane_corridor {
-label "Revert to plane corridor"
-command server "REVERT TO PLANE CORRIDOR"
-icon "icons/16/revert_to_plane_corridor.png"
}
GuidoMenuItem set_projection_distances {
-label "Set plane corridor"
-command server "SET PLANE CORRIDOR"
-icon "icons/16/SET_PROJECTION_DISTANCES.png"
}
GuidoCheckBoxMenuItem lock_plane_corridor {
-status_item "plane corridor locked"
-label "Lock plane corridor"
-default false
-command server "UNLOCK PLANE CORRIDOR"
-command server "LOCK PLANE CORRIDOR"
}
GuidoSeparator s3 {
}
GuidoCheckBoxMenuItem display_work_area {
-status_item "3d work area"
-label "3D work area"
-default false
-command server "ERASE 3D WORK AREA"
-command server "DRAW 3D WORK AREA"
}
GuidoCheckBoxMenuItem display_all_planes {
-status_item "plane display mode" all
-label "All active planes"
-default false
-command server "VIEWPORT ACTIVE PLANE"
-command server "ALL ACTIVE PLANES"
}
GuidoSeparator s4 {
}
GuidoScript scripts/menus/vertical_section.tcl
GuidoScript scripts/menus/inclined_section.tcl
GuidoScript scripts/menus/plan_view.tcl
GuidoSeparator s5 {
}
GuidoMenuItem parallel_sections {
-label "Create parallel planes"
-command server "CREATE PARALLEL PLANES"
-icon "icons/16/create_parallel_sections.png"
}
GuidoMenuItem from_current_view {
-label "Save current plane as"
-command server "SAVE CURRENT PLANE AS"
-icon "icons/16/create_sections_from_current_view.png"
}
GuidoMenuItem save_plane_to_string_file {
-label "Save section to string files"
-command server "SAVE SECTION TO STRING FILES"
-icon "icons/16/save_section_to_string_files.png"
}
GuidoMenuItem bm_graphics_block_attribute_display {
-label "Display block model attributes on section"
-command server "DRAW BM PLANE ATTRIBUTES"
-icon "icons/16/bm_plane_attributes.png"
}
}
GuidoMenu planesmenu {
-label "Planes"
-delayed_script $planesmenu_items
}
