myDC.ru

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

 
История благодарностей участнику Jaska. Спасибо сказали: 106
Дата поста: В теме: За сообщение: Спасибо сказали:
4.8.2009, 1:33 нужен скрипт
Код
function UserConnected(tUser)
local Share = Core.GetUserValue(tUser, 16) or 0
Core.SendToUser(tUser,"<"..SetMan.GetString(21).."> Добро пожаловать на хаб\r\n\r\n\tВаш ник: "..tUser.sNick.."\r\n\tIp-адрес: "..tUser.sIP.."\r\n\tВаш профиль: "..ProfMan.GetProfile(tUser.iProfile).sProfileName.." (№ "..tUser.iProfile..")\r\n\tВаша шара: "..Share.." байт")
end

OpConnected = UserConnected
RegConnected = UserConnected


шара в байтах, чтобы перевести в нормальный вид нужно воспользоваться функцией из этого раздела http://mydc.ru/topic334.html там их несколько выбери сам))))
skonda
16.6.2009, 18:52 Txt_manager
API2 | Скрипт управления текстовыми файлами
Ну почему сразу "хрен с ней"! С таким подходом ничего не добьешься!

В первом приближении выглядит примерно так .. хотя я думаю есть более оптимальное решение.

CODE
sBot = SetMan.GetString(21) -- Имя бота

tProfiles = { -- Разрешенные профили
[0] = 1,
}

function ChatArrival(tUser,sData)
local sData = sData:sub(1,-2)
local _,_,sCmd = sData:find"%b<>%s+(%S+)"
if sCmd == "!setmotd" then
local _,_,sMsg = sData:find"%b<>%s+%S+%s+(.*)"
if sMsg then
if tProfiles and tProfiles[tUser.iProfile] == 1 then
SetMan.SetMOTD(sMsg)
Core.SendToUser(tUser,"<"..sBot.."> Сообщение дня успешно изменено!")
else
Core.SendToUser(tUser,"<"..sBot.."> Ошибка! У вас нет прав на использование данной команды!")
end
else
Core.SendToUser(tUser,"<"..sBot.."> Ошибка! Вы не ввели текст сообщения дня!")
end
end
return true
end
Nissan_GT
16.6.2009, 12:42 Релизы с phpbb3 форума/трекера..
У тебя не стоит библиотека MySQL. Скачай Отсюда и закинь в одну из этих папок
Caratel
15.6.2009, 22:11 Motd
CODE
sPath1 = Core.GetPtokaXPath().."texts/Motd1.txt"
sPath2 = Core.GetPtokaXPath().."texts/Motd2.txt"
sPath3 = Core.GetPtokaXPath().."texts/Motd3.txt"

function UserConnected(tUser) -- для незарегистрированных
if GetFile(sPath1) then
Core.SendToUser(tUser,GetFile(sPath1))
end
end

function RegConnected(tUser) -- для зарегистрированных
if GetFile(sPath2) then
Core.SendToUser(tUser,GetFile(sPath2))
end
end

function OpConnected(tUser) -- для операторов
if GetFile(sPath3) then
Core.SendToUser(tUser,GetFile(sPath3))
end
end

function GetFile(file)
local f = io.open(file, "r")
local message = f:read("*all")
f:close()
return message
end


что-то типо того должно быть
Goblin
15.6.2009, 19:55 Motd
Код
function [b]UserConnected[/b](tUser) -- для незарегистрированных
Core.SendToUser(tUser,"Текст")
end

function [b]RegConnected[/b](tUser) -- для зарегистрированных
Core.SendToUser(tUser,"Текст")
end

function [b]OpConnected[/b](tUser) -- для операторов
Core.SendToUser(tUser,"Текст")
end
Артём
14.6.2009, 12:38 Релизы с phpbb3 форума/трекера..
Юзайте [attachment=2674:ppkBB3.lua]
serrrios, valdis73
3.6.2009, 18:37 Lua Api Функции Hex Хаба
Описание функций
Делаю тему закрытой. Переодически будет обновляться. Помощь в переводе или замечания в личку.

1. События

OnLoad() and OnUnload() - Выполняется при загрузке/выгрузке скрипта.

OnError(sErrorMessage) - Выполняется при обнаружении в скрипте ошибки.
sErrorMessage - текст ошибки.

