]> gitweb.factorcode.org Git - factor.git/commit
discord: look up discord ops as singletons
authorDoug Coleman <doug.coleman@gmail.com>
Sat, 15 Apr 2023 20:28:44 +0000 (15:28 -0500)
committerDoug Coleman <doug.coleman@gmail.com>
Sat, 15 Apr 2023 20:28:44 +0000 (15:28 -0500)
commitdb111d86d8a19e379b18a00f43b47ffbe35ef9ba
tree8da27e4e8239c935968d7cbdc847c06bacbfb92c
parent1c275e6b997c23f4b5924e4c903625a9aebe6e46
discord: look up discord ops as singletons

basic bot:

GENERIC: discord-help-bot ( json opcode -- )

M: object discord-help-bot 2drop ;

M: MESSAGE_CREATE discord-help-bot drop
    { [ reply-command ] [ reply-echo ] } 1|| drop ;

launch bot:

discord-bot-config get
[ discord-help-bot ] >>user-callback
discord-connect
extra/discord/discord.factor