Global( "onEvent", {} ) Global( "money", 0 ) Global( "gold", 0 ) Global( "wtIcon", nil ) function RegisterEventHandlers( handlers ) for event, handler in pairs( handlers) do common.RegisterEventHandler( handler, event ) end end function UpdateMoney() money = avatar.GetMoney() gold = math.floor(money / 10000) end function SendAddon() local SetVal = { val = userMods.ToWString(""..gold) } local params = { header = SetVal, ptype = "text", size = 100, icon = wtIcon } userMods.SendEvent( "AOPANEL_SEND_ADDON", { name = "AOPanel Money", sysName = "AOPanelMoney", param = params } ) end function UpdateAddon(params) local SetVal = { val = userMods.ToWString(""..gold)} userMods.SendEvent( "AOPANEL_UPDATE_ADDON", { sysName = "AOPanelMoney", header = SetVal } ) end onEvent [ "U_EVENT_ADDON_MEM_USAGE_REQUEST" ] = function( params ) userMods.SendEvent( "U_EVENT_ADDON_MEM_USAGE_RESPONSE", { sender = common.GetAddonName(), memUsage = gcinfo() } ) end onEvent [ "EVENT_AVATAR_CREATED" ] = function( params ) UpdateMoney() UpdateAddon(money) end onEvent [ "AOPANEL_START" ] = function( params ) SendAddon() end onEvent [ "EVENT_AVATAR_MONEY_CHANGED" ] = function( params ) UpdateMoney() UpdateAddon(money) end -------------------------------------------------------------------------------- -- INITIALIZATION -------------------------------------------------------------------------------- function Init() RegisterEventHandlers( onEvent ) if avatar.IsExist() then onEvent [ "EVENT_AVATAR_CREATED" ]() end wtIcon = mainForm:GetChildChecked( "IconPanel", false ) -- wtIcon:Show( true ) end -------------------------------------------------------------------------------- Init() --------------------------------------------------------------------------------