OnUserJoined() and OnUserParts() - Выполняется при входе пользователя на хаб.

OnPmToBot(iBotId, iUserId, sData) - Выполняется при получении зарегистрированным ботом приватного сообщения.
iBotId - идентификатор бота.
iUserId - идентификатор пользователя.
sData - текст сообщения.

OnTrigger(iTriggerId, iUserId, bIsPm, sParameters) - Выполняется при использовании зарегистрированного триггера.
iTriggerID - идентификатор триггера.
iUserId - идентификатор пользователя.
bIsPm - личка/глав. Чат.
sParameters - Параметры триггера.

OnCommand(iUserId, sData) - Выполняется при поступлении команды (аля $ConnectToMe, $Search, итд)
iUserId - идентификатор пользователя.
sData - текст команды.

OnUnknownCommand(iUserId, sData) - Выполняется при поступлении неизвестной хабу команды.
iUserId - идентификатор пользователя.
sData - текст команды.

OnSaveSettings() - Выполняется при сохранении настроек через GUI либо с использованием триггера.

OnNickChange(iUserId, sOldNick, sNewNick) - Выполняется при смене ника.
iUserId - идентификатор пользователя.
sOldNick - старый ник.
sNewNick - новый ник.

OnChatMessage(iUserId, sData) - Выполняется при отправке пользователем сообщения в чат.
iUserId - идентификатор пользователя.
sData - текст сообщения.

OnPublicMessage(iUserId, sData) - Выполняется при вызове плагином или скриптом Hex.Broadcast()
iUserId - идентификатор пользователя.
sData - текст сообщения.

2. Таблица Hex

Hex.Broadcast(sData) - Отправляет всем подключенным пользователям сообщение.
sData - текст сообщения. Примечание: Сообщение содержащие команды ($ConnectToMe, $RevConnectTome, $To:) не будет отправлено.

Hex.OpchatMessage(sData) - Отправляет сообщение в ОпЧат.
sData - текст сообщения.

Hex.UserCount() - Возвращает количество подключенных пользователей.

Hex.GetTopic() - Возвращает текущий топик.

Hex.SetTopic(sTopic) - Устанавливает новый топик.
sTopic - содержимое топика.

Hex.GetMOTD() - Возвращает текущее сообщение дня.

Hex.SetMOTD(sMotd) - Устанавливает новое сообщение дня.
sMotd - содержимое сообщения дня.

Hex._GetVersion() - Возвращает версию Hex хаба.

Hex.GetScriptsFolder() - Возвращает путь до папки со скриптами.

3. Класс Bot

Bot:Register(sNick) - Регистрирует бота на хабе.
sNick - ник бота.

Bot:Unregister() - Удаляет зарегистрированного бота.
sNick - ник бота.

Bot:GetBotId() - Возвращает идентификатор зарегистрированнго бота.

Bot:GetNick() - Возвращает ник зарегистрированного бота.

4. Класс HelpString

Hex.HelpString(iSection, sLanguage) - Возвращает объект типа HelpString.
iSection - 0 = Информация хаба, 1 = Команды сообщений, 2 = Команды оператора, 3 = reserved, 4 = Управление профилем, 5 = DC++ команды, 6 = Экстра
sLanguage - идентификатор языка ("RU", "EN", "UK" итд)

HelpString:SetString(sHelpString) - Функция добавляет или изменяет предыдущую строку в меню хаба (!help)
sHelpString - сообщение которое будет помещено в !help.

4. Класс User

User:SendData(sData) - Отсылает пользователю сообщение в гл. чат.
sData - Текст сообщения.Присутствие "|"(pipe) в коце сообщения обязательно! Иначе конечный пользователь не увидит сообщения.

User:Disconnect() - Отключает пользователя от хаба.

User:GetNick() - Возвращает ник пользователя. Если пользователь себя переименовал, используйте User:GetClientNick()

User:GetClientNick() - Возвращает ник пользователя установленного в клиенте.

User:GetIP() - Возвращает ip-адрес пользователя как 32-битный номер.

User:GetIPString() - Возвращает ip-адрес пользователя в привычном виде (IPv4)

User:GetOpStatus() - Возвращает статус пользователя на хабе (0 - обычный пользователь, 1 - оператор, 2 скрытый оператор)

