MirLua

[unsane]

Должно заработать после следующего ночника 

[Dimsok]

Работать-то работает, только толку немного - отображается только в окне сообщения для одиночных контактов, а не для групп. Лучше бы чтоб наоборот - только в группах показывалась, а в обычном окне зачем будет бестолку место занимать

[Dimsok]

Ааа, там же настраивается через плагин. Думал, в самом скрипте прописывается. Просто у меня из трех скриптов один автоматом в групповых чатах прописался

[unsane]

Dimsok, исправил скрипт

[Ищезаяц]

как вставить некий сферический блаблабла в поле ввода по хоткею?
в одном случае мне надо например по нажатию F5 вставлять "/me " в поле ввода.
в других отправлять конкретную фразу или из вариаблесов нечто. бросьте примерчиков плиз )

[Ищезаяц]

Напоминалка одному хорошему человеку:

значицца о расширении yarelay скриптиком на lua:
трэба получать собщение "ID:Nick:Proto: Message" и отвечать печатая по схеме "ID, Message"
правда сам по себе yarelay никакие номера собщениям не присваивает
или мы говорим о замене плагина скриптом?

[unsane]

Наметки для relay-скрипта

Code: [Select]

local db = require('m_database')
local proto = require('m_protocols')
local message = require('m_message')

local relayContact = 0

proto.OnReceiveMessage(function(w, l)
  if l.hContact ~= relayContact then
    local module = db.GetSetting(l.hContact, 'Protocol', 'p')
    local nick = db.GetSetting(l.hContact, module, 'Nick')
    local account = proto.GetAccount(module)
    local text = string.format('%d:%s:%s:%s', l.hContact, nick, account.ProtoName, l.Message)
    message.Send(relayContact, text)
  else
    local hContact, text = l.Message:match('^(%d+):(.*)$')
    if hContact ~= relayContact then
      message.Send(tonumber(hContact), text)
    end
  end
end)

p.s. нужно заменить в "local relayContact = 0" 0 на номер релейного контакта

[Ищезаяц]

странно, вчера всё пересылалось - сегодня нет

[Ищезаяц]

оказалось что сегодня всё летело одному знакомому во вконтактик
получается что номер не уникальный. либо может изменится при перезапуске или обновлении плагов или ещё там чего

[donald]

Здравствуйте, можно ли узнать о перспективе данного плагина? В стабильной версии его нет - только в разработке. Собственно интересует озвученный выше OnReceiveMessage ? Попробовал вызвать эту функцию - получаю ошибку, что такой нет.

[unsane]

donald, в стабильно версии будет после следующего релиза.
OnReceiveMessage удален. Вместо него можно вот так сделать:

Code: [Select]

m.HookEvent("MirLua/RecvMessage", function(w, l)
  local ccd = CCSDATA(l)
  print(ccd.Message)
end)


[donald]

Спасибо, так получилось, только print у меня не работает. Пришлось так

Code: [Select]

winapi = require('winapi')

local hHook = m.HookEvent("MirLua/RecvMessage", function(w, l)
    local ccd = CCSDATA(l)
winapi.MessageBox(_, ccd.Message, "MirLua", 0, 10000)
--  print(ccd.Message)
end)Отправил в личку сообщение.

[donald]

А можно общий вопрос, как узнать, что нужно использовать CCSDATA(l), "MirLua/RecvMessage", Message и.п. Дело в том, что мне нужно еще:
1. Получить адрес отправителя, что-бы ответить
2. Хорошо бы прекратить дальнейшую обработку хука, чтобы сообщение вообще не показывалось получателю.

Пожалуй я лучше в целом скажу что хочу:
Нужно, чтобы по получении сообщения с определенным текстом, запускалась сторонняя программа, а потом определенный текст отправлялся бы обратно.

[unsane]

Как-то так:

Code: [Select]

message = require('m_message')
winapi = require('winapi')

m.HookEvent("MirLua/RecvMessage", function(w, l)
  local ccd = CCSDATA(l)
  if ccd.Message == 'stopword' then
    winapi.ShellExecute('command', 'file', 'args', 0)
    message.Send(ccd.hContact, ccd.Message)
    return 1;
  end
end)
Однако, прекращение дальнейшей обработки хука будет работать только в следующем ночнике.

[donald]

Спасибо. Работает. Еще вопрос, хочу добавить в PopUp окно возможность "быстрого ответа" через вызов QuickReplies.