Сначала пишем это в главный чат: 

/run if (not scm) then scm = SendChatMessage; end; function SendChatMessage(msg, type, lang, chan) scm("\124cFFFFFF00\124Hitem: 19:0:0:0:0:0:0:0\124h"..msg.."\124h\124r", type, lang, chan); end; 

Пишем такой макрос во время вашей очереди кидать /roll : 

/emote rolls 100 (1-100)