User:SetOpStatus(iOpStatus) - Устанавливает статус пользователя на хабе.
iOpStatus - 0 - обычный пользователь, 1 - оператор, 2 скрытый оператор

User:GetUserID() - Возвращает идентификатор пользователя.

User:GetAccountID() - Возвращает идентификатор аккаунта пользователя или 0 если пользователь незарегистрирован.

User:GetProfileID() - Возвращает идентификатор профиля пользователя или -1 если пользователь незарегистрирован.

User:GetLanguage() - Возвращает выбранный пользователем язык хаба.

User:SetLanguage(sLanguage) - Устанавливает пользователю указаный язык хаба.
sLanguage - идентификатор языка ("RU", "EN", "UK" итд)

User:GetMode() - Функция возвращает имя фильтра чата установленного на пользователе.

User:SetMode(sMode) - Функция устанавливает имя фильтра чата на пользователе.
sMode - Имя фильтра чата

User:GetISPName() - Возвращает имя ISP (Internet Service Provider - организация, предоставляющая доступ в интернет конечным пользователям - организациям и частным лицам.)

User:GetAccessLevel() - Возвращает уровень доступа пользователя.

User:SetAccessLevel(iAccess) - Устанавливает уровень доступа пользователя.
iAccess - уровень доступа (от 0 до 49999)

User:BanIP(sReason, iTime) - Функция банит ip-адрес, но не отключает пользователя от хаба.
sReason - причина бана. Обязательно указывать тип бана (_ban0_, _ban1_, _ban2)
iTime - время бана. 0 - "вечный" бан.

User:BanNick(sReason, iTime) - Функция банит ник, но не отключает пользователя от хаба.
sReason - причина бана. Обязательно указывать тип бана (_ban0_, _ban1_, _ban2)
iTime - время бана. 0 - "вечный" бан.

User:BanNickIP(sReason, iTime)(sReason, iTime) - Функция банит ник и ip-адрес, но не отключает пользователя от хаба.
sReason - причина бана. Обязательно указывать тип бана (_ban0_, _ban1_, _ban2)
iTime - время бана. 0 - "вечный" бан.

User:GetFullMyINFO() - Возвращает полную строку $MyINFO пользователя.

User:GetINFO() - Возвращает строку инфо с ограничениями.

User:SetINFO(sMyINFO) - Изменяет строку $MyINFO, но не отправляет пользователям. Измененную строку получат только новые пользователи.
sMyINFO - строка $MyINFO

5. Класс UserCommand

Object:SetUserCommandString(sUserCommand) - Устанавливает меню, которое будет отослано при входе на хаб.
sUserCommand - Команда $UserCommand (максимально 512 символов)

6. Класс Trigger

Trigger:SetTrigger(sTrigger) - Устанавливает имя триггера.
sTrigger - Имя триггера (максимально 40 символов)

Trigger:GetTriggerId() - Возвращает идентификатор триггера.

7. Класс Profile

Profile:GetProfileName() - Возвращает имя профиля.

Profile:Next() - Функция получает следущий профиль. Если следущего профиля не существует или если вы не инициализировали этот объект со значением -1 то функция вернет false, в остальных случаях true.

8. Класс Timer

Timer:Start(iDueTime, iPeriod, sFunctionName) - Функция запускает таймер.
iDueTime = время до первого срабатываения таймера (минимально 1000 ms)
iPeriod = интервал таймера (минимально 250 ms)
sFunctionName = название вызываемой функции при срабатывании таймера.

Timer:Stop() - Функция останавливает таймер.

Timer:GetId() - Функция возвращает идентификатор таймера или 0 если таймер не активен.
Invisible, Maximum, JlёJluK, Saymon21
25.1.2009, 16:10 Компиляция Клиента Strongdc & Flylinkdc
StrongDC++ 221
Для компиляции необходимо:

