set stylesmenu_items {
GuidoMenuItem item1 {
-label "Strings and points"
-icon "icons/16/styles_string.png"
-command server "STYLES STRING"
}
GuidoMenuItem item2 {
-label "DTM's and 3DM's"
-icon "icons/16/styles_object.png"
-command server "STYLES OBJECT"
}
GuidoSeparator sep1 {
}
GuidoMenuItem item3 {
-label "Save"
-icon "icons/16/styles_unload.png"
-command server "STYLES UNLOAD"
}
GuidoMenuItem item4 {
-label "Recall"
-icon "icons/16/styles_load.png"
-command server "STYLES LOAD"
}
}
GuidoMenu stylesmenu {
-label "Display properties"
-delayed_script $stylesmenu_items
}
