68 lines
2.1 KiB
Tcl
68 lines
2.1 KiB
Tcl
## Add a custom menu in xschem
|
|
|
|
## Create a menu entry 'Test'. '.menubar' is xschem's main menu frame.
|
|
menubutton .menubar.test -text "Test" -menu .menubar.test.menu -padx 3 -pady 0
|
|
menu .menubar.test.menu -tearoff 0
|
|
|
|
## Create a couple of entries
|
|
.menubar.test.menu add command -label "Test entry 1" -command {
|
|
puts Hello
|
|
}
|
|
.menubar.test.menu add command -label "Test entry 2" -command {
|
|
puts World
|
|
}
|
|
|
|
## make the menu appear in xschem window
|
|
pack .menubar.test -side left
|
|
## or place it before some other menu entry:
|
|
# pack .menubar.test -before .menubar.file -side left
|
|
|
|
## To remove the menu without destroying it:
|
|
# pack forget .menubar.test
|
|
|
|
|
|
################################################################
|
|
## adding a button in the menubar (not in the toolbar)
|
|
################################################################
|
|
# button .menubar.test -pady 0 -highlightthickness 0 -text Test -command {puts Test}
|
|
# pack .menubar.test -side left
|
|
|
|
|
|
## create a menu 'PDK' with radiobutton entries
|
|
# proc menupdk {} {
|
|
# global libptr dark_gui_colorscheme
|
|
# if { $dark_gui_colorscheme} {
|
|
# set selectcolor white
|
|
# } else {
|
|
# set selectcolor black
|
|
# }
|
|
#
|
|
# ## Create a menu entry 'Test'. '.menubar' is xschem's main menu frame.
|
|
# menubutton .menubar.pdk -text "PDK" -menu .menubar.pdk.menu -padx 3 -pady 0
|
|
# menu .menubar.pdk.menu -tearoff 0
|
|
#
|
|
# .menubar.pdk.menu add radiobutton -selectcolor $selectcolor -variable libptr \
|
|
# -value gf180mcu -label "GF180MCU" -command {
|
|
# set_env gf180mcu
|
|
# }
|
|
#
|
|
# .menubar.pdk.menu add radiobutton -selectcolor $selectcolor -variable libptr \
|
|
# -value sky130 -label "SKY130" -command {
|
|
# set_env sky130
|
|
# }
|
|
#
|
|
# .menubar.pdk.menu add radiobutton -selectcolor $selectcolor -variable libptr \
|
|
# -value repo -label "xschem repo" -command {
|
|
# set_env repo
|
|
# }
|
|
# ## make the menu appear in xschem window
|
|
# pack .menubar.pdk -side left
|
|
# ## or place it before some other menu entry:
|
|
# # pack .menubar.pdk -before .menubar.file -side left
|
|
#
|
|
# ## To remove the menu without destroying it:
|
|
# # pack forget .menubar.pdk
|
|
# }
|
|
# menupdk
|
|
|