GuidoScript scripts/toolbars/commandchooser.tcl
GuidoScript scripts/toolbars/layers.tcl
GuidoScript scripts/toolbars/s_cn_pointmode.tcl
GuidoScript scripts/toolbars/snapmode.tcl
GuidoFiller fill_1 {
-width .2
}
GuidoToggleButton macrorecord {
-selected_icon "icons/<iconsize>/macro_recording.gif"
-unselected_icon "icons/<iconsize>/macro_record_start.png"
-command server "macro record end"
-command server "macro record start"
-status_item "macro record"
-ui_active
-tip "Start/stop recording macro"
}
GuidoToggleButton macroplay {
-selected_icon "icons/<iconsize>/macro_playing.gif"
-unselected_icon "icons/<iconsize>/macro_playback.png"
-command client "SEND ABORT MESSAGE"
-command server "macro playback"
-status_item "macro playback"
-tip "Playback/abort macro"
}
GuidoFiller fill_4 {
-width .2
}
GuidoButton lights_on {
-icon "icons/<iconsize>/lighting.png"
-command server "LIGHTING"
-tip "Shine light on data"
}
GuidoToggleButton faces_on_off {
-status_item "face display"
-icon "icons/<iconsize>/faces_on.png"
-command server "FACES ON"
-command server "FACES OFF"
-tip "Toggle display polygon & triangle faces"
}
GuidoToggleButton edges_on_off {
-status_item "edge display"
-icon "icons/<iconsize>/edges_on.png"
-command server "EDGES ON"
-command server "EDGES OFF"
-tip "Toggle display polygon & triangle edges"
}
GuidoButton draw_shells {
-icon "icons/<iconsize>/draw_shells.png"
-command server "draw shells"
-tip "Colour surface or solid by a field"
}
GuidoFiller fill_5 {
-width .2
}
GuidoButton zoom_plane {
-icon "icons/<iconsize>/zoom_plane.png"
-command script scripts/zoomsection.tcl
-tip "Zoom plane"
}
GuidoFiller fill_6 {
-width .2
}
GuidoButton digitiser_new_string {
-icon "icons/<iconsize>/digitiser_new_string.png"
-command server "digitiser new string"
-tip "Enter/Change digitiser point attributes"
}
GuidoButton digitiser_digitise {
-icon "icons/<iconsize>/digitiser_digitise.png"
-command server "digitiser digitise"
-tip "Create new points using the mouse"
}
GuidoButton digitiser_close_segment {
-icon "icons/<iconsize>/digitiser_close_segment.png"
-command server "digitiser close segment"
-tip "Close the current segment being digitised"
}
GuidoButton digitiser_end_segment {
-icon "icons/<iconsize>/digitiser_end_segment.png"
-command server "digitiser end segment"
-tip "End current digitiser segment"
}
GuidoButton digitiser_follow_segment {
-icon "icons/<iconsize>/digitiser_follow_segment.png"
-command server "digitiser follow segment"
-tip "Digitise points by following a segment"
}
GuidoButton digitiser_midpoint {
-icon "icons/<iconsize>/digitiser_midpoint.png"
-command server "digitiser midpoint"
-tip "Digitise a point at the midpoint of two points"
}
