myDC.ru

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

 
 
Ответить в данную темуНачать новую тему

> Вывод Чата В Файл

Теги
Нет тегов для показа
MEXAHuK
сообщение 6.12.2008, 22:04
Сообщение #1


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 314
Регистрация: 13.10.2008
Пользователь №: 791
Спасибо сказали: 9 раз




есть ли скрипт который выводит в файл N количество сообщений чата в N минут? файл типа .txt или .html
Go to the top of the page
+Quote Post
Wariner
сообщение 6.12.2008, 22:05
Сообщение #2


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

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




что значит N сообщений в N минут?! с какой целью?
Go to the top of the page
+Quote Post
Sephiroth_Lukaw
сообщение 6.12.2008, 22:51
Сообщение #3


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 307
Регистрация: 11.7.2008
Пользователь №: 173
Спасибо сказали: 31 раз




Код
function OnStartup()
Log = ''
local nTimerInterval=6 * 6 * 10000 -- 6 минут
TmrMan.AddTimer(nTimerInterval, "SaveChat")
end
function SaveChat()
local hFile = io.open("scripts/chat.txt","w")
hFile:write(Log)
hFile:flush()
Log = ''
hFile:close()
end
function ChatArrival(tUser, sData)
Log = Log..sData
end
Я о том?

Код
function OnStartup()
tLog = {}
local nTimerInterval=6 * 6 * 10000 -- 6 минут
TmrMan.AddTimer(nTimerInterval, "SaveChat")
end
function SaveChat()
local hFile = io.open("scripts/chat.txt","w")
hFile:write("<HR>"..table.concat (tLog, "<BR>").."<HR>")
hFile:flush()
tLog = {}
hFile:close()
end
function ChatArrival(tUser, sData)
table.insert (tLog, sData)
end

Будь осторожен, с командами, типа, !regme, что бы и они логировались, ставь скрипт в самый верх ((-
Если нужно время сообщения, то, os.date("20%y-%m-%d %H:%M:%S "), надеюсь, сам найдёшь, куда вставить.
Go to the top of the page
+Quote Post
Serx
сообщение 7.12.2008, 1:44
Сообщение #4


Продвинутый участник
****

Группа: Пользователи
Сообщений: 153
Регистрация: 21.9.2008
Из: Челябинск
Пользователь №: 574
Спасибо сказали: 54 раза




А как выглядит скрипт который только пишет лог чата и ничего более?
Go to the top of the page
+Quote Post
MEXAHuK
сообщение 7.12.2008, 10:55
Сообщение #5


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 314
Регистрация: 13.10.2008
Пользователь №: 791
Спасибо сказали: 9 раз




Sephiroth_Lukaw, оно! спасибо!
но вот только какой из них под апи2? нужно только вывод чата. никакой обработки команд.
Wariner, N сообщений в N минут - сорри, писал с жутких колёс и ловил глюки

не нужен лог, нужно только чтобы файл содержал только последние N сообщений.
Go to the top of the page
+Quote Post
Sephiroth_Lukaw
сообщение 7.12.2008, 11:07
Сообщение #6


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 307
Регистрация: 11.7.2008
Пользователь №: 173
Спасибо сказали: 31 раз




Т.е. без таймера? Оба под API2, если БЕЗ ТАЙМЕРа, а только n cообщений, то ПРИМЕРНО, так.
Код
function OnStartup()
tLog = {}
iMess = 0 --/* Не трогать */
nMess = 6 --/* Сообщений */
end
function SaveChat()
local hFile = io.open("scripts/chat.txt","w")
hFile:write("<HR>"..table.concat (tLog, "<BR>").."<HR>")
hFile:flush()
tLog = {}
iMess = 0
hFile:close()
end
function ChatArrival(tUser, sData)
local _,_,sMsg  = string.find(sData, "%b<>%s+(.*)|")
  if string.sub (sMsg, 0, 1) ~= "!" and string.sub (sMsg, 0, 1) ~= "+" then
    if iMess < nMess then
    iMess = iMess + 1
    table.insert (tLog, "<"..tUser.sNick.."> "..sMsg)
    else
    SaveChat()
    end
  end
end
Go to the top of the page
+Quote Post
MEXAHuK
сообщение 7.12.2008, 11:20
Сообщение #7


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 314
Регистрация: 13.10.2008
Пользователь №: 791
Спасибо сказали: 9 раз




СПАСИБА!
а чтобы сохранять их в любом месте компа а не только в папках птоки?

Sephiroth_Lukaw...
запустился
сам создал chat.txt
перезагрузил скрипт
пусто в файле
Go to the top of the page
+Quote Post
Sephiroth_Lukaw
сообщение 7.12.2008, 11:21
Сообщение #8


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 307
Регистрация: 11.7.2008
Пользователь №: 173
Спасибо сказали: 31 раз




Код
local _,_,sMsg  = string.find(sData, "%b<>%s+(*)|")
я тут точку забыл. Переписал.
Go to the top of the page
+Quote Post
MEXAHuK
сообщение 7.12.2008, 11:24
Сообщение #9


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 314
Регистрация: 13.10.2008
Пользователь №: 791
Спасибо сказали: 9 раз




не робитт
может local hFile = io.open("scripts//chat.txt","w")
? два слеша ?
Go to the top of the page
+Quote Post
Sephiroth_Lukaw
сообщение 7.12.2008, 11:44
Сообщение #10


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 307
Регистрация: 11.7.2008
Пользователь №: 173
Спасибо сказали: 31 раз




Тама логика просто ни много не правильная была, он ждал первые 6 сообщений. Прикрепленный пробуй. Протестирован.
Цитата("0.4.1.1")
[13:44] <Sephiroth_Lukaw> 2
[13:44] <Sephiroth_Lukaw> 3
[13:44] <Sephiroth_Lukaw> 4
[13:45] <Sephiroth_Lukaw> 5
[13:45] <Sephiroth_Lukaw> 6
[13:45] <Sephiroth_Lukaw> 7
[13:45] <Sephiroth_Lukaw> 8
[13:49] <Sephiroth_Lukaw> 9
[13:49] <Sephiroth_Lukaw> !10
[13:49] <Sephiroth_Lukaw> 11

Цитата("chat.txt")
<HR><Sephiroth_Lukaw> 5<BR><Sephiroth_Lukaw> 6<BR><Sephiroth_Lukaw> 7<BR><Sephiroth_Lukaw> 8<BR><Sephiroth_Lukaw> 9<BR><Sephiroth_Lukaw> 11<HR>

Прикрепленные файлы
Прикрепленный файл  LastNMessage.lua ( 738 байт ) Кол-во скачиваний: 12
Прикрепленный файл  LastNMessageToPost.lua ( 888 байт ) Кол-во скачиваний: 64
 
Go to the top of the page
+Quote Post
MEXAHuK
сообщение 7.12.2008, 11:48
Сообщение #11


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 314
Регистрация: 13.10.2008
Пользователь №: 791
Спасибо сказали: 9 раз




Цитата(Sephiroth_Lukaw @ 7.12.2008, 13:44) *
Тама логика просто немного не правильная была, он ждал первые 6 сообщений. Прикрепленный пробуй. Протестирован.


работает.
<HR> - это тэги?
как время сообщения засунуть?
Go to the top of the page
+Quote Post
Sephiroth_Lukaw
сообщение 7.12.2008, 11:51
Сообщение #12


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 307
Регистрация: 11.7.2008
Пользователь №: 173
Спасибо сказали: 31 раз




Конечно теги)).
P.S.
Код
table.insert (tLog, os.date("[20%y-%m-%d %H:%M:%S] ").."<"..tUser.sNick.."> "..sMsg)

