Code: Select all
SetMenuItemState(#menu, #menuitem, a=a Not var!#this)Code: Select all
SetMenuItemState(#menu, #menuitem, a=a Not var!#this)Code: Select all
#om_linear=123
#om_random=453
#om_ignore=279
If OpenWindow(0, 200, 200, 200, 100, "Menu State Example")
If CreateMenu(0, WindowID(0))
MenuTitle("Options...")
MenuItem(1, "1")
MenuItem(2, "2")
MenuItem(3, "3")
EndIf
opt_albumorder=279; Change me
SetMenuItemState(0, 1, 1-Abs(Sign(#om_linear-opt_albumorder)))
SetMenuItemState(0, 2, 1-Abs(Sign(#om_random-opt_albumorder)))
SetMenuItemState(0, 3, 1-Abs(Sign(#om_ignore-opt_albumorder)))
Repeat: Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf