myDC.ru

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

 
История благодарностей участнику Артём. Спасибо сказали: 551
Дата поста: В теме: За сообщение: Спасибо сказали:
Вчера, 15:16 Скрипт при входе
помогите
тЫц
Код
sBot = "Рабочее_Око"

UserConnected = function(tUser)
local ut = Convert(os.time() - Core.GetUpTime())
    local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg"
    Core.SendToUser(tUser, "<"..sBot.."> "..tUser.sNick..", Добро пожаловать на Russia Hub."..
    "\n\tВаш профиль:\t"..Profile.."\n\tСейчас на хабе:\t"..Core.GetUsersCount().." юзеров "..
    "\n\tНепрерывное время работы хаба:\t"..ut.."")
    end

RegConnected = UserConnected
OpConnected = UserConnected

Convert = function(time)
    if time then
        local s,x,n = "",0,os.time()
        local tab = {{31556926, " лет", " год"},{2592000, " мес."},{604800, " нед."},
        {86400, "дн."},{3600, " ч."},{60, " мин."},{1, " сек."}}
        if time > 0 then
            if time < 2145876659 then
                if n > time then
                    time = n - time
                elseif n < time then
                    time = time - n
                end
                for i,v in ipairs(tab) do
                    if time > v[1] then
                        x = math.floor(time/v[1])
                        if x > 1 then v[2] = v[2].."" end
                        if x > 0 then
                            s = s..x.." "..v[2]..", "
                            time = time-x*v[1]
                        end
                    end
                end
                collectgarbage("collect")
                return s:sub(1,-3)
            else
                return "Invalid date or time supplied. [must be pre 12/31/2037]"
            end
        else
            return "Invalid date or time supplied. [must be post 01/01/1970]"
        end
    else
        return "Invalid date or time supplied."
    end
end

По просьбе ТС через ЛС на хабе mydc
не открывать
Ник бота страшный, почему-то читается как Рабочее_Очко beated.gif
ke(x)one, dj_crazy_joker
Вчера, 15:00 Скрипт при входе
помогите
Код
sBot = "Рабочее_Око"

UserConnected = function(tUser)
    local Profile = (ProfMan.GetProfile(tUser.iProfile) and ProfMan.GetProfile(tUser.iProfile).sProfileName) or "Unreg"
    Core.SendToUser(tUser, "<"..sBot.."> "..tUser.sNick..", Добро пожаловать на Russia Hub. \n\tВаш профиль:\t"..Profile.."\n\tСейчас на хабе:\t"..Core.GetUsersCount().." юзеров ")
    end
RegConnected = UserConnected
OpConnected = UserConnected
ke(x)one
31.1.2012, 0:19 Заглушка чата (GAG)
для одного пользователя
Otshelnik-Fm, а что мешает в этом скрипте убрать гаг на личку, удалить/закомментировать функцию на лс?
Код
function OnTo(user, data)
big_smile.gif
Otshelnik-Fm
30.1.2012, 21:50 Locker.lua
Блокировка чат и привата для не зарегистрированных
Цитата(CrazyKiller @ 30.1.2012, 19:40) *
Скрипт


local tGoodPmUser = { --- Ники кому разрешенно писать в лс Гостям.
["CrazyKiller"] = true,
["Bloodwithmilk"] = true,
}


