myDC.ru

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

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

> Chathistory By Mutor, API2 | Переведен мною =)

Setuper
сообщение 23.12.2009, 17:29
Сообщение #21


RusHub team lead
**************

Группа: Модераторы
Сообщений: 4 030
Регистрация: 20.6.2008
Из: г. Королёв (Моск. обл.)
Пользователь №: 46
Спасибо сказали: 1707 раз




За такую кривизну даже браться не хочется.


Не стал исправлять кривизну скрипта, однако подправил пару вещей:
Раскрывающийся текст
botname = "Последние 10 сообщений в чате" -- Имя бота
BadChars = {".","?","!","+","-",} --На какие префиксы скрипт не будет реагировать
maxhistory = 20 -- Максимум линий для чата в кеше
chatfile = "chathistory.dat"-- куда будут записываться логи чата

GetChat = "+история" -- Команда для показа последних сообщений; Например, +история 10 покажет последние 10 сообщений

-- Выбираем, для каких профилей будет доступна команда:
-- индекс профиля, история чата [0=нет 1=да], "Название профиля"
HistoryProfiles = {
[-1] = {0,"Незарегистрированные пользователи"},
[0] = {1,"Мастер"},
[1] = {1,"Оп"},
[2] = {1,"Вип"},
[3] = {1,"Зарегистрированные пользователи"},
}

--------------------------------------------------------------------------------------
--------------------------------------------------------------------------------------

function OnStartup()
if loadfile(chatfile) == nil then
chathistory = {}
local when = os.date(" %B %d %Y в: %X")
local chat = "Файл лога главного чата создан: "
table.insert(chathistory,when..chat)
local f,e = io.open( chatfile, "w+" )
f:write( "return {\n"..string.format("%q",chat..when)..",\n}" )
f:close()
end
chathistory = dofile(chatfile)
--frmHub:RegBot(botname)
end

function OnExit()
savehistory()
end

function UserConnected(user)
Core.GetUserAllData(user)
if HistoryProfiles[user.iProfile] and HistoryProfiles[user.iProfile][1] == 1 then
local n = #chathistory
local str = ""
for i = 1, n do str = str.."\r\n"..chathistory[i] end
Core.SendToNick(user.sNick,"<"..botname.."> "..str.."\r\n")
end
end

OpConnected = UserConnected

function ChatArrival(user,data)
Core.GetUserAllData(user)
local s,e,pre = string.find(data, "^%b<> (.)")
local s,e,cmd,lines = string.find(data, "^%b<>%s+(%S+)%s+(%d+)|$")
local when = os.date("[%H:%M] ")
local chat = string.sub(data, 1, -2)
if cmd and cmd == GetChat then
if lines ~= e then
GetChatLines(user, lines)
return true
else
Core.SendToNick(user.sNick,"<".."Пожалуйста.."> ".. укажите, сколько сообщений из лога главного чата вы хотите увидеть. Максимальное значение: "..maxhistory..".")
return true
end
else
for k,v in ipairs(BadChars) do
if pre == v then
return
end
end
table.insert(chathistory,when..chat)
if #chathistory > maxhistory then table.remove(chathistory, 1) end
savehistory()
end
end

function GetChatLines(user, linecount)
local n1 = #chathistory
local n2 = linecount
local n3 = n1 - (n2-1)
local str = ""
for i =n3,n1 do str = str.."\r\n"..chathistory[i] end
Core.SendPmToNick(user.sNick,botname,str.."\r\n")
end

function savehistory()
local f,e = io.open( chatfile, "w+" )
if f then
f:write("return {\n")
for i = 1, #chathistory do
f:write( "\t"..string.format("%q", chathistory[i])..",\r\n" )
end
f:write("}" )
f:close()
return 1
else
return nil
end
end
RegConnected = UserConnected


Спасибо сказали:
Go to the top of the page
+Quote Post
engineer
сообщение 23.12.2009, 18:34
Сообщение #22


Участник
**

Группа: Пользователи
Сообщений: 32
Регистрация: 14.7.2009
Из: Россия
Пользователь №: 3 871
Спасибо сказали: 1 раз




Всё равно не работает.
Нашел здесь http://mydc.ru/topic1890.html старенький скрипт для PtokaX 0.3.6.0 - работает офигенно, даже под себя смог настроить и порадоваться (убрал рюшечки всякие полосочки для оформления сообщения, вобщем самое простое сообщение). Но после конвертации, как и следовало ожидать, на PtokaX 0.4.1.1 не работает.
Здесь http://mydc.ru/topic2343.html скрипт нормально не работает в паре с Хуббаботом. Собственно из этого топика выяснил, что надо местами с Хубой их менять ...
Короче опять испробывал кучу вариантов с конвертированием и перестановкой скриптов, даже просто по одному скрипту запускал на чистой PtokaX - ничего не получается. В итоге на форуме нет простой рабочей "Истории", которая могла бы работать в паре с Хуббаботом на PtokaX 0.4.1.1
Go to the top of the page
+Quote Post
Alexey
сообщение 24.12.2009, 6:33
Сообщение #23


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

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