offtop: Я есть ушёл.
Go to the top of the page
+Quote Post
MEXAHuK
сообщение 7.12.2008, 11:54
Сообщение #13


Освоившийся участник
*****

Группа: Пользователи
Сообщений: 314
Регистрация: 13.10.2008
Пользователь №: 791
Спасибо сказали: 9 раз




спасибо! очень помог!
Go to the top of the page
+Quote Post
Setuper
сообщение 7.12.2008, 13:24
Сообщение #14


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

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




20%y - это пишется так %Y
Go to the top of the page
+Quote Post

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

Collapse

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

  Тема Ответов Автор Просмотров Последнее сообщение
No New Posts Как получить все файл-листы пользователей?
13 HackFresse 20 150 18.1.2015, 1:12 Посл. сообщение: alex82
No New Posts История чата
помогите исправить
0 fenrir 4 970 17.11.2014, 2:24 Посл. сообщение: fenrir
No New Posts Topic has attachmentsВывод последний N сообщений чата при входе
Verlihub
2 Vizunchik 9 985 13.9.2014, 9:53 Посл. сообщение: Ahton
No New Posts Topic has attachmentsПроблема со скриптом Истории чата
5 SonicX 9 287 27.6.2014, 19:04 Посл. сообщение: sergius_s
No New Posts Сохранение и загрузка таблиц в файл (из файла)
7 daslex 10 860 22.11.2013, 12:28 Посл. сообщение: MIKHAIL
No New Posts Поиск по TTH и вывод на веб-сервер
1 Panasonic 7 469 1.11.2013, 17:07 Посл. сообщение: Alexey
No new Topic has attachmentsИстория чата
версия 2.1a
18 Accelerator 28 459 13.2.2013, 15:59 Посл. сообщение: Артём
No new Topic has attachmentsСкрипт блок привата и общего чата (ответ цифрами) для Verlihub
19 Алекс 22 863 28.11.2012, 0:30 Посл. сообщение: Алекс
No New Posts Topic has attachmentsПоказ список онлайн пользователей и мониторинг чата на сайте
Verlihub
5 Vizunchik 13 470 25.9.2012, 7:37 Посл. сообщение: wolf night
No New Posts Как получить сообщения из чата
6 Radzhab 10 918 13.9.2012, 23:01 Посл. сообщение: mariner
No New Posts От: Как получить все файл-листы пользователей?
От темы с ID: 2295
0 Alexey 4 472 20.3.2012, 13:08 Посл. сообщение: Alexey
No New Posts Заглушка чата (GAG)
для одного пользователя
9 arktik 14 016 31.1.2012, 0:27 Посл. сообщение: Otshelnik-Fm
No New Posts Нужен скрипт для вкл/выкл чата
2 RAZORkhv 6 955 23.12.2011, 22:06 Посл. сообщение: Ksan
No New Posts Как сохранить файл в нужной мне кодировке?
Например, если исходные данные в UTF-8...
4 MIKHAIL 8 259 8.12.2011, 4:35 Посл. сообщение: Alexey
Closed Скрипт логирования главного чата
г.
1 Lamo 6 023 2.8.2011, 17:28 Посл. сообщение: Setuper

 



RSS Сейчас: 23.11.2024, 16:52