; PureBasic Visual Designer v3.81 build 1321

IncludeFile "tink.pb"

Open_Window_0()

Repeat
  
  Event = WaitWindowEvent()
  
  If Event = #PB_EventMenu
    
    ;Debug "WindowID: " + Str(EventWindowID())
    
    MenuID = EventMenuID()
    
    If MenuID = #MENU_1
      Debug "GadgetID: #MENU_1"
      
    ElseIf MenuID = #MENU_2
      Debug "GadgetID: #MENU_2"
      
    ElseIf MenuID = #MENU_3
      Debug "GadgetID: #MENU_3"
      
    ElseIf MenuID = #MENU_7
      Debug "GadgetID: #MENU_7"
      
    ElseIf MenuID = #MENU_4
      Debug "GadgetID: #MENU_4"
      
    ElseIf MenuID = #MENU_8
      Debug "GadgetID: #MENU_8"
      
    ElseIf MenuID = #MENU_5
      Debug "GadgetID: #MENU_5"
      
    Endif
    
  Endif
  
  If Event = #PB_EventGadget
    
    ;Debug "WindowID: " + Str(EventWindowID())
    
    GadgetID = EventGadgetID()
    
    If GadgetID = #Gadget_1
      Debug "GadgetID: #Gadget_1"
      
    ElseIf GadgetID = #Gadget_2
      Debug "GadgetID: #Gadget_2"
      
    ElseIf GadgetID = #Gadget_4
      Debug "GadgetID: #Gadget_4"
      
    ElseIf GadgetID = #Gadget_5
      Debug "GadgetID: #Gadget_5"
      
    ElseIf GadgetID = #Gadget_3
      Debug "GadgetID: #Gadget_3"
      
    Endif
    
  EndIf
  
Until Event = #PB_EventCloseWindow

End
;