property pWndID, pGiftActive, pChosenAmount

on construct me 
  pWndID = getText("ph_tickets_title")
  pChosenAmount = 1
  pGiftActive = 0
  registerMessage(#show_ticketWindow, me.getID(), #showTicketWindow)
  registerMessage(#hide_ticketwindow, me.getID(), #hideTicketWindow)
  registerMessage(#enterRoom, me.getID(), #hideTicketWindow)
  registerMessage(#leaveRoom, me.getID(), #hideTicketWindow)
  registerMessage(#changeRoom, me.getID(), #hideTicketWindow)
  return TRUE
end

on deconstruct me 
  unregisterMessage(#show_ticketWindow, me.getID())
  unregisterMessage(#hide_ticketwindow, me.getID())
  unregisterMessage(#enterRoom, me.getID())
  unregisterMessage(#leaveRoom, me.getID())
  unregisterMessage(#changeRoom, me.getID())
  if windowExists(pWndID) then
    removeWindow(pWndID)
  end if
  return TRUE
end

on showTicketWindow me 
  if windowExists(pWndID) then
    return TRUE
  end if
  createWindow(pWndID, "habbo_basic.window")
  tWndObj = getWindow(pWndID)
  if (tWndObj = 0) then
    return(error(me, "Cannot open tickets window", #showTicketWindow))
  end if
  if not tWndObj.merge("habbo_ph_tickets.window") then
    return(error(me, "Cannot open tickets window", #showTicketWindow))
  end if
  tWndObj.center()
  tWndObj.registerClient(me.getID())
  tWndObj.registerProcedure(#eventProcTicketsWindow, me.getID(), #mouseUp)
  tWndObj.registerProcedure(#eventProcTicketsWindow, me.getID(), #keyDown)
  tTickets = getObject(#session).get("user_ph_tickets")
  tText = replaceChunks(getText("ph_tickets_txt"), "\\x1", tTickets)
  tWndObj.getElement("ph_tickets_number").setText(string(tTickets))
  tWndObj.getElement("ph_tickets_txt").setText(string(tText))
  me.activateGiftBox(pGiftActive)
  return(me.setCheckBox(1))
end

on hideTicketWindow me 
  if windowExists(pWndID) then
    removeWindow(pWndID)
  end if
  pChosenAmount = 1
  pGiftActive = 0
  return TRUE
end

on eventProcTicketsWindow me, tEvent, tSprID, tParam, tWndID 
  if (tEvent = #mouseUp) then
    if (tSprID = "close") then
      me.hideTicketWindow()
    else
      if (tSprID = "ph_tickets_buy_button") then
        if pGiftActive then
          tName = getWindow(tWndID).getElement("ph_tickets_namefield").getText()
        else
          tName = getObject(#session).get("user_name")
        end if
        if tName <> "" then
          me.buyGameTickets(tName)
          me.hideTicketWindow()
        end if
      else
        if (tSprID = "tickets_checkbox_1") then
          me.setCheckBox(1)
          pChosenAmount = 1
        else
          if (tSprID = "tickets_checkbox_2") then
            me.setCheckBox(2)
            pChosenAmount = 2
          else
            if (tSprID = "tickets_gift_check") then
              pGiftActive = not pGiftActive
              me.activateGiftBox(pGiftActive)
            else
              if (tSprID = "ph_tickets_cancel_button") then
                me.hideTicketWindow()
              end if
            end if
          end if
        end if
      end if
    end if
  end if
end

on setCheckBox me, tNr 
  if not windowExists(pWndID) then
    return FALSE
  end if
  tWndObj = getWindow(pWndID)
  tOnImg = getMember("button.radio.on").image
  tOffImg = getMember("button.radio.off").image
  i = 1
  repeat while i <= 2
    tElem = tWndObj.getElement("tickets_checkbox_" & i)
    if (tNr = i) then
      tElem.feedImage(tOnImg)
    else
      tElem.feedImage(tOffImg)
    end if
    i = (1 + i)
  end repeat
  return TRUE
end

on buyGameTickets me, tName 
  tParams = [#integer:pChosenAmount, #string:tName]
  if connectionExists(getVariable("connection.info.id")) then
    getConnection(getVariable("connection.info.id")).send("BTCKS", tParams)
  end if
  return TRUE
end

on activateGiftBox me, tActive 
  if not windowExists(pWndID) then
    return FALSE
  end if
  tWndObj = getWindow(pWndID)
  tOnMember = "button.checkbox.on"
  tOffMember = "button.checkbox.off"
  tCheckElem = tWndObj.getElement("tickets_gift_check")
  if tActive then
    tCheckElem.setProperty(#member, tOnMember)
    tWndObj.getElement("ph_tickets_gift_bg").setProperty(#visible, 1)
    tWndObj.getElement("ph_tickets_namefield").setProperty(#visible, 1)
    tWndObj.getElement("ph_tickets_namefield").setText("")
  else
    tCheckElem.setProperty(#member, tOffMember)
    tWndObj.getElement("ph_tickets_gift_bg").setProperty(#visible, 0)
    tWndObj.getElement("ph_tickets_namefield").setProperty(#visible, 0)
  end if
end