Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

MyDC.ru _ Скрипты для RusHub'а _ 'Действия' для RusHub

Автор: Sekretchik 14.12.2010, 20:38

Название - Действия
Описание - Позволяет общаться в чате практически одной мышью
Установка - Поместите actions.lua в папку scripts

В скрипте реализована возможность запрета использования "Действий" определённым профилям. Скрипт проверен в работе на RusHub'е - 2.2.11

Мои слова благодарности:

* Setuper - за правильную правку кода этого скрипта.
* всем администраторам и модераторам, кто своим трудом поддерживает весь этот форум в надлежащем порядке
* Разработчикам RusHub'а - за прекрасную работу.
* Всем тем, кто помогает людям сделать их хабы - удобными, надежными и стабильными.

P.S.

Полезные ссылки для работы с архивами:
7-zip 9.20 x64 http://mydc.ru/r/?http://downloads.sourceforge.net/sevenzip/7z920-x64.msi
7-zip 9.20 x86 http://mydc.ru/r/?http://downloads.sourceforge.net/sevenzip/7z920.exe
WinRAR 3.93 x64 russian http://mydc.ru/r/?http://www.rarlab.com/rar/winrar-x64-393ru.exe
WinRAR 3.93 x86 russian http://mydc.ru/r/?http://www.rarlab.com/rar/wrar393ru.exe
Ключик для WinRAR 3.93 http://mydc.ru/r/?http://forum.csmania.ru/download/file.php?id=4295

Желаю успехов.

Убедительная просьба не пинать меня ногами в печень и почки!

actions.7z ( 13.42 килобайт ) : 145

Автор: Saymon 14.12.2010, 21:02

Sekretchik, автор скрипта кто? Всегда авторство пиши!

Автор: philoum 15.12.2010, 10:04

Hi, i can unzip lua its error
ty
greetings

Автор: Setuper 15.12.2010, 10:06

philoum, http://mydc.ru/r/?http://www.7-zip.org/

Автор: philoum 15.12.2010, 13:02

Цитата(Setuper @ 15.12.2010, 12:06)

philoum, http://mydc.ru/r/?http://www.7-zip.org/

Thanks

Автор: Sekretchik 17.12.2010, 14:51

Обновил скрипт "Действий". В работе скрипта - была найдена маленькая ошибка.

Изменения в скрипте

Эта часть текста скрипта:

Код

function OnChat(UID, sData) -- сообщение в чат
    local _,_, sCmd, sMsg = string.find(sData,"%b<>%s(%S+)%s(.+)")
    if sCmd == "!me" and tProfiles[UID.iProfile] == 0 then
        local sMsg1 = "\r\n\r\n"..
        "\t"..string.rep("=", 54).."\r\n"..
        "\tУ вас недостаточно прав для выполнения этой команды.\r\n"..
        "\t"..string.rep("=", 54).."\r\n"
        Core.SendToUser(UID.sNick, sMsg1, sBot)
        return true
    end
    sMsg = string.sub(sMsg, 1, string.len(sMsg) - 0)
    if sCmd == "!me" then
        Core.SendToAll("**** "..UID.sNick.."  -  "..sMsg.." ****", sBot)
        return true
    end
end

Заменена на такой текст:

Код

function OnChat(UID, sData) -- сообщение в чат
    local s, e, sCmd, sMsg = string.find(sData,"%b<>%s(%S+)%s(.+)") -- ищем команду
    if sCmd == "!me" and tProfiles[UID.iProfile] == 0 then
        local sMsg1 = "\r\n\r\n"..
        "\t"..string.rep("=", 54).."\r\n"..
        "\tУ вас недостаточно прав для выполнения этой команды.\r\n"..
        "\t"..string.rep("=", 54).."\r\n"
        Core.SendToUser(UID.sNick, sMsg1, sBot)
        return true
    end
    local s, e, sCmd, sMsg= string.find(sData,"%b<>%s(%S+)%s(.+)")
    if sCmd == "!me" then
    sMsg = string.sub(sMsg, 1, string.len(sMsg) - 0)
        Core.SendToAll("**** "..UID.sNick.."  -  "..sMsg.." ****", sBot)
        return true
    end
end

Исправленный скрипт перезалил. Сам скрипт в шапке темы.

Автор: Setuper 17.12.2010, 17:36

Ужасный код.

Вот подредактировал:

Код

function OnChat(UID, sData) -- сообщение в чат
    local sCmd, sMsg = sData:match"%b<>%s(%S+)%s(.+)" -- ищем команду
    if sCmd == "!me" then
        if tProfiles[UID.iProfile] == 0 then
            local sRep = ("="):rep(54)
            local sMsg = "\r\n\r\n"..
            "\t"..sRep.."\r\n"..
            "\tУ вас недостаточно прав для выполнения этой команды.\r\n"..
            "\t"..sRep.."\r\n"
            Core.SendToUser(UID.sNick, sMsg, sBot)
        else
            Core.SendToAll("**** "..UID.sNick.."  -  "..sMsg.." ****", sBot)
        end
        return true
    end
end

А выражение

Цитата

sMsg = string.sub(sMsg, 1, string.len(sMsg) - 0)

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

Автор: Sekretchik 18.12.2010, 8:58

Цитата(Setuper @ 17.12.2010, 17:36)

Ужасный код.

Согласен. Ученье - свет, а не ученье - чуть свет и на работу. Спасибо Вам уважаемый - за оказанную помощь.

Скрипт - перезалил.

Автор: OCTAGRAM 14.4.2011, 23:34

7-zip говорит, неподдерживаемый метод сжатия. Не распаковывается нифига