myDC.ru

Здравствуйте, гость ( Вход | Регистрация )

 
3 страниц V  < 1 2 3  
Ответить в данную темуНачать новую тему

> История Чата + Антирекламма, API2 | Ведет лог чата

Рейтинг 3 V
NatUraL
сообщение 4.6.2009, 11:06
Сообщение #41


Абсолютный новичок


Группа: Пользователи
Сообщений: 2
Регистрация: 7.12.2008
Пользователь №: 1 355
Спасибо сказали: 0 раз




такой вопрос.. даже как то странно! у меня этот скрипт работает токо если его вывести на первое место в списке скрипттов в PtokaX, сами понимаете что это приводит к тому что последние сообшения выводятся перед "сообщением от хубы" а это ой как неудобно! кто может подсказать что можно сделать?? или из за чего это вызвано?
Go to the top of the page
+Quote Post
PaN
сообщение 30.7.2009, 3:23
Сообщение #42


Активный участник
***

Группа: Пользователи
Сообщений: 51
Регистрация: 11.3.2009
Из: Хабаровск
Пользователь №: 2 550
Спасибо сказали: 0 раз




Кто-нибудь может сделать в этом скрипте так, чтобы функция приема лога 20 последних сообщений была по умолчанию отключена и тем кому надо пользоваться функцией, в меню бы её включали!?
Go to the top of the page
+Quote Post
alcorp
сообщение 29.8.2009, 20:02
Сообщение #43


Участник
**

Группа: Пользователи
Сообщений: 38
Регистрация: 26.8.2009
Пользователь №: 4 274
Спасибо сказали: 0 раз




Стрелок:

/etc/ptokax/scripts/chatlogs.lua:276: bad argument #1 to 'pairs' (table expected, got nil)
/etc/ptokax/scripts/chatlogs.lua:152: attempt to index global 'Cmds' (a nil value)

Для исправления - берем из оригинальной версии, начиная со строки 345 и до конца файла:

Код
Cmds = {
    togglehistory = function(user,data)
        if user then
            local status,result = "убраны из","Теперь вы будете "..
                "получать истрию чата при заходе на хаб."
            local Exclude = CheckEx(user)
            if not Exclude then
                table.insert(Cfg.Exclude,user.sNick)
                status,result = "добавлены в","Больше вы "..
                "не будете получать историю чата при входе."
            else
                table.remove(Cfg.Exclude,Exclude)
            end
            SaveToFile(Cfg.UserFile,Cfg.Exclude,"Cfg.Exclude")
            return "Вы были "..status.." таблицы исключений. "..result
        else
            return "Активация сохранения истории чата","",""
        end
    end,
    history = function(user,data)
        local ChatLines = Cfg.MaxChat
        if user then
            local _,_,lines = data:find("%b<> %p%w+ (%d+)")
            if not lines then
                lines = ChatLines
            else
                lines = tonumber(lines)
            end
            return GetChat(lines)
        else
            return "Получить историю чата",
            " %[line:# Число линий для вывода (макс) "..ChatLines.."]",
            " %[line:# Число линий для вывода (макс) "..ChatLines.."]"
        end
    end,
    dayhistory = function(user,data)
        local today = tonumber(os.date("%Y") + os.date("%j"))
        if user then
            local _,_,days = data:find("%b<> %p%w+ (%d+)")
            if days then
                local past = today - tonumber(days)
                OnError(past)
                local str = "\r\n\r\n <"..string.rep("?",70)..
                "[ Last ( "..days.." ) days of chat ]??????????>\r\n"
                for i,v in ipairs(Cfg.Chat)do
                    if v[1] > past then
                        str = str.."\r\n ["..i.."] "..v[2].." "..v[3].." "..v[4]
                    end
                end
                str = str.."\r\n\r\n <"..string.rep("?",70).."[ Конец истории чата ]"..
                string.rep("?",string.len(days)).."??????????>\r\n\r\n"
                return str
            else
                return "You must specify how many days"
            end
        else
            return "История чата по дням",
            " %[line:За сколько дней показать историю?]",
            " %[line:За сколько дней показать историю?]"
        end
    end,
    delete = function(user,data)
        local ChatLines = #Cfg.Chat
        if user then
            if user.iProfile == Cfg.AdminProf then
                local _,_,lines = data:find("%b<> %p%w+ (%d+)")
                if not lines then
                    lines = ChatLines
                else
                    lines = tonumber(lines)
                end
                return DelChat(lines)
            else
                return "Sorry "..user.sNick..", this command is for "..
                ProfMan.GetProfile(Cfg.AdminProf).sProfileName.."'s only."
            end
        else
            return "Стереть историю чата",
            " %[line:# линий **ноль = все ("..ChatLines..") сообщения ]",
            " %[line:# линий **ноль = все ("..ChatLines..") сообщения ]"
        end
    end,
    delchat = function(user,data)
        local ChatLines = #Cfg.Chat
        if user then
            if user.iProfile == Cfg.AdminProf then
                local _,_,line = data:find("%b<> %p%w+ (%d+)")
                if line then
                    line = tonumber(line)
                    if Cfg.Chat[line] then
                        local str = Cfg.Chat[line][4]
                        table.remove(Cfg.Chat,line)
                        SaveToFile(Cfg.File,Cfg.Chat,"Cfg.Chat")
                        return "Линии истории чата "..line.." были удалены.\r\n"..
                        "Удаленная история: "..string.format("%q",str)
                    else
                        return line.." не верный ввод."..GetChat(Cfg.History)
                    end
                else
                    return "Вы должны указать что нужно удалить."
                end
            else
                return "Прости "..user.sNick..", эта команда только для "..
                ProfMan.GetProfile(Cfg.AdminProf).sProfileName.."пользователей."
            end
        else
            return "Удалить строку истории",
            " %[line:Какую трем?]",
            " %[line:Какую трем?]"
        end
    end,
    chathelp = function(user,data,to)
        if user then
            local reply = "Chat History Help\n\n\tCommand\t\tDescription\r\n"..
            "\t"..string.rep("?",40).."\r\n"
            for i,v in pairs(Cmds) do
                local desc,args = Cmds[i]()
                reply = reply.."\t"..Cfg.Pfx..string.format("%-15s",i).."\t"..desc.."\r\n"
            end
            return reply.."\n\t"..string.rep("?",40).."\r\n\r\n"
        else
            return "Помощь по истории чата","",""
        end
    end,
}