1. Visual Studio 2008 Team Suite
2. STL ( http://strongdc.sourceforge.net/download/STLPort.7z )
3. WTL ( http://strongdc.sourceforge.net/download/WTL.7z )
4. Исходники StrongDC++ 221

Установки и конфигурирование:

1. Устанавливаем Visual Studio 2008, распаковываем STL и WTL (допустим в папку с Visual Studio 2008)
2. Запускаем install.bat в папке STL (предварительно откройте текст батника проверьте правильность путей!)
3. Откройте исходники StrongDc++ папку windows и найдите файл natupnp.h, затем скопируйте его в Visual Studio 2008\VC\include
4. Запускаем Visual Studio 2008. Открываем Сервис->Параметры->Проекты и Решения->Каталоги VC++ (Tools->Options->Projects and solutions->VC++ Directories) находим справа сверху выпадающее меню (Показать каталоги для) выбираем включаемые файлы (include files) добавляем пути до

Visual Studio 2008\STL\stlport\
Visual Studio 2008\WTL

затем файлы библиотек (Library files)

Visual Studio 2008\STL\lib

Компиляция:

Открываем в исходниках стронга StrongDC.sln Построение->Построить решение (Build->Build Solution)


Компиляция FlyLinkDC++

Процесс одинаков. Единственное условия для новых версий как FlyLink'a так и Strong'a нужны новые версии STL ( http://stlport.sourceforge.net/ )
Батник для сборки STL Здесь

Примечание:

FlyLinkDC++ Ревизия (377) 8.3.2009
[+] отказ от STLport: упрощается сборка клиента из исходного кода
(для компиляции необходим VC++ 2008 SP1 с поддержкой tr1:big_smile.gif
Charodei1, мамин_парень
17.1.2009, 21:34 Mysql
Unix | База данных
Установка mysql на PtokaX 0.4.1.1 под unix описана здесь - http://mydc.ru/topic597.html

После установки проверяем работоспособность, пишем скрипт:

CODE

require "luasql.mysql"
mysql = assert(luasql.mysql())

db_name = "" -- имя бд
db_host = "" -- хост
db_user = "" -- пользователь
db_pass = "" -- пароль

con = assert(mysql:connect(db_name, db_user, db_pass, db_host))
cur = assert(con:execute("SELECT version()"))

Core.SendToAll("<mysql> MYSQL driver version is: "..luasql._MYSQLVERSION)
Core.SendToAll("<mysql> "..luasql._COPYRIGHT)
Core.SendToAll("<mysql> "..luasql._DESCRIPTION)
Core.SendToAll("<mysql> "..luasql._VERSION)

con:close()
mysql:close()


Если все ок, то увидите примерно следущее:

Код
<mysql> MYSQL driver version is: 5.0.45
<mysql> Copyright © 2003-2007 Kepler Project
<mysql> LuaSQL is a simple interface from Lua to a DBMS
<mysql> LuaSQL 2.1.1


Небольшой пример работы с mysql в lua.

CODE
require "luasql.mysql"
mysql = assert(luasql.mysql())

db_name = "joomla"
db_host = "localhost"
db_user = "root"
db_pass = "ххххххххххххх"

con = assert(mysql:connect(db_name, db_user, db_pass, db_host))

function ChatArrival(tUser,sData)
local _,_,sCmd = sData:find"%b<>%s+(%S+)|"
if sCmd == "+1" then
for id, name, nick in rows(con, "SELECT * FROM `jos_users`") do
Core.SendToAll("ID -> "..id.."\nNAME -> "..name.."\nNICK -> "..nick)
end
return true
end
end

function rows (connection, sql_statement)
local cursor = assert (connection:execute (sql_statement))
return function ()
return cursor:fetch()
end
end

con:close()
mysql:close()


Выше в примере я подключался к базе данных бесплатной CMS Joomla и выводил Id, Имя пользователя и его Ник.

Вся необходимая информация о проекте LuaSQL - http://www.keplerproject.org/luasql/manual.html#introduction
Kingston
15.7.2008, 1:23 Report
API1, API2 | Сообщение Администратору об ошибке
Название скрипта: Report
Версия скрипта: - v1.1
Версия API: API 1,API 2 (универсальный)
Автор: Jaska
Описание:
• Основная функция - отправлять отчеты об ошибках
• Отчеты отправляются пользователями. Мастера будут уведомляться о новых отчетах до
тех пор, пока не прочитают их.
• Все действия логируются и записываются в папку Logs (По аналогии с IpGag)
• Если мастер на хабе то отчет отправляется сразу, если нет то сохраняется в таблице и отправляется потом.

Ссылка: [attachment=272:Report_v1.1.zip]
Saymon21, shur49, zeusby
14.7.2008, 19:14 Warnings
API1, API2 | Скрипт предупреждений
Название скрипта: Warnings
Версия скрипта: v1.4
Версия API: API 2
Автор: Jaska
Описание:
  • Основная функция - ставить предупреждения. Предупреждения ставится оператором (есть таблица так что все настраивается под вашу систему профилей)
  • Первое предупреждение - усное, второе - карается по определенной системе которой задаете вы (есть таблица наказаний допустим 1 раз - дроп 2 - кик итп). Накопительная система наказаний действует в течении 24 часов с получения первого предупреждения.
  • Существует ранговая система для предупрежденных - "звездочки". Кол-во звезд зависит от кол-ва предупреждений. Больше нарушений - больше звезд. Кол-во нарушений фиксируется и раз в неделю обнуляется. Ранговая система "звездочки" накладывает ограничение на общение в общем чате. Все настраивается в таблице.
  • Все действия логируются и записываются в папке Logs. Файлы собираются по дням (как в IpGag).


[attachment=4073:Warnings_v1.4.lua]
Andrey_SHANDERA, KT315, Saymon21, Тёмич, STIVAN, shur49, AfLc, Unique
9.7.2008, 20:26 Вопросы Разработчикам Скриптов
вопросы по скриптам (мелкие вопросы)
Чем тебе помочь друг мой? Я конечо не имею таких обширных знаний как Nickolya но кое что могу подсказать =) все-таки его ученик.
мамин_парень
6.6.2008, 20:00 Вопросы По Hexhub
Помощь новичку
Проблемы и их решения.

Проблема:
На хабе вместо русских букв в чат отправляются сообщения на русском транслитом
Решение:
Запускаем HexHub. Заходим HUB(Apperance) и там внизу ставим галочку Enable cyrillic character set

Проблема:
Как установить плагин LUA.
Решение:
Обычно с плагином идет инструкция по его установке на англицком языке. Но если вы абсолютно не знаете английский либо нет инструкции тогда читайте дальше. Плагин который выложен на форуме устанавливается путем копирования содержимого из папки bin в папку Plugins (а вообще говоря приложена инструкция так что читайте сами). После копирования откройте HexHub -> Extra(Plugins) -> Re-init. Так же появится в ветки Extra Hex Script 1.1.0.2. Чем хорош плагин - наличием отладчика в виде командной строки а так же возможностью самому задавать директории скриптов

Проблема:
Как разрешить пользователям регистрироваться самостоятельно?
Решение:
Profiles > выбираем профиль (по-умолчанию Default для пользователей), нажимаем ... и ставим галочку напротив Can set his password

Проблема:
Как сделать чтобы обычные юзеры могли видеть меню хаба
Решение:
Заходим в profiles, выбираем нужный нам профиль (обычный юзер - Default) нажимаем кнопку (...) и ставим галочку возле Send raw commands and user menus.
6.6.2008, 18:30 Hexhub
Описание


HexHub

Описание:
HexHub - это серверное программное обеспечение (хаб) для организации пиринговых файлообменных сетей Direct Connect (DC++), с открытым исходным кодом. Имеет встроенную защиту против DDoS атак, anti-spam защиту и "фильтр контента". Поддерживает скрипты на языке LUA.

Плюсы:
+ Превосходный встроенный антиспам.
+ Стабильная работа на больших хабах
+ Поддержка плагинов и lua скриптов(за счет lua плагина).
+ Встроенный Firewall, который определяет сканирование портов, а также атаки типа: syn,udp,icmp.
+ Практически всеми настройками можно управлять из дц-клиента с помощью команд.
+ Веб поддержка.

Минусы:
- Отсутствие большого количества плагинов/скриптов вследствии малораспространённости.
- Не определяет IP зашедших пользователей.

Дистрибутив:
[attachment=6736:HeXHub_5.09c.zip] - Английская версия HeXHub
[attachment=2593:_RU_HeXH...wall1.09.rar] - Русская версия HeXHub (официальный перевод, переведён by Maximum)

Плагин LUA:
Плагин Hexscript можно найти тут.
Установка плагина: Разместить содержимое папки bin в папку Plugins затем запустить HexHub -> Раздел Extra(Plugins) -> Rescan.
Скрипты помещать в /hexhub/plugins/scripts (если папки scripts нет, то её нужно создать).

Ссылки:
Официальный сайт
Официальный форум

- -
Nickolya, FallenAngel, Drakula, Saymon21, @_JuNiOr_@, shur49, мамин_парень, sergius_s
4.6.2008, 20:08 Tophubber's
API1, API2 | Топ юзеров по времени онлайн на хабе
Название скрипта: TopHubbers
Версия скрипта: API 1 - 2.01 , API 2 - 2.9a
Версия API: API 1 и 2
Автор: jiten
Перевод: NRJ
Перевод под API 2: Jaska
Описание скрипта: Топ юзеров по времени онлайн на хабе.

Pro009, ProGeTTo
4.6.2008, 20:04 VIP-кик
API2 | Голосование за кик юзера
Вот вам и VIP-kick переработанный Nickolya

Цитата
А вот и первая пробная версия вип-кика на мой манер. Скачиваем, пробуем (тестировал только у себя) и отписываем свои впечатления!

Функционал скрипта:
- выбор профилей, которые могут начать голосование
- выбор профилей, которые участвуют в голосовании
- выбор профилей, над которыми может быть проведено голосование
- определение, сколько очков добавит 1 голос определенного профиля
- определение, сколько очков надо для кика определенного профиля
- выставление времени голосования
- кик юзера при следующем посещении (по ip) если он покинул хаб при успешном исходе голосования
- очистка ip, которые не были кикнуты по истечению определенного срока
- менюшка:
- команда кика
- команда просмотра активных голосований
- команда помощи


Скрипт писал за пару часов сегодня с утра, так что не обессутьте. В процессе реализации появилась еще идея замены обычного кика временем, которое определялось бы ценой 1 очка по истечению времени голосования (сейчас по достижению нужного количества очков голосование прекращается и юзер кикается). Если идея понравилась - отписывайте, сделаю попозже.
Karumo, _Герой_, ImDim, nunycbka, zeusby
3.6.2008, 12:26 Временные Операторы
API2 | Модерирование по графику
В самой PtokaX есть такая штука как TempOp - временный оператор или оператор на 1 сессию(после перезахода вы становитесь тем же кем и были раньше). Думаю все с этой штукой знакомы. Мой скрипт тоже создан для создавания TempOp'ов, только не на сессию а на определенный часовой диапазон. Итак функции скрипта:
1) Возможность ставить оператора как шаблонно (утро, день, вечер, ночь) так и самому задавать часы модерирования
2) Бот автоматически перерегистрирует отмеченного пользователя когда придет время модерирования, по окончании так же проходит обратная процедура регистрации
3) Возможность просмотра когда кто модерирует
Вы спросите зачем же этот скрипт? Не проще ли назначить оператора раз и навсегда? Отвечу вам - не проще. Дело в том что власть, какова бы они не была, виртуальна или реальна - она портит людей, я так говорю не потому что мне какой-то дядя вася или тетя мотя сказали, все вышесказанное - мои наблюдения, я сам в этом убедился. С этим скриптом ваш оператор никогда не "зазвездиться" ведь скрипт предпологает что только лишь небольшой кусочек времени этот человек будет модерировать - все остальное время он "простой смертный". Вообще говоря затрагивая тему модерирования скажу что быть отвественным оператором, выполняющим все свои обязанности - штука очень не простая. Когда то и я был опером на хабе, куда заходили не покачать файлы с локала а просто поболтать и я знаю каково это одним глазом смотреть за чатом другим отвечать в личках на различные технические вопросы.
Скрипт под новый API, проверен, но если же возникнут какие-либо недочеты - сообщите, исправимся ;) так же буду рад услышать предложения по модернизации сего чуда big_smile.gif