shocked.gif может... "Ники, которым смогут писать гости" ?
CrazyKiller
30.1.2012, 21:11 Locker.lua
Блокировка чат и привата для не зарегистрированных
CrazyKiller, посмотри как это сделано в этом скрипте и попробуй сам сделать.
CrazyKiller
27.1.2012, 19:22 RegmeEmail
API2 | Регистрация через e-mail
Ameet, Кнопочка есть... bad_smile.gif
Ameet
27.1.2012, 19:04 RegmeEmail
API2 | Регистрация через e-mail
Ameet, обнови страничку и посмотри мой пост выше, у меня гигабайтами пишет. Значит ты в метрах указал ограничение.
10 Гб = 10737418240 Б
Ameet
26.1.2012, 13:42 СКРИПТ ЗАГЛУШКИ
alex2014, чес слово, ты задолбал уже, ты чего ждёшь, что ты напишешь и тебе накидают скриптов? Поиск в зубы и ищи то, что нужно тебе, такие скрипты есть на форуме!!
Nickolya, shullz, Littlemuk
22.1.2012, 22:56 GagCountry_ExcludeRangeIP
API2
Название скрипта: GagCountry_ExcludeRangeIP
Автор: Артём
Огромное спасибо за помощь с диапазонами: Enyby
Описание: Скрипт заглушки Стран с исключениями по профилю, IP и диапазону IP. В таблице tGoodPmUser укажите ник в ЛС которому смогут писать юзеры с гагнутой страны, для добавления в исключения IP "просящего".
Внимание!!! Для нормальной работы функций определения страны юзеров, необходимо установить базу данных IP-To-Country. Скачать базу можно здесь. Для установки необходимо копировать файл ip-to-country.csv в папку cfg.
[attachment=6292:GagCount...eRangeIP.lua]
[attachment=6311:GagCount...on_Enyby.lua]
Enyby, dickTATOR
22.1.2012, 22:54 RedirectCountry
API2
Название скрипта: RedirectCountry
Автор: коллектив хаба MyDC
Описание: Скрипт редиректа Стран которые указаны в таблицы tRedirector, на каждую страну можно указывать свою причину и адрес куда перенаправляем.
Внимание!!! Для нормальной работы функций определения страны юзеров, необходимо установить базу данных IP-To-Country. Скачать базу можно здесь. Для установки необходимо копировать файл ip-to-country.csv в папку cfg.
[attachment=6290:RedirectCountry.lua]
P.S. Если хотите получать сообщение о редиректе, "кого и куда", впишите свой ник, 19 строка, место BolLoT ваш ник. big_smile.gif


------------------
Название скрипта: RedirectCountry
Версия: 2
Автор(копипастер кода из других скриптов bad_smile.gif ): Артём
Огромное спасибо за помощь: Alexey, Enyby, alex82, Nickolya !
Описание: Скрипт редиректа Стран, на каждую страну можно указывать свою причину и адрес куда перенаправляем. Через меню хаба..
Внимание!!! Для нормальной работы функций определения страны юзеров, необходимо установить базу данных IP-To-Country. Скачать базу можно здесь. Для установки необходимо копировать файл ip-to-country.csv в папку cfg.
[attachment=6291:Redirect...ntry_v.2.lua]
перезалит 18.01.2012
dimetro
21.1.2012, 19:51 Пробел в нике
Kingston
Код
function UserConnected(tUser,sData)
    if tUser.sNick:find(" ") then
        Core.SendToUser(tUser, "У вас в нике запрещённый неразрывный пробел, уберите его и перезайдите на хаб")
        Core.Disconnect(tUser)
        return true
    end
end

если хочешь чтобы юзера отключало до появления строки птоки, место UserConnected сделай ValidateNickArrival
Kingston, MIKHAIL
20.1.2012, 16:24 Вопросы Разработчикам Скриптов
вопросы по скриптам (мелкие вопросы)
roflDDDD,
Код
tProfile = {
    [0]     = 1,    -- [Master]
    [1]     = 1,    -- [OP]
    [2]     = 0,    -- [ViP]
}
function ChatArrival(user, sData)
    if tProfile[user.iProfile] == 1 then
    local cmd = sData:match"%b<>%s+(%S+).*|"
    if cmd == "!stat" or cmd == "!stats" then
        Core.SendToUser(user,  "У вас нет прав на просмотр этой статистики")
        return true
    end    