И добавляем в конец файла версии от СТРЕЛКА.
Go to the top of the page
+Quote Post
ClubViper
сообщение 1.9.2009, 0:37
Сообщение #44


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 510
Спасибо сказали: 1 раз




Вроде сам всё настроил, единственная просьба, подскажите плиз как сделать чтоб полная история выводилась в ЛС а не в чат?
Go to the top of the page
+Quote Post
Артём
сообщение 8.9.2009, 23:48
Сообщение #45


Наруто на аваторке
***********

Группа: Пользователи
Сообщений: 2 606
Регистрация: 11.10.2008
Из: Харькова
Пользователь №: 771
Спасибо сказали: 773 раза




Код
Core.SendPmToUser
Go to the top of the page
+Quote Post
ClubViper
сообщение 9.9.2009, 17:30
Сообщение #46


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 510
Спасибо сказали: 1 раз




Цитата(Артём @ 9.9.2009, 0:48) *
Код
Core.SendPmToUser

не катит, ошибку пишет
Go to the top of the page
+Quote Post
ClubViper
сообщение 10.9.2009, 14:53
Сообщение #47


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 510
Спасибо сказали: 1 раз




Итак выкладываю полностью рабочую версию:
- История чата теперь присылается в личку (отсутствие прятания хистори в строку статуса клиента)
- Исправлены некоторые неточности в переводе
Прикрепленный файл  Chat_History__clubviper_edition_.lua ( 16.34 килобайт ) Кол-во скачиваний: 113
Go to the top of the page
+Quote Post
Rapid_82
сообщение 9.12.2009, 2:05
Сообщение #48


Абсолютный новичок


Группа: Пользователи
Сообщений: 4
Регистрация: 6.12.2009
Пользователь №: 5 281
Спасибо сказали: 0 раз




Всем привет.
Перехожу с PtokaX 0.3.6.0 на Ptokax 0.4.1.1. Установил скрипт хистори. Всё работает. Спасибо.
Только как бы убрать из юзерлиста бота История, не удаляя имя бота из скрипта, так как тогда в чате будет отображаться <>, вместо <История>?
Go to the top of the page
+Quote Post
Alexey
сообщение 9.12.2009, 4:25
Сообщение #49


7 квадратиков
*******

Группа: Модераторы
Сообщений: 793
Регистрация: 21.1.2009
Пользователь №: 1 895
Спасибо сказали: 301 раз




Закомментируй или удали строку, содержащую функцию Core.RegBot().
Go to the top of the page
+Quote Post
Rapid_82
сообщение 9.12.2009, 5:34
Сообщение #50


Абсолютный новичок


Группа: Пользователи
Сообщений: 4
Регистрация: 6.12.2009
Пользователь №: 5 281
Спасибо сказали: 0 раз




