property pWindowID

on construct me 
  registerMessage(#openOneClickGameBuyWindow, me.getID(), #createUiWindow)
  pWindowID = getText("notickets_window_header")
  return TRUE
end

on deconstruct me 
  unregisterMessage(#openOneClickGameBuyWindow, me.getID())
  me.closeUiWindow()
  return TRUE
end

on Init me 
end

on createUiWindow me 
  if not createWindow(pWindowID, "habbo_full.window") then
    return FALSE
  end if
  tWndObj = getWindow(pWindowID)
  tWndObj.merge("habbo_games_notickets.window")
  tWndObj.center()
  tWndObj.registerClient(me.getID())
  tWndObj.registerProcedure(#eventProcMouseUp, me.getID(), #mouseUp)
  return TRUE
end

on closeUiWindow me 
  tWndObj = getWindow(pWindowID)
  if (not tWndObj = void()) then
    tWndObj.close()
  end if
  return TRUE
end

on eventProcMouseUp me, tEvent, tSprID, tParam 
  if (tSprID = "notickets_buygame") then
    me.sendBuyTwoCredits()
    me.closeUiWindow()
  else
    if tSprID <> "close" then
      if (tSprID = "notickets_cancel") then
        me.closeUiWindow()
      else
        if (tSprID = "notickets_store_link") then
          executeMessage(#show_ticketWindow)
          me.closeUiWindow()
        end if
      end if
      return TRUE
    end if
  end if
end

on sendBuyTwoCredits me 
  tMyName = getObject(#session).GET("user_name")
  tAmount = 1
  tParams = [#integer:tAmount, #string:tMyName]
  if connectionExists(getVariable("connection.info.id")) then
    getConnection(getVariable("connection.info.id")).send("BTCKS", tParams)
  end if
  return TRUE
end