Рабочая версия, выведенная в этой теме:
[attachment=4225:TimeOpBot_API2__1_.lua]

Старая нерабочая версия
[attachment=38:_NewAPI_TempOp__s.zip]
Тёмич
3.6.2008, 10:39 Профили Пользователей
API2 | Анкеты пользователей
Ничего революционного не придумал. Просто написил скрипт анкет с нуля каким бы я хотел его видеть, ныне существующие версии меня немного не устраивают. Скрипт протестировал выкладываю под новый API, но вначала немного опишу возможности, итак:
1) Основная функция - возможность создавать анкету с параметрами как Имя Пол Фамили Увлечения итд
2) Напоминание о том что анкета не создана (при каждом реконнекте будет долбить в личку НО! успокою вас, господа которые не желают создавать свою анкету, вы можете отказаться о создании анкеты и тогда бот вас больше никогда не потревожит)
3*) Рейтинг по заполненности. Чем больше заполните анкету тем больше рейтинг!
4*) Рейтинг по профилю. Возможность оставлять "респекты" пользователям. Чем больше респектов тем больше рейтинг профиля.
5*) Возможность оставлять комментарии по поводу анкеты.
6) Администраторы могут устанавливать параметры пользователям а так же удалять полностью анкеты.
* Примечание. Все эти параметры будут видны в профиле и расположены чуть ниже основных параметров.

