; PureBasic Visual Designer v3.95 build 1485 (PB4Code)

IncludeFile "WeaponDLG.pb"

Open_Wep_Window()

Repeat ; Start of the event loop
  
  Event = WaitWindowEvent() ; This line waits until an event is received from Windows
  
  WindowID = EventWindow() ; The Window where the event is generated, can be used in the gadget procedures
  
  GadgetID = EventGadget() ; Is it a gadget event?
  
  EventType = EventType() ; The event type
  
  ;You can place code here, and use the result as parameters for the procedures
  
  If Event = #PB_Event_Gadget
    
    If GadgetID = #Wep_Image
      
    ElseIf GadgetID = #Wep_Panel
      
    ElseIf GadgetID = #Wep_Center
      
    ElseIf GadgetID = #Wep_Top
      
    ElseIf GadgetID = #Wep_TopRight
      
    ElseIf GadgetID = #Wep_Left
      
    ElseIf GadgetID = #Wep_Right
      
    ElseIf GadgetID = #Wep_BotLeft
      
    ElseIf GadgetID = #Wep_Bot
      
    ElseIf GadgetID = #Wep_BotRight
      
    ElseIf GadgetID = #Wep_TopLeft
      
    ElseIf GadgetID = #Wep_Att
      
    ElseIf GadgetID = #Wep_Start
      
    ElseIf GadgetID = #Wep_Fin
      
    ElseIf GadgetID = #Wep_Step
      
    ElseIf GadgetID = #Wep_Frame
      
    ElseIf GadgetID = #Wep_Play
      
    ElseIf GadgetID = #Wep_LoadImage
      
    ElseIf GadgetID = #Wep_EditImage
      
    ElseIf GadgetID = #Wep_Line
      
    ElseIf GadgetID = #Wep_LineColor
      
    ElseIf GadgetID = #Wep_SetBackColor
      
    ElseIf GadgetID = #Wep_BackColor
      
    ElseIf GadgetID = #Wep_AniTime
      
    ElseIf GadgetID = #Wep_Name
      
    ElseIf GadgetID = #Wep_Ammo
      
    ElseIf GadgetID = #Wep_MinRange
      
    ElseIf GadgetID = #Wep_MaxRange
      
    ElseIf GadgetID = #Wep_Area
      
    ElseIf GadgetID = #Wep_Dam
      
    ElseIf GadgetID = #Wep_Aim
      
    ElseIf GadgetID = #Wep_Piercing
      
    ElseIf GadgetID = #Wep_MoveSpeed
      
    ElseIf GadgetID = #Wep_Homing
      
    ElseIf GadgetID = #Wep_ReloadTime
      
    ElseIf GadgetID = #Wep_Duration
      
    ElseIf GadgetID = #Wep_Repeat
      
    ElseIf GadgetID = #Wep_Temp
      
    ElseIf GadgetID = #Wep_Team
      
    ElseIf GadgetID = #Wep_Change
      
    ElseIf GadgetID = #Wep_BType
      
    ElseIf GadgetID = #Wep_Teleport
      
    ElseIf GadgetID = #Wep_Home
      
    ElseIf GadgetID = #Wep_Prison
      
    ElseIf GadgetID = #Wep_Random
      
    ElseIf GadgetID = #Wep_Neutral
      
    ElseIf GadgetID = #Wep_Stun
      
    ElseIf GadgetID = #Wep_Scare
      
    ElseIf GadgetID = #Wep_Brave
      
    ElseIf GadgetID = #Wep_EVisible
      
    ElseIf GadgetID = #Wep_VYes
      
    ElseIf GadgetID = #Wep_VNo
      
    ElseIf GadgetID = #Wep_Armor
      
    ElseIf GadgetID = #Wep_Health
      
    ElseIf GadgetID = #Wep_Speed
      
    ElseIf GadgetID = #Wep_LChange
      
    ElseIf GadgetID = #Wep_Height
      
    ElseIf GadgetID = #Wep_Clear
      
    ElseIf GadgetID = #Wep_Import
      
    ElseIf GadgetID = #Wep_Export
      
    ElseIf GadgetID = #Wep_Cancel
      
    ElseIf GadgetID = #Wep_OK
      
    ElseIf GadgetID = #Wep_DelMove
      
    ElseIf GadgetID = #Wep_DAir
      
    ElseIf GadgetID = #Wep_DLand
      
    ElseIf GadgetID = #Wep_DSea
      
    ElseIf GadgetID = #Wep_AddMove
      
    ElseIf GadgetID = #Wep_AAir
      
    ElseIf GadgetID = #Wep_ALand
      
    ElseIf GadgetID = #Wep_ASea
      
    Endif
    
  EndIf
  
Until Event = #PB_Event_CloseWindow ; End of the event loop

End
;