|
Главная | Клиентские скрипты (greylink) - Страница 6 - Форум | Четверг, 28.03.2024, 16:24
Клиентские скрипты (greylink)
| |
hmury | Дата: Воскресенье, 05.10.2008, 10:58 | Сообщение # 1 |
Генерал-лейтенант
Сообщений: 599
Репутация: 32
Статус: Offline
| Сайт посвященный Луа http://www.lua.ru Форум с готовыми скриптами на http://mydc.ru Еще один форум на http://adrium.ipbfree.com мой знакомый, Chaser, написал скрипт "объявление на хабе" Code dcpp = {} spamtable = {} -- spamtable= { ["dc.ru"] = { 0, 10, "sample" } , ["localhost"] = { 0, 12, "hello there!" } }
function spam(hubname, timeout, text) spamtable[hubname] = { 0, timeout, text } end
function dcpp.OnTimer() for hubname, hubentry in pairs(spamtable) do if (hubentry[1] == 0) and (hubentry[3] ~= "") then hubentry[1] = hubentry[2] DC():SendPublicMessage(hubname, hubentry[3]) else hubentry[1] = hubentry[1] - 1 end end return nil end
text = "Спам-бот. Запуск спама на хабе с периодом 600 секунд:\r\n" text = text .. "/lua spam(\"dc.ufanet.ru\", 600, \" ТУТ ВАШЕ СООБЩЕНИЕ \")\r\n" text = text .. "\r\n" text = text .. "Чтобы отключить спам на хабе, наберите\r\n" text = text .. "/lua spam(\"dc.ufanet.ru\", 0, \"\")\r\n" text = text .. "\r\n" text = text .. "Адрес хаба надо писать в точности, как в столбце 'Сервер'\r\n" text = text .. "в списке 'Избранных хабов'\r\n"
DC():MessageBox(text, "spam.lua", "ok", "info") DC():RunTimer(1) это надо вставить в блокнот и сохранить в папку Scripts с именем spam.lua, обязательно в кодировке utf-8. запуск командой
Сообщение отредактировал livedc - Четверг, 19.03.2009, 20:19 |
|
|
|
hmury | Дата: Среда, 03.06.2009, 18:10 | Сообщение # 76 |
Генерал-лейтенант
Сообщений: 599
Репутация: 32
Статус: Offline
| Quote (SerJo) Я уже разобрался, обидно что со звуками это не катит Может кто скажет, как быть? никак. только за счёт новой версии
|
|
|
|
KURAGE | Дата: Четверг, 04.06.2009, 19:48 | Сообщение # 77 |
Генерал-майор
Сообщений: 412
Репутация: 9
Статус: Offline
| некому я не нужен
|
|
|
|
hmury | Дата: Четверг, 04.06.2009, 20:31 | Сообщение # 78 |
Генерал-лейтенант
Сообщений: 599
Репутация: 32
Статус: Offline
| Quote (KURAGE) некому я не нужен твоя просьба звучит как "научите меня программировать"
|
|
|
|
ZdezBilYa | Дата: Четверг, 04.06.2009, 22:09 | Сообщение # 79 |
Рядовой
Сообщений: 5
Репутация: 0
Статус: Offline
| Подскажите, пожалуйста, есть ли такой скрипт, который отсылает пользователю хаба ЛС, если он скачивает у меня какой-нибудь файл? Т.е. я зашел на хаб и те, кто у меня начал скачивать, отправляется в ЛС определенный текст. Конечно нужно отсылать только один раз за сеанс (моё нахождение на хабе). или может быть есть похожий скрипт, попробую переделать
|
|
|
|
SMT | Дата: Четверг, 04.06.2009, 22:13 | Сообщение # 80 |
Генерал-лейтенант
Сообщений: 514
Репутация: 28
Статус: Offline
| Quote (ZdezBilYa) Подскажите, пожалуйста, есть ли такой скрипт, который отсылает пользователю хаба ЛС, если он скачивает у меня какой-нибудь файл? в текущей версии клиента это невозможно сделать через lua-скрипт. можно на Delphi/C++, написав свой ChatBot.dll
|
|
|
|
ZdezBilYa | Дата: Пятница, 05.06.2009, 01:40 | Сообщение # 81 |
Рядовой
Сообщений: 5
Репутация: 0
Статус: Offline
| Quote (SMT) в текущей версии клиента это невозможно сделать через lua-скрипт. можно на Delphi/C++, написав свой ChatBot.dll а вот такой скрипт: Code local sMsg = "*** Connecting: [NICK]" local sBot = "Bot"
function ConnectToMeArrival(tUser, sData) local sNick = sData:match"(%S+) %S+$" if sNick then Core.SendPmToNick(sNick, sBot, tostring(sMsg:gsub("%[NICK%]", tUser.sNick))) end end вроде говорят, что должен работать, но почему-то никаких сообщений не получает. где ошибка?
|
|
|
|
SMT | Дата: Пятница, 05.06.2009, 07:35 | Сообщение # 82 |
Генерал-лейтенант
Сообщений: 514
Репутация: 28
Статус: Offline
| Quote (ZdezBilYa) вроде говорят, что должен работать, но почему-то никаких сообщений не получает. где ошибка? это скрипт для хаба PtokaX =) его надо запускать на хабе
|
|
|
|
KURAGE | Дата: Суббота, 06.06.2009, 02:29 | Сообщение # 83 |
Генерал-майор
Сообщений: 412
Репутация: 9
Статус: Offline
| научите програмировать в lua, lua это мой смысл жизни! максимум чтоя могу: бот реагирует на сообщение в общем чате: отпровлеят сообщение в общий чат и в приват. Code dcpp = {}
BotSay = { { ["question"] = {"[AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz]",}, ["answer"] = {"Общий чат работает.",}, ["answer2"] = {"Приват работает.",}, }, { ["question"] = {"[АаБбВвГгДдЕеЁёЖжЗзИиЙйКкЛлМмНнОоПпРрСсТтУуФфХхЦцЧчШшЩщЪъЫыЬьЭэЮюЯя]",}, ["answer"] = {"Общий чат работает.",}, ["answer2"] = {"Приват работает.",}, }, { ["question"] = {"[АаБбВвГ㥴ДдЕеЄєЖжЗзИиІіЇїЙйКкЛлМмНнОоПпРрСсТтУуФфХхЦцЧчШшЩщЬьЮюЯя]",}, ["answer"] = {"Общий чат работает.",}, ["answer2"] = {"Приват работает.",}, }, }
function dcpp.OnPublicMessage(cid, msg) local userInfo = DC():GetUserInfo(cid) if (userInfo.ME ~= "1") then local huburl = userInfo.HL for _, mini_table in pairs(BotSay) do for _, trigger in pairs(mini_table["question"]) do if string.find(msg, trigger) then DC():SendPublicMessage(huburl, mini_table["answer"][math.random(1,table.getn(mini_table["answer"]))]) DC():SendPrivateMessage(cid, mini_table["answer2"][math.random(1,table.getn(mini_table["answer2"]))]) return nil end end end end
return nil end помогите, научите модифицировать следующий скрипт: Code dcpp = {}
BotSay = { { ["question"] = {"[AaBbCcDdEeFfGgHhIiJjKkLlMmNnOoPpQqRrSsTtUuVvWwXxYyZz]",}, ["answer"] = {"Общий чат работает.",}, }, { ["question"] = {"[АаБбВвГгДдЕеЁёЖжЗзИиЙйКкЛлМмНнОоПпРрСсТтУуФфХхЦцЧчШшЩщЪъЫыЬьЭэЮюЯя]",}, ["answer"] = {"Общий чат работает.",}, }, { ["question"] = {"[АаБбВвГ㥴ДдЕеЄєЖжЗзИиІіЇїЙйКкЛлМмНнОоПпРрСсТтУуФфХхЦцЧчШшЩщЬьЮюЯя]",}, ["answer"] = {"Общий чат работает.",}, }, }
function dcpp.OnPublicMessage(cid, msg) local userInfo = DC():GetUserInfo(cid) if (userInfo.ME ~= "1") then local huburl = userInfo.HL for _, mini_table in pairs(BotSay) do for _, trigger in pairs(mini_table["question"]) do if string.find(msg, trigger) then DC():SendPublicMessage(huburl, mini_table["answer"][math.random(1,table.getn(mini_table["answer"]))]) return nil end end end end
return nil end
Сообщение отредактировал KURAGE - Суббота, 06.06.2009, 02:32 |
|
|
|
hmury | Дата: Суббота, 06.06.2009, 07:58 | Сообщение # 84 |
Генерал-лейтенант
Сообщений: 599
Репутация: 32
Статус: Offline
| Quote (KURAGE) научите програмировать в lua, lua это мой смысл жизни! поставь себе программу хаб PtokaX, для него есть очень много скриптов, например тут: http://mydc.ru/forum10.html много людей умеет дедать скрипты для хаба, поэтому повышается вероятность, что тебе кто-то поможет. если освоишь хаб, клиента освоить проще
|
|
|
|
KURAGE | Дата: Суббота, 06.06.2009, 15:29 | Сообщение # 85 |
Генерал-майор
Сообщений: 412
Репутация: 9
Статус: Offline
| Люди кто знает кошилек GreyTeam хочу помочь ПРОСТО Я БОЛЕЮ ЗА НИХ!!! Желательно иметь с ними хать какую небудь связи то я пару багов отрыл. есть пару важных функций которых нет
Сообщение отредактировал KURAGE - Суббота, 06.06.2009, 15:38 |
|
|
|
SerJo | Дата: Суббота, 06.06.2009, 15:39 | Сообщение # 86 |
Полковник
Сообщений: 186
Репутация: 3
Статус: Offline
| KURAGE, о багах и наворотах есть специальные темы - пиши туда, разработчики клиента находятся в тени, т.к. не хотят слушать массовые просьбы. Они посещают этот форум как гости (либо под ником какого-нибудь пользователя) и знакомятся с запросами пользователей. Так что пиши и если твои нововведения действительно весомы их непременно воплотят в жизнь ед. что тебе в помощь — greyteam@mail.ru (Примечание: не используйте mail.ru Agent, сообщения от него прибиваются)
Запретный плод пользуется популярностью у народа только из-за того, что он запретный, будь он легален - интерес у народа значительно уменьшился б, после критического возрастания :) => легально — не интересно))))
Сообщение отредактировал SerJo - Суббота, 06.06.2009, 15:44 |
|
|
|
KURAGE | Дата: Вторник, 09.06.2009, 22:05 | Сообщение # 87 |
Генерал-майор
Сообщений: 412
Репутация: 9
Статус: Offline
| спасибо я уже все расщарил Добавлено (09.06.2009, 22:05) --------------------------------------------- Люди помогите в следующий проблеми я пишу мульти скрипт для своего ПМ как сделать чтоб сообщение отправлялось слудующим оброзом: [21:03:18]<KURAGE> xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx (отправлялось скриптом)
Сообщение отредактировал KURAGE - Вторник, 09.06.2009, 22:05 |
|
|
|
hmury | Дата: Вторник, 09.06.2009, 22:10 | Сообщение # 88 |
Генерал-лейтенант
Сообщений: 599
Репутация: 32
Статус: Offline
| переход на новыую строку - это обычный символ "\r\n" попробуй написать в чате хаба /lua DC():SendPublicMessage(dc_huburl, "\r\n 123 \r\n 456 ")
|
|
|
|
AniNerbe | Дата: Вторник, 09.06.2009, 22:43 | Сообщение # 89 |
Генерал-майор
Сообщений: 434
Репутация: 28
Статус: Offline
| Сегодня заинтересовался 2мя демо ботами, написанных греем: http://www.freewebtown.com/greylink/bin/scripts.rar spam.lua пишет с заданным периодом спам в общий чат заданного хаба бота запустил, но что то он по прошествию 10 минут в чат ничего такова не написал кто нить может проверить этого бота? sample4.lua Запрет отправки строки "fly" бот интересный, меня интересует: 1. как в него внести перечень слов, на которые он реагировал бы (через запятую у меня не получилось) 2. бот слегка недоработан: например я хочу чтобы бот реагировал на слова "мля". Если я напишу привет земляни! - бот среагирует (что не правильно). в итоге я хотел бы в стартап пелинка засунуть бота который бы не давал пользователю писать мат в чат и который бы раз в сутки отсылал в общаг ратио и аптайм.
|
|
|
|
Setuper | Дата: Среда, 10.06.2009, 00:26 | Сообщение # 90 |
Майор
Сообщений: 98
Репутация: 6
Статус: Offline
| Code dcpp = {}
tWords = { "%sмля%s", "%sfly%s" }
function dcpp.PreviewPublicMessage(huburl, message) for k, v in ipairs(tWords) do if message:match(v) then DC():MessageBox("Не ругайся!", "sample4.lua", "ok", "error") return 2 end end end
lua master
|
|
|
|
|
|
|