[attachment=52:_NewAPI_...rAccount.zip]
Al-j®, Naum_Off, доктор ливси
2.6.2008, 21:58 Чат-бот
API2 | Полезная штучка
Chat Bot [ by Jaska ] [ LUA 5.1.3 ] [ API 2 ]

C помощью бота операторы могут установить ограничение на количество отправленных сообщений за определенный интервал. Проще говоря облегчаем работу антифлуда. Уверен на каждом хабе есть заядлые флудеры. Именно таким и надо ставить ограничение на отправку сообщений. Все очень просто. Щелкаем на нике, задаем частоту отправки сообщений и вуаля) этот человек уже не сможет флудить. Скрипт написан под новую птоку.

Суть скрипта:

Установка ограничения на отправку сообщений в общий чат (Интервалы между сообщениями)

Функционал скрипта:

sBot = SetMan.GetHubBot().sNick -- Имя бота
-------------------------------------------------------------------------------------------------
sMenu = "Ограничение общения" -- Менюшка
-------------------------------------------------------------------------------------------------
sStartchatblocker = "startchatblocker" -- Поставить ограничение
sStopchatblocker = "stopchatblocker" -- Снять ограничение
sSeechatblocker = "seechatblocker" -- Посмотреть ограниченных
-------------------------------------------------------------------------------------------------
tProfiles = { [0] = 1, [1] = 1, [2] = 1, -- Профили, которые могут
[3] = 1, [4] = 1, [5] = 1, -- ставить ограничения
[6] = 1, }
-------------------------------------------------------------------------------------------------
sMainPath = "ChatBot\\" -- Папка с таблицей и главным скриптом
sMainScript = sMainPath.."MainScript.lua" -- Путь к главному скрипту
sWayToFile = sMainPath.."tBadUser.tbl" -- Путь к таблице с огранич. пользователями