end
roflDDDD
18.1.2012, 23:15 От: Redirect IP_mod
От темы с ID: 4572
UP:
Поправил косяки свои, добавил профили которым разрешено пользоваться командами. Перезалил в первый пост.
rival
17.1.2012, 15:49 User Mode Fixer
API 2 | Исправление режима подключения пользователя
Enyby
Статистика
Код
[14:47:29] <Big-eyed>
    Статистика для скрипта User Mode Fixer v1.04

    Настройки:
sCmdPrefix = 'UMF'
bDetailedStats = true
bIgnoreInvalidIPInCTM = false
bIgnoreInvalidNickInCTM = false
iCheckInterval = 1000
iSelectTimeout = 0
iTimeout = 15
iConnectTimeout = 3

    Статистика:
MaxOnlineFixedPassive = 335
MaxOnlinePassive = 274
+SendRCTMforBot = 449
MinWaitSocket = 0
WaitCTM = 47
OnlineActive = 64
+BlockedCTM = 13
MinOnlineFixedPassive = 1
MaxOnlineActive = 64
OnlinePassive = 274
MaxWaitSocket = 394
OnlineFixedPassive = 333
+ValidCTMForBot = 401
+BlockedCTMForIP = 1
+FixedSearch = 12
MinOnlinePassive = 1
MinWaitCTM = 1
MinOnlineActive = 1
MaxWaitCTM = 449
WaitSocket = 2

    Статус:
#tClientSockets = 2
    188.134.82.91:5051
    46.247.231.210:19629
#tActiveToPassive = 333
#tClientConnect = 47
#tActiveToPassive = 2
#tSocketNick = 4
MemoryUsage = 3631 KB


Ещё раз
Код
[14:51:09] <Big-eyed> Статистика успешно очищена.
[14:51:13] <Big-eyed>
    Статистика для скрипта User Mode Fixer v1.04

    Настройки:
sCmdPrefix = 'UMF'
bDetailedStats = true
bIgnoreInvalidIPInCTM = false
bIgnoreInvalidNickInCTM = false
iCheckInterval = 1000
iSelectTimeout = 0
iTimeout = 15
iConnectTimeout = 3

    Статистика:
MaxOnlineFixedPassive = 380
MaxOnlinePassive = 274
+SendRCTMforBot = 0
MinWaitSocket = 0
WaitCTM = 0
OnlineActive = 62
+BlockedCTM = 35
MinOnlineFixedPassive = 1
MaxOnlineActive = 66
OnlinePassive = 263
MaxWaitSocket = 394
OnlineFixedPassive = 363
+OtherCTMForBot = 0
+FixedCTM = 4
+ValidCTMForBot = 0
+BlockedCTMForIP = 0
+FixedSearch = 8
MinOnlinePassive = 1
MinWaitCTM = 0
MinOnlineActive = 1
MaxWaitCTM = 449
WaitSocket = 0

    Статус:
#tClientSockets = 0
#tActiveToPassive = 363
#tClientConnect = 0
#tActiveToPassive = 0
#tSocketNick = 0
MemoryUsage = 4748 KB

[14:51:13] <Big-eyed>
    Статистика для скрипта User Mode Fixer v1.04

    Настройки:
sCmdPrefix = 'UMF'
bDetailedStats = true
bIgnoreInvalidIPInCTM = false
bIgnoreInvalidNickInCTM = false
iCheckInterval = 1000
iSelectTimeout = 0
iTimeout = 15
iConnectTimeout = 3

    Статистика:
MaxOnlineFixedPassive = 380
MaxOnlinePassive = 274
+SendRCTMforBot = 0
MinWaitSocket = 0
WaitCTM = 0
OnlineActive = 62
+BlockedCTM = 35
MinOnlineFixedPassive = 1
MaxOnlineActive = 66
OnlinePassive = 263
MaxWaitSocket = 394
OnlineFixedPassive = 363
+OtherCTMForBot = 0
+FixedCTM = 4
+ValidCTMForBot = 0
+BlockedCTMForIP = 0
+FixedSearch = 8
MinOnlinePassive = 1
MinWaitCTM = 0
MinOnlineActive = 1
MaxWaitCTM = 449
WaitSocket = 0

    Статус:
#tClientSockets = 0
#tActiveToPassive = 363
#tClientConnect = 0
#tActiveToPassive = 0
#tSocketNick = 0
MemoryUsage = 4748 KB
Enyby
17.1.2012, 15:42 User Mode Fixer
API 2 | Исправление режима подключения пользователя
Enyby
Код
[14:41:55] <Big-eyed>
    Статистика для скрипта User Mode Fixer v1.04

    Настройки:
sCmdPrefix = 'UMF'
bDetailedStats = false
bIgnoreInvalidIPInCTM = false
bIgnoreInvalidNickInCTM = false
iCheckInterval = 1000
iSelectTimeout = 0
iTimeout = 15
iConnectTimeout = 3

    Статистика:
OnlinePassive = 262
OnlineActive = 263
OnlineFixedPassive = 188
WaitCTM = 0
WaitSocket = 0

    Статус:
#tClientSockets = 0
#tActiveToPassive = 188
#tClientConnect = 0
#tActiveToPassive = 0
#tSocketNick = 0
MemoryUsage = 3857 KB

719 юзеров на хабе
Enyby
14.1.2012, 23:44 Скрипт команд.
hunter21rus, тоже что и с !server, только уже !hub или !rules как назовёшь так и будет, главное чтобы название txt файла совпадал с командой.
hunter21rus
13.1.2012, 10:19 LEDOKOL BOT
need help please
termoyad, http://92.240.248.24/ledokol/manual поймёшь? big_smile.gif
P.S. поломались кнопочки... "Вставить ник" не работает, гиперссылка.
termoyad
9.1.2012, 18:13 Антимат
Скрипт антимата с заглушкой
Виктор_savosss, уже давно имеется птока 0.4.2.0, но лучше пока оставаться на 0.4.1.1(2), но не на 0.3.5.2 bad_smile.gif
Виктор_savosss
17.12.2011, 20:52 NoSharaNoDownload
API2
striker, Качай в первом посте big_smile.gif
striker
12.12.2011, 3:05 Перекодировка в скрипте Lua 5.14 из CP-1251 в UTF-8
Источник в CP-1251 ( http://bash.org.ru/random ), получатель UTF-8
http://mydc.ru/topic334.html может и не в тему, но мало ли big_smile.gif
ILYA INDIGO
6.12.2011, 3:23 Cmd To Owner 1.1
API1, API2 | скрипт посылает админу команды юзеров
Может кому пригодится big_smile.gif
Название скрипта: Cmd spy
Автор: Mutor ( немножко подредактировал Артём big_smile.gif )
[attachment=6182:78.JPG]
[attachment=6181:Cmd_spy.lua]
dimetro
3.12.2011, 18:58 ip-to-country.csv
База стран | Обновляемая
UP
Добавил обновлённую базу ip-to-country.csv в первом посте.
Теперь буду чаще добавлять обновленные базы, ибо мучаться руками по 3 дня теперь не нужно greedy.gif, всё теперь делается в один клик мышки victory.gif , спасибо Nickolya
rival
28.11.2011, 3:09 Redirect Internet Users
API2
Название скрипта: RedirectInternetUsers
Автор: Nickolya
Возможности: Скрипт редиректа всех чья шара ниже iMinShare , кроме IP-диапазонов внисенных в таблицу tRanks , их просто отключаем с сообщением.
[attachment=6168:Redirect...netUsers.lua]
Nickolya, dimetro
8.11.2011, 3:14 ip-to-country.csv
База стран | Обновляемая
Вот, делюсь базой, 3 дня потел над нею beaten.gif
[attachment=6142:ip_to_country.rar]
за основу брал эту базу [attachment=6143:cidr_optim.rar]
а вот архив (всё же нашёл его) который я скачивал не помню с какого сайта.
Архив, содержащий базу местонахождений российских (с точностью до города), украинских (с точностью до города) и европейских (с точностью до страны) ip-адресов.
[attachment=6145:geo_files.tar.gz]
P.S. Нашёл сайт с этими базами(обновляются базы). Может кому пригодится big_smile.gif

--------------
03-12-2011
[attachment=6176:ip_to_country.rar]
-------------
14-12-2011
[attachment=6187:ip_to_country.rar]
PomanoB, Ameet, rival, Alexey, CrazyKiller, Saymon21, dimetro, Cyber_voodoo, AfLc, Meloun, 123123, Booth
7.11.2011, 22:42 Запрет поиска
определенныхслов\выражений
Такой искал или ищешь? [attachment=6139:bad_search_newapi.lua]
WINS
23.10.2011, 16:36 antiproxy_silent
API2 | Запрещает Socks5 подключенным общаться в чате
Название: antiproxy_silent
API: API2
Автор: Артём
Описание: Скрипт блокирует чат юзерам с Socks5, сообщения видят только опы(в ОПчате) и тот кто пишет(проксер).
[attachment=6111:antiproxy_silent.lua]
Nickolya, Tsd, Herurg, dimetro, npocToNIK, Cyber_voodoo, stailzoRE
9.10.2011, 19:20 WelcomMOTDMsg+local
API2
Название скрипта: WelcomMOTDMsg+local
Автор: Артём, ustas, Nickolya
Описание:
При входе на хаб, выводит информацию...
[attachment=6096:5464564.JPG]

[attachment=6097:WelcomMO...sg_local.lua]
P.S Вот, решил поделиться скриптом, может кому и пригодится, а если нет, тогда тему фтопку big_smile.gif
ustas, CrazyKiller, PSIX, dimetro, greenstreet
17.9.2011, 1:00 antiadv_rushub
"Тихая" Антиреклама на RusHub
Saymon21, неважно, главное что работает замечательно greedy.gif
CrazyKiller
16.9.2011, 17:11 antiadv_rushub
"Тихая" Антиреклама на RusHub
Название: antiadv_rushub
Авторы + Описание:
Читаем big_smile.gif
Цитата
-- Бот антирекламы

-- Изменения (by NRJ 16/08/2006):
--
-- Добавил исключения из запретов
-- Добавил возможность регистрации бота вместе с описанием
-- Ввел BanMode
-- Вынес в конфигуратор сообщение о бане юзеру и опу о бане юзера
-- *** Изменение от Trans ( dchub://ksan.tsk.ru:31337 )(31-05-09)
--
-- *** Юзер не банится никаким образом, его реклама в чат проходит, но видит её только он сам.
-- *** При желании банить можно раскомментить строки с *** спереди строки и закомментить строки с *** в конце
--=============================================================================
-- *** + Изменение от Wariner (31-05-09)
-- *** + Изменение от Артём (Клубнячковый HUB DC++ dchub://dc.myhub.pp.ua:420 ) ( 25 сентября 2009 год)
-- *** + Добавлено исключение на Ник/Чаткомната, которому смогут кидать в ЛС рекламу ( 7 декабря 2009 год )
-- *** + Перевод под RusHub от Nickolya ( форум админов http://mydc.ru )( август 2010 год )
-- Возможности скрипта: не пропускает рекламу в чат в приват. её видит только сам рекламщик.
--=============================================================================

[attachment=6054:antiadv_rushub.lua]
ShadoWx, PomanoB, CrazyKiller, AfLc, traktirshik
3.8.2011, 15:38 Антимат !
Antimat.lua и папку Antimat в scripts, PX API interface for RH.lua в корневую папку русхаба big_smile.gif
[attachment=5993:Antimat.rar]
CrazyKiller

11 страниц V   1 2 3 > » 
RSS Сейчас: 7.2.2012, 14:34