source("R/events_ready.r")
source("R/events_channelcreate.r")
source("R/events_channelupdate.r")
source("R/events_channeldelete.r")
source("R/events_guildcreate.r")
source("R/events_guildupdate.r")
source("R/events_guildremove.r")
source("R/events_guildbanadd.r")
source("R/events_guildbanremove.r")
source("R/events_guildemojisupdate.r")
source("R/events_guildintegrationsupdate.r")
source("R/events_guildmemberadd.r")
source("R/events_guildmemberremove.r")
source("R/events_guildmemberupdate.r")
source("R/events_guildmemberschunk.r")
source("R/events_guildrolecreate.r")
source("R/events_guildroledelete.r")
source("R/events_guildroleupdate.r")
source("R/events_messagecreate.r")
source("R/events_messageupdate.r")
source("R/events_messagedelete.r")
source("R/events_messagedeletebulk.r")
source("R/events_messagereactionadd.r")
source("R/events_messagereactionremove.r")
source("R/events_messagereactionremoveall.r")
source("R/events_presenceupdate.r")
source("R/events_typingstart.r")
dispatch <- function(data, client) {
client$private$set("last_sequence", data$s)
switch(data$t,
"READY"={
events.ready(data$d, client)
},
"CHANNEL_CREATE"={
events.channel_create(data$d, client)
},
"CHANNEL_UPDATE"={
events.channel_update(data$d, client)
},
"CHANNEL_DELETE"={
events.channel_delete(data$d, client)
},
"GUILD_CREATE"={
events.guild_create(data$d, client)
},
"GUILD_UPDATE"={
events.guild_update(data$d, client)
},
"GUILD_REMOVE"={
events.guild_remove(data$d, client)
},
"GUILD_BAN_ADD"={
events.guild_ban_add(data$d, client)
},
"GUILD_BAN_REMOVE"={
events.guild_ban_remove(data$d, client)
},
"GUILD_EMOJIS_UPDATE"={
events.guild_emojis_update(data$d, client)
},
"GUILD_INTEGRATIONS_UPDATE"={
events.guild_integrations_update(data$d, client)
},
"GUILD_MEMBER_ADD"={
events.guild_member_add(data$d, client)
},
"GUILD_MEMBER_REMOVE"={
events.guild_member_remove(data$d, client)
},
"GUILD_MEMBER_UPDATE"={
events.guild_member_update(data$d, client)
},
"GUILD_MEMBERS_CHUNK"={
events.guild_members_chunk(data$d, client)
},
"GUILD_ROLE_CREATE"={
events.guild_role_create(data$d, client)
},
"GUILD_ROLE_DELETE"={
events.guild_role_delete(data$d, client)
},
"GUILD_ROLE_UPDATE"={
events.guild_role_update(data$d, client)
},
"MESSAGE_CREATE"={
events.message_create(data$d, client)
},
"MESSAGE_UPDATE"={
events.message_update(data$d, client)
},
"MESSAGE_DELETE"={
events.message_delete(data$d, client)
},
"MESSAGE_DELETE_BULK"={
events.message_delete_bulk(data$d, client)
},
"MESSAGE_REACTION_ADD"={
events.message_reaction_add(data$d, client)
},
"MESSAGE_REACTION_REMOVE"={
events.message_reaction_remove(data$d, client)
},
"MESSAGE_REACTION_REMOVE_ALL"={
events.message_reaction_remove_all(data$d, client)
},
"PRESENCE_UPDATE"={
events.presence_update(data$d, client)
},
"TYPING_START"={
events.typing_start(data$d, client)
},
{}
)
}
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.