Цитата(ВАСЯ @ 23.12.2009, 18:34) *
В итоге на форуме нет простой рабочей "Истории", которая могла бы работать в паре с Хуббаботом на PtokaX 0.4.1.1

Ложь и провокация! Версия из седьмого поста этой темы у меня работает вместе с Хуббаботом на 041 Птоке.

PS: Да и обсуждать скрипт NRJ кагбэ не по сабжу. К сожалению, не нашёл смайла с табличкой :offtopic:
Go to the top of the page
+Quote Post
engineer
сообщение 24.12.2009, 10:34
Сообщение #24


Участник
**

Группа: Пользователи
Сообщений: 32
Регистрация: 14.7.2009
Из: Россия
Пользователь №: 3 871
Спасибо сказали: 1 раз




Цитата(Alexey @ 24.12.2009, 6:33) *
Ложь и провокация!

Вы так на кухне у себя разговаривайте.
Цитата(Alexey @ 24.12.2009, 6:33) *
Версия из седьмого поста этой темы у меня работает вместе с Хуббаботом на 041 Птоке.

Скачал, поставил. Если скрипт ставить до Хуббабота, то последние сообщения при входе на хаб идут до приветствия Хуббабота в самых первых строчках, т.к. после них идет приветствие хаба, то это не удобно (приветствие большое с правилами и строчки истории улетают вверх). После Хуббабота в списке PtokaX, скрипт при входе на хаб вообще не выводит никаких сообщений. На PtokaX 0.3.6.0 + Hubbabot 2.28 RC3 + ChatHistory работает более интересно: в положении до Хуббабота так же как описано выше, а вот после Хуббабота сообщения при входе идут как положено после приветствия хаба, но только юзерам Master и Operator независимо от настройки (ставил всем 1 - ничего не изменилось).
Проблема с новой PtokaX не у одного меня, почти во всех топиках на тему Chat History есть эта проблема.
Цитата(Alexey @ 24.12.2009, 6:33) *
PS: Да и обсуждать скрипт NRJ кагбэ не по сабжу. К сожалению, не нашёл смайла с табличкой :offtopic:

Мне фиолетово ваше отношение к NRJ, мне скрипт рабочий нужен.
P.S. Возможно у вас он работает в личку, меня интересует вариант с главным чатом при входе на хаб.
Go to the top of the page
+Quote Post
Wariner
сообщение 24.12.2009, 19:09
Сообщение #25


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

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




ВАСЯ слишком много агрессии, если у вас не работает а у других нет возможно дело не в скрипте?

Например у меня на 0360 хубба конфликтовал со скриптами а на новой версии это совершенно не наблюдалось ;)
Go to the top of the page
+Quote Post
engineer
сообщение 24.12.2009, 20:32
Сообщение #26


Участник
**

Группа: Пользователи
Сообщений: 32
Регистрация: 14.7.2009
Из: Россия
Пользователь №: 3 871
Спасибо сказали: 1 раз




Агрессия там, где много знаков "!" в сообщениях, я же спокойно рассуждаю и делюсь тем, что наблюдаю. Ну если Вы как модератор это усмотрели, перед всеми искренне извиняюсь. Никаких помыслов "наехать" не было.
В ветке про Хуббабот информация что проблема не лечится, и нужно скрипт ChatHistory редактировать. Здесь проблем нет ни у кого, т.к. видимо работает.
Есть вариант, не знаю, может сочтут меня сумасшедшим, но делов 10 мин.: если кому не лень, скачайте чистую PtokaX GUI, hubbabot (с этого форума) и ChatHistory отсюда же. 10 сообщений должны выводиться при входе на хаб в окно общего чата после приветствия Хуббабота. Если у вас заработает, киньте это в архив и передайте через любой файлообменник. Если я увижу реально работающую конструкцию - пойду и убьюсь об стену.
Уже даже спортивный интерес возник решить эту проблему и узнать откуда ноги растут.
Go to the top of the page
+Quote Post
xXx-Portal
сообщение 30.8.2010, 7:55
Сообщение #27


Участник
**

Группа: Пользователи
Сообщений: 43
Регистрация: 18.8.2010
Из: Смоленск
Пользователь №: 7 516
Спасибо сказали: 1 раз




Можно сделать юзерам историю чата но без меню?

Go to the top of the page
+Quote Post
Артём
сообщение 30.8.2010, 8:03
Сообщение #28


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

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




xXx-Portal, Можно!!! Но на форуме полно скриптов Историй чата без менюшки, а этот скрипт только с менюшкой нада использовать, ибо много чего через меню делается.


Спасибо сказали:
Go to the top of the page
+Quote Post
xXx-Portal
сообщение 3.9.2010, 23:18
Сообщение #29


Участник
**

Группа: Пользователи
Сообщений: 43
Регистрация: 18.8.2010
Из: Смоленск
Пользователь №: 7 516
Спасибо сказали: 1 раз




Цитата(Артём @ 30.8.2010, 9:03) *
xXx-Portal, Можно!!! Но на форуме полно скриптов Историй чата без менюшки, а этот скрипт только с менюшкой нада использовать, ибо много чего через меню делается.