---------------------------------------------------------------------------------------------------------------------------------
Ссылка на скрипт: [attachment=41:_NewAPI_ChatBot.zip]
FallenAngel, Nissan_GT, shur49, мамин_парень, Unique
2.6.2008, 21:04 RegBot
API1, API2 | Скрипт регистрации юзеров на хабе
Вот выкладываю переделку RegBot'a от NRJ. Скрипт написан под новую птоку. Вроде всю поюзал должно работать если че не так - пишите) исправимся big_smile.gif
Итак что же нового? big_smile.gif
1) Добавил ip-защиту (Возможно изначальная регистрация с ip защитой аккуанта (После регистрации создается таблица типа Nick=Ip и при каждом коннекте проверяется соответствие. Если не подходит - бан навечно))
2) Добавил ограничение на кол-во регистраций (Почти на всех хабах такая проблема. Нарегистрируют себе аккуантов а удалять не собираются. Из-за этого бд становится похоже на что-что гм ... без мата не скажешь )
3) Добавил просмотр зарегестрированных аккуантов (В любой момент можно посмотреть под каким ником и с какими паролями ты зарегестрирован на этом ip. Для операторов + в просмотре статистики по ip.)
4) Добавил возможность запрещать регистрацию "нежелательным юзерам" (Функция для Операторов. Щелкаем на ник выбираем пункт в меню и этот человек не сможет зарегистрироваться уже никогда)

[attachment=42:_NewAPI_RegBot.zip]
valdis73, Streter, andromed, zeusby

2 страниц V  < 1 2
RSS Сейчас: 24.4.2024, 10:41