спасибо =)
Go to the top of the page
+Quote Post
Panda
сообщение 13.2.2010, 15:23
Сообщение #51


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 513
Спасибо сказали: 0 раз




Цитата(ClubViper @ 10.9.2009, 15:53) *
Итак выкладываю полностью рабочую версию:
- История чата теперь присылается в личку (отсутствие прятания хистори в строку статуса клиента)
- Исправлены некоторые неточности в переводе
Прикрепленный файл  Chat_History__clubviper_edition_.lua ( 16.34 килобайт ) Кол-во скачиваний: 113

Перерыл весь форум в поисках скриптов истории, перепробовал наверное все, уже запутался в них ...
Собственно теперь появилась вот такая проблема, не хочет ни один скрипт работать под (с историей чата) Ptokax 0.4.1.2 (Ось Win7? пробовал и на ХР, такая же фигня). Скрипт как таковой запускается и ошибок в синтаксисе нет, но он не ведет история (не добавляет в базу сообщения). Могу предположить, что это из-за того, что используется Lua 5.1.4
Может кто поковырять и потестить на ptokax 0.4.1.2 данный скрипт? beat_plaster.gif
Go to the top of the page
+Quote Post
Wariner
сообщение 13.2.2010, 17:06
Сообщение #52


Самый главный активист :-D
***********

Группа: Модераторы
Сообщений: 2 790
Регистрация: 29.6.2008
Из: г. Тула
Пользователь №: 97
Спасибо сказали: 440 раз




могу предположить что какой то скрипт стоящий выше истории чата блокирует сообщение и до истории оно не доходит))) пробуем менять местами или отключать скрипты!
Go to the top of the page
+Quote Post
Panda
сообщение 13.2.2010, 17:26
Сообщение #53


Начинающий
*

Группа: Пользователи
Сообщений: 17
Регистрация: 7.3.2009
Пользователь №: 2 513
Спасибо сказали: 0 раз




Цитата(Wariner @ 13.2.2010, 18:06) *
могу предположить что какой то скрипт стоящий выше истории чата блокирует сообщение и до истории оно не доходит))) пробуем менять местами или отключать скрипты!

Тестировался на чистом хабе где был только один скрипт (история чата)
Go to the top of the page
+Quote Post

3 страниц V  < 1 2 3
Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No New Posts История чата
помогите исправить
0 fenrir 4 658 17.11.2014, 2:24 Посл. сообщение: fenrir
No New Posts Topic has attachmentsВывод последний N сообщений чата при входе
Verlihub
2 Vizunchik 9 539 13.9.2014, 9:53 Посл. сообщение: Ahton
No New Posts Topic has attachmentsПроблема со скриптом Истории чата
5 SonicX 8 676 27.6.2014, 19:04 Посл. сообщение: sergius_s
No new Topic has attachmentsИстория чата
версия 2.1a
18 Accelerator 27 109 13.2.2013, 15:59 Посл. сообщение: Артём
No new Topic has attachmentsСкрипт блок привата и общего чата (ответ цифрами) для Verlihub
19 Алекс 21 455 28.11.2012, 0:30 Посл. сообщение: Алекс
No New Posts Topic has attachmentsПоказ список онлайн пользователей и мониторинг чата на сайте
Verlihub
5 Vizunchik 12 848 25.9.2012, 7:37 Посл. сообщение: wolf night
No New Posts Как получить сообщения из чата
6 Radzhab 10 320 13.9.2012, 23:01 Посл. сообщение: mariner
No New Posts Заглушка чата (GAG)
для одного пользователя
9 arktik 13 249 31.1.2012, 0:27 Посл. сообщение: Otshelnik-Fm
No New Posts Нужен скрипт для вкл/выкл чата
2 RAZORkhv 6 543 23.12.2011, 22:06 Посл. сообщение: Ksan
Closed Скрипт логирования главного чата
г.
1 Lamo 5 732 2.8.2011, 17:28 Посл. сообщение: Setuper
No New Posts От: Заглушка чата (GAG)
От темы с ID: 4889
1 DEN 007 5 211 1.7.2011, 11:51 Посл. сообщение: Ksan
No new Topic has attachmentsИстория чата в интересном месте
15 CrazyCat 13 241 5.5.2011, 1:04 Посл. сообщение: Alexey
No New Posts прога только для чата
10 baralgin 11 282 23.2.2011, 1:31 Посл. сообщение: pro
No New Posts прога только для чата
0 baralgin 5 147 16.2.2011, 20:53 Посл. сообщение: baralgin
No New Posts От: История чата
От темы с ID: 2919
0 Perspect 4 418 20.1.2011, 18:12 Посл. сообщение: Perspect

 



RSS Сейчас: 28.3.2024, 17:12