кому меню кому нет...
лично у меня меню скрыто от всех кроме админов!

а историю видят токо зарегенные юзеры.

всё просто на ура СУПЕР скрипт! boss.gif
Go to the top of the page
+Quote Post
ramzes
сообщение 11.3.2013, 23:49
Сообщение #30


Начинающий
*

Группа: Пользователи
Сообщений: 12
Регистрация: 7.7.2010
Из: Камышин
Пользователь №: 7 220
Спасибо сказали: 0 раз




А можете выложить версию под ptokax 0.5.0.0 ?
Go to the top of the page
+Quote Post
Saymon21
сообщение 12.3.2013, 0:01
Сообщение #31


Site Reliability Engineer
*********

Группа: Модераторы
Сообщений: 1 772
Регистрация: 27.6.2009
Из: Чувашия, г. Чебоксары
Пользователь №: 3 719
Спасибо сказали: 479 раз




ramzes, А "эта версия" не работает?
Go to the top of the page
+Quote Post
Артём
сообщение 12.3.2013, 2:25
Сообщение #32


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

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




ох, как же закумарили просящие скрипт под 0.5.0.0 не проверив его, хотя разницы нет. misdoubt.gif
Go to the top of the page
+Quote Post
Alexey
сообщение 28.3.2014, 2:39
Сообщение #33


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

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




«Нам пишут...»
Цитата(Inkvizitor_ks @ 28.3.2014, 0:02)
скачал ваш переделаный скрипт из этого поста http://mydc.ru/index.html?showtopic=281&am...ost&p=22169
всё отлично! если не сложно - помогите с небольшой правкой, нужно в менюшке пункты удаления строки и очистки всего логав подменю упрятать(так как случайно можно нажать на удаление) )
если не сложно. заранее благодарю

Меняете
Код
return "Удалить историю чата",
на
Код
return "Подменю\\Удалить историю чата",

Аналогичным способом можно усложнить доступ и к другим пунктам меню.

PS: Такие вопросы лучше задавать в темах скриптов, а не через личные сообщения, — ведь ответ может быть интересен и другим посетителям форума.


Спасибо сказали:
Go to the top of the page
+Quote Post
Inkvizitor_ks
сообщение 28.3.2014, 18:12
Сообщение #34


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


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




Большое спасибо за наставление baffle.gif
Исправляюсь, пишу в теме.
Еще один вопрос - возможно ли сделать в данном скрипте поиск логов за определённое число? (то есть поиск логов по дате)
Go to the top of the page
+Quote Post
Alexey
сообщение 3.4.2014, 22:57
Сообщение #35


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

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




«Если очень захотеть — можно в космос полететь!»

Да, возможно. Создаёшь новую команду, в которой циклом пробегаешь по всем элементам истории, сравнивая дату.
Go to the top of the page
+Quote Post
Ystus
сообщение 7.11.2016, 13:43
Сообщение #36


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


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




Цитата(Alexey @ 18.10.2009, 17:09) *
Когда-то поковырял для себя оригинальную муторовскую версию, сейчас возвращаться к этому нет желания, но первые 2 пункта в ней есть, а третий нереализуем.


Эта ошибка тоже исправлена.

[attachment=3392:ChatHistory107.lua]


Не работает Ваш скрипт
Синтаксис J:\Program Files (x86)\DC\scripts\chat_history_0.lua:291: attempt to index local 'handle' (a nil value)
stack traceback:
J:\Program Files (x86)\DC\scripts\chat_history_0.lua:291: in function 'SaveToFile'
J:\Program Files (x86)\DC\scripts\chat_history_0.lua:149: in function <J:\Program Files (x86)\DC\scripts\chat_history_0.lua:148>


Цитата(ВАСЯ @ 23.12.2009, 2:22) *
Артём, как прикажете big_smile.gif, только от вашего бурного участия в моих немногочисленных сообщениях на форуме толку пока что 0% ))). Замечания можно в личку кидать, дабы не флудить.
[attachment=3691:chat_history.lua]


[13:42:11] Синтаксис J:\Program Files (x86)\DC\scripts\chat_history_1.lua:1: unexpected symbol near ']'
Go to the top of the page
+Quote Post

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

Collapse

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

  Тема Ответов Автор Просмотров Последнее сообщение
No new Topic has attachmentsАнтипорн By Mutor, Бан По Ттн
API1, API2 | База порнухи около 500 ТТН
49 district 37 386 17.11.2012, 19:19 Посл. сообщение: Alexey
No New Posts Topic has attachmentsUserInfo_v0.2___by_Nickolya + Hider (Mutor)
7 X-Sky 6 158 25.11.2010, 20:34 Посл. сообщение: X-Sky
No New Posts От: Антипорн By Mutor, Бан По Ттн
От темы с ID: 573
0 Spongebob 2 640 19.12.2008, 21:30 Посл. сообщение: Spongebob
No New Posts Topic has attachmentsReboot Msg By Mutor
API2
1 MEXAHuK 3 945 4.12.2008, 22:32 Посл. сообщение: Wariner

 



RSS Сейчас: 20.10.2018, 19:07