Здравствуйте, гость ( Вход | Регистрация )
Дата поста: | В теме: | За сообщение: | Спасибо сказали: | ||
---|---|---|---|---|---|
13.9.2011, 17:41 |
Rss_NewsRu Скрипт для чтения лент новостей с сайта http://www.NEWSru.com/ |
Можно: Код for i,v in pairs(tCmds) do sRssMenu = "$UserCommand 1 3 "..sMenu..tCmds[i][1].."$<%[mynick]> "..i.."||" Core.SendToUser(tUser,"$UserCommand 0 3") -- ЭТО НОВАЯ СТРОКА для отправления разделителей в меню Core.SendToUser(tUser, sRssMenu) end Просто добавь одну строку, как показано выше, в функции Цитата function UserConnected(tUser) больше ничего не меняя. |
AfLc | ||
11.9.2011, 13:22 |
Rss_NewsRu Скрипт для чтения лент новостей с сайта http://www.NEWSru.com/ |
Скрипт для чтения лент новостей с сайта Название: Rss_NewsRu.lua Платформа: PtokaX API: API 2 Автор: Ksan Город: Томск, Россия Дата: 11-09-2011 Примечания: Каждая лента (тема) при первом открытии заносится в таблицу (в памяти) и сохраняется по умолчанию 1 час (это время регулируется в настройках ). В дальнейшем, пока не пройдёт час, эта лента при запросе откроется мгновенно из памяти, по прошествии срока при первом вызове обновится из сайта. Ну и ещё 30 секунд (тоже регулируется в настройках) - между любыми запросами через меню скрипта (зачем? а фиг знает...у меня такая привычка - сетевые скрипты стараюсь делать с паузами между запросами ) Всего в базе 18 лент. Все - с новостного сайта Думаю, ещё один новостной скрипт лишним не будет. |
Nickolya, Tsd, Артём, ShadoWx, PomanoB, Saymon21, Агрессор, shullz, stone, AfLc, Hashish, Nikolaevich | ||
10.9.2011, 16:30 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
van21, для этого есть другие, специально для этого сделанные, скрипты. Я не знаю ссылки, так что придется искать тебе самому на форуме. Возможно, в разделе скриптов с MySQL...возможно. |
van21 | ||
8.9.2011, 6:23 |
WhoisNew Через меню хаба добывает WHOIS-информацию об IP |
UPD-4: - наконец-то дошли руки, подогнал скрипт под изменившиеся страницы результатов, скрипт снова работает. У кого если вдруг какой-то IP вызовет падение скрипта (в силу множественности вариантов представления информации на странице результатов), сообщите сюда этот IP в тему мне, приму меры. Последняя перезаливка 08-09-2011 07:15 (мск.) |
striker, AfLc | ||
31.8.2011, 20:00 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
1. Тогда, как я и говорил, все "свои" диапазоны (локалка + выделенка) держи в одной таблице. И больше никаких таблиц диапазонов. 2. Чтоб не могли отключить разделение сетей, как вариант, можешь скрыть от юзеров из меню строку отправки команды. Скажем, так: Код -- Core.SendToUser(curUser, "$UserCommand 1 3 "..sMenuWay.."ВКЛ./ВЫКЛ. разделение сетей$<%[mynick]> +"..sOn_OffCmd.."|") |
van21 | ||
31.8.2011, 16:56 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
1. van21, ты какой-то странный...всё время городишь одно на другое. 2. Вопрос - чего ты хочешь - чтоб первая сеть не могла качать из второй сети? или ещё что-то? 3. И что за третья сеть? 127.0.0.1 - это вообще-то комп, где стоит хаб. Удали эту сеть. 4. Насколько я вижу, первая сеть уже вобрала в себя все твои локальные диапазоны. А во вторую сеть у тебя что за диапазоны попали? Я же писал раньше тебе - все диапазоны, которые беспроблемно могут качать друг с друга, должны находиться в одной сети (таблице), а всё, что не вошло в эту таблицу - не надо заносить в списки. Они по умолчанию будут в сети №0. Несколько сетей нужно организовывать только в том случае, когда на ваш хаб зходят люди из нескольких провайдеров, которые между собой "воюют", то есть, за скачивание между ними берутся деньги, вот тогда и необходимо организовать несколько разных сетей. А если у тебя проблема только между локалью (где силят все ваши местные юзеры) и интернетом, то достаточно прописать в скрипте только сеть №1. |
van21 | ||
31.8.2011, 0:39 |
Переделка скриптов Прошу помощи |
Fe(one)X, функцию function checkForSafe(msg) ты написал, но нет обращения к ней, то есть, у тебя нет проверки вхождения выражения из таблицы исключений в сообщение юзера. Короче, надо вместо строки Код if sdata then написать так Код if sdata and not checkForSafe(sdata) then |
Fe(one)X | ||
31.8.2011, 0:14 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
Ну узнай, в какой диапазон входят ВПН-адреса и внеси в тот же список "своих".. Так же поступи с выделенками. Они же не произвольные IP, а входят в какие-то определённые диапазоны, вот узнай и занеси в в таблицу. А диапазоны можно узнать через сервера WHOIS. Запрашиваешь какой-то айпи и сервер тебе выдаст, в какой диапазон он входит. |
van21 | ||
30.8.2011, 22:10 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
Это уже тебе надо ориентироваться в сетях вашей местности...наверно, должен быть сайт какого-нибудь вашего провайдера, где будет таблица ваших сетей. У нас в городе (области) есть. Там больше Ищи у себя тоже. |
van21 | ||
30.8.2011, 21:38 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
Повторюсь и тут: Код tNetworkShareLimit = { --- [0] = 1073741824, -- 1 ГБ (1024^3), это все юзеры, ip которых не прописаны в таблице --- [2] = 1099511627776, -- 1 ТБ (1024^4) } tNetworkUsersLimit = { --- [0] = 0, -- это лишь пример, тут мы запрещаем вход всем тем, чей ip не описан в таблицах сетей --- [1] = 40, --- [3] = 2, } Сделай как тут - комменты спереди...тогда не будет ограничений и выкидышей/незапусков. И не обращай внимания на то, что написано после комментирующих чёрточек впереди, это не имеет значения, пока закомментены. |
van21 | ||
28.8.2011, 20:29 |
Ваши Хабы И Их Адреса |
А ещё говорят, что сны не сбываются...вот и верь людям после этого.. |
AfLc | ||
26.8.2011, 20:57 |
Переделка скриптов Прошу помощи |
Fe(one)X, в скрипте отправки топика измени одну строку так: Код function OnTimer() if tTopic ~= {} then SetMan.SetString(10,tTopic[math.random(1,table.maxn(tTopic))]:sub(1,256).." Время: "..os.date("%X")) -- изменённая строка* end end И будет выводить твои топики + текущее время (но только на момент отправки, потом до следующего топика время будет висеть одно и то же). Может, лучше хотя бы без секунд? Тогда время в топике будет более корректно выглядеть. Если без секунд, то строка должна выглядет так: Код SetMan.SetString(10,tTopic[math.random(1,table.maxn(tTopic))]:sub(1,256).." Время: "..os.date("%H:%M")) -- изменённая строка* |
Fe(one)X | ||
20.8.2011, 18:54 |
Скрипт для открытия сайта через меню хаба. |
Если так охота через меню хаба, делай команду в меню, которая выбросит в чат или приват ссылку, видную только тебе, потом нажимаешь на неё и заходишь на сайт. Будет вместо одного два нажатия.. |
digor22 | ||
9.8.2011, 11:11 |
контекстное меню для АДМИНА |
drkrol, нет уж, пиши тут. Я полагаю, твои вопросы по теме. И я не люблю общаться в личках форумов по темам, для которых создан этот форум. PS: Отвечаю тут на вопрос в привате насчёт пропажи всего меню - представь сюда свой список скриптов, наверняка там есть какой-нибудь малораспространённый бот с меню, убивающей все остальные меню, кроме себя, может. Если не я, то кто-то другой просветит на эту тему, вопрос с такой проблемой поднимался уже не раз. И по мелочам (безотносительно пропажи меню)..весь твой код приводить здесь не стану, отвечу по твоим косякам: 1. Посмотри сюда: Код function OpConnected(tUser) Видишь разницу в именах переменных user? Это должно быть одинаково! Если в предыдущих строках выше везде tUser, так и тут пиши так же везде.Core.SendToUser(user,........ 2. Строка Код "$UserCommand 1 3 Бан\\Временный бан IP (полный)$<%[mynick]> fulltempbanip........ - тут команда без префикса, работать не будет.3. Зачем правила/хабы/радио суёшь в баны/разбаны? Код Core.SendToUser(tUser,"$UserCommand 1 3 Бан\\Правила хаба$<%[mynick]> !rules||".. "$UserCommand 1 3 Бан\\Хабы-друзья$<%[mynick]> !hubs||".. "$UserCommand 1 3 разбан\\Сетевое радио$<%[mynick]> !radio||" Да, и выше в самом верху (для юзеров) ты повторил одну команду два раза, вот эту: Код "$UserCommand 1 3 Меню хаба\\Правила хаба$<%[mynick]> !rules||".. Похоже, ты надёргал из других скриптов строки, не понимая сути.. Насчёт пропажи меню уже написал выше. |
drkrol | ||
8.8.2011, 20:59 |
контекстное меню для АДМИНА |
drkrol, вот пример: Цитата Core.SendToUser(user,"$UserCommand 1 2 "..UserMenu.."Баны\\Бан IP юзера на время$<%[mynick]> "..Prefix.."tempban %[nick] %[line:Время: m,h,d,M,y] %[line:Причина]|") Тут кусочек Цитата $UserCommand 1 2 говорит, что команда работает только на нике онлайн-юзера, то есть, на нике открываешь меню Цитата %[nick] , далее, исходя из команды выше, тебе будет предложено внести время, далее - причину. (Тут IP захватывается с живого юзера автоматом, главное, чтоб он был в списке).Если бы в приведенной цитате вместо "1 2" было "1 1", то меню срабатывало бы только на вкладке хаба...если бы было "1 3", то и на вкладке и на никах живых юзеров. Вот как-то так.. С твоей командой "!fulltempbanip" всё аналогично. |
drkrol | ||
8.8.2011, 9:51 |
контекстное меню для АДМИНА |
drkrol, вместо Код function UserConnected(tUser) пишешь Код function OpConnected(tUser) и ниже удаляешь Код RegConnected = UserConnected OpConnected = UserConnected |
drkrol | ||
25.7.2011, 13:07 |
Не могу качать с пользователей с интернета ??? |
Как почитаю темы и сообщения этого....так материться охота.. :( |
Артём | ||
3.7.2011, 22:35 |
Hub Menu API2 | Меню для встроенных команд PtokaX |
Может, пора уже тебе начать с элементарного? Например, с отправки команды !help в чат? Ну либо с чего-нибудь чуть потруднее, скажем, с Букваря? Цитата "Рождённый ползать летать не может!" © Древняя мезозойская поговорка.. |
Артём | ||
3.7.2011, 18:44 |
программа для хаба |
Тяжело перебросить порт? |
Accelerator | ||
16.6.2011, 22:03 |
Нужна помощь спам боты |
Можно просто не пропускать в чат сообщения, содержащие символы из определённого списка (куда входит, скажем, ряд символов из первого сообщения темы, не обязательно все возможные "нехорошие", но достаточное количество, чтоб какой-нибудь из них обязательно попадал в любой произвольный аналогичный набор символов)... Вот накропал один из вариантов скрипта для нейтрализации такого спама: Тык сюда: Код local sAdm = "Ksan" local bShowAdm = true local tForbidSimbols = { "Ђ", "Ѓ", "ѓ", "Љ", "Њ", "Ќ", "Ћ", "Џ", "ђ", "љ", "њ", "ќ", "ћ", "џ", "Ў", "ў", "Ј", "Ґ", "І", "і", "ґ", "ј", "Ѕ", "ѕ", "†", "‡", "¶",} function ChatArrival(tUser, sData) local sData = sData:sub(1,-2) local sMsg = sData:match("^%b<>%s(.*)$") local bFS = false for _,v in pairs(tForbidSimbols) do if sMsg:find(v) then Core.SendToUser(tUser, "<"..tUser.sNick.."> "..sMsg) if bShowAdm == true then Core.SendToNick(sAdm, "<"..tUser.sNick.."> *** "..sMsg) end bFS = true return true end if bFS then break end end end Комментарий для всяких коч и мих: -- строка Код local bShowAdm = true для выбора - посылать ли админу с ником из строки Код local sAdm = "Ksan" сообщение с показом заглушенного спама или нет...Если неохота любоваться спамом, можете выбрать "false" -- также можете дописать кик/дроп спамера вместо простого непропуска спама в чат...ну это сделаешь сам, если хочешь. -- набор символов можно уменьшить/увеличить по своему усмотрению.. И - учись, а не списывай! |
DEN 007 | ||
26.5.2011, 20:22 |
Подскажите где скрип такой найти помогите |
Master-Grow, убрал бы ты вот это из своей подписи: Цитата PtokaX упала в грязь..... Неприятно видеть в твоих сообщениях каждый раз такое. Сам же его юзаешь, и такое пишешь.. Придумай что-то оригинальное, не обязательно ведь панковское. |
Master-Grow | ||
21.5.2011, 16:00 |
Милиция против DC запрет со стороны милиции и провайдера |
Надо в топиках, МОТД и по возможности в других местах позиционировать свой хаб как место для активного общения... А если кто "нагло" предоставляет свои файлы и другие их "нагло" скачивают - ну это на их совести (ведь сам хаб не содержит ничего запрещённого - DC-софт ведь пока ещё не запрещён), пусть доблестные блюстители ими и занимаются, если смогут выявить "преступников".. |
мамин_парень | ||
12.5.2011, 20:46 |
Нужна помощь помогите не кикает (dropip) |
Хватит засирать форум тупостью, тебе уже тысячу раз всё разжевали и в рот положили, а ты всё клянчишь и клянчишь! Если тебе не дано понять, ты хоть тресни, у тебя не получится, займись уже чем-нибудь полезным и доступным для твоих мозгов. |
Артём | ||
4.5.2011, 21:41 |
Подскажыте что делать незаходит в шару |
1. Br@yZeR, вообще-то тебе советовали учить русский, а не "москалюгский"... 2. И с таким гавно-менталитетом (разделение людей на москалюг и хохлов, а может, ещё что-то не менее вонливое) и спесью тебе тут нечего делать, пожалуй! 3. И ещё - Птоке, и тем более, клиентам, насрать, какой национальности и какой страны юзеры, попробуй "зайти в шару" к американцам или румынам, и предъяви им претензии.. 4. Твоя проблема решается на уровне местного админа (ибо твой вопрос - чисто юзерский), вот и обращайся к нему. |
Saymon21 | ||
19.4.2011, 9:03 |
Tiny Hublist Программа для создания хаблистов |
Много хаблистов - к чему? Скоро народ начнёт гасить пингеров, не разбираясь, где чей айпи.. Цитата Те, кто сможет понять — они и свой хаблист не сильно вспотев напишут или из этого слепят. Большинство-же будет мозг выносить нубскими вопросами. ....и вдобавок заменят авторскую подпись своими, "}{AI<Ep"-скими..Даже на этот Tiny уже новые "авторы" есть... Не надо выкладывать полную версию! |
Артём | ||
8.4.2011, 23:25 |
Отправка личек по профилям Отправка сообщений в личку по профилям |
Лучший мануал - это своя голова, чужие скрипты и scripting-interface.txt из папки scripting.docs Птоки. И обязательное пособие - Плюс на форуме есть раздел для начинающих программистов. |
sania | ||
7.4.2011, 17:19 |
Пассивный режим |
По-моему, проблема существует только в голове автора темы.. |
мамин_парень | ||
7.4.2011, 10:59 |
Пассивный режим |
Пусть получает при входе через МОТД. Зачем для такого пустяка писать скрипт? И не по теме - зачем хаб только для пассивов? |
мамин_парень | ||
4.4.2011, 4:53 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
van21, например, если к тебе кто-то в чате пишет сообщение, то получится примерно так (смотря что написано в таблице): Цитата [08:41:07] <Ksan> сэр van21: Приветствую тебя! Слово "сэр" берётся из таблицы и добавляется автоматом (для каждого прописанного ника своя приставка). |
van21 | ||
1.4.2011, 23:52 |
RandomPrivet_by_Ksan.lua Через меню можно отправить приветствие кому попало из списка юзеров |
Ответил уже в соседней теме - смысл тот же - легко чуток изменить (убрав рандомность выбора адресата) и отправить конкретному человеку! А тем более, новые приветствия в таблицу, - добавляйте сами, тут всё зависит только от вашей фантазии. Лично она у меня уже иссякла UPD: Я тебя уважаю, но хочу видеть, как стараешься и растёшь. |
мамин_парень | ||
1.4.2011, 5:33 |
RandomPrivet_by_Ksan.lua Через меню можно отправить приветствие кому попало из списка юзеров |
Вообще-то скрипт был создан изначально для отсылки собственных приветствий, а приложенная таблица приветствий только для самых ленивых. А отослать конкретному человеку - что мешает самому взять и написать приветствие кому хочешь? без скрипта.. Если я тебя не понял - поясни. |
мамин_парень | ||
31.3.2011, 12:43 |
RandomPrivet_by_Ksan.lua Через меню можно отправить приветствие кому попало из списка юзеров |
Пусть знают, что есть такой город на Земле. Это я пишу в каждом своем скрипте.. Кто-то пишет ссылку на свой хаб, а я - ссылку на свой город |
Invisible, mariner | ||
31.3.2011, 11:34 |
RandomPrivet_by_Ksan.lua Через меню можно отправить приветствие кому попало из списка юзеров |
Скрипт для отправления приветствия кому попало из списка юзеров хаба Название: RandomPrivet_by_Ksan.lua API: API 2 Версия: 1.0 Автор: Ksan (aka Trans) Дата написания: 31-03-2011 Место проживания автора: г.Томск (Россия) Не удивляйтесь, если иногда приветствие отправится не только кому попало, но и от кого попало.. Но редко. |
Nickolya, Invisible, DEN 007, Mustik, AfLc, мамин_парень | ||
31.3.2011, 2:53 |
Monetka_by_Ksan.lua Простой скрипт для кидания монетки (орёл/решка) |
Простой скрипт для кидания монетки (орёл/решка) Название: Monetka_by_Ksan.lua API: API 2 Версия: 1.0 Автор: Ksan (aka Trans) Дата написания: 31-03-2011 Место проживания автора: г.Томск (Россия) Сделан по просьбе Mustik'а Текстовку можете сами подредактировать. Это же касается и подбора степеней случайности для орёл/решка/ребро/"улетел куда-то".. |
Nickolya, Invisible, Saymon21, @_JuNiOr_@, Mustik, AfLc, zeusby | ||
31.3.2011, 2:42 |
Монетка простой скрипт подкидывания монетки |
Вот небольшой скриптик наскрипел. Текстовку можете сами подредактировать. Это же касается и подбора степеней случайности для орёл/решка/ребро/"улетел куда-то".. Создал тему под этот скрипт в разделе Готовые/Развлечения. |
Invisible, Mustik | ||
21.3.2011, 12:56 |
Вопросы Разработчикам Скриптов вопросы по скриптам (мелкие вопросы) |
Попробуй Код #Message Пример для теста: Код local sMess = "<-Bot> В меню хаба добавлены \"Полезные ссылки\" - ограниченное количество хабов и много других полезных ресурсов широкого диапазона интересов (Тонет). Если у вас есть интересная ссылка, отсутствующая в этих списках, вы можете предложить это админам хаба для внесения." Core.SendToNick("Ksan", tostring(#sMess)) Сохрани как скрипт и запусти. Только перед этим в скрипте в команде отправки сообщения впиши свой ник. Результат будет Код [16:00:50] 267 длина сообщения.А как дальше применить для своего скрипта, думаю, тебя учить не надо. |
Damaks | ||
16.3.2011, 20:00 |
antiproxy2 нету |
поиском пользоваться умею Так учись! Пока не научишься, не лезь сюда, не позорься. Accelerator, Цитата Тяжело, не правда ли? Он никогда сам не сделает, так или иначе, мытьём или катанием, вытянет нужную информацию, нужные изменения от тебя, от меня, от других, но сам ни за что даже не шевельнётся в сторону обучения. Уже столько времени тут пасётся, а всё ведёт себя, как будто первый раз зашёл. |
Accelerator, Saymon21 | ||
6.3.2011, 19:10 |
MessCount Выводит общее число сообщений чата в топик |
-- Скрипт показа общего числа сообщений чата в топике. -- Название: MessCount.lua -- Платформа: PtokaX -- API: API 2 -- Автор: Ksan (aka Trans) -- Дата: 06-03-2011 -- Где: г.Томск -- При необходимости освободить топик для иных сообщений оператор может через меню отменить показ числа сообщений в топике. Потом сможет так же через то же меню восстановить. -- Папка "MessCount" должна быть создана заранее! -- В число сообщений попадут и команды через меню (которые через ЧатАрривал), хотя их в чате не будет видно. -- В принципе, можно внести таблицу исключений для команд различных скриптов, используемых через меню, но надо ли оно? Запаришься выцеплять все команды со всех скриптов, да потом ими грузить скрипт. Пусть идут в счёт сообщений. -- |
Nickolya, Tsd, Invisible, Saymon21, Cyber_voodoo, MIKHAIL | ||
6.3.2011, 18:53 |
Общий подсчет сообщений |
Вот один из вариантов (название скрипта - MessCount.lua ) : Сам скрипт ТУТ Код -- Скрипт показа общего числа сообщений чата в топике. -- Автор: Ksan (aka Trans) -- Дата: 06-03-2011 -- Где: г.Томск -- Скрипт показа общего числа сообщений чата в топике. -- При необходимости освободить топик для иных сообщений оператор может через меню отменить показ числа сообщений в топике. Потом сможет так же через то же меню восстановить. -- Папка "MessCount" должна быть создана заранее. local sBot = SetMan.GetString(21) local bTopic = true local sCountFile = Core.GetPtokaXPath().."scripts/MessCount/MessCount.txt" tProfiles = { -- Кто может ставить/отменять показ в топике [0] = 1, -- Мастер [1] = 1, -- ОПератор [2] = 0, -- VIP } function OnStartup() dofile(sCountFile) if tMessCount == nil then tMessCount = { } tMessCount["MessCount"] = 0 end end function OpConnected(tUser) Core.SendToUser(tUser, "$UserCommand 1 3 << АДМИНКА >>\\Число сообщений в топик$<%[mynick]> !messcount&#*124;") -- тут звёздочку в конце удалить end function ChatArrival(tUser, sData) -- Core.GetUserAllData(tUser) local sData = sData:sub(1,-2) local sCmd = sData:match("^%b<>%s+(%S+)") if tProfiles[tUser.iProfile] == 1 and sCmd == "!messcount" then bTopic = not bTopic if bTopic == true then Core.SendToUser(tUser, "<"..sBot.."> Число сообщений будет показываться в топике.") else Core.SendToUser(tUser, "<"..sBot.."> Число сообщений не будет показываться в топике.") end return true end tMessCount["MessCount"] = tMessCount["MessCount"] + 1 if bTopic == true then SetMan.SetString(10, "В чате написано "..tMessCount["MessCount"].." сообщений") -- сам текст можете править как вам угодно end SaveToFile(sCountFile, tMessCount, "tMessCount") collectgarbage() -- return true end function OnExit() SaveToFile(sCountFile, tMessCount, "tMessCount") end function SaveToFile(file , table , tablename) local handle = io.open(file,"w+") handle:write(Serialize(table, tablename)) handle:flush() handle:close() end function Serialize(tTable, sTableName, sTab) assert(tTable, "tTable equals nil"); assert(sTableName, "sTableName equals nil"); assert(type(tTable) == "table", "tTable must be a table!"); assert(type(sTableName) == "string", "sTableName must be a string!"); sTab = sTab or ""; sTmp = "" sTmp = sTmp..sTab..sTableName.." = {\n" for key, value in pairs(tTable) do local sKey = (type(key) == "string") and string.format("[%q]",key) or string.format("[%d]",key); if(type(value) == "table") then sTmp = sTmp..Serialize(value, sKey, sTab.."\t"); else local sValue = (type(value) == "string") and string.format("%q",value) or tostring(value); sTmp = sTmp..sTab.."\t"..sKey.." = "..sValue end sTmp = sTmp..",\n" end sTmp = sTmp..sTab.."}" collectgarbage() return sTmp end Число сообщений будет сохраняться в файл, дабы при отключении скрипта или хаба сохранялось. Для этого надо заранее в папке "scripts" создать папку "MessCount" (только папку!). При первом запуске файл сам создастся. При необходимости освободить топик для иных сообщений оператор может через меню отменить показ числа сообщений в топике. Потом сможет так же через то же меню восстановить показ. В скрипте в коде отправки команды в меню в самом конце вставил *, её надо удалить перед запуском скрипта. UPD: Создал тему со скриптом здесь. |
Invisible | ||
5.3.2011, 14:22 |
Опы дают добро на ссылки |
1. Не понимаю я этой HTTP-фобии (или параноики), у вас что, хаб развалится, люди сбегут, если какая-то не такая ссылка проскочит в чат? 2. У меня на хабах проходят все ссылки, если они не в списке антирекламы, а в антирекламу попадает "нехорошая" ссылка сразу же, как только первый раз попадает в чат. Но с одного раза...(читай пункт 1).. 3. Премодерируемые сообщения в чатах - это уже ни к чёрту, хватит антирекламы с её "чёрными" списками. |
Invisible, pol_91 | ||
23.2.2011, 11:30 |
Проблема на PtоkaX 0.4.1.2 в скрипте Проблема на PtоkaX 0.4.1.2 в скрипте |
Damaks, как ты не поймёшь, человек просто хочет, чтоб ему "сделали красиво"...и при этом чтоб ему не пришлось пальцем об палец (пардон, об клавиатуру) ударить.. |
sania | ||
13.2.2011, 8:09 |
PortCheck и Clone Killer |
1. Неправильно оформил тему (посмотри, как другие темы со скриптами оформлены). 2. Не написал автора скрипта. 3. И что тебе мешает перевести на русский? 4. И почему тема в Запросах скриптов, если ты готовый предлагаешь? PS: У меня давно стоит свой Анти-КлоноСпамер.. |
мамин_парень | ||
12.2.2011, 7:52 |
как удалить что хаб работает на версии |
Как всегда, самые лузеры начинают с изменения входного сообщения. Что это у вас такая аллергия на это? Прописав туда вместо стандартного (и необходимого) сообщения Птоки это "этот хаб Супер-пупер_МОЙхаб версии 666.6", вы не станете умнее или круче выглядеть! UPD: Сорри, модеры, но они уже достали этой темой (молчу уже про поиск).. Можете даже удалить, если не понравится этот крик души |
Saymon21 | ||
7.2.2011, 5:36 |
TotalGag для аварийной заглушки всего хаба (кроме определенных лиц) |
Я стараюсь систематизировать отправку команд через их направленность, то есть, зависит от объекта действия. Поэтому в своих скриптах в меню на нике юзера отправляю только те команды, которые касаются этого самого юзера (причём, только команды работы с онлайн-юзером), а остальные - в меню на вкладке хаба внизу. Правда, некоторые команды общего характера иногда и через меню на нике юзера выдаю. Наверно, в данном скрипте следовало действительно делать "1 3", а не "1 1". |
absent | ||
29.1.2011, 21:49 |
Автоматическая регистрация |
UPD: Ладно, решил прекратить нудное выпрашивание и накидал скриптик (10 строк, как и говорил): Код local sBot = SetMan.GetString(21) Но, если у юзера в клиенте стоит игнор бота (а некоторые юзеры так и делают), то он не увидит сообщение о регистрации и при следующем заходе будет ему облом с этим ником.function UserConnected(tUser) if not(tUser.bRegistered) and RegMan.GetReg(tUser.sNick) == nil then local sPass = tostring(math.random(os.date("%H%M%S"))) RegMan.AddReg(tUser.sNick, sPass, 3) RegMan.Save() Core.SendPmToUser(tUser, sBot, "*** Вы теперь зарегистрированы на хабе.\n\tВаш ник: "..tUser.sNick.."\n\tВаш пароль: "..sPass.." \nСохраните пароль, пропишите его в свойствах хаба в избранных хабах и не забудьте перезайти на хаб. Потом, при желании, пароль сами поменяете командой \"!passwd новый_пароль\" (без кавычек).") end collectgarbage() end |
CrazyCat | ||
27.1.2011, 2:51 |
Автоматическая регистрация |
CrazyCat, легко. Точнее, можно как уже готовые самые простые приспособить, так и новый написать. Можно даже вообще его не спрашивая зарегистрировать и ему сообщить только его пароль. Дерзнёшь? |
мамин_парень | ||
25.1.2011, 13:50 |
WhoisNew Через меню хаба добывает WHOIS-информацию об IP |
Артём, это уже исправлено и перезалито...написано в моём предыдущем сообщении. Перезалил ещё 21-01-2011 20:56 (мск.) Скачай снова. |
Артём | ||
23.1.2011, 3:43 |
Current_Weather_All_Cities Выводит текущую погоду автом. в чат и по запросу, любые города |
Dan Claimant, найди эти строки: Код function SendToChat() и добавь сразу под ними эту: bArchive = GetData(tCities[sCity]) Код local sArchive = "" Когда делал последнее исправление, забыл с тестируемого скрипта скопировать эту строку сюда. UPD: Исправил и перезалил в первом сообщении. Тест ɐwʎ ɔ ɐvmоɔ |
Dan Claimant | ||
22.1.2011, 4:21 |
некоректные символы ники |
GanG, открываешь файл scripting-interface.txt (это лежит в папке Птоки - в папке scripting.docs) и читаешь строку: Цитата AddReg(sNick, sPass, nProfileNumber) - Chars $|<>:?*"/\ and space not allowed in nick. Char | not allowed in password. Max nick/pass length 64 chars. Return nil when failed, true if success. И отвечаешь на свой вопрос, заданный выше, сам. |
GanG | ||
21.1.2011, 20:59 |
WhoisNew Через меню хаба добывает WHOIS-информацию об IP |
UPD-3: - подкорректировав под дополнительно выявившиеся неучтённые нестандартные (отсносительно первоначального) участки парсинга, перезалил скрипт в первом сообщении. |
Saymon21 | ||
14.1.2011, 15:15 |
WhoisNew Через меню хаба добывает WHOIS-информацию об IP |
UPD-2: Артём, сделал костыль, перезалил. |
Артём | ||
14.1.2011, 11:30 |
WhoisNew Через меню хаба добывает WHOIS-информацию об IP |
Скрипт просмотра через админское меню хаба WHOIS-информации по IP (вводом IP либо через онлайн-ник) Получаем диапазон, к которому принадлежит вводимое IP, название сети, страну, город и ещё кое-какие данные этой сети. Название: WhoisNew.lua Версия: 1.2 Платформа: PtokaX API: API 2 Автор: Ksan (aka Trans) Город: Томск, Россия Дата: 2011-01-14 Даты изменений: 2011-09-08, 2013-06-22, 2015-01-05 Библиотека: Для работы скрипта требуется библиотека SSL Комментарии: 2. Не по всем IP можно получить информацию, в этих случаях будет соответствующее сообщение. 3. В базе сервера WHOIS информация хранится в самых невероятных сочетаниях, никакого порядка, очень трудно и долго подбирал варианты парсинга, чтоб результат выцепить, но наверняка ещё могут всплыть неучтённые проколы с падением скрипта. 4. Поэтому - просьба сюда писать обо всех подобных случаях с предоставлением лога ошибки, и желательно строку, куда указывает ошибка, так как она у вас может уже оказаться под другим номером, и, самое главное, предоставить IP, на котором споткнулся скрипт. Я проверю и постараюсь внести корректировку. 5. Не проверяйте локальные IP, всё равно не получите ничего. При проверке локалок получите отмазку, что серверам WHOIS локальные IP недоступны. Пример результата (клацнуть сюда изо всей силы) Цитата [09:18:12] <WHOIS_по_IP> *** 83.172.37.41: ********************************************************************** inetnum: 83.172.32.0 - 83.172.39.255 netname: SELS-NET descr: The municipal enterprise "Severskelektrosviaz", Solnechnaia 15, Seversk, Tomsk Region country: RU address: Solnechnaia 15 address: Seversk, Tomsk Region address: Russia phone: +07 3823 771999 e-mail: sov@sels.ru ********************************************************************** Исправления: UPD-1: - как я и ожидал, находятся трудные для идентификации IP...Вот сделал очередной костыль, перезалил. UPD-2: - перезалил, подправив некритичный косметический нюанс и добавил таблицу профилей, кому можно юзать WHOIS (по умолчанию поставил и для випов, доверять так доверять) UPD-3: - перезалил, подкорректировав под дополнительно выявившиеся неучтённые нестандартные (отсносительно первоначального) участки парсинга. UPD-4: - перезалил, переделав парсинг (причина - изменения на страницах результатов) UPD-5: - перезалил, чуть-чуть изменив одну строчку (причина - маленькое изменение на странице результатов сайта, приведшее к неработе скрипта) UPD-6: - пришлось исправить пару строк в связи с переходом сервера WhoIs на безопасный режим, а также в связи с этим теперь необходимо доустановить библиотеку SSL. Скрипт перезалит. UPD-7: - на сайте-источнике данных чуток изменили исходный код страницы и скрипт перестал работать, пришлось в код скрипта внести маленькое изменение. Скрипт перезалит. Последняя перезаливка: 2015-04-29 19:45 (мск.) |
Nickolya, Tsd, Артём, Milena, Saymon21, Dimon21, striker, DEN 007, ProGeTTo, AfLc, MIKHAIL | ||
8.1.2011, 3:10 |
ChatAfterLoginLocker API2 | Доступ к чату после N минут онлайн |
Эхх, тоже хотел кинуть, смотрю, тут уже успели сразу 2 помочь. Ай, ладно, чтоб труд не пропал даром, тоже кину своё зёрнышко.. Код local iPause = 10*60 -- ожидание в секундах local tWaitUsers = {} function UserConnected(tUser) tWaitUsers[tUser.sNick] = os.time(os.date("*t")) + iPause end RegConnected = UserConnected function UserDisconnected(tUser) tWaitUsers[tUser.sNick] = nil end RegDisconnected = UserDisconnected function ChatArrival(tUser, sData) if tWaitUsers[tUser.sNick] then if tWaitUsers[tUser.sNick] > os.time(os.date("*t")) then Core.SendToNick(tUser.sNick, "<"..SetMan.GetString(21).."> "..tUser.sNick..": Для общения в чате ещё не прошли "..tostring(iPause/60).." мин. с вашего захода на хаб! Погодите малость..") return true else tWaitUsers[tUser.sNick] = nil end end end |
Nickolya, мамин_парень | ||
5.1.2011, 18:46 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
Для WINS: 1. Я бы посоветовал тебе не кикать через эту команду, а использовать штатную команду Птоки, либо использовать мой же скрипт отсюда (если, конечно, ты не ставишь целью кикать демонстративно, чтоб все видели, кто, кого и за что кикает). Этот скрипт работает бесшумно и без упоминания ника админа, что частенько избавляет от лишних разборок впоследствии с кикнутым юзером. 2. Но есть решение и в топиковом скрипте, почти аналогично решению по указанной тобой ссылке. Я позже представлю его, когда перезалью обновлённый скрипт (когда допеределаю встроенный антимат) |
WINS | ||
3.1.2011, 17:33 |
Скрипт онлайн-погоды скрипт погоды сейчас |
Кстати, выложу-ка я тоже чуть подправленную версию этого скрипта. Изменения: - добавил меню - добавил выборку погодных явлений (облачность, осадки и т.д.) - подправил чуток вывод градусов и мм.рт.ст - подогнал под себя дизайн вывода - при запуске скрипта сразу же с сайта берётся инфа о погоде, не дожидаясь сигнала от таймера (дальше уже отработает таймер) Думаю, можно добавить в меню разные города (по желанию админа) --------------------------------------------------------------------------------------- UPD: Всё, сделал с городами. Готовый скрипт с меню и разными городами переложил отдельной темой сюда. |
ProGeTTo | ||
3.1.2011, 17:31 |
Current_Weather_All_Cities Выводит текущую погоду автом. в чат и по запросу, любые города |
Скрипт просмотра текущей погоды в разных городах (в чате периодически или по запросу через меню) с сервера Название: Current_Weather_All_Cities.lua Платформа: PtokaX API: API 2 Автор: Ksan (по мотивам скриптов от Nickolya и Saymon в этой теме Библиотека: Для работы скрипта требуется библиотека SSL Изменения от Ksan: - добавил меню - добавил выборку погодных явлений (облачность, осадки и т.д.) - подправил чуток вывод градусов и мм.рт.ст - подогнал под себя дизайн вывода - можно смотреть текущую погоду разных городов (через меню) - меню с разными городами строится автоматически в зависимости от таблицы городов - добавлено ограничение частоты запросов погодного сервера - добавил сборщик мусора - добавлена инфа про макс. и мин. температуру в этот же день из архивов этого города (если отсутствует пр выводе, значит, нет информации в архивах) - добавлено время восхода/захода солнца (для полярной ночи или дня будет так и написано - "Полярная ночь" , "Полярный день") - добавлен вывод текущих даты/времени для просматриваемой местности - добавлен вывод прогноза на ближайшее время суток Примечания: 1. 2. Таблицу городов стройте аналогично уже вписанным в скрипт. Названия городов транслитом можно получить через этот же сайт погоды 3. И да, кому хочется показывать давление и влажность в чате (для всех), можете просто раскомментить 2 строки в функции "function SendToChat()" ToDo: - - есть возможность сделать отдельный вывод по запросу и на следующие дни, только не знаю, есть ли в этом смысл, ведь прогноз погоды на несколько дней - вещь рискованная.. Пример результата работы скрипта - ответ на запрос полного прогноза и вывод по времени в чат: Код По запросу: [20:39:04] <Current_Weather> Погода в городе Томск (Россия, Томская область) : ************************************************************ Время: воскресенье, 22 июня 2014, 20:37 ************************************************************ Температура: 29° Погодные явления: "малооблачно" Давление: 748 мм рт.ст. Влажность: 33% (низкая) Ветер: 1 м/c (СВ легкий ветер) Солнце: восход: 04:29 заход: 22:14 В этот же день (из архивов): Max.: 33° (1982 год) Min.: 0° (2008 год) ***************************************************************************** НОЧЬЮ... t°: 18° "Ясно" Ветер: 3 м/c (С-СВ) Влажн. 56% Давл. 749 мм ***************************************************************************** УТРОМ... t°: 24° "Ясно" Ветер: 4 м/c (С-СВ) Влажн. 27% Давл. 748 мм ***************************************************************************** В чате: [18:17:46] <-Bot-> Погода в городе Томск (Россия, Томская область) : ************************************************************ Температура: 30° Погодные явления: малооблачно Ветер: 1 м/c (СВ легкий ветер) В этот же день (из архивов): Max.: 33° (1982 год) Min.: 0° (2008 год) ************************************************************ При запросе только текущей погоды вид такой же, только не будет нижних двух участков (прогноза на ближайшее время). Для периодического вывода в чат вид такой же, разве что нет показа времени и параметров чуть меньше (но это всё включаемо через раскомментирование нужных строк в скрипте). UPD: - при попадании на просмотре через меню города без архивов погоды (есть и такие) следующие города показывались тоже без данных из архива (до перезапуска скрипта). Исправлено. - на сайте изменили вид ссылки (теперь там вместо кодов городов - названия самих городов латиницей и без пробелов (вместо пробела - символ подчеркивания)). Скрипт переделан под это. UPD-2: - добавлена инфа про макс. и мин. температуру в этот же день из архивов этого города (если отсутствует при выводе, значит, нет информации в архивах), скрипт перезалит. UPD-3: - добавлена возможность выбора места вывода по запросу - в приват или чат ( local bSendToPrivat = true ) UPD-4: - скрипт исправлен и добавлена как новая версия. Причина - изменение представления адреса на сайте погоды. Но нет худа без добра - пока менял скрипт под это изменение, нашёл(и исправил) причину потери временами архивных данных при выводе информации. UPD-5: - скрипт исправлен и залит сюда, старые версии удалены за ненадобностью. Причина - полное изменение структуры страницы на сайте. Пришлось всё перелопатить. - добавил показ восхода/захода солнца. UPD-6: - добавил показ текущей даты/времени местности (UPD: убрал показ даты/времени для вывода в чат местнй погоды (зачем местным показывать их время, тем более, не очень точное)) - исключил вывод данных при получении ошибки с сайта (чтоб все города не получали одну и ту же погоду) - небольшие косметические малозаметные изменения, улучшающие работу скрипта UPD-7: - добавил возможность выбрать через меню любой город/посёлок мира (но оставил возможность просмотра жёстко привязанных к меню городов)...для этого пришлось писать отдельный скрипт для выборки из сайта погоды и сборки в таблицу списков всех городов со странами и областями. - в архиве есть папка с обязательными файлами (таблицы городов и цифровых кодов городов (последнее - для архивных температур)) UPD-8: - пришлось перелопатить скрипт из-за изменений на странице погоды, в том числе и кодировки символов. - для городов США уверенно отсутствуют архивные температуры. На сайте архивных данных сильно изменили представление страницы именно для США, для них необходимо отдельно парсить страницы и вытаскивать архив. Начал было делать эту работу, почти добил, потом подумал - а нафиг это надо кому, зачем эта лишняя работа, и забил. А так уже давно мог бы выложить исправленный скрипт, но так получилось, сорри.. плюс лень одолела в последнее время (это, скорее минус). UPD-9: - ввиду того, что на сайте полностью переделали интерфейс вывода погоды, изменился и код страницы, пришлось полностью перелопачивать парсинг - теперь архивы берутся из этой же страницы (раньше для многих стран приходилось парсить другой сайт с архивом), но вот насчёт точности архивных данных не ручаюсь - добавил вывод температуры воды (для городов у моря и если этот параметр присутствует на странице погоды) UPD-10: - добавлена возможность запроса на выдачу (кроме текущей погоды) и прогноза на ближайшее время суток - исправлена небольшая ошибка в коде UPD-11: - добавил возможность менять через меню частоту вывода текущей погоды в чат (не открывая скрипт и не перезапуская его), особенно будет удобно для тех, у кого хаб стоит далеко от своего компа. При необходимости отмены вывода погоды в чат достаточно ввести одну цифру 0 (ноль) в данном меню вместо периода времени. Для включения нужно просто просто написать период в минутах, не равный 0 (нулю). Файл перезалит. UPD-12: - сегодня вдруг скрипт стал выдавать результат с лишним словом из исходника (</span>) при годе минимальной температуры архивных данных (не знаю, почему, до этого было без таких ляпов), не стал копать глубоко, просто добавил в одну строку исправляющий код. Архив перезалил (изменение только в самом скрипте). UPD-13: - обнаружился баг - при попытке просмотра погоды городов из подменю "Другие города", если оставить первое окошко ввода пустым (а там надо вводить 0 или 1), то скрипт падал с ошибкой вроде этого: Цитата [03:45:32] <#OpChat#> ...r/ptokax/scripts/Current_Weather_All_Cities_Mint.lua:118: attempt to index local 'sCity' (a nil value) То есть, не было "защиты от дурака". Скрипт исправил и архив перезалил. Изменение только в самом скрипте.UPD-14: - пришлось исправить пару строк в связи с переходом сайта погоды на безопасный режим, а также в связи с этим необходимо доустановить библиотеку SSL UPD-15: - пришлось изменить чуток код, ибо на сайте погоды внесли небольшие изменения в исходники страницы (добавили "+" к положительной температуре, в другом месте тоже изменили кусок и из-за этого температура воды не получалась, и была давненько появившаяся проблемка - перестало выдавать архивные температуры (для России), и тоже исправил). И да, заменил один из доп. файлов в папке, так что рекомендую у себя его заменить на мой - называется "citylist_Other.tbl") UPD-16: - заметил, что для некоторых местностей сайт не предоставляет данные о восходе и закате, в том числе и для заполярных территорий, поэтому везде, где эти данные отсутствуют, скрипт стал выдавать "Полярный день" и, возможно, "Полярная ночь" (зависит от даты). Дабы не вызывало недоумения, сделал выдачу типа этого - "Нет данных (либо полярный день)". Скрипт перезалит, из архива достаточно заменить основной файл (если вы изменили для себя основной скрипт на своё усмотрение, то посмотрите свой скрипт на предмет разницы). Вот изменённый участок кода: Код if tonumber(os.date("%m")) > 3 and tonumber(os.date("%m")) <10 then sSun = "Нет данных (либо там полярный день)" elseif tonumber(os.date("%m")) < 4 or tonumber(os.date("%m")) > 9 then sSun = "Нет данных (либо там полярная ночь)" end UPD-17: - на сайте погоды опять изменили код страницы (у них там руки чешутся, что ли?), пришлось вновь подправлять скрипт (правда, не сразу руки дошли, прошу прощения за это), возможно, где-то пошли уже корявости из-за частых исправлений скрипта (как правило, не по моей вине).. Но вроде работает пока. Если что не так, напишите, для какой местности и какая ошибка.. Дата заливки последней версии: 2020-04-30 14:27 (мск.) |
Nickolya, ustas, Taulalan, Tsd, Invisible, Артём, rival, Dimon21, AndreiDC, Cyber_voodoo, SKIFI, stone, MIKHAIL, Nikolaevich, zeusby | ||
3.1.2011, 8:51 |
Нужен скрипт Помогите |
Ferb, считай, ты уже поступил куда надо - ты учишься тут. Моя единственная школа - файл из Птоки "scripting-interface.txt", |
|||
29.12.2010, 23:31 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
Saymon, я подумал над твоим предложением. Вообще, скрипт задумывался именно как тихая заглушка с возможностью скрытия чата, только с дополнительными удобствами и решениями проблем, возникающих по ходу эксплуатации (я про антикапс, антимат и т.д.), и как-то не хочется превращать его совсем уж в подобие Экзекутора (а если вовремя не остановиться, к тому и придём). Не хочется повесить сюда ещё и предупреждения, для этого же есть обычный скрипт предупреждений и общения через бота (можно так же предупреждать и потом уже при необходимости применять Сурдо-изоляцию). Для WINS: 1. Цитата Можно добавить чтоб при при замене самого мата, фраза бралась рандомо из таблицы, как при замене фразы целиком. Можно, и даже нетрудно, но считаю, что ни к чему. Хотите разнообразия - применяйте режим 2 (замену всего сообщения случайной фразой). А режим замены мата одним словом сделан, чтоб просто отметить, что мат был, и скрыть его, не устраивая из этого балаган (уверен, что найдётся немало любителей проверить весь список слов), как находятся любители проверить весь список случайных фраз (а список немалый).2. Насчёт твоего теста антикапса...я знаю, но я пока не стал заморачиваться отыскивать алгоритм против тестов Решение - в совмещении трёх кодов - антикапса, антипробелов и анти-слишком-много-одинаковых-знаков - в один код. Я такие тесты сам проводил по ходу работы над скриптом ещё. Не стал усложнять скрипт доп. кодом против нереальных (на 98%) сообщений. UPD: Пока для меня самое важное - доделать антимат (работа с таблицей матов и исключений через меню (добавление, удаление, редактирование, просмотр) + изменение кода анализа матов из-за изменения структуры таблицы), но пока дело тормознулось из-за проблем со здоровьем...осталось изменить код анализа сообщений на маты и исключения, всё остальное сделано. |
Saymon21, WINS | ||
28.12.2010, 19:55 |
Spam-Report Юзер может сообщать о спаме и спамере прямо в Опчат админам |
Скрипт сообщения юзером в Опчат админам о спаме и спамере Название: Spam-Report.lua API: API 2 Автор: Ksan (aka Trans) Место проживания: г.Томск Дата: 28-12-2010 Сделан по просьбе DEN_007 Описание: 2 варианта отправки сообщения о спамере: 1. В привате спамера (если он ещё не успел соскочить с хаба) набрать !спам, далее через пробел туда же скопировать ВСЁ сообщение от спамера и нажать ENTER. Сообщение о спаме и спамере отправится в Опчат хаба админам для принятия мер. Вместо !спам можно написать и латиницей !spam (для тех, у кого нет кириллицы на клавиатуре, например, зарубежные гости) Пример: !спам [18:43:58] <СПАМЕР> Заходите в наш супер-пупер хаб с адресом супер.пупер.ru:411 2. Всё то же самое, только в привате главного бота хаба (годится как для случаев, когда спамер уже ушёл с хаба, так и когда он ещё онлайн). Что видим в Опчате Цитата [22:25:22] <_OpChat_> Похоже, у нас появился спамер. Ник спамера: Uzer1234 IP спамера: спамер уже оффлайн, IP добывайте сами. Содержание спама: [17:34:11] <Uzer1234> Это самый ужасный спам. Тест. Сообщил юзер: Test_user Держите уши на макушке, господа админы! [2010-12-28 21:19] <_OpChat_> Похоже, у нас появился спамер. Ник спамера: Uzer1234 IP спамера: 192.168.1.2 Содержание спама: [17:34:11] <Uzer1234> Это самый ужасный спам. Тест. Сообщил юзер: Test_user Держите уши на макушке, господа админы! |
Nickolya, Invisible, Milena, Saymon21, DEN 007 | ||
27.12.2010, 13:47 |
AntiReclama_by_Ksan Тихая антиреклама чата и привата с удалённым управлением |
UPD 3: Добавлена возможность предупреждать рекламщика в привате бота при попытке рекламы (в режиме "0"). Это тоже можно переключать через меню скрипта. Скрипт перезалит в первом сообщении. |
Nickolya, Kingston, Saymon21 | ||
26.12.2010, 15:49 |
Ваши Вопросы И Предложения По Поводу Форума |
Просьба такая админам форума - поставить галочку "Добавить копию этого сообщения в директорию «Отправленные»" по умолчанию. А то отправишь, а потом не находишь свое сообщение в папке, и вспоминаешь, что опять не поставил галочку...Всё же лучше сохранять всегда по умолчанию, а кому не надо, пусть снимают галочку при отправке. |
Accelerator | ||
11.12.2010, 2:10 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
UPD-2: По предложению Saymon'а добавил в скрипт и в меню возможность выбора - уведомлять заглушаемого онлайн-юзера в приват о его заглушке или нет (в момент установки заглушки). В уведомлении покажет причину и срок. (перезалил, добавив пропущенный кусок кода) Перезалил в первом сообщении. Время: 17-12-2010 19:40 МСК |
Nickolya, Saymon21 | ||
9.12.2010, 13:46 |
Люди помогите ПЛИЗ! Необходим совет МОЗГА ПЛАНЕТЫ! Попытка установить соединение была безуспешной |
1. йцукен, вот это из твоего первого сообщения: Цитата купил новую сетевую карточку-помогла на 1 вход на хаб. уж больно напоминает мне бан по мак-адресу..Ты поставил новую карту, тебя засекли, и снова поставили аналогичный бан...так выглядит. 2. При неправильных настройках клиента, если адрес хаба написан правильно, проблемы могут быть только с поиском/скачиванием, но никак не с доступом. Иное дело, когда ты забанен тем или иным способом, не обязательно средствами Птоки обычным баном...Например, файрвол на сервере, скрипт на хабе, который делает вид для тебя, как будто хаб не работает (эту тему уже обсуждали как-то тут), в конце концов, если ты сильно не понравился сисадминам, они тебя могут забанить по-маку, если хаб на сервере провайдера. Я так полагаю. Так что двигайся в этом направлении - что тебя намеренно не допускают к телу хаба. |
йцукен | ||
7.12.2010, 18:30 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
Saymon, это у меня в ToDo... Теперь, с твоей просьбой, я ещё больше уверен, что это нужно сделать. PS: Что-то не пишут ничего почти, неужели скрипт никакой? Только не забудьте обновить, если скачивали раннюю версию. |
Saymon21 | ||
6.12.2010, 21:26 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
Saymon, похоже, есть действительно недоделка...она вылезает только при отключении чат-лога через флажок в настройках скрипта (у меня вылезло так - поставил флажок чат-лога на false, перезапустил скрипт, потом отключил скрипт. и в этот момент вылезает ошибка твоя). Ты мне про флажок вроде не говорил. Сегодня буду исправлять, да и заодно приделаю отмену чат-лога через меню, чтоб не лазали лишний раз по скрипту. UPD: Подправил, + вынес ещё 3 команды в меню (теперь не придётся лезть в скрипт, чтоб менять флажки для включения/отключения Чат-лога, антифлуда (это антикапс + анти-много-пробелов + анти-много-знаков-препинания) и приставок к никам) Скачайте ещё раз и проверяйте. Архив перезалит в первом сообщении. |
Saymon21 | ||
5.12.2010, 3:29 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
Saymon: 2. И с чат-хистори так же! Я спешал фор Ю ещё раз изменил способ чтения таблицы, перезалил в первом сообщении, попробуй. 3. Если у тебя снова эти же косяки будут, тогда я не знаю, может, решу, что ты шутишь надо мной... Пусть другие выскажутся, работает ли у них чат-лог нормально и Тотал-заглушка при автоматической разглушке корректно ли сообщает про это (не путая чат и приват). UPD: С Тоталом - мой косячок - в одном месте недоисправил при копировании и при разглушке чата приходит сообщение о разглушке привата, но в остальном работает нормально. Исправил, перезалил в первом сообщении. UPD-2: Не даёт покоя твоя ошибка с чат-хистори...Поэтому поставил отдельно новую Птоку, скачал обратно отсюда скрипт, поставил его в новую Птоку - никаких багов с чат-хистори. Совет - целиком меняй, взяв с архива с форума, главный файл скрипта и этот - SurdoIsolation/AddFunc/surdo_addfunctions.lua...как минимум. |
Ferb | ||
4.12.2010, 21:38 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
Saymon: 1. Не смог у себя повторить насчёт заглушки чата и последующего сообщения разглушки привата. Возможно, у тебя были последовательно заглушены сначала приват, потом чат и потом так же последовательно разглушались - сначала приват, потом чат. И возникла такая картинка, как ты показал....может быть. Но я проверил с теми же файлами, что в архиве - нормально показало. 2. Насчёт сроков заглушки...есть легкое решение - просто в конфиг-файле ставишь не 30 (минут), а очень большое число, например, 1440*10 (это будет 10 дней)...или умножь на 100 Будет 100 дней заглушки. А снять ты всегда сможешь вручную в любую минуту. 3. Кем был заглушен-разглушен - видят и так только опы. 4. Насчёт ошибки про чат-хистори. Перезалил архив. |
Saymon21 | ||
4.12.2010, 3:54 |
Surdo_Isolation Почти универсальный скрипт заглушек с богатым меню и возможностями |
Почти универсальный скрипт заглушки Название: Surdo_Isolation.lua (слышали когда-нибудь про сурдокамеры?) Версия: 1.4 Платформа: PtokaX 0.4.1.x API: API 2 Автор: Ksan (aka Trans) Город: Томск Дата написания: 03-12-2010 Благодарности: всем скриптерам форума Возможности: Раскрывающийся текст - возможность скрытия чата от заглушенного - заглушка ников, IP и диапазонов (диапазоны - только мастером) - заглушка по времени - возможность временно отменить скрытие чата для всех заглушенных - возможность показа (отмены показа) сообщений заглушенных админам - возможность изменять отдельные параметры заглушек ников и IP (причину, скрытость чата, срок) на лету, не снимая заглушку - возможность через меню вносить ники и IP в исключения (в одну таблицу) - проверка статуса ника, IP или диапазона на заглушенность (ника и IP - ещё на исключение) - при заглушке ника или IP покажет (если есть что показать), в каких ещё списках заглушек засвечен данный ник или IP - при просмотре статуса покажет, кроме ника или IP: --- причину (комментарий), --- метку скрытия-нескрытия чата от заглушаемого, --- автора заглушки, --- время установки заглушки, --- конец заглушки (либо "до амнистии"), --- а также дополнительную информацию (о заглушке ещё IP или ника, о вхождении этого IP в заглушенный диапазон) - просмотр любых списков - очистка любого списка (для мастера) - просмотр текущих настроек через меню - тотальная заглушка чата и привата для всех, кроме тех, кто может сам глушить (чат и приват - по отдельности) - резервирование списков заглушек и исключений периодически (и вручную через меню) - интеграция некоторых функций обработки сообщений в чате (чат-лог, антимат, антикапс, сокращение количества повторяющихся знаков препинания, возможность добавлять к определённым никам некие приставки (через таблицу)). Все эти дополнения можно отключить закомментированием точек вхождения, если пользователь сочтёт их лишними - чат-лог можно отключить в скрипте в настройках - антимат имеет 4 уровня, регулирующихся через меню: -- 0 - тихий антимат (сообщение с матом видит только сам матерщинник), -- 1 - слово-мат подменяется другим словом, -- 2 - сообщение с матом подменяется целиком на случайное сообщение из таблицы фраз, -- 3 - антимат отключен - папка с запретами и заменами к антимату прилагается - при первом запуске скрипта будут созданы папки и файлы под динамические таблицы, если отсутствуют (кроме папок и файлов, необходимых для запуска и работы скрипта). После скачивания просто скопируйте всё из архива в папку скриптов. + теперь можно через меню включать/выключать возможность отправки уведомления про заглушку при установке заглушки онлайн-юзеру --- возможно, что-то ещё упустил ToDo (не факт, что будет всё реализовано): Раскрывающийся текст + При разглушках/изменениях учитывать, кто был автором (чтоб младший не мог отменять/изменять заглушку старшего)? + Может, позволять глушить и ВИПам на ограниченное время (например, до 24 часов или до 10 суток)? + Сделать общую таблицу профилей с регулировкой прав для всех событий? + Сделать заглушку ников по маскам? типа "дура*" + Добавить заглушки по другим параметрам (ОПИСАНИЕ, е-майл, точная шара)? Примечания: Раскрывающийся текст - Скрипт держать ниже других скриптов, работающих с сообщениями юзеров. - Настройки, функции и меню вынесены в отдельные файлы. - Штатные команды Птоки (в том числе и текстовые) не внесены в таблицу исключений скрипта, но заглушенный их всё равно не увидит (кроме сообщений от третьего лица). - Сообщения от третьего лица и сообщения от всяческих ботов и сервера хаба (в том числе и с подменой сообщений юзеров изменённым текстом, если это выдано не данным скриптом) пройдут до заглушенного и при скрытом чате, но их обычно мало, да и информативная ценность их ничтожна. - Имеющие право заглушать не смогут развлекаться затыканием друг друга - в таблицу запишется, но заглушка на них не подействует. - В архиве в таблицах заглушенных оставил несколько примеров для просмотра. PS: Скрипт ещё не совсем закончен, имеется ряд идей, которые позже могут быть добавлены. Можете тоже предлагать свои. PPS: Жду критику, замечания и комментарии (можно даже одобрительные). Насчёт скорости работы - у меня скрипт стоит на хабе из разряда до 1000 и нет никаких тормозов. Что будет на больших хабах - практика покажет. Возможно, время от времени буду что-то подправлять или добавлять в скрипт, поэтому следите за датой/временем перезаливки файла в этом сообщении. UPD: Подправил, + вынес ещё 3 команды в меню (теперь не придётся лезть в скрипт, чтоб менять флажки для включения/отключения Чат-лога, антифлуда (это антикапс + анти-много-пробелов + анти-много-знаков-препинания) и приставок к никам) UPD-2: Добавил в скрипт и в меню возможность выбора - уведомлять заглушаемого онлайн-юзера в приват о его заглушке или нет (в момент установки заглушки). В уведомлении покажет причину и срок. И убрал (закомментил в таблице) из антимата из запретов слово "торрент" и его производные (сильно доставали у нас в чате проблемами торрента и пришлось таким образом избавиться (у нас маты обычно просто глушатся тихо)) (перезалил ещё раз, добавив пропущенный кусок кода ) UPD-3: Подправил кое-что по наводке пользователя Stym. Благодаря ему пофиксил прохождение в чат от заглушенного юзера видоизменённых антиматом сообщений (с подменой матов или целиком сообщения). Проблема возникала при режимах антимата 1 и 2. Залил вторым файлом (Surdo_Isolation_beta.rar), не удаляя предыдущий. UPD-4: Исправил очень редко (как правило) появляющуюся ошибку, описанную, например, тут в сообщении #39 (появлялась, как оказалось, из-за наличия в нике, к которому обращаются, т.н. "магических" символов). Заодно чуток оптимизировал прилегающие участки. Скрипт перезалит (но изменения коснулись только 2 файлов - главного файла и вспомогательного surdo_addfunctions.lua из папки AddFunc), старые архивы удалены. Последняя перезаливка: 2013-05-27 06:00 МСК |
Nickolya, Taulalan, Tsd, Invisible, Karumo, PomanoB, valdis73, rival, Milena, Wan, Saymon21, Stym, ™Wizard™, WINS, DEN 007, @_JuNiOr_@, STIVAN, KCAHDEP, мамин_парень, zeusby | ||
4.12.2010, 0:35 |
Скрипт привязки Админа к одному IP |
Ameet, попробуй это (можешь назвать AdminIP.lua): Код local sBot = SetMan.GetString(21) local sAdmin = "Ksan" -- тут напишите свой ник local sMsg = "<%s> Юзер с IP %s пытался зайти под админским ником %s и был скинут с хаба." local sOutMsg = "На чужой каравай рот не разевай! Короче, ещё одна попытка зайти под ником админа и пойдёшь лесом далеко и надолго!" tAdminIP = { ["Test_user"] = "10.0.0.1", ["Ksan"] = "192.168.1.2", } function UserConnected(tUser) if tAdminIP[tUser.sNick] and tUser.sIP ~= tAdminIP[tUser.sNick] then Core.SendToUser(tUser, "<"..sBot.."> "..sOutMsg) Core.Disconnect(tUser) Core.SendToNick(sAdmin, sMsg:format(sBot, tUser.sIP, tUser.sNick)) end end OpConnected, RegConnected = UserConnected, UserConnected Скрипт для Птоки 0.41* |
Ameet | ||
3.12.2010, 7:26 |
Tophubbers API2 | Кто и сколько времени провёл на хабе |
Dragon, в скрипте найди эту функцию определения даты Цитата os.date и переделай аргументы, что внутри скобок, примерно так: Код os.date("[%d.%m %H:%M]") Я скрипт не смотрел, но, полагаю, разберешься уже. |
Dragon | ||
30.11.2010, 19:35 |
Установка PtokaX 0.4.1.2 в Gentoo Руководство по установке |
rm -rf /* |
Maximum | ||
20.11.2010, 6:40 |
Несколько Слов О Захватах И Регулярных Выражениях исключительно для разработчиков |
Попробуй вот этот корявый код: Код local tShadowChatNicks = { -- эти ники могут писать мультиадресные сообщения ["Indy"] = 1, ["Ksan"] = 1, ["Атыктотакой"] = 1, } local tTable = {} function ChatArrival(tUser, sData) local sData = string.sub(sData, 1, -2) local sMsg = sData:match("^%b<>%s+(%S.*)") if sMsg and sMsg:find":" then if tShadowChatNicks[tUser.sNick] then local sNicks, sShadowMsg = sMsg:match"^(.*):%s*(.*)" sNicks = sNicks:gsub(",","") while sNicks do sWord = sNicks:match"^(%S+)" table.insert(tTable, sWord) sNicks = sNicks:gsub(sWord, "") sNicks = sNicks:match"^%s+(.*)" end for i = 1, #tTable do Core.SendToNick(tTable[i], "<"..tUser.sNick.."> "..sShadowMsg) -- тут сообщение отправляется очередному нику end Core.SendToNick(tUser.sNick, sData) -- а это идёт себе же для контроля tTable = {} -- обнуляем таблицу, готовя к след. сообщению collectgarbage() return true end end end Просто я не знаю, как красивее выцепить (распарсить, как ты говоришь) отдельные слова неизвестного количества из сообщения, потому пришлось заниматься выкорчёвыванием пробелов и запятых...одновременно каждое очередное полученное слово заносил в таблицу, оттуда уже легко вытаскивать и делать что хочешь. Добавил ещё сверку ника автора сообщения со списком имеющих право на такие сообщения. P.S.: Можно еще сделать так, чтоб каждому адресату при этом сообщалось, кому ещё это сообщение отправлено. P.P.S: Только нужно помнить, что это сообщение отправится на запись в чат-лог, поэтому скрипт нужно поставить выше Чат-лога. |
dimajak, мамин_парень | ||
16.11.2010, 16:31 |
PtokaX Скрипт |
У меня во Флайлинке та строка в чате начинается на "*** Хаб топик :" Это я нашёл в файле руссика клиента. Но там можно изменить только эти слова, которые показал, а весь остальной текст ХабТопика обрабатывается И так ли уже тебе оно надо? По мне так это последняя проблема, за которую я бы взялся. До этой темы я вообще даже не обращал внимания на эту строку... |
Tsd | ||
16.11.2010, 15:06 |
PtokaX Скрипт |
MARVELtm, то, что не получилось, возможно, оттого, что ты скопировал мою строку, не разглядывая особо. Там смотри - должно быть tUser или curUser, но не оба выражения одновременно. |
MARVELtm | ||
16.11.2010, 11:09 |
PtokaX Скрипт |
MARVELtm, думаю, не получится. Про какой тэг пустой строки говоришь? Выражайся яснее. Если ты про сообщение в чате, то надо в конце сообщения добавить два символа: Код \n Вот как тут:Код sWhatInHubTopic = "Я не умею юзать поиск :)\n" Кстати, если команду отправления сообщения написать так: Код Core.SendToUser(tUser,"$HubTopic "..SetMan.GetString(10)) то юзер будет получать при входе топик хаба (то, что пишется наверху в заголовке хаба). Тогда первая строка из кода в сообщении #5 темы будет лишней. А по поводу непоказа в чате - либо получаешь и в чате и под чатом, либо ничего. |
MARVELtm | ||
16.11.2010, 10:44 |
PtokaX Скрипт |
Код RegConnected = UserConnected |
MARVELtm | ||
13.11.2010, 18:55 |
Перенаправление пользователей |
Попробуй это (назови скрипт, скажем, Redirect.lua). Не стал я переделывать твой скрипт, накропал свой. Код local sBot = SetMan.GetString(21) local sRedirAddr = "dchub://адрес.хаба.ru" -- возможно, нужно и порт указать, если у того хаба порт ограничен одним нестандартным local sRedurCmd = "!redirect" local sReasonDef = "В том зале вам удобнее будет сидеть!" -- причина по умолчанию (при пустом окошке причины) local sRedirMsg = "Юзер перенаправлен по адресу "..sRedirAddr function UserConnected(tUser) local t = ProfMan.GetProfilePermissions(tUser.iProfile) if t and t.bRedirect then Core.SendToUser(tUser, "$UserCommand 1 2 Перенаправить юзера..$<%[mynick]> "..sRedurCmd.." %[nick] %[line:Причина (либо оставь пустым)]&#*124;") -- тут в конце звёздочку удалить end end OpConnected = UserConnected function ChatArrival(tUser, sData) local sData = sData:sub(1,-2) local sData = sData:match"%b<>%s(.*)S)" local sCmd = sData:match"^(%S+)" if sCmd and sCmd == sRedirCmd then local t = ProfMan.GetProfilePermissions(tUser.iProfile) if t and t.bRedirect then local sNick = sData:match"^%S+(%S+)" local sReason = sData:match"^%S+%S+%s+(.*)" or sReasonDef local tUsr = Core.GetUser(sNick) if tUsr then Core.SendToUser(tUsr, "<"..sBot.."> "..sReason) Core.Redirect(tUsr, sRedirAddr, sReason) Core.SendToUser(tUser, sRedirMsg) end end return true end end Не проверял. Не уверен, что сработает Вдогонку кое-что подправил, так что лучше повторить попытку. Мне не удалось перенаправить. К тому же команда вылезает в чат. Странно. |
truth | ||
12.11.2010, 0:45 |
Перезапуск скрипта раз в минуту |
lankmv, вот я чуток переделал скриптик из этой темы: Код local sName = "Название_другого_скрипта.lua" -- имя скрипта с которым работаем local iTime = 1 -- период переключений в минутах function OnStartup() local found for _, tData in ipairs(ScriptMan.GetScripts()) do if tData.sName == sName then found = true if tData.bEnabled then state = true end break end end assert(found,"Скрипт \""..sName.."\" найден не был! Проверьте правильность настройки.") TmrMan.AddTimer(iTime*60000, "StartStop") end function StartStop() if not state then ScriptMan.StartScript(sName) state = true elseif state then ScriptMan.StopScript(sName) state = false end end Проверено, мин нет! © Можешь скрипт назвать родным названием ScriptTimer.lua |
lankmv, мамин_парень | ||
10.11.2010, 6:09 |
Информер API2 | Показывает сообщения по таймеру в назначенный день |
А ты заполнил таблицу сообщений? Может, у тебя там вообще пусто. И какие изменения внёс? Покажи сюда хотя бы таблицы сообщений. Либо весь твой скрипт через спойлер. |
мамин_парень | ||
3.11.2010, 3:12 |
AntiReclama_by_Ksan Тихая антиреклама чата и привата с удалённым управлением |
Иногда рекламщик кидает в одном сообщении в чате ссылки на ресурсы и в виде днс-адреса и в виде IP. И АнтиРеклама срабатывает первым делом на IP и просто замалчивается сообщение (тихо глушится и сообщается в Опчат), хотя было бы правильнее его наказать за днс-адрес (в таком случае возможны и дисконнект, и кик, и зафлуживание). Для разруления этого нужно найти в функции function ChatArrival(tUser, sData) следующие 2 строки: Код AntiIP(tUser, sData, sPriv, sMsg, sIp1, sIp2, sIp3, sIp4) AntiReclama(tUser, sMsg, sPriv, bFlag0, bFlag1, bFlag2) и поменять их местами так: Код AntiReclama(tUser, sMsg, sPriv, bFlag0, bFlag1, bFlag2) AntiIP(tUser, sData, sPriv, sMsg, sIp1, sIp2, sIp3, sIp4) и перезапустить скрипт. Не забудьте выставить потом через меню свои любимые настройки. |
Kingston, Saymon21 | ||
3.11.2010, 1:29 |
Ограничение по максимальной шаре Ограничение с возможностью бана за нереальную шару |
thehawk, и что, трудно дозаполнить окошко лимита по макс. шаре и сохранить настройки? Если хаб удаленный, то поможет строка: Код SetMan.SetMaxShare(1, 4) воткнутая в любой скрипт (например, после настроек скрипта) или в функции OnStartup(). В аргументах: 1 - это число шары, 4 - в даннном случае - терабайты (0 - байты, 1 - Кб, 2 - Мб, 3 - Гб, 4 - Тб)Можешь создать скрипт из одной этой строки. И потом в дальнейшем использовать его для удалённого просмотра и изменения настроек хаба, я так и делаю. Только не забудь закомментить уже ненужные строки, чтоб они не исполнялись при каждом запуске (удалять не надо, могут всё же пригодиться ещё). |
thehawk | ||
31.10.2010, 13:11 |
RSS.Feed.Bot.V2.3.Final.LUA5-PtokaX_API2 RSS-ленты под API2 (можно много лент и HTML-просмотр) |
valdis73, я не возьмусь переделывать этот скрипт. Там много увязок разных, тронешь хоть одно что-то, вся цепочка становится уязвимой, кроме того, весь кэш RSS-лент держится ТОЛЬКО в памяти, это тоже создаёт дополнительные проблемы. Короче, скрипт тяжёлый для переделки. Если бы я сам писал, другое дело, я ведь только перевёл и выложил.. Может, кто другой возьмётся... |
valdis73 | ||
29.10.2010, 18:00 |
Запись в лог-файл IP адресов посетителей |
truth | |||
21.10.2010, 19:24 |
Last Seen API1, API2 | Показывает когда был юзер |
FurLion, найди строку Код OpConnected = UserConnected и напиши следующую строку ниже неё: Код RegConnected = UserConnected Либо можешь объединить обе строки в одну так: Код OpConnected, RegConnected = UserConnected, UserConnected То же самое - относительно строки: Код OpDisconnected = UserDisconnected Опс, уже ответили.. :( PS: И, кстати, да, этот скрипт через некоторое время становится настолько тяжёл для хаба и тормозить его дико (на многие секунды), что пришлось срочно его отключить. |
Milena | ||
20.10.2010, 21:57 |
Инфо о пользователе при подключении |
TROJAN, ну охота тебе флуд получать - получай...Назовём скрипт UserDataInEnter.lua Но: 1. Это такой простейший скрипт, что мог бы и сам накалякать, используя всего лишь один файлик в Птоке - scripting-interface.txt 2. Лучше получать в приват на свой ник, чем мучить остальных, ибо при достаточно живом хабе эти сообщения туда (в приват или опчат) будут прилетать кучами. 3. Ник получателя я вставил прямо в сообщение, чтоб уменьшить число строк кода Так, для интереса. 4. Шара в простом получении - точная (в байтах), если хочешь получать в гигабайтах, нужно добавить функцию форматирования шары. 5. Время - я бы не стал писать время, оно и так будет перед сообщением, если ты не отключил в клиенте галочку, конечно. Но как хочешь. 6. Режим подключения в виде букв А и Р (думаю, не надо расшифровывать и увеличивать код). А вот сам кодик (удивись, какой он простенький, и постыдись): Код function UserConnected(tUser) Core.GetUserAllData(tUser) Core.SendPmToNick("Ksan", "Кто к нам пришёл","\n\t"..os.date("[%d-%m-%Y %H:%M:%S]").."\n\t Подключился юзер:\n\t• Ник: "..tUser.sNick.."\n\t• IP: "..tUser.sIP.."\n\t• Описание: \""..tUser.sDescription.."\"\n\t• Режим подключения: "..tUser.sMode.."\n\t• Шара: "..tUser.iShareSize.."\n") end; OpConnected, RegConnected = UserConnected, UserConnected Если не хочешь, чтоб регистрировал опов-админов, то можешь в последней строке убрать о них упоминание: Код end; RegConnected = UserConnected А вот результат: Код [01:37:38] <Кто к нам пришёл> [21-10-2010 01:37:38] Подключился юзер: • Ник: Sky • IP: 109.86.200.217 • Описание: "[49]made in USSR" • Режим подключения: P • Шара: 609044343232 |
Nickolya, Invisible, DEN 007, sania, Unique | ||
20.10.2010, 20:31 |
TotalGag для аварийной заглушки всего хаба (кроме определенных лиц) |
Milena, никого не глушит? Кинь файликом скрипт, я гляну, в чём у тебя дело. Думаю, ты внесла какие-то изменения, может, даже незначительные, но достаточные, чтоб перестал работать как надо. |
Milena | ||
19.10.2010, 20:25 |
DiapasonGag тихая заглушка по диапазону (удобно против динамич. IP) |
Вот нафиг ты так сделал? Код tUnforbid = { -- Разрешенные команды для заглушенных "", "", "", "", "", "", } Ты же этим самым в список разрешенных команд записал всё, что пишут в чат... Не хочешь команд, ну просто закомменти эти строки и всё, или вообще удали все строки, кроме начала и конца таблицы. Мог бы сразу сказать, какие изменения делал. |
infection | ||
19.10.2010, 2:55 |
DiapasonGag тихая заглушка по диапазону (удобно против динамич. IP) |
infection, приношу свои извинения за халтурную работу! :( Скрипт исправлен, проверен и перезалит в первом сообщении. |
infection | ||
14.10.2010, 5:31 |
Скрипт бот, который сообщает в чат инфу! |
infection, попробуй этот. Он стоит у меня. Но таких скриптов было море тут, ты плохо искал. |
infection | ||
13.10.2010, 0:30 |
Converter Accounts YnHub to PtokaX API2 | Конвертер аккаунтов из YnHub в PtokaX |
Saymon21 | |||
12.10.2010, 22:05 |
Pm To Offline API1 | Личка в оффлаин |
averon.nv, есть более удобный скрипт. Попробуй его. Ни разу никаких проблем не было. |
AfLc | ||
11.10.2010, 2:58 |
SMS_Cost для определения стоимости SMS на короткие номера |
UPD-2: Перезалил скрипт в первом сообщении, подкорректировав ещё пару символов в строке 107 (из-за них некоторые запросы могли уронить скрипт с ошибкой на 108 строке). |
DEN 007 | ||
10.10.2010, 4:13 |
Скрипт, Заставить регистрироваться Заставить юзера регистрироваться |
1. Сем90, прекрасный способ разогнать своих юзеров! Браво! 2. Есть более разумные и гуманные способы, например: - нерегенный не может писать в чате и-или в привате, - не может искать, - не может качать, - ему в меню доступно мало что... 3. Можешь эти пункты сочетать в разных пропорциях и тихо-ненавязчиво, без шума, треска и киков потихоньку заставить региться, если уж тебе это очень надо. Грубая сила - не наш путь, если ты не задался целью оставить в хабе только админов. |
DEN 007 | ||
7.10.2010, 17:01 |
DiapasonGag тихая заглушка по диапазону (удобно против динамич. IP) |
У меня данный скрипт стоит вторым, после GagMeSoftly.. И да, этот скрипт лучше держать повыше. |
Dimon21, infection | ||
7.10.2010, 4:00 |
DiapasonGag тихая заглушка по диапазону (удобно против динамич. IP) |
Ага, точно, спасибо, что подсказал, пока другие не скачали. Я там сокращал длинный список диапазонов, взяв только начало, и закрыл автоматом таблицу через end, а не фигурной скобкой, так как перед этим тем же занимался и с другими функциями, обрезая и дописывая end Перезалил в первом сообщении, исправив опечатку. |
Dimon21 | ||
7.10.2010, 1:57 |
Заглушка Чата и ЛС (Диапозон) |
infection, ладно, уговорил, только что выложил отдельной темой скриптик под твои запросы. |
infection | ||
7.10.2010, 1:53 |
DiapasonGag тихая заглушка по диапазону (удобно против динамич. IP) |
Название скрипта: DiapasonGag.lua Версия: 1.2 Платформа: PtokaX 0.4.1.*+ API: API 2 Автор: Ksan (aka Trans) Город: Томск Дата написания: 04-04-2010 (начальная версия - в декабре 2009г) Описание: - В скрипте встроенная таблица с диапазонами для заглушки - начало диапазона и конец диапазона. - При старте скрипта проверяется наличие на хабе юзеров с заглушенных диапазонов, при обнаружении такие ники заносятся в таблицу. - при входе юзера с таких диапазонов сообщает админу о его приходе (через меню можно отменить этот показ), добавляет ник таблицу, - далее при попытке написать в чат и приват сначала проверяется наличие в таблице заглуш. ников, если да, то сообщение до остальных юзеров не дойдёт. Админу приходит извещение о попытке написать в чат или приват заглушенным юзером (через меню можно отменить этот показ) - Извещение о заглушке в чате по выбору через меню можно отправить в чат или в приват админа. Извещение о заглушке в привате админу приходит всегда в приват. - Имеется таблица команд, которые юзеру разрешено использовать даже при заглушке. - Имеется таблица ников-исключений. - Опов не глушит. В принципе, можно было бы сохранять таблицу заглуш. ников в файл, но особой нужды в этом нет, ибо таблица при старте скрипта заполняется сразу же. PS: Скрипт был написан давно, и здесь только малая часть возможностей, специально выдрал в пользу голодающих "одминов" (а остальное пусть лучше послужит тихо, контрразведка не любит шума). Думаю, аналогичные скрипты есть на форуме, но пусть и этот посидит скромненько рядом с гигантами мысли...может, пригодится кому. UPD1: (2010-10-19) Скрипт исправлен, проверен и перезалит. Приношу свои извинения за невероятно халтурную работу при первом выкладывании. :( Скрипт тогда собирал в конце бессонной ночи над другим скриптом, и умудрился такие ляпы пропустить.. UPD2: (2013-09-04) Скрипт исправлен, перезалит. Была ошибка - один из флагов был подменён другим и показ захода юзера из заглушенного диапазона не отключался. UPD3: (2017-03-13) К моему дикому смущению, снова обнаружилась ошибка, исправил и перезалил. И да, заодно ещё кое-какие небольшие изменения добавил (надеюсь, без ошибок). Благодарю CyberGhost404 за обнаружение ошибки! |
Nickolya, Tsd, Invisible, rival, Saymon21, Dimon21, dimetro, SKIFI, shur49, infection, AfLc | ||
2.10.2010, 11:45 |
RSS.Feed.Bot.V2.3.Final.LUA5-PtokaX_API2 RSS-ленты под API2 (можно много лент и HTML-просмотр) |
DEN 007, ну как знаешь, лично я не нахожу в этом ничего особенного, у меня проц загружается максимум до 60% на несколько секунд...Это естественно при одновременном открывании (или парсинге) нескольких страничек в интернете, а если ты запихал еще больше...Сомневаюсь, что твой проц жаловался тебе. Хотя можно попытаться кэшировать от имени админа каждую ленту по отдельности. Для этого есть ключ "force", то есть, можно запускать чтение ленты от имени админа с этим ключом. Пример: !obzor force При этом лента прокэшируется принудительно, даже если была только что перед этим кэширована, но содержание ленты тоже свалится в твой приват. А проц всё равно будет так же загружен, но на более короткий срок. Это вся разница. |
valdis73 | ||
2.10.2010, 11:11 |
SMS_Cost для определения стоимости SMS на короткие номера |
В скрипте в предыдущей строке (в данном случае - строка 111): Код _,_, msg1, digit1, msg2 = string.find(msg, "(По сообщениям пользователей) <strong>≈(%d+)</strong>( руб.)") нужно заменить вот это (%d+) на это (%d+%.*%d*), получится: Код _,_, msg1, digit1, msg2 = string.find(msg, "(По сообщениям пользователей) <strong>≈(%d+%.*%d*)</strong>( руб.)") Просто мне при тестировании не попадались приблизительные суммы от пользователей с десятичной дробью. Кстати, в строке 111 в скрипте в конце уже мной был помещен предусмотрительно запасной код для замены (за комментами). Перезалил подкорректированный скрипт в первом сообщении. |
Saymon21, striker, DEN 007 | ||
1.10.2010, 3:23 |
SMS_Cost для определения стоимости SMS на короткие номера |
Название: SMS_Cost.lua Платформа: PtokaX 0.4.1.x Версия: 1.0 API: API 2 ( скрипт создан по мотивам скрипта kaspersky_API2.lua от RAND(i)M ) Автор SMS-версии скрипта: Ksan (aka Trans) Дата написания: 01-10-2010 Город: Томск Библиотека: для работы скрипта требуется библиотека LuaSocket Описание: Скрипт для проверки стоимости SMS на короткие номера. Сами знаете, что иногда объявленная сумма в реале оборачивается невероятным размером, так что проверить никогда не лишне. Примечание: Не факт, что вы запрашиваемую информацию получите обязательно, так как либо не на все номера есть данные, либо данные засорили пользовательскими данными (на сайте видно на некоторых номерах, как пользователи изгалялись...например, можете проверить номера 1111 или 1010) UPD: Перезалил, подкорректировав под новый текст от сайта. UPD-2: Перезалил, подкорректировав пару символов в строке 107 (из-за них некоторые запросы могли уронить скрипт с ошибкой на 108 строке). .. |
Nickolya, Invisible, PomanoB, Saymon21, ™Wizard™, striker, RAND(i)M, DEN 007 | ||
29.9.2010, 18:27 |
Скрипт для отключения чата |
Вот только что загрузил тему с нужным тебе скриптом СЮДА. |
infection | ||
29.9.2010, 18:26 |
TotalGag для аварийной заглушки всего хаба (кроме определенных лиц) |
Название: TotalGag Версия: 1.0 Платформа: PtokaX 0.4.1.x API: API 2 Автор: Ksan (aka Trans) Дата написания: 16-03-2010 Назначение: Для экстренной заглушки всего хаба (и чата и привата), когда нет иного способа быстро пресечь спам или иное нарушение. Админов, опов и отдельные ники из таблицы не заглушит (это регулируется ниже таблицами). Заглушать могут профили из таблицы скрипта. Дополнительно: При заглушке все сообщения, не пропущенные в чат (но НЕ приват), всё равно будут видны админам. Заглушка-разглушка - одной и той же кнопкой. UPD: -- исправлена ошибка, из-за которого при тотальной заглушке юзер мог видеть свое сообщение вместо привата в чате. |
Nickolya, Invisible, valdis73, Dimon21, Djessa, infection, MIKHAIL, zeusby | ||
28.9.2010, 16:14 |
Требуются подсказки знатоков |
Да хосспади, откуда вы беретесь такие? Прёте и прёте из какой-то дыры с желанием переделать Птоку, Грейлинк, Флайлинк, ещё какую там хрень, а сами нифига не умеете, вам бы всё клянчить и клянчить переделать, а потом начинаете этими переделками спамить нам же! Что вас там не устраивает, мать вашу хреновы "одминчеги"? Первое же сообщение на форуме и уже про переделку клиента! PS: Ибо достали! Может, подобные темы сразу в корзину отправлять начинать пора уже? |
переподвыподверт | ||
27.9.2010, 21:25 |
PtokaX DcHub |
1. Почему тему открыл в разделе "Другие хабы"? Ведь это про Птоку у тебя речь, и есть раздел для Птоки. Лучше перенести. 2. Называй тему более содержательно, а то выглядит глупо...например - "Птока и FreeBSD", так понятнее было бы. 3. Мне кажется, на фряху нет особо успешных установок. |
Lamo | ||
25.9.2010, 17:25 |
RSS.Feed.Bot.V2.3.Final.LUA5-PtokaX_API2 RSS-ленты под API2 (можно много лент и HTML-просмотр) |
1. Сорри, при переводе на АПИ2 пропустил...в строке 670 (в скрипте из первого сообщения): Код toFeedSpy("Юзер: "..user.sName.." запросил новую RSS-ленту.\r\n\t\t Лента: "..feed.."\r\n\t\t Описание: "..desc); надо user.sName заменить на user.sNick. Должно получиться так: Код toFeedSpy("Юзер: "..user.sNick.." запросил новую RSS-ленту.\r\n\t\t Лента: "..feed.."\r\n\t\t Описание: "..desc); Я проверил - работает. Файл в первом сообщении перезалит. 2. Насчёт занесения в базу - скрипт очень тяжёлый, написан старомодно и очень трудно проследить, что куда и для чего. Я лично не возьмусь, пожалуй, по крайней мере, пока нет желания . К сожалению, да, при перезапуске скрипта кэш обнуляется и снова нужно перекэшировать, хотя при запросе отдельного юзера отдельной ленты кэширование конкретной ленты всё равно произведётся. 3. Я сегодня всю ночь парился с автоматизированием кэширования при запуске и через определенное время по таймеру. Всё вроде сделал, но потом обнаружил, что если меня нет (как админа, которому нужно послать информацию о процессе кэширования) на хабе при запуске скрипта (так может случиться, когда перезапускаешь хаб или компьютер, и ты ещё не успел попасть на хаб), то скрипт валится за отсутствием табличного юзера...Пока отложил на потом, когда придумаю, как кэшировать без отсыла информациии. PS: Если кто-то сможет эти 2 последних пункта решить положительно, я буду только рад. |
valdis73 | ||
24.9.2010, 2:16 |
RSS.Feed.Bot.V2.3.Final.LUA5-PtokaX_API2 RSS-ленты под API2 (можно много лент и HTML-просмотр) |
Название: RSS.Feed.Bot.V2.3.Final.LUA5-PtokaX_API2 Платформа: PtokaX 0.4.1.x API: API 2 Версия: 2.3 Автор: S.t.0.n.e d.b Переводчик с API 1 на API 2 (и подкорректировал html-дизайн): Ksan (г.Томск) Прикрутил другую библиотеку (и решил проблему с UTF-8): Nickolya (г.Тула) Дата переделки: 24-09-2010 Библиотека: для работы скрипта требуется библиотека LuaSocket Описание: - можно одновременно прикрутить ленты из разных сайтов, - админ может кэшировать сразу все ленты для ускорения доступа к ним, - можно генерировать ленты в виде html-страничек и просматривать их через сервер хаба по ссылке, - кому не нравится дизайн, может сам переделать, используя настройки скрипта - к скрипту прилагаю папки и образцы лент со своего хаба (одна из лент чисто томская, так что с интернета не получится взглянуть на сам сайт) для наглядного примера, как создавать ленты. Примечание: для *nix-платформ потребуется другая библиотека, а где и как её добыть - обсудите в теме. PS: Надеюсь, что с этим скриптом тема RSS-лент хоть на какое-то время станет неактуальной. UPD: Перезалил скрипт, исправив небольшую ошибочку. |
Nickolya, intlive, Invisible, PomanoB, valdis73, Saymon21, DEN 007, Unique | ||
22.9.2010, 1:12 |
User Info 1.0 (русская Версия) API2 | Скрипт для просмотра информации о юзерах |
1. Про какой из скриптов речь? в теме 2 скрипта. 2. Если ты пропишешь путь точно как показал Nickolya, без импровизаций, база создастся и при первом же заходе юзера дополнится информацией (в обоих скриптах). 3. Если речь про последний скрипт в теме (UserInfo_1.2.lua), то если ты путь и название файла напишешь вот так (без промежуточной папки "tbl"): Код fFile = debug.getinfo(1).source:match("^@(.+\\).-$"):gsub("\\","/").."userinfo.tbl", -- Имя файла с базой то тоже всё будет окей. Но если доп. папку tbl, указанный в скрипте, создашь заранее вручную, то, возможно, скрипт тоже отработает нормально.4. Если скрипт из первого сообщения, то без изменений отработает нормально при винде, а если ты на линуксе, то в пути файла надо слэш один и прямой, то есть, "/", а не "\\". Но тоже лучше путь указать как в пункте 2 (точнее, как показал Nickolya). 5. Почему у тебя не показывает меню - фиг знает, попробуй продвигай вверх, может, скрипт или бот какой мешает. |
Marc | ||
20.9.2010, 23:58 |
MyDc API2 | Скрипт новостей с данного форума |
Думаю, в функции Код function RepChars(sMsg, bNum) нужно добавить такой участок: Код sMsg = string.gsub (sMsg, "&#*34;", "\"") Только после решёток # нужно убрать будет звёздочки *sMsg = string.gsub (sMsg, "&#*60;", "<") sMsg = string.gsub (sMsg, "&#*62;", ">") sMsg = string.gsub (sMsg, "&#*41;", ")") sMsg = string.gsub (sMsg, "&#*91;", "[") sMsg = string.gsub (sMsg, "&#*93;", "]") Возможно, подобные добавки придётся позже ещё делать по мере необходимости. Цитата И напрягает то, что он иногда одни и те же новости по нескольку раз отсылает. Так делает только когда скрипт перезапускаешь. Он не сохраняет полученные данные, чтоб сравнивать, изменилось что или нет за 10 последних минут, и при каждом перезапуске память обнуляется и он сканирует форум с нуля. PS: Добавил вышепредложенные строчки, перезапустил, - отработал правильно, показывает как надо. |
Nickolya, Tsd, ImDim | ||
27.8.2010, 12:53 |
Проблема с хабом на PtokaX 0.4.1.2 Проблема с хабом на PtokaX 0.4.1.2 - Сильно лагает |
1. Это надо было показать раньше, до перезагрузки, хоть можно было бы посмотреть, какой скрипт сколько памяти занимал.. 2. Короче, когда и если снова станет все тормозить, вспомни мой совет. 3. Я тебе удивляюсь ещё раз....у тебя столько скриптов, и нет ни одного мало-мальски похожего на антирекламу...Или у тебя там правила настолько либеральные, что антиреклама нафиг не нужна? |
sania | ||
27.8.2010, 12:45 |
Антибаннер борьба с программами-вымогателями посредством DC++ |
Посмотри в скрипте, куда он обращается, их и скорми Касперскому. Других вариантов и не может быть, я думаю.. |
sania | ||
27.8.2010, 0:13 |
Hub Menu API2 | Меню для встроенных команд PtokaX |
Продолжай в теме другого скрипта. |
xXx-Portal | ||
26.8.2010, 22:29 |
Проблема с хабом на PtokaX 0.4.1.2 Проблема с хабом на PtokaX 0.4.1.2 - Сильно лагает |
1. Попробуй отключить вот эти скрипты разом: Статистика чата Ekzekutor последний rus_ShoutStats 2.0 LUA 5.1x [Strict][API 2] BombSetuper Рекорды и проверь работу хаба. 2. Если лагов не стало, начинай по одному скрипту подключать из этого списка и проверять на лаги...не спеши, в одну секунду не узнаешь... Если обнаружишь, что какой-то скрипт стал тормозить хаб, отключи его, и продолжай проверять следующие (вдруг там не один лагающий скрипт). 3. Когда и если обнаружишь лагающие скрипты, тогда и продолжишь разговор. 4. И, кстати, неплохо бы и названия скриптов игр сюда написать. То, что "так и было задумано", не оправдывает избыточность скриптов. PS: Хотя у меня самого скриптов намного больше (их 43, но из игр только Викторина), у меня хабы не тормозят, хотя один из них работает 221 день, другой - 83 дня, третий, правда, часто перезапускается, он у меня экспериментальная площадка для первых двух. Скрипты везде одинаковые. |
sania | ||
26.8.2010, 18:32 |
Анти реклама! |
Тогда уж и свою Антирекламу с удаленным управлением предложу. |
voronf4 | ||
26.8.2010, 18:03 |
Немогу зайти на хаб |
Сколько раз уже писали по этому поводу....в клиенте напиши адрес своего хаба 127.0.0.1 или просто dchub://localhost Это если твой хаб на твоем компе. |
saber | ||
25.8.2010, 0:56 |
RegisteredUsers.xml |
Скачай скрипт отсюда, будет сохранять настройки каждые 5 минут. Не помню, что, но есть какая-то мелкая закавыка именно с версией 0.4.1.2 (какую-то настройку не сохраняет вроде), но работать будет. PS: Оп-с, запоздал, да и скрипт из предыдущего сообщения как раз исправленный. |
Ольга | ||
15.8.2010, 20:52 |
Нужен скрипт блокировки скачивания |
Запрети им дышать, они тогда не смогут и файллисты качать.. Намёк понятен? |
мамин_парень | ||
10.8.2010, 22:30 |
Ищю скрипт Скрипт |
Вот накропал скрипт, заменяет описание юзера в списке на название его профиля, как просил автор темы. Раскрывающийся текст Код --- Скрипт замены описания юзера на данном хабе на профиль юзера (мастер, оператор, вип, рег и незарегистрированный юзер) --- Название скрипта - ProfileToDescr.lua --- Написан чисто переделкой скрипта NoDescAdv от Alex82 --- Автор переделки - Ksan (г.Томск) --- Дата: 10-08-2010 ---------------------- iSendTimer = 1000 -- Время отправки MyINFO, ms tTimers = {} tUsers = {} function OnStartup() for i,v in pairs(Core.GetOnlineUsers(true)) do MyINFOArrival(v,v.sMyInfoString) end end function GetNickListArrival(user,data) tTimers[TmrMan.AddTimer(iSendTimer, "SendAllInfo")] = user.sNick end function MyINFOArrival(user,data) tUsers[user.sNick] = true tTimers[TmrMan.AddTimer(iSendTimer, "SendInfo")] = user.sNick collectgarbage("collect") end function SendAllInfo(tmr) local user = Core.GetUser(tTimers[tmr],true) if user then for i,v in pairs(Core.GetOnlineUsers(true)) do if tUsers[v.sNick] then local tUsr = Core.GetUser(tTimers[tmr],true) if tUsr then sProfile = (ProfMan.GetProfile(v.iProfile) and ProfMan.GetProfile(v.iProfile).sProfileName) or "Незарегистрированный юзер" Core.SendToUser(user,"$MyINFO $ALL "..v.sNick.." "..sProfile..(v.sMyInfoString:match("%$MyINFO%s$ALL%s%S+%s.-(%b<>%$.+)$") or v.sMyInfoString:match("%$MyINFO%s$ALL%s%S+%s.-(%$.+)$"))) end end end end tTimers[tmr] = nil TmrMan.RemoveTimer(tmr) collectgarbage("collect") end function SendInfo(tmr) local user = Core.GetUser(tTimers[tmr],true) if user then sProfile = (ProfMan.GetProfile(user.iProfile) and ProfMan.GetProfile(user.iProfile).sProfileName) or "Незарегистрированный юзер" Core.SendToAll("$MyINFO $ALL "..user.sNick.." "..sProfile..(user.sMyInfoString:match("%$MyINFO%s$ALL%s%S+%s.-(%b<>%$.+)$") or user.sMyInfoString:match("%$MyINFO%s$ALL%s%S+%s.-(%$.+)$"))) end tTimers[tmr] = nil TmrMan.RemoveTimer(tmr) end PS: Я сначала подумал было, что Артём прислал аналогичный скрипт, потом скачал и понял, что не так. Но лучше бы при отправлении ссылки добавить, для чего скрипт (это Артёму) PPS: Пока лучше не ставить, при перезаходе показывает перезашедшему для всех один профиль - его профиль... (перезаход - имею в виду кнопку Перезайти, а если просто закрыть клиент и снова открыть, то всё нормально). Это попытаюсь исправить. PPPS: Всё, исправил, скрипт годен к употреблению и является лекарством. |
Егор Владимирович | ||
10.8.2010, 17:57 |
Не работает хаб |
Ты нас держи в курсе, когда получится. Порадуемся вместе. |
Demest | ||
7.8.2010, 20:12 |
Хочу провести на хабе жеребьевку ФИФА Чемп мира или лигу чемп всеравно |
Ну вот, не успел я...ну чтоб не пропала работа, всё же закину сюда Имеется уже расставленный список команд. Нужно к ним прикрепить случайно выбранные ники участников. Список участников заполняешь ручками в скрипте, через меню запускаешь команду, в чате выдаст случайно расставленный список. Теперь их присваиваешь к командам сверху вниз подряд: команда-1 = участник по списку в чате-1 команда-2 = участник по списку в чате-2 ..и т.д. Делаешь это прилюдно. Раскрывающийся текст Код --[[ Скрипт случайной расстановки представленного списка. Название: RandomList.lua API: 2 Автор: Ksan (г.Томск) Дата написания: 07-08-2010 --]] -- Ниже ники нужно вписать свои, какие нужно рассортировать tNicks = { "Ник-1", "Ник-2", "Ник-3", "Ник-4", "Ник-5", "Ник-6", "Ник-7", "Ник-8", "Ник-9", "Ник-10", "Ник-11", "Ник-12", } math.randomseed(os.time()) function OpConnected(tUser) Core.SendToUser(tUser, "$UserCommand 1 3 << АДМИНКА >>\\Расстановка ников по случайному выбору$<%[mynick]> !randomnicks|") end function ChatArrival(tUser, sData) local sData = sData:sub(1,-2) local sCmd = sData:match("%b<>%s+(.*)$") if sCmd and sCmd == "!randomnicks" then tTable = tNicks Core.SendToAll("\nСлучайно расставленный список участников:\n") for n = 1, #tTable do t = math.random(#tTable) sNick = tTable[t] Core.SendToAll(sNick) table.remove(tTable, t) math.randomseed(os.time()) -- для гарантированной случайности :) end Core.SendToAll("\n") return true end end |
van21 | ||
6.8.2010, 0:20 |
Хочу провести на хабе жеребьевку ФИФА Чемп мира или лигу чемп всеравно |
Да вообще по алфавиту распредели их и все. Это прокатит нормально, если ники участников уже зафиксированы. |
van21 | ||
1.8.2010, 23:01 |
Может кто-нибудь разбанит? :) |
Наблюдается целенаправленное доставание админа. Результат предсказуем. И правилен. Развлекайтесь другими способами, не задевающими админов и юзеров. |
Saymon21 | ||
31.7.2010, 20:10 |
Не пускает на хаб определенный ник. В чем проблемма? Что случилось? |
1. Учись правильно выбирать определения...Не на канал, а на хаб, это тебе не ИРЦ. 2. Пусть твой юзер откроет в клиенте Избранные хабы, там - свойства того самого хаба, куда не пускает его, и в свойствах пусть удалит чужой ник. 3. Затем пусть снова заходит со своего ника. |
SoK. | ||
30.7.2010, 22:45 |
Новая сказка про репку |
Так как тема как бы про воспитание, выскажу свое, возможно, поверхностное мнение, ибо сильно никогда над этим не думал...Советская система воспитания отрицается по определению, ибо советская, старое дореволюционнное воспитание - его некому доводить до воспитанников, система оборвалась и растворилась в эмиграции либо в советской школе, а постсоветская выросла на дрожжах жизнерадостного молодого капитализма с его меркантильностью и практицизмом + перенятые с запада методики (что-то хорошее, что-то, может, и не очень)... Но тем не менее, из-за неумных оформителей правильных книжек (текст-то тот же самый, что и был и 30 и 100 лет назад) нельзя делать глобальные выводы. Видел я и детсады, и школы...в детсадах воспитание всяко правильнее, чем в школах. А в школах нынче скорее ученики воспитывают учителей, чем наоборот...вот это грустно. |
Nickolya | ||
28.7.2010, 12:50 |
Скрипт статистики для админов Статистические данные о посещаемости |
Добавил строку для очистки памяти. Перезалил в предыдущем сообщении. Желательно скачать исправленный скрипт. |
Invisible, valdis73 | ||
28.7.2010, 12:22 |
Скрипт статистики для админов Статистические данные о посещаемости |
Вот набросал скриптик статистики по IP и по никам. То есть, записывает в таблицу и в файл - сколько раз заходили с того или иного айпи или ника, а также сохраняет дату-время первого захода и последнего захода (дата-время - чтоб знать, за какое время были совершены столько заходов). Выглядят таблицы так: Код tNicks = { ["Типа-тест"] = { [1] = "28-07-2010 16:07", [2] = 2, [3] = "28-07-2010 16:08", }, ["Ksan"] = { [1] = "28-07-2010 16:08", [2] = 2, [3] = "28-07-2010 16:09", }, } tIPs = { ["192.168.1.2"] = { [1] = "28-07-2010 16:07", [2] = 4, [3] = "28-07-2010 16:09", }, } Папка и файлы под таблицы создаются при первом запуске. Как посмотреть - пока не стал делать вывод через меню, но можно открыть таблицу с файла обычным блокнотом и увидеть картину. Не знаю, надо ли делать вывод. |
Nickolya, Invisible, valdis73, мамин_парень | ||
26.7.2010, 16:39 |
Скрипт статистики для админов Статистические данные о посещаемости |
Нет, там чисто гистограмма по количеству посетителей на каждый момент (каждые полчаса), без всяких деталей. Число и время. Ну и сам график. |
valdis73, мамин_парень | ||
26.7.2010, 15:23 |
Скрипт статистики для админов Статистические данные о посещаемости |
Один из вариантов - тут. Показывает график посещений столбцами за каждые полчаса. Получается наглядная гистограмма. |
valdis73, мамин_парень | ||
23.7.2010, 10:21 |
Сообщение юзерам с нулевой шарой Сообщение юзерам с нулевой шарой |
Вообще-то скриптик из этого сообщения как раз именно это и делает - при входе сообщает о шаре и больше ничего не делает...только я там в одном слове одну букву вместо заглавной написал строчную, потому и не работал скрипт, сейчас поставил проверил и исправил, работает. Вот эту строку Код if tUser.iSharesize < iSharaB then надо заменить на эту Код if tUser.iShareSize < iSharaB then и всё будет работать. Требуемую шару и текстовку можете переделать под себя. |
Nickolya | ||
7.7.2010, 15:21 |
Чем отличается ? |
При полном бане с забаненного IP на хаб не попадут даже админы, даже если у них стоит в профиле галочка "Заходить с забаненных IP", не говоря уже о простых юзерах. Соответственно, при простом бане такие заходы возможны, даже юзер, если стоит эта самая галочка в профиле. Так что следите за галочками, а то ваши баны могут оказаться бесполезными. |
Drakula | ||
7.7.2010, 13:19 |
MixMsg Перемешивает буквы в сообщениях, но смысл не теряется. |
Название: MixMsg_api2.lua API: API 2 Версия: 1.0 Автор: Ksan (aka Trans) Дата написания: 28-05-2010 Место проживания автора: г.Томск (Россия) Описание: Скрипт перемешивания букв слов сообщений, получая достаточно внятный текст (на определенное количество минут). Эта же фраза, только написанная с помощью скрипта: Цитата Скирпт пееремишавния букв слов собоещний, поулчая дотстачоно внтяный текст (на опеределнное коилечтсво минут). Применяется как админами ко всему чату или отдельному юзеру, так и отдельными юзерами (включая и админов) к себе самому (однако при массовом применении админов и випов (это регулируемо) не трогает). При повторном применении команды до срока действие прекращается сразу. Ник адресата в измененном сообщении не меняется, также не меняются магнеты и ссылки на сайты, не трогает скрипт и стандартно сделанные смайлы (которые между двумя двоеточиями), так что иногда юзеры даже не замечают, что буквы перемешаны, а кто замечает, думает, что опечатался. Скрипт из разряда развлекательных. |
Nickolya, ustas, FallenAngel, Drakula, Saymon21, DEN 007 | ||
7.7.2010, 11:53 |
Скрипт предупреждения ботом хаба |
Оформил отдельной темой, добавив в скрипт кик от имени бота (вместо ника опа) или вовсе без автора. Искать тут. |
Nickolya | ||
7.7.2010, 11:28 |
BotForOp Писать, предупреждать и кикать от имени бота |
Название скрипта: BotForOp_api2.lua API: PtokaX API 2 Версия: 1.0 Автор: Ksan (aka Trans) Дата написания: 07-07-2010 Место проживания автора: г.Томск (Россия) Описание: Возможности (всё это - от имени бота): - писать в чат соообщения - писать юзеру в чате тихо (видит только он) - писать юзеру в чате громко (видят все) - писать юзеру в приват - предупреждать юзера (видят все) - кикать - 1. если с причиной - от имени бота, 2. если поле для причины оставить пустым - без автора, но с дежурной фразой "Не доставай!" - помощь по командам этого скрипта (в приват) - важно, когда хочешь написать в чат многострочное сообщение, которое через меню не отправишь Права (кто может применять сии команды): - предупреждение и кик - кто имеет право на кики - всё остальное - кто может банить Написан по большей части на основании приёмов и кодов других скриптёров. Сейчас уже трудно что-то своё внести. |
Nickolya, ustas, Invisible, rival, Saymon21, ramzes, shur49, -Alex-, stailzoRE, AfLc | ||
7.7.2010, 9:40 |
Скрипт предупреждения ботом хаба |
Вот накалякал...точнее, выдрал из своего скрипта спешал фор Ю. Возможности (всё это - от имени бота): - писать в чат соообщения - писать юзеру в чате тихо (видит только он) - писать юзеру в чате громко (видят все) - писать юзеру в приват - предупреждать юзера (видят все) - помощь по командам этого скрипта (в приват) - важно, когда хочешь написать в чат многострочное сообщение, которое через меню не отправишь Права (кто может применять сии команды): - предупреждение - кто имеет право на кики - всё остальное - кто может банить Раскрывающийся текст Код --- Скриптик для предупреждений и сообщений от бота --- Название: BotForOp_api2.lua --- Накалякал Ksan из Томска для Милены Питерской, сидя на плечах гигантов-скриптёров.. sHelp = " *** Помощь по командам (важно при писании в чат сообщений с несколькими строками от имени бота):\n\t!frombottouserpm НИК ТЕКСТ_СООБЩЕНИЯ - сообщение в приват юзера от имени бота\n\t!frombottousermc НИК ТЕКСТ_СООБЩЕНИЯ - тихое сообщение в чате юзеру от имени бота (видит только этот юзер)\n\t!frombottousermcall НИК ТЕКСТ_СООБЩЕНИЯ - громкое сообщение в чате юзеру (видно всем)\n\t!frombottochat ТЕКСТ_СООБЩЕНИЯ - сообщение в чате от имени бота (видно всем)\n\t!warn НИК ТЕКСТ_СООБЩЕНИЯ - предупреждение юзера в чате (видят все)\n\t!helpforwarn - получение этой самой помощи по командам" function OnStartup() sBot = SetMan.GetString(21) end function UserConnected(tUser) local t = ProfMan.GetProfilePermissions(tUser.iProfile) if t then if t.bTempBan then Core.SendToUser(tUser, "$UserCommand 1 2 << АДМИНКА >>\\От имени бота\\Юзеру в приват от бота..$<%[mynick]> !frombottouserpm %[nick] %[line:Текст сообщения]|") Core.SendToUser(tUser, "$UserCommand 1 2 << АДМИНКА >>\\От имени бота\\Юзеру в чат от бота (тихо)..$<%[mynick]> !frombottousermc %[nick] %[line:Текст сообщения]|") Core.SendToUser(tUser, "$UserCommand 1 2 << АДМИНКА >>\\От имени бота\\Юзеру в чат от бота (громко)..$<%[mynick]> !frombottousermcall %[nick] %[line:Текст сообщения]|") Core.SendToUser(tUser, "$UserCommand 1 1 << АДМИНКА >>\\От имени бота\\Сообщение в чате от бота..$<%[mynick]> !frombottochat %[line:Текст сообщения]|") Core.SendToUser(tUser, "$UserCommand 1 1 << АДМИНКА >>\\От имени бота\\Помощь по командам$<%[mynick]> !helpforwarn|") end if t.bKick then Core.SendToUser(tUser, "$UserCommand 1 2 << АДМИНКА >>\\От имени бота\\Предупреждение в чате..$<%[mynick]> !warn %[nick] %[line:Причина]|") end end end OpConnected = UserConnected RegConnected = UserConnected function ChatArrival(tUser, sData) Core.GetUserAllData(tUser) local t = ProfMan.GetProfilePermissions(tUser.iProfile) local sData = sData:sub(1,-2) local s,e, sCmd = string.find(sData, "^%b<>%s+(%S+)") local s,e, sParam = string.find(sData, "^%b<>%s+%S+%s+(.+)") if t then if t.bTempBan then if sCmd and sCmd == "!frombottouserpm" then local s,e, sNick, sMsg = string.find(sParam, "^(%S+)%s+(.+)$") if sNick and sMsg then local CurUser = Core.GetUser(sNick) if CurUser then Core.GetUserData(CurUser, 16) FromBot(CurUser, sMsg) FromBot(tUser, "Юзеру "..sNick.." отправлено в приват сообщение: "..sMsg) else ToUser(tUser, "Ошибка: юзер "..sNick.." не найден на хабе") end else ToUser(tUser, "Ошибка синтаксиса. Синтаксис: !frombottouserpm <ник> <текст сообщения>") end return true end if sCmd and sCmd == "!frombottousermc" then local s,e,sNick, sMsg = string.find(sParam, "^(%S+)%s+(.+)$") if sNick and sMsg then local CurUser = Core.GetUser(sNick) if CurUser then Core.GetUserData(CurUser, 16) ToUser(CurUser, sNick..": *** "..sMsg) ToUser(tUser, sNick..": *** "..sMsg) else ToUser(tUser, "Ошибка: юзер "..sNick.." не найден на хабе") end else ToUser(tUser, "Ошибка синтаксиса. Синтаксис: !frombottousermc <ник> <текст сообщения>") end return true end if sCmd and sCmd == "!frombottousermcall" then local s,e, sNick, sMsg = string.find(sParam, "^(%S+)%s+(.+)$") if sNick and sMsg then local CurUser = Core.GetUser(sNick) if CurUser then Core.GetUserData(CurUser, 16) FromBotToChat(sNick..": *** "..sMsg) else ToUser(tUser,"Ошибка: юзер "..sNick.." не найден на хабе") end else ToUser(tUser, "Ошибка синтаксиса. Синтаксис: !frombottousermcall <ник> <текст сообщения>") end return true end if sCmd and sCmd == "!frombottochat" then local sMsg = sParam if sMsg then FromBotToChat(sMsg) else ToUser(tUser, "Ошибка: Нет текста сообщения") end return true end if sCmd and sCmd == "!helpforwarn" then FromBot(tUser, sHelp) return true end end if t.bKick then if sCmd and sCmd == "!warn" then local s,e, sNick, sMsg = string.find(sParam, "^(%S+)%s+(.+)$") if sNick and sMsg then local CurUser = Core.GetUser(sNick) if CurUser then Core.GetUserData(CurUser, 16) FromBotToChat(sNick..": *** Вам предупреждение: "..sMsg) else ToUser(tUser, "Ошибка: юзер "..sNick.." не найден на хабе") end else ToUser(tUser, "Ошибка: Вы не ввели ник или причину!") end return true end end end collectgarbage("collect") end function FromBot(user, msg) Core.SendPmToUser(user, sBot, msg) end function ToUser(user, msg) Core.SendToUser(user, "<"..sBot.."> "..msg) end function FromBotToChat(msg) Core.SendToAll("<"..sBot.."> "..msg) end Вот думаю, может, кинуть это отдельной темкой (но вроде слишком незначительная вещь, чтоб тратить на неё место на форуме).. |
Milena, Saymon21 | ||
4.7.2010, 21:26 |
Скрипт Release для PtokaX 0.4.1.x нужен скрипт аля Release or Request (by jiten) под API2 |
Тут принято "спасибо" выражать нажатием кнопки одноимённой под ником того, кого благодаришь. |
мамин_парень | ||
2.7.2010, 4:50 |
Protector API2 | бот всё в одном |
Попробуй в этой функции закомментить (то есть, сделать неактивной) одну строку (в нижепоказанном коде я уже закомментил эту строку): Код function ValidateNickArrival(tUser, sData) if tUsers[tUser.sIP] then CheckBans(tUser) -- AutoRegCheck(tUser) end end Может, прокатит.. |
diss | ||
24.6.2010, 2:40 |
DC for Windows mobile т.п. |
Есть PocketDC, но очень неудобен в использовании, к тому же есть глючок в сохранении настроек - после ввода ника, пароля, описания всё это позже сдвигается в соответствующих окошках с одного на другое и запаришься потом снова это прописывать... А так - вполне рабочий софт, можно эмулировать до 50 гб шары, есть приват, столбцы разные в списке юзеров. Да, ещё, - одновременно можно сидеть только на 1 хабе, приходится перезаходить. Я сидел на нём некоторое время. Автор, похоже, забил на него, с 2007 года нет изменений. Поищи в интернете по названию, скачай и поставь, может, тебе понравится. Кстати, кроме него для ВинМобила нет другого клиента. По крайней мере, в марте ещё не было. |
TommyKaira | ||
22.6.2010, 19:51 |
Скрипт "Народная мудрость" API2 |
Вот версия скрипта с добавлением минимального необходимого периода между "мудростями", чтоб не злоупотребляли. Паузу можно задать как в секундах, так и в минутах. |
Nickolya, prokazzza, ramzes, ProGeTTo | ||
16.6.2010, 16:08 |
Antibot API2 | Скрипт против ботов |
Полагаю, он имеет в виду, что юзеру присылается картинка, нарисованная ASCII-символами, а в картинке - числа. Я тоже уже думал над таким вариантом, но я не сторонник таких ограничений, поэтому не стал делать. Это реально сделать, реально сделать и разные картинки одних и тех же чисел, но игра не стоит свеч. Чем не устраивает обычная математическая задача?... (это я уже Дракуле) Типа чтоб круто было? |
Drakula | ||
10.6.2010, 21:56 |
BanMsg API2 | Выводит инфу в чат |
Вредный совет. Менять нужно только там, где необходимо. Иначе в чат сообщения пойдут голосом бота, но от имени админа...И будет глупо. Вот одна строка, как пример, где бездумная замена приведёт к конфузу: Код Core.SendToAll("<"..sBot.."> "..tUser.sNick.." навсегда забанил юзера с ником: "..sNick.." по причине: "..sReason) Я думаю, вопрошающий товарищ с непроизносимым ником теперь сам догадается, в каких местах нужно поменять и что на что.. |
Invisible, Accelerator | ||
7.6.2010, 18:12 |
Запрет снятия банов, поставленных другими людьми |
Я думаю, запрет должен касаться только тех банов, которые поставили коллеги одного уровня, или выше.. Например, ОП не может снять бан другого ОПа или мастера(он же админ). А мастер должен иметь право снимать любой бан ОПов, разве что пусть не сможет снять баны другого мастера (иногда же бывает их больше одного) |
bot9ra | ||
5.6.2010, 14:50 |
очень не плохая идея если возможно! |
А можно тебе тоже дать идею? А попробуй-ка ты сам поизучать Луа, писать скрипты и изучить настройки Птоки, это ведь всё же не университет кончать. Ещё одному разбирающемся хоть сколько-то в скриптах мы будем только рады. А идеи подкидывать - не мешки ворочить.. |
мамин_парень | ||
24.5.2010, 22:03 |
AntiReclama_by_Ksan Тихая антиреклама чата и привата с удалённым управлением |
Прошу прощения за второе сообщение подряд, но тема не апнулась при внесении изменений в первое сообщение. Короче, скрипт капитально изменен и добавлен в первое сообщение. Жду комментов. |
Nickolya, Kingston, Dimon21, X-Sky, мамин_парень | ||
23.5.2010, 21:41 |
Нужен скрипт описания. |
Замена описания делается легко, но я противник тотального принудительного однообразия, поэтому не стану помогать. Да и подозреваю, что отсыл измененных описаний каждого и всем - несколько может оказаться напряжно, в отличие от отсыла подмененного описания только одного или нескольких юзеров - всем. Хотя тут могу оказаться не правым, не проверял. Надо - изучи темы, скриптыподмены описаний и сам сделай. |
forZejkee | ||
14.5.2010, 11:12 |
Вопросы по скриптам Мелкие вопросы |
Вот рабочий пример функции которая позволяет юзеру выбирать отсылать ли ему сообщение при входе или нет. Автор Nickolya [attachment=4268:Example.lua] От себя выражаю огромное спасибо Nickolya. Скрипт работает только до первой перезагрузки (скрипта). Вот более правильный код (сравни со своим): Раскрывающийся текст Код sOurFileWay = Core.GetPtokaXPath().."scripts/somefile.txt" -- путь к файлу tTableData = {} function OnStartup() if loadfile(sOurFileWay) then dofile(sOurFileWay) end end function OnExit() SaveToFile(sOurFileWay, tTableData, "tTableData") -- сохраняем при выходе end function UserConnected(user) -- меню: Core.SendToUser(user, "$UserCommand 1 3 Информация\\получать$<%[mynick]> +ИзменитьСтатус on|") Core.SendToUser(user, "$UserCommand 1 3 Информация\\не получать$<%[mynick]> +ИзменитьСтатус off|") if not tTableData[user.sNick] then -- проверяем на отсутствие ника в таблице и если его там нет то отсылаем ему информацию Core.SendToUser(user, "..........") end end OpConnected = UserConnected RegConnected = UserConnected function ChatArrival(user, sData) local sCmd, sOption = sData:match"%b<>%s+[!%+%*](%S+)%s*(%S*).*|$" -- отлавливаем команду и аругмент после нее if sCmd == "ИзменитьСтатус" then -- если наша команда if not sOption then -- если вдруг отсутствует статус в команде Core.SendToUser(user, "*** Вы не ввели статус команды!") elseif sOption == "on" then -- если опция после команды on то if not tTableData[user.sNick] then -- если ника нет в таблице то он получает инфу Core.SendToUser(user, "*** Вы и так получаете информацию при входе!") else tTableData[user.sNick] = nil -- иначе удаляем ник из таблицы SaveToFile(sOurFileWay, tTableData, "tTableData") Core.SendToUser(user, "*** Теперь вы получаете информацию при входе!") end elseif sOption == "off" then -- если опция после команды off то if tTableData[user.sNick] then -- если ник в таблице Core.SendToUser(user, "*** Вы и так ничего не получаете при входе!") else tTableData[user.sNick] = true -- иначе добавляем ник в таблицу SaveToFile(sOurFileWay, tTableData, "tTableData") Core.SendToUser(user, "*** Теперь вы не получаете информацию при входе!") end else -- если опции нет или она какая-то странная Core.SendToUser(user, "*** Неверный статус команды!") end return true end end |
Saymon21 | ||
12.5.2010, 22:33 |
Добавьте пожалуйста |
Я не знаю, как ты базу заполнял, но у меня в таком виде работает нормально, и по запросу, и автоматом. Если попробуешь и снова не получится (не верю я, что не получится), то просто закомментишь строку отправления команды в меню. А вот, собственно, и сам код: Раскрывающийся текст Код local sBot = "xxx" local iTimer = 30 -- в минутах tMessarray = { " :huh: ", " :ignoring: ", " Через меню можно вызвать FAQ - ответы на частые вопросы.", " Желающие зарегистрироваться в хабе могут это сделать через меню \"Регистрация\"", } math.randomseed(os.time()) function OnStartup() tmr = TmrMan.AddTimer (iTimer*60*1000) end function OnTimer(tmr) Core.SendToAll("<"..sBot.."> "..tMessarray[math.random(1,#tMessarray)]) end function UserConnected(tUser) Core.SendToUser(tUser, "$UserCommand 1 3 Запрос$<%[mynick]> !запрос&#*124;") -- в этой строке в конце нужно удалить звездочку * end OpConnected,RegConnected = UserConnected,UserConnected function ChatArrival(tUser, sData) local sData = sData:sub(1,-2) local s,e, sMsg = sData:find("^%b<>%s(.*)$") if sMsg:find("!запрос") then Core.SendToAll("<"..sBot.."> "..tMessarray[math.random(1,#tMessarray)]) -- если надо отправить всем в чат -- Core.SendToUser(tUser, "<"..bot.."> "..messarray[math.random(1,#messarray)]) -- если надо отправить только запрашивающему в чат, открываешь спереди эту строку и аналогично закрываешь (ставишь 2 этих знака --) предыдущую строку return true end end Для большей степени случайности добавил ещё одну строку: Цитата math.randomseed(os.time()) Да, чуть не забыл, в это строке надо удалить в конце звёздочку: Код Core.SendToUser(tUser, "$UserCommand 1 3 Запрос$<%[mynick]> !запрос&#*124;") Думаю, из-за этого конца у тебя и не работало меню (я сам забыл в предыдущем скрипте пририсовать звёздочку) |
denis | ||
12.5.2010, 18:25 |
Добавьте пожалуйста |
Оп-с, забыл в одном месте исправить переменную. В предыдущем сообщении подправил. |
denis | ||
12.5.2010, 6:42 |
приветствия для каждого ника |
Никак вы не поймёте, что человек хочет, чтоб у каждого юзера было своё приветствие, по крайней мере, у тех, кто в базе приветствий...Независимо от профиля. В скрипте в предыдущем сообщений уже заложена такая возможность - вместо профилей в таблице нужно прописать ники желающих получать своё приветствие в таком виде: Код ["Это_ник_юзера"] = "Тут приветствие этого юзера", А в целом скрипт может выглядеть так:Раскрывающийся текст Код local sBot = SetMan.GetString(21) sHelloMessages = { ["TROJAN"] = " Подтянув Галстук, Аккуратно Причесан и Одет в Черном, Блестящем Смокинге. Главный Администратор хаба Открыл Дверь.. и вошел в главный зал хаба! Предклонитесь Перед Богом Хаба.. и Он благословит вас- мы Приветствуем тебя, о TROJAN!", -- ДобАвляем свои привеТствиЯ кому надо! ["Не-TROJAN"] = " Поприветствуем Модератора Не-TROJAN!", ["Ksan"] = " А вот и Ksan! Как мы тебе рады, заходи, раздевайся и будь как дома! :) ", ["Test_user"] = " Вау, кто к нам пришёл, - сам Test_user! Как мы тебе рады, заходи, раздевайся и будь как дома! :) ", } function UserConnected(tUser) local sHelloMes = sHelloMessages[tUser.sNick] if sHelloMes then Core.SendToNick(tUser.sNick,"<"..sBot.."> ••• "..sHelloMes.."! •••") Core.SendToAll("<"..sBot.."> ••• "..sHelloMes.."! •••") end end OpConnected = UserConnected RegConnected = UserConnected А в базу заносит ник и приветствие к нику по просьбе самого юзера сам админ. В принципе, можно и через меню вносить, но это уже значительно усложнит скрипт. |
Nickolya, FallenAngel, Invisible, CrazyCat, мамин_парень | ||
12.5.2010, 5:07 |
Добавьте пожалуйста |
Попробуй: Раскрывающийся текст Код local sBot = "xxx" local iTimer = 30 -- в минутах tMessarray = { [[ ]], } function OnStartup() tmr = TmrMan.AddTimer (iTimer*60*1000) end function OnTimer(tmr) Core.SendToAll("<"..sBot.."> "..tMessarray[math.random(1,#tMessarray)]) end function UserConnected(tUser) Core.SendToUser(tUser, "$UserCommand 1 3 Запрос$<%[mynick]> !запрос|") end OpConnected,RegConnected = UserConnected,UserConnected function ChatArrival(tUser, sData) local sData = sData:sub(1,-2) local s,e, sMsg = sData:find("%b<>%s(.*)$") if sMsg:find("!запрос") then Core.SendToAll("<"..sBot.."> "..tMessarray[math.random(1,#tMessarray)]) -- если надо отправить всем в чат -- Core.SendToUser(tUser, "<"..bot.."> "..messarray[math.random(1,#messarray)]) -- если надо отправить только запрашивающему в чат end end |
denis | ||
9.5.2010, 11:24 |
Дисконектер |
значит в конечном итоге так: Код ExNicks = {"ник1","ник2",} function ValidateNickArrival(tUser,data) for i = 1, #ExNicks do if (not tUser.sNick == ExNicks[i]) then Core.SendToUser(tUser, "Хаб на реконструкции") Core.Disconnect(tUser) end end end UserConnected, RegConnected = ValidateNickArrival, ValidateNickArrival спасибо Setuper и Ksan Ты опять путаешь людей.. :( Надо вот так: Код if not (tUser.sNick == ExNicks[i]) then Будь внимательнее, плиз! NOT вне скобок! |
Drakula | ||
8.5.2010, 21:08 |
PtokaX Linux |
А чтоб смешнее было. |
X-Sky | ||
8.5.2010, 20:58 |
Дисконектер |
Вот это: Код tUser.sNick == ExNicks[i] заключи в скобки: Код (tUser.sNick == ExNicks[i]) |
Serx, Drakula | ||
8.5.2010, 10:46 |
AntiReclama_by_Ksan Тихая антиреклама чата и привата с удалённым управлением |
Название скрипта: AntiReclama_by_Ksan.lua (с удалённым управлением всего и вся через меню) API: PtokaX API 2 Автор: Ksan (aka Trans) Дата написания: (07-08)-05-2010 Место проживания автора: г.Томск (Россия) Версия: 1.0 Описание: Скрипт антирекламы (чат и приват) Особенности: возможность выбора некоторых опций через меню (заглушка полная или нет, кикать или дисконнектить, зафлуживать приват рекламщиков или нет), реклама тихая, то есть, рекламщик думает, что реклама прошла, несмотря на пинки и зафлуживание, а при режиме заглушки "0" (отмена флуда и киков разных) и вовсе не заметит подвоха. Регистронезависимость. Примечание: Вариантов реагирования 5: -- Тихая заглушка без доп. акций (режим "Zero") -- Зафлуживание рекламщика + дисконнект -- Зафлуживание + кик -- Просто дисконнект -- Просто кик Общее для всех вариантов - рекламщику кажется, что реклама всё-таки прошла куда надо. Все варианты переключаются между собой через меню скрипта. Версия 2.0 ••• Изменения: - при первом запуске необходимые файлы и папка для них создаются автоматически; - через админское меню можно добавлять-удалять рекламные, исключений и флудовые шаблоны, а также просматривать списки всех этих шаблонов; - при добавлении-удалении шаблонов скрипт теперь не надо перезапускать: - решена проблема обхода антирекламы вводом в сообщение слов из таблицы исключений; - добавлено блокирование IP в чате и приватах (с возможностью отмены через меню). Отдельные IP можно вносить в исключения, как и любое другое слово; - добавлены разнообразные статусные сообщения: в Опчат при перезапуске скрипта и при смене режимов, и в любое время можно посмотреть текущие настройки, получив в приват через меню; - добавлена возможность отключения отправки в Опчат сообщений о рекламе (может оказаться полезной при частых отлавливаемых спамах) - изменен метод получения рандомного ника отправителя для зафлуживания; - некоторая оптимизация кода (надеюсь). ••• Примечания: - структура таблиц несколько иная, чем в предыдущей версии и в большинстве других антиреклам, возможно, придётся шаблоны набивать по-новой. Но я поступил проще - шаблонами старого вида заполнил нужные таблицы (с учётом измененных названий таблиц, естественно) и запустил скрипт. После чего в каждую таблицу добавил шаблон (любой). После этого одноразового действия (для каждой таблицы шаблонов) таблицы сохраняются уже в как нужно. - при отсутствии ТАБЛИЦ шаблонов сообщений для зафлуживания привата рекламщика скрипт будет падать с сообщением вроде этого: ......PtokaX-0.4.1.1\scripts\Anti_Reclama_api2.lua:461: bad argument #1 to 'random' (interval is empty) (номер строки может оказать у вас иным), поэтому желательно, чтоб в таблице был хотя бы один образец сообщения. ••• Советы для малоопытных: - шаблоны вбивайте максимально укороченные, но достаточные для отлова рекламы. Не нужно в шаблонах оставлять интернет-префиксы типа dchub://, http:// и www (разве что только в исключениях). Если вы запрещаете любые ссылки, то да, можете внести эти префиксы отдельно, а в дальнейшем в шаблонах их отсекайте. - для блокирования рекламы ссылок с реферрерами (с бонусами рекламщику за заход по его ссылке) во многих случаях поможет шаблон ?ref= ••• Пошла версия 2.1: - добавлен 6-й вариант реагирования - "Предупреждение" (при режиме "0") UPD 2: Поменял местами 2 строки (описание ниже в сообщении #10), чтоб сначала отрабатывала функция общей антирекламы, а потом уже, если не было этой отработки, проверка сообщения функцией проверки IP-рекламы. UPD 3: Добавлена возможность предупреждать рекламщика в привате бота при попытке рекламы (в режиме "0"). Это тоже можно переключать через меню скрипта. Дата изменения: 27-12-2010 |
Nickolya, intlive, Wariner, FallenAngel, Tsd, zip2002, Karumo, rival, Kingston, wasd, Saymon21, X-Sky, SAG, Тёмич, доктор ливси, Rei_Volia, STIVAN, pol_91, ProGeTTo, stone, AfLc, мамин_парень | ||
5.5.2010, 5:27 |
Функции Для Разработчиков склад полезных функций |
Ещё одна функция приведения к нижнему регистру (ранее нигде не встречал): Код function StringLower(arg) os.setlocale"Russian_Russia.1251" -- (русс.локаль) arg = string.lower(arg) os.setlocale("C") -- (возврат на станд.локаль) return arg end Работает как с кириллицей, так и с латиницей. Аналогично же и для приведения к верхнему регистру: Код function StringUpper(arg) os.setlocale"Russian_Russia.1251" -- (русс.локаль) arg = string.upper(arg) os.setlocale("C") -- (возврат на станд.локаль) return arg end PS: Уж больно подозрительно простенький код получился, но работает. Если у кода есть побочные вредные эффекты, умные товарищи, надеюсь, не пропустят и подскажут. |
MIKHAIL | ||
4.5.2010, 0:34 |
Блок по тегу Скрипт блокировки по тегу |
Так, на будущее...тут принято тыкать на кнопку "Спасибо", если благодарен кому-то за помощь. |
valdis73 | ||
30.4.2010, 17:52 |
Логотип для RusHub'а ваши варианты и предложения |
Хосспади, люди шуток уже не понимают...куда мир катится. Там же русским по белому написано: Цитата xDDDDD а это до сего дня было кучей улыбок..Что-то в мире изменилось? |
bot9ra | ||
30.4.2010, 1:41 |
Логотип для RusHub'а ваши варианты и предложения |
Типа лёгкая разминка перед сообщением: RuSHuB - некая попытка игры в симметрию; R'' - но тут знак секунды ('') скорее всего воспримется как знак дюйма А секунда типа как признак быстрой загрузки и работы. Разминка закончилась. А вообще, у меня на бумаге были попытки поиграть разного рода противоположнонаправленными стрелками - типа скачивание-отдача.. стрелки - вниз-вверх, направо-налево, узкие, широкие, стилизованные до почти неузнаваемости, похожие на реальные стрелы от лука..и т.д. Но всё это не стал даже переносить на комп, чтоб показать, так как они меня не удовлетворили, а недоконченное я не люблю показывать. А вот направление мысли изложил, может, у кого-то лучше получится. PS: Возвращаясь к бегущему R от Николя - мне думается, от этой картинки надо оставить ТОЛЬКО букву (или человечка), остальное - фон, нижняя часть, обрамляющий квадрат - всё это, думаю, лишнее... Ещё раз выражу своё мнение - знак должен быть очень простым! Самые запоминающиеся - самые простые. |
Nickolya, bot9ra | ||
20.4.2010, 17:29 |
Проверка ников на запретные слова verlihub |
Сравните: Код BotName = "Bot" иКод VH:KickUser(botname, nick, "Реклама в нике") Переменная с ником бота не совпадает по написанию в двух этих строках. |
Nickolya | ||
9.4.2010, 23:09 |
NoDescAdv API2 | Удаление рекламы из описания юзеров |
Скрипт захватывает и подменяет описания с рекламой только при своём запуске-перезапуске, а когда юзер перезаходит или заходит новый юзер при запущенном скрипте, реклама светится без проблем. Поэтому вот решение (очень простое) - добавьте функцию UserConnected с таким содержанием: Код function UserConnected(tUser) Core.GetUserAllData(tUser) MyINFOArrival(tUser,tUser.sMyInfoString) end RegConnected = UserConnected OpConnected = UserConnected PS: Хмм, как мне подсказал автор, этот же результат достигается увеличением в настройках параметра iSendTimer. Я поставил 1000 вместо 500 и теперь даже при заходе-перезаходе юзера скрипт отрабатывает своё назначение.. |
Saymon21, sergius_s | ||
8.4.2010, 23:07 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
1. Попробуй так: замени строки 242 и 243 на эти 2 строки: Код tIPSeparation[i][k]["sFrom"] = CountIP(l.sFrom) tIPSeparation[i][k]["sTo"] = CountIP(l.sTo) И проверь работу скрипта. 2. Если не прокатит (хотя это нужно в любом случае сделать), тогда в таблице с диапазонами сетей оставь только сеть 1. Сеть номер 2 практически равна сети номер 0 (то есть, любой диапазон, не входящий в сеть номер 1). Просто закомменти вторую сеть. И ещё - исправление (удаление функции SRArrival) в первом моем совете остаётся в силе. |
Ольга | ||
27.1.2010, 15:57 |
"Словарь" интернета вот такое вот разочарование |
Привыкшие к украинскому языку на русском языке обычно пишут И вместо Ы ... Но это всего лишь частный случай, а тема поднята правильно. И особенно эта проблема заметна в чатах хабов. Отмазки типа "это же всего лишь чат" не принимаю. Кто может писать правильно и уважает свой язык, пишет правильно везде и всегда. |
X-Sky | ||
26.1.2010, 22:30 |
Антимат Из Хуббы API2 |
"Может, пора что-то в консерватории менять?" (с) Жванецкий. Я смотрю, у тебя ни один скрипт не работает, хотя у всех они работают. Может, начнёшь с нуля? Забей и забудь, всё, что "знаешь", и начни с нуля, как будто увидел Птоку и луа-скрипты первый раз. И внимательно-внимательно читай сообщения знатоков, авторов скриптов и сами скрипты. Где-то же должна скрываться первопричина твоих проблем. |
Wariner | ||
14.11.2009, 15:01 |
Викторина с титулами API2 |
Бери отсюда. Там много интересного добавлено плюс твои титулы есть (больше 100). |
mwnn | ||
1.11.2009, 9:49 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
Вот на всякий случай кладу этот же, но урезанный до минимума, скрипт... Для тех, у кого возникли проблемы с работой скрипта в *nix'ах по той или иной причине, а разделение сетей необходимо. Поиск-скачивание невозможно между сетями намертво, никакого меню нет. При входе юзеру отправляется сообщение о разделении сетей и возможности качать только в пределах своей сети (текст напишете сами, как найдете нужным) Перезалил. Исправил кое-что мелкое (хотя из-за этого мелкого мог работать неправильно) |
Nickolya | ||
14.10.2009, 7:51 |
Выбран Оператором надолго ли - ваш прогноз)) |
Удивляюсь я автору темы...Он всё время крутится вокруг собственной персоны, если речь не идет о проблемах со скриптом. Однако, сильные же у него проблемы с окружающим миром! По существу темы - я помню, как автор раньше высказывался резко против админов (опов) и даже показывал логи, как он их доставал (хотя цель показа была направлена против админов). Надеюсь, и полагаю, что обязательно найдется аналогичный же юзер и на его голову, и он поймёт, как был неправ раньше, будучи юзером. Админская (опская) работа - неблагодарная. Юзеру не стоит руководствоваться при оценке админа только личными обидами (это так, задним числом автору). |
Wariner, mariner, X-Sky | ||
18.9.2009, 2:20 |
CountGraphic API2 | Диаграмма посещаемости хаба по запросу отправляется в приват |
Хорошо, уговорили, сегодня переведу и кину в первом сообщении переведенный на API 1 скрипт, вечерком (сейчас у меня 6 утра, спешу на работу). PS: Добавил в первый пост скрипт под API 1, предварительно исправив один косячок (раньше при старте инициировался приват не того бота). Теперь оба скрипта в одном архиве. PSS: 2thehawk: Ты забыл, наверно, создать (или скопировать из архива) папку с первоначальным файлом для таблицы графика. |
thehawk | ||
15.9.2009, 9:28 |
TEST |
А я и не знал, что было такое ограничение Наверно. можно и без сообщений чтоб могли благодарить. Это же позитифф, а разве можно позитифф ограничивать?! |
LaLa | ||
15.9.2009, 6:30 |
TEST |
Кстати, у нас в городе была известная форумчанка с ником LaLa, очень даже умница... Это не ты был? |
Nickolya, LaLa | ||
15.9.2009, 5:58 |
Gagbyshare API2 | Гаг по шаре |
2prapor: Сорри, это моя ошибка...в шапке функции: Код function Core.ToArrival(tUser,sData) убери "Core.", должно быть так:Код function ToArrival(tUser,sData) Когда сюда писал код, я проверял на старом АПИ, там это прокатывало. Сейчас проверил на новом, только тогда понял, что забыл убрать лишнее... |
prapor | ||
9.9.2009, 16:11 | У вас нет прав на просмотр этой темы | У вас нет прав на просмотр этого сообщения |
FBR, FallenAngel | ||
6.9.2009, 5:54 |
CountGraphic API2 | Диаграмма посещаемости хаба по запросу отправляется в приват |
Название скрипта: CountGraphic Версия API: API 2 Автор: Trans (изм. на Ksan) Описание: Каждые полчаса (по умолчанию) записывает в файл таблицу со столбцами графика посещаемости (наполнненности) хаба, при запросе через меню отправляет в приват график от 1 суток до 30 ( админ, ник которого вписан в настройках скрипта, может запросить график до 365 суток). Запросы начнут удовлетворяться не ранее, чем через сутки. В силу особенностей текстового режима клиента столбцы графика добавляются сверху вниз и столбец расположен горизонтально. в начале столбца дата-время, в конце - число юзеров. Для просмотра удобнее уменьшать масштаб содержания окна через CTRL+колесико_мышки. Полагаю, что представляет интерес для анализа динамики наполнения хаба по времени суток, по дням и месяцам...и вообще, просто для интереса. PS Исправил ошибку, внесенную при корректировке скрипта, перезалил. Апгрейд: --- Версия 1.3 (08-09-09 20:20) --- Теперь в таблицу записывается только дата-время и число, а столбцы строятся при отправке по запросу --- При выдаче по запросу столбец за нулевой час суток строится из других элементов для выделения насыщенностью цвета, и рядом с числом юзеров пишется дата --- Исправлена ошибка в условии с профилем юзера - вместо квадратных скобок были круглые --- Эта версия совместима с предыдущей, то есть, ранее созданная часть таблицы будет обрабатываться одинаково с последующими частями и выдаваться корректно по запросу. Так что если у кого таблица уже есть, то не заменяйте пустой из моего архива. --- (18-09-09 19:40) --- Исправил 1 косячок (раньше при старте инициировал приват не того бота) --- Добавил скрипт под API 1. --- Теперь оба скрипта в 1 архиве. Картинки ниже - из предыдущей версии. Вот примеры (одна картинка без изменения масштаба, вторая - с уменьшением): [attachment=3171:CountGraph_1.jpg] [attachment=3172:CountGraph_2.jpg] P.S.: У архивного файла расширение почему-то при скачивании оказывается не .RAR, а .ZIP (хотя я закачивал именно с .RAR). Так что если у кого-то архив не раскрывается с ошибкой, переименуйте расширение на .RAR (вместо .ZIP) и пробуйте снова. |
Nickolya, intlive, dimetrius, FBR, Invisible, степашка, district, denis, PomanoB, valdis73, Andrew Frost, 12345, Saymon21, X-Sky, thehawk, Pro009, Cyber_voodoo, AfLc, GULAM33, мамин_парень | ||
25.8.2009, 17:17 |
Network Separation API1, API2 | Скрипт разделения сетей пользователей |
Найди вот эту функцию: function MakeStatusMsg(curUser) и в теле функции закомментируй (то есть, поставь по 2 знака тире -- спереди) 3 строки эти: Код if iUsersNetwork ~= 0 then sMsg = sMsg..". Диапазоны вашей сети: "..tDiaps[iUsersNetwork] end |
FBR | ||
6.8.2009, 13:04 |
Викторина API2 |
Да не парьтесь вы. Вот получите готовую викторину. Изменения: 1. Периодические объявления в чат о количестве играющих и на какой вопрос сейчас отвечают, с предложением присоединиться и как это сделать. (об этом писал в своем предыдущем сообщении) 2. Одинокий игрок не может наращивать очки, хотя отвечать на вопросы может. 3. Всякие там таблицы-списки с топами и очками выводятся в отдельный приват, а не будут загромождать общий чат или игру. 4. Увеличена база. |
FallenAngel, Артём, TiGRpp, striker, AfLc | ||
4.8.2009, 9:44 |
нужен скрипт |
2skonda: Вот тебе то, что надо (это модернизированный вариант скрипта из предыдущего сообщения) : HelloBotAkaVerliHub_1.1_api2.lua |
skonda | ||
4.7.2009, 7:10 |
Простой скрипт регистрации от NRJ API2 | Скрипт просто регистрирует |
Название: RegBot.by.NRJ Версия: v. 1.2 (22/09/06) Автор: NRJ Версия API: API1, API2 Описание: Простой скрипт регистрации Команды: !regme <pass> - зарегистрироваться !passwd <new_pass> - изменить пароль (встроенная команда) !unreg - удалить регистрацию Changelog: Перевёл на API 2 - Trans (и убрал генерируемый пароль, причина - очень часто юзеры не запоминают его, а также удалил отсылку в приват напоминания о регистрации, уж очень раздражает, ну, и добавил, как всегда, комменты почти к каждой строке для понимания процесса) **1.2** - незарегистрированные пользователи при входе на хаб получают сообщение о неоходимости регистрации - добавлена команда !reghelp **1.1** - добавлена команда !unreg - добавлено меню для зарегистрированного пользователя Комментарий от автора темы: Причина перевода и помещения сюда этого скрипта в том, что другие доступные тут скрипты слишком замудрёные и набиты излишествами, и половина из них вдобавок со скрытым кодом. Пусть будет на выбор и простой надёжный скрипт от старого доброго NRJ! Скрипт небольшой, это от моих комментов он увеличился в объеме Добавил и оригинальный скрипт (API1) |
district, denis, LOKI, striker, доктор ливси, vanga96, Yamakasi | ||
25.6.2009, 15:07 |
Hub Menu API2 | Меню для встроенных команд PtokaX |
Я не спорю насчет динамических, но ведь скрипт делался не под ваш хаб, а для всех. Можно просто дополнить парой команд бана ника и все. Кстати, насчет динамических - надо заглушать их незаметной заглушкой по IP на 1 сутки, а не банить. Пусть думают, что они небанимые. |
X-Sky | ||
23.5.2009, 13:57 |
Ipgag V.3.01 API1 | навороченная заглушка юзеров |
это понятно. но я говорил именно про перекрёстную функциональность. такую функцию встречал на нескольких ресурсах. весьма удобно. кстати не мог бы приложить свою переделку сюда? спасибо Пожалуйста! В скрипте места, где изменены или добавлены строки или закомментены, в конце добавлен коммент для понимания изменений. И ещё - скрипт настроен для использования некоторых команд юзерами VIP-профиля (хелп, заглушка через ник, снятие заглушки через ник), так что учтите этот момент (вдруг кто будет использовать как есть). PS: Забыл указать - для API 1 PPS: (13-08-09) Перезалил (исправил ошибку оригинального скрипта, связанную с лишним полем в сообщении. Подробнее в сообщении №42). Правда, исправление касается только закомментированного куска, так что если кто использует скрипт только в "тихом" виде, то можно не суетиться насчет изменений. Исправил ещё в 2 местах в слове GetOpChatName маленькую букву "с" на большую "С" (при снятии заглушки до срока это могло привести к падению скрипта с соответствующей ошибкой). |
степашка | ||
16.4.2009, 10:58 |
Stoptrep API2 | Запрещает говорить больше N сообщений подряд в чате |
Invisible, доктор ливси | |||
|
Сейчас: 27.11.2024, 1:59 |