myDC.ru

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

 
История благодарностей участнику Accelerator. Спасибо сказали: 244
Дата поста: В теме: За сообщение: Спасибо сказали:
13.5.2010, 16:34 Подскажмите пожалуйста.
Плиз
http://mydc.ru/topic1164.html?view=findpost&p=8577
Устное предупреждение за неумение пользоваться поиском!

Topic Closed.
Тёмич
3.5.2010, 16:02 Ptokax Win Gui
Руководство по установке и настройке
Цитата(Fire_heart @ 3.5.2010, 18:52) *
У меня папка с данными, которая должна быть доступна в хабе находится на компе, где установлен сервер хаба. Дак вот, для того чтобы не запускать еще и дополнительно клиент с этой шарой, можно ли эту шару дать основному боту?

Нельзя.
Nickolya
3.5.2010, 13:04 Нужен скрипт для Ptokax: антифлуд, антиспам
чтобы кикал юзеров, которые спамят и флудят в чате
2_brat_: учись пользоваться поиском! Пока что устное предупреждение.

Тему закрываю.
forZejkee
2.5.2010, 8:08 Нужен скрипт для Ptokax называется "ваше меню"
В скрипте есть помощь, регистрация, профиль, живопись
Действия - http://mydc.ru/topic54.html
Команды профиля - http://mydc.ru/topic174.html
Регистрация - http://mydc.ru/ipb.html?act=Search&COD...%F0%E0%F6%E8%FF
мамин_парень
28.4.2010, 14:02 Антиреклама
Цитата(TROJAN @ 28.4.2010, 16:41) *
-чтобы админу приходилдо сообщение по типу: *** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь nickname [ip] пытался сообщить в приват следующую фразу: (првиат/чат выбералось само)
В самое начало скрипта:
Код
Send = "Main" -- Main: чат; PM: Личка; OpChat: ОпЧат
sAdminNick = "admin" -- Ник админа

Перед
Код
            Core.SendToAll("*** Пользователь "..tUser.sNick.." лишён права отправки сообщений. Причина: реклама.")
добавляем:
Код
if Send == "Main" then
Core.SendToNick(sAdminNick, "<"..sBot.."> *** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь "..tUser.sNick.." (IP: "..tUser.sIP..") пытался сообщить следующую фразу: "..sData)
elseif Send == "PM" then
Core.SendPmToNick(sAdminNick, sBot, "*** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь "..tUser.sNick.." (IP: "..tUser.sIP..") пытался сообщить следующую фразу: "..sData)
elseif Send == "OpChat" then
Core.SendToOpChat("<"..sBot.."> *** Внимание! Вероятная попытка несанкционированной рекламы! Пользователь "..tUser.sNick.." (IP: "..tUser.sIP..") пытался сообщить следующую фразу: "..sData)
end
SAG
27.4.2010, 18:52 Можно ли банить по мак-адресу?
Вопрос уже задавался: http://mydc.ru/topic659.html
Цитата(mariner)
при проходе через сетевые шлюзы, роутеры и т.д. мак меняется на мак шлюза, в результате ты можешь забанить тысячи людей.
li4nost
31.3.2010, 18:55 Ищу скрипт
который показывает информацию из тхт файла
Цитата(TIRAN @ 31.3.2010, 21:38) *
Информация\\Справка\\Что идёт в кинотеатре\\
Информация\\Справка\\Контакты\\
Информация\\Справка\\Правила хаба\\

http://mydc.ru/topic1164.html?p=8577#entry8577
TIRAN
27.3.2010, 6:36 RegBot.MySQL_API2
API2 | Скрипт регистрации с занесением в базу MySQL
Цитата(Kingston @ 27.3.2010, 4:39) *
А поподробнее, что происходит?

При написании сообщения в чат напишет такое:
Цитата
<PtokaX> Данная команда недоступна для вашего профиля!
Происходит это потому что ты сделал чат доступным только тем, которым выставлен флаг в таблице tProfiles. big_smile.gif
Код
    if tProfiles[tUser.iProfile] == 1 then -- делаем чат доступным только тем, кому выставлен флаг в таблице
                ...
                if cmd == "!errorsregs" then
                ...
                         return true -- лишнее
        else
        Core.SendToUser(tUser, "<"..bot.."> Данная команда недоступна для вашего профиля!")
    end
return true
end
Должно быть так:
Код
        if cmd == "!errorsregs" then
                        if tProfiles[tUser.iProfile] == 1 then -- Делаем команду доступной только тем, у кого есть флаг
                ...
        else
        Core.SendToUser(tUser, "<"..bot.."> Данная команда недоступна для вашего профиля!")
    end
return true -- глушим команду
end
Так нужно делать для всех команд big_smile.gif В своём варианте скрипта именно это я и сделал, посмотри код и увидишь что я исправил big_smile.gif
Kingston
26.3.2010, 19:13 RegBot.MySQL_API2
API2 | Скрипт регистрации с занесением в базу MySQL
В чате нельзя общаться, если качать скрипт из первого поста! Вот мой вариант скрипта:
[attachment=4294:RegBot.M...1.5_API2.lua]
Добавил ещё функцию просмотра своего пароля

Также добавляю новую версию веб-интерфейса. Изменений немного, всего лишь добавил:
Цитата
Всего зарегистрировано n пользователей

[attachment=4295:hubreg.rar]
Вскоре попробую решить проблему с вылазиньем ошибки при успешной регистрации <_<
Saymon21
8.3.2010, 19:42 Нужна помощь!
Код
Core.SendToUser(user,userinf..ftr)
на
Код
Core.SendToUser(user,"<"..SetMan.GetString(21).."> "..userinf..ftr)
jumshut
8.3.2010, 18:09 Статистика
версия 2.0
У себя проверил, никаких ошибок пока не заметил. Веб-статистика обновляется.
Порядок установки:
1. Извлечь архив в папку с RusHub'ом (Не в папку scripts)
2. Отредактировать пути, открыв файл scripts\stats.lua блокнотом
3. Создать на вебе папку, которая была указана в путях сохранения веб статистики.
Saymon21
8.3.2010, 17:57 Статистика
версия 2.0
Название: Статистика
Версия: 2.0
Автор: STRELOK
Описание:
Ведёт статистику хаба. Также в веб-интерфейсе!
Изменения:
    Версия 2.0:
  • Доработал шаблон
  • Исправлено несколько мелких ошибок

    Версия 2.0 beta
  • Добавлена веб статистика

Для работы скрипта необходимо скачать модуль files и Utils здесь

Порядок установки:
1. Извлечь архив в папку с RusHub'ом (Не в папку scripts)
2. Отредактировать пути, открыв файл scripts\stats.lua блокнотом
3. Создать на вебе папку, которая была указана в путях сохранения веб статистики.
Invisible, Otshelnik-Fm, Saymon21, ke(x)one
7.3.2010, 8:12 CollectorMagnets
Должно быть что то типо такого
Код
for sMagnet in sData:gmatch"([magnet][http]:%S+)" do
Но захватывает только 2 последних символа:
Код
tp://ya.ru
. Не могу понять, что нужно поставить, чтобы захватило полностью все символы :(
Otshelnik-Fm
6.3.2010, 8:17 Нужна помощь!
Исправь
Код
Core.SendToNick(user.sNick,tmp)
на
Код
Core.SendToNick(user.sNick, ("<%s> %s"):format(Bot, tmp))
jumshut
4.3.2010, 9:23 Официальная страничка RusHUB
Внимание - вопрос
Собственно вот шаблон big_smile.gif [attachment=4166:RusHubTemplate.rar]
Nickolya, BIMMER71, bot9ra
3.3.2010, 21:09 Официальная страничка RusHUB
Внимание - вопрос
Завтра попробую сделать несколько простых страничек. big_smile.gif
bot9ra
3.3.2010, 20:10 Модули для скриптов RusHub
Прикрепляю модуль киков. При использовании команды $kick юзера не отключало от хаба.
[attachment=4165:kick.lua]
Установка:
1. Модуль кладём в папку libs
2. В любом скрипте(я добавил в BanManager.lua) добавляем в самом начале require "kick"
Saymon21
3.3.2010, 18:05 CollectorMagnets
Добавил новую версию скрипта.
    Версия 3.0:
  • Если в сообщении несколько магнет ссылок, то сохраняются все
  • Добавил служебные сообщения
  • Добавил функцию Экстренной очистки базы магнет ссылок
Nickolya
22.2.2010, 18:02 HelloToNewUsers
API1, API2 | Приветствие новому юзеру
Это:
Код
        Core.SendToAll("<"..sBot.."> Приветствуем нового юзера на нашем хабе <"..tUser.sNick..">")

Заменить на:
Код
        Core.SendToUser(tUser, "<"..sBot.."> Приветствуем нового юзера на нашем хабе <"..tUser.sNick..">")
Dr_Pilulkin™
22.2.2010, 17:23 Вопросы по скриптам
Мелкие вопросы
Код
function ChatArrival(user, sData)
    local sData = string.sub(sData,1,-2)
    local sCmd = sData:match"%b<>%s+[!+*](%S+)"
    if sCmd == "test" or sCmd == "stats" or sCmd == "команда3" then
        ...
    return true
  end    
end
Saymon21
22.2.2010, 16:23 Вопросы по скриптам
Мелкие вопросы
Код
  if sCmd == "команда" or sCmd == "команда2" or sCmd == "команда3" then
Saymon21
22.2.2010, 14:12 Вопросы по скриптам
Мелкие вопросы
Код
sBot = SetMan.GetString(21)
sFile = Core.GetPtokaXPath().."scripts/HelpFiles/help.txt"

function ChatArrival(tUser, sData)
    sData = string.sub(sData,1,-2)
    local sCmd = sData:match"%b<>%s+[!+*](%S+)"
    if sCmd == "help" or sCmd == "хелп" then
         Core.SendToUser(tUser, "<"..sBot.."> "..LoadText(sFile))
         return true
    end    
end

function LoadText(filename)
    local message = ""
    local f = io.open( filename, "r" )
    if f then
        message=f:read("*all")
        message=string.gsub(message,"|","")
        f:close()
    end
    return message
end
Saymon21
21.2.2010, 17:14 замена стандартной команде !stat
Цитата(Saymon @ 21.2.2010, 19:14) *
Nickolya, хорошо, спасибо. А как вот сделать например чтобы перфикс команд скрипта указывался не в строке
Код
if cmd == "!stat" or cmd == "!стат" or cmd == "!stats" then

А есть какой то другой параметр точно не помню но чтобы команды работали по перфиксам ! и +

Код
  local sCmd = sData:match"%b<>%s+[!+*](%S+)"
Saymon21
21.2.2010, 14:15 Репорты об ошибках старых версий
архив темы ошибок текущей версии хаба
Цитата(Setuper @ 19.2.2010, 17:02) *
...прошу скрин, чтобы понять в чём проблема.

[attachment=4100:_________.jpg]
[attachment=4099:____.png]
[attachment=4101:_____.jpg]
Setuper
19.2.2010, 21:10 Скрипт банов для RusHub
тестим и комменьтруем
Собственно мой скрипт. big_smile.gif Сделал только одно - использование модуля доступно только админам и ОПам))
Saymon21
18.2.2010, 17:08 CollectorMagnets
Название: CollectorMagnets
Автор: Serx
Перевод под RusHub: STRELOK
Описание:
Сохраняет магнет ссылки. Выводит их по категориям, от ника, за дату.

Для работы скрипта необходимо скачать модуль files здесь
Setuper, Invisible, fixx, Otshelnik-Fm, ExC0tiC, Saymon21, доктор ливси, Snacho, мамин_парень, shadow3c
10.2.2010, 15:04 Переменные
Переменные и их значения
[attachment=4054:Janus_HS...ght_API2.lua]
Saymon21
10.2.2010, 14:56 Переменные
Переменные и их значения
Перевод в часы/минуты/дни/месяца
Код
function GetNormalTime(s)
    s=tonumber(s) or 0
    local r=""
    if s>=31104000 then r=math.floor(s/31104000).." лет " s=math.fmod(s,31104000) end
    if s>=2592000 then r=r..math.floor(s/2592000).." месяцев " s=math.fmod(s,2592000) end
    if s>=86400 then r=r..math.floor(s/86400).." дней " s=math.fmod(s,86400) end
    if s>=3600 then r=r..math.floor(s/3600).." часов " s=math.fmod(s,3600) end
    if s>=60 then r=r..math.floor(s/60).." минут " s=math.fmod(s,60) end
    return r..s.." секунд"
end
Отсылка сообщения
Код
Core.SendToUser(tUser, "<"..sBot.."> Вы забанены на "..GetNormalTime(RekBanTime))

А вообще, надо прикладывать скрипт.
Saymon21
3.2.2010, 17:27 RegBot.MySQL_API2
API2 | Скрипт регистрации с занесением в базу MySQL
Собственно вот скрипт веб-регистрации на хабе с предварительным вводом защитного кода (Captcha)
[attachment=4008:hubreg.rar]
P.S: Может содержать некоторые не значительные ошибки, в будущем поправлю.
P.S.S: Попытался сделать проверку зарегистрированных пользователей из базы данных, увы, я не смог добиться результата beat_shot.gif .
Kingston, Saymon21, MIKHAIL
2.2.2010, 16:32 RegBot.MySQL_API2
API2 | Скрипт регистрации с занесением в базу MySQL
Скрипт до ума довёл![attachment=4004:hubreg.rar]
Теперь дело за автором - сделать чтение зарегистрированных юзеров из MySQL. Я может-быть позже займусь, если автор не сделает. big_smile.gif
Saymon21
17.1.2010, 16:14 Рекорды
версия 1.1
Цитата(Otshelnik-Fm @ 17.1.2010, 17:53) *
Закомментировать то я смог. Но нужно именно чтобы он писал о рекордах, но не так часто! А то как включил скрипт впервые он засрал сообщениями чат. Вот и было предложение чтобы не отключить его, а сделать вывод, ну к примеру, раз в полчаса-раз в час.

Тогда и обновление рекордов будет происходить раз в 1 час или раз 30 минут, т.к. обновление таблицы рекордов происходит по таймеру. После того, как время таймера вышло, запускается функция UpdateHubStats и соответственно происходит обновление таблицы, и выводится сообщение о новом рекорде, если число оказывается больше того, что находится в таблице.
Nickolya, Invisible
16.1.2010, 14:30 Рекорды
версия 1.1
Название: Рекорды
Версия: 1.1
Автор: STRELOK
Описание: Скрипт рекордов хаба
Изменения:
    Версия 1.1:
  • Добавлена возможность выводить рекорды хаба при подключении пользователя
  • Добавлена функция включения и отключения вывода сообщений о новых рекордах

Для работы скрипта нужно скачать модуль files здесь
Nickolya, Invisible, CrazyKiller, Saymon21, AfLc
12.1.2010, 18:24 ChatLogsMySQL
версия 4.3d
Название скрипта: ChatLogsMySQL
Версия скрипта: 4.3d (03.08.2011)
Автор: Accelerator
Скрипт для: RusHub, PtokaX
Описание: Логирует чат и сохраняет данные в базу MySQL
Содержание архива: Сам скрипт, Web-интерфейс
История версий

    Версия 4.3d:
  • Поправлена ошибка с занесием данных и созданием БД на Linux (наблюдались проблемы чтения из базы) (Спасибо за репорт CrazyKiller)
  • Пересмотрел веб-часть, убрал некоторые лишнии строки, поправил запросы

    Версия 4.3c:
  • Добавлена опция включения показа IP адресов в логе. Включается в файле config.php

    Версия 4.3b:
  • Усовершенствован поиск ссылок в чате, для занесения в таблицу логов ссылок

    Версия 4.3a:
  • Вновь поправка в регулярном выражении, когда некоторые команды при вводе заносились в логи

    Версия 4.3:
  • Поправлена ошибка, когда некоторые команды при вводе заносились в логи

    Версия 4.2:
  • Усовершенствована функция нахождения ссылок в чате и занесении их в БД с html тегами (Взято из StatPX от alex82)
  • Сделан стиль для веб части
  • Оптимизирован запрос в БД на вебе
  • Поправлены некоторые ошибки в веб-интерфейсе
  • Добавлена мультиязычность в веб форму (языки: русский, английский, украинский)

    Версия 4.1:
  • Магнет и обычные ссылки теперь записываются в базу полностью вместе с комментарием

    Версия 4.0:
  • Поправлена ошибка с парсером смайлов(некоторые смайлы не определялись)
  • Версия скрипта также работает на PtokaX

    Версия 3.2:
  • Смайлики на веб-странице отображаются графически(Спасибо alex82)

    Версия 3.1:
  • В базу теперь также записываются профиль и IP-адрес юзера
  • Изменения в веб интерфейсе
      - Ники пользователей в логах теперь выделяются различными цветами в зависимости от профиля


    Версия 3.0:
  • Исправлена ошибка с парсером ссылок в сообщении и занесением их в БД
  • Добавлено экранирование данных в запросах к БД
  • Изменения в веб интерфейсе

    Версия 3.0 Beta:
  • Логирование магнет и обычных ссылок
  • Исправлена опечатка в local https
  • Убрана неиспользуемая таблица ChangeTime
  • Изменения в веб интерфейсе

    Версия 2.0:
  • Изменения в веб-интерфейсе
  • Некоторые мелкие доработки
  • Все dchub, http, https, ftp, магнет ссылки(спасибо alex82) и тд. теперь будут отображаться в логе как гиперссылки

    Версия 1.1:
  • Некоторые мелкие исправления (Поправил ошибку, когда не логировались некоторые магнет-ссылки)



Внимание! Скрипт не выводит в чат последние n сообщений, он только сохраняет данные в БД и с помощью веб-интерфейса их можно просмотреть.

Советы:
При создании БД на Windows используйте кодировку базы и таблиц cp1251_general_ci;
При создании БД на Linux используйте кодировку базы и таблиц utf8_general_ci

Для работы скрипта требуется установить библиотеку Mysql
Для PtokaX: http://mydc.ru/topic1508.html
Для RusHub: http://mydc.ru/topic2952.html
Nickolya, Setuper, Invisible, fixx, Serx, CrazyKiller, Dimon21, AltSide
9.1.2010, 18:40 Объявления (Announcements)
версия 1.1
Название: Announcements
Версия хаба: RusHub 2.0.5 и выше
Версия lua плагина: 1.6 и выше
Версия скрипта: 1.1
Автор: STRELOK
Описание: Публикация объявления администрацией хаба. Выводит объявления юзеру при подключении к хабу
Возможности:
    1. Показ объявления перед входом юзера
    2. Показы даты и времени, когда было установлено объявление
    3. Выбор кому будет доступно публиковать сообщения
    4. Вывод сообщения о новом объявлении всем
    5. Выбор сколько объявлений выводит при подключении пользователя
    6. Удаление объявления по номеру.
Для работы скрипта необходимо скачать модуль files здесь
Invisible, Saymon21
9.1.2010, 16:13 Announcements
API2 | Объявления
Цитата(Drakula @ 1.7.2009, 21:20) *
Скрипт классный, вот если бы ещё добавить: удаление объявления, было бы очень замечательно, а то надоедает заходить в папку и удалять: dats.dat

Если кому то нужна функция удаления объявления, то после return true (на 64 строке) нужно добавить на 65 строке:
Код
    elseif cmd == "!delannouncements" then
        if tProfile[tUser.iProfile] == 1 or tVIP[tUser.sNick] then
        tDats = {
        Dats = "Нет объявлений",
        Date = "unknown"
        }
        Core.SendToUser(tUser, ("<%s> Объявление удалено!"):format(Bot))
        SaveToFile(filename, tDats, "tDats")
        else
        Core.SendToUser(tUser, ("<%s> У вас нет прав для использования этой команды!"):format(Bot))
        end
        return true

Теперь после ввода команды !delannouncements будет выводится так:
Цитата
[17:09:13] <PtokaX> Объявление администрации:
Нет объявлений (Установлено: unknown)


Думаю с менюшкой сами разберётесь как сделать big_smile.gif

** Пошёл делать новую версию скрипта. Попробую сделать так, чтобы можно было добавлять хоть сколько объявлений и делать удаление по номеру объявления. **

Сделал 2.0. версию. Изменения в первом посту.
dimajak
7.1.2010, 12:16 FirstRusHubBot
приводим RusHub к рабочему виду функционалом скриптов
В связи с выходом новой версии хаба и плагина изменились пути до файлов. Чтобы скрипт заработал, необходимо открыть файл FirstRusHubBot.lua и
Код
    sMainDir = Core.GetMainDir()
    sScriptsDir = Core.GetScriptsDir()

поменять на
Код
    sMainDir = Core.sMainDir
    sScriptsDir = Core.sScriptsDir
Invisible, Otshelnik-Fm, Saymon21, KamoK
7.1.2010, 11:48 История чата
версия 2.1a
Добавлена Версия 2.0:
lua плагин: 1.6
Версия хаба: 2.0.5
  • Лог чата сохраняется в файл © STRELOK
  • Изменён стиль вывода лога чата © STRELOK
AfLc
6.1.2010, 9:33 История чата
версия 2.1a
Название: ChatHistory
Версия: 2.1a (08.01.2011)
Автор: STRELOK
Описание: Выводит последние n сообщений в чате при подключении пользователя к хабу
Изменения
    Версия 2.1a:
  • Поправка в регулярном выражении (команды для хаба при вводе заносились в лог)

    Версия 2.1:
  • Возможность включения логирования команд /+!me
  • Поправлена ошибка, когда при кике с хаба пользователя последние сообщения выводились в статусную строку клиента

    Версия 2.0:
  • Лог чата сохраняется в файл © STRELOK
  • Изменён стиль вывода лога чата © STRELOK
Для работы скрипта нужно скачать модуль files здесь
Nickolya, Setuper, Invisible, comua, CrazyKiller, Saymon21, AfLc, мамин_парень
5.1.2010, 14:18 Тексты
версия 2.0
Название: Тексты
Версия: 2.0
Автор: STRELOK, Setuper(fixed)
lua плагин: 1.6
Версия хаба: 2.0.5
Описание: выводит содержимое текстовых файлов по команде.
Примечания:
Тексты лежат в папке texts
Изменения
    Версия 2.0:
  • Добавил дополнительные возможности, такие как: Получение названия хаба, его портов, Макс. и мин. длинна ника

    Версия 1.4:
  • Вновь исправлена ошибка в регулярном выражении. Команда /me не пропукалась в чат © STRELOK

    Версия 1.3:
  • Исправлен путь до папки texts в связи с выходом новой версии RusHub'а © STRELOK

    Версия 1.2:
  • Исправлена ошибка в регулярном выражении. (В чат не пропускались некоторые смайлы) (с) STRELOK

    Версия 1.1:
  • Функция LoadText перенесена в модули © STRELOK
  • Теперь скрипт ищит текстовый файл по любой введёной команде, если текстовый файл есть, его содержимое отобразится, если его нет, то функция возвращает nil © Serx
Для работы скрипта необходимо скачать модуль files здесь
Invisible, ShadoWx, Sekretchik, Saymon21, TiGRpp, Snacho, AfLc, мамин_парень
5.1.2010, 13:31 Дата и время
версия 2.0
Название: Дата и время
Версия: 2.0
Автор: STRELOK
Версия lua плагина: 1.13
Версия хаба: 2.1.2
Описание: Выводит сегодняшнею дату и текущее время сервера по запросу
    Версия 2.0:
  • Регистрация бота часов в списке юзеров
Invisible, Saymon21, AfLc
18.12.2009, 11:48 RSS Ленты
API2 | Скрипт для просмотра новостных лент
[attachment=3636:FeedWatch.lua]
Оффтоп
Цитата(12345 @ 15.11.2009, 15:25) *
А под php можна его както переделать?

CODE
<?php function GetXMLFirstVal($r,$t) {
if(preg_match_all('/<('.$t.')>(.*)<\/\\1>/Usi',$r,$o)) return $o[2][0];
return false;
}

function GetXMLAllVal($r,$t) {
if(preg_match_all('/<('.$t.')>(.*)<\/\\1>/Usi',$r,$o)) return $o[2];
return array();
}

function GetStream($URL,$mode=0) {


switch($mode) {

// php
case 0:
$results = file_get_contents($URL);
break;

// CURL
case 1:

$ch = curl_init();
curl_setopt ($ch, CURLOPT_URL, $URL); // Destination URL
curl_setopt ($ch, CURLOPT_RETURNTRANSFER, 1); // Output to a variable
curl_setopt ($ch, CURLOPT_POST, 0); // Use HTTP POST
curl_setopt ($ch, CURLOPT_TIMEOUT, 20); // Default Timeout

$results = curl_exec($ch);
if(curl_error($ch)) {
print_r(curl_getinfo($ch));
exit();
}

break;

// SOCKETS
case 2:

$info = parse_url($URL);

$socket = socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
if ($socket < 0) {
echo "socket_create() failed: reason: " . socket_strerror($socket) . "\n";
exit();
}
$result = socket_connect($socket, $info['host'], 80);
if ($result < 0) {
echo "socket_connect() failed.\nReason: ($result) " . socket_strerror($result) . "\n";
}

$in = "GET ".$info['path']." HTTP/1.1\r\n";
$in .= "Host: ".$info['host']."\r\n";
$in .= "Connection: Close\r\n\r\n";

socket_write($socket, $in, strlen($in));

$out = '';
$results = '';

while ($out = socket_read($socket, 2048)) {
$results .= $out;
}

socket_close($socket);

break;

default:
$results = '';
}
return $results;
}
if (isset($_GET['rss'])) {
if ($_GET['rss'] == "bash.org.ru") //GET массив
{

$RSSS = array();
$RSSS[] = 'http://bash.org.ru/rss'; //RSS поток
echo '<center><h3>Bash.org.ru</h3></center><br /><br />'; //имя rss потока

foreach($RSSS AS $RSS) {

//print("\n$RSS");

// получаем контент
// 0 - php
// 1- curl
// 2- sock
$XML = GetStream($RSS,0);

if($XML) {

$ITEMS = GetXMLAllVal($XML,'item');
$g=0;

foreach($ITEMS AS $ITEM) {
$g++;

$TITLE = GetXMLFirstVal($ITEM,'title');
$LINK = GetXMLFirstVal($ITEM,'link');
$DESC = GetXMLFirstVal($ITEM,'description');
$DATE = GetXMLFirstVal($ITEM,'pubDate');
$CAT = GetXMLFirstVal($ITEM,'category');

if(!$DATE) {
$DATE = GetXMLFirstVal($ITEM,'dc:date');
}

if($DATE) $DATE = strtotime($DATE);
else $DATE = time();

$TITLE = html_entity_decode($TITLE,ENT_QUOTES);
$DESC = html_entity_decode($DESC,ENT_QUOTES);
$CAT = html_entity_decode($CAT,ENT_QUOTES);

echo '<li><a href="'.$LINK.'" target="_blank">'.$TITLE.'</a></li><br />';

$DESC= str_replace("<![CDATA[","",$DESC);
$DESC= str_replace("]]>","",$DESC);
echo '<ul><p>'.$DESC.'</p></ul>';

if ($g==100) //Количество выводимых результатов
{break;}
}

}
} }

elseif ($_GET['rss'] == "ithappens") //GET массив
{

$RSSS = array();
$RSSS[] = 'http://ithappens.ru/rss/'; //RRS поток

echo '<center><h3>ITHappens</h3></center><br /><br />'; //имя rss потока

foreach($RSSS AS $RSS) {

//print("\n$RSS");

// получаем контент
// 0 - php
// 1- curl
// 2- sock
$XML = GetStream($RSS,0);

if($XML) {

$ITEMS = GetXMLAllVal($XML,'item');
$g=0;

foreach($ITEMS AS $ITEM) {
$g++;

$TITLE = GetXMLFirstVal($ITEM,'title');
$LINK = GetXMLFirstVal($ITEM,'link');
$DESC = GetXMLFirstVal($ITEM,'description');
$DATE = GetXMLFirstVal($ITEM,'pubDate');
$CAT = GetXMLFirstVal($ITEM,'category');


if(!$DATE) {
$DATE = GetXMLFirstVal($ITEM,'dc:date');
}

if($DATE) $DATE = strtotime($DATE);
else $DATE = time();

$TITLE = html_entity_decode($TITLE,ENT_QUOTES);
$DESC = html_entity_decode($DESC,ENT_QUOTES);
$CAT = html_entity_decode($CAT,ENT_QUOTES);

echo '<li><a href="'.$LINK.'" target="_blank">'.$TITLE.'</a></li><br />';

$DESC= str_replace("<![CDATA[","",$DESC);
$DESC= str_replace("]]>","",$DESC);
echo '<ul><p>'.$DESC.'</p></ul>';

if ($g==5) //Количество выводимых результатов
{break;}
}

}
}
}} ?>

GreyDer
11.12.2009, 18:09 Generator BB-Codes
Generator BB-Codes




Generator BB-Code for Torrents-Trackers - Скрипт, который поможет оформить вам раздачу любого релиза для любого форума с автоматическим заполнением данных BB-кодами, которые чаще всего используются на форумах и торрент-трекерах.

Официальный сайт: http://dmitry.0fees.net/projects/generator

Скачать можно на официальном сайте
BIMMER71
11.11.2009, 14:38 помогите мне пожалуйста
пожалуйста
http://mydc.ru/ipb.html?act=findpost&pid=8573
Цитата(4yBaK @ 11.11.2009, 16:08) *
Мне надо скрипт... Например чтобы в меню была например строка Правила

http://mydc.ru/ipb.html?act=findpost&pid=8577
Цитата(4yBaK @ 11.11.2009, 16:08) *
и он выводил это в ЛС под ником Rules но чтобы этого бота небыло на хабе.
И чтобы текст он брал из файла например: /scripts/rul.txt

http://mydc.ru/topic1500.html?view=findpost&p=11655
random name
8.11.2009, 15:10 UpTime
API2 | Время непрерывной работы
Название: UpTime
Автор: STRELOK
Версия API: 2
Описание:
    Выводит время непрерывной работы хаба по команде !uptime или +uptime
denis, Saymon21, AfLc, Unique
27.7.2009, 17:52 Webstats
API2 | Веб-статистика для хаба
Цитата(Voice @ 27.7.2009, 16:17) *
Требует mysql.dll и прочее. Где взять?

http://mydc.ru/ipb.html?act=attach&type=post&id=1785
Voice, apelsin
27.6.2009, 16:40 Announcements
API2 | Объявления
Название: Announcements
Версия API: 2
Версия скрипта: 2.0
Автор: STRELOK
Описание:
Публикация объявления администрацией хаба. Выводит объявление юзеру при подключении к хабу
Возможности:
1. Показ объявления перед входом юзера
2. Показы даты и времени, когда было установлено объявление
3. Выбор кому будет доступно публиковать сообщения
4. Вывод сообщения о новом объявлении всем
5. Выбор сколько объявлений выводит при подключении пользователя и сколько будет хранится в таблице
6. Удаление объявлений по номеру.
intlive, Invisible, denis, Drakula, Pro009, теньь, Rei_Volia, shur49, bENNY!, YoriK, AfLc, Hashish, мамин_парень, zeusby
27.6.2009, 15:10 Manual
скрипт помощи
Создай текстовый файл helpme в папке texts и напиши туда все часто задаваемые вопросы и ответы на них
Tarantul13
7.5.2009, 14:37 informer API2
Не выводит сообщение в общ чат
Код
bot = "MAINBOT"
taimer = 180 -- в минутах

messarray={
[[Мы рады приветствовать вас на нашем хабе! Посетите наши веб ресурсы:
Сайт: http://core.pvt.454.ru
Форум: http://core.pvt.454.ru/forum]],
}

function OnStartup()
    tmr = TmrMan.AddTimer (taimer*60*1000)
end

function OnTimer(tmr)
    Core.SendToAll("<"..bot.."> "..messarray[math.random(1,#messarray)])
end
Invisible, мамин_парень
24.4.2009, 17:57 ChatLogsMySQL
API2 | Лог главного чата
Со слов автора скрипта(st.FILA):
Цитата
Это и было написано за 5 минут, в любом случае то что Стрелок просил я сделал. Эти скрипты лишь заготовка для полноценной, хорошо оформленной страницы. ГНУ лицензию на скрипты ставлю - берите и модифицируйте как хотите)))


Какие возможности скрипта:

Войдя на страницу, появится 3 вида поиска:
Показать последние N фраз чата
Показать сообщения нужного вам ника
Показать лог за нужное вам число
Invisible
7.4.2009, 20:51 Mainbothub
API2 | Возможность бана ботом хаба
Название: MainBotHub
Версия API: 2
Версия скрипта: 3.1
Автор: STRELOK
Описание:
  1. Возможность забанить юзера ботом хаба(временно, постоянно)
  2. Возможность включения и выключения отправки сообщения о бане всем
  3. Возможность отсылки сообщения админу кто кого забанил
  4. Выбор кому будет доступно использование скрипта. Определённым профилям, или определённым никам
Nickolya, denis, KRAVA, Тёмич, andromed, shur49
5.4.2009, 19:58 Материалы Из Википедии
http://ru.wikipedia.org
Заранее большое спасибо big_smile.gif
erica
27.3.2009, 14:37 Sourcemon
API2 | Мониторинг игровых серверов Source и GoldSource
Спасибо, скрипт очень понравился, ошибок нет! Если кому надо, вот список серверов:

  • CS SERVERS:
    Код
        {Name = "Counter-Strike 1.6 Meat / Cyber74.ru", Addr = "cs1.cyber74.ru:27015",Timeout = 1},
        {Name = "Counter-Strike 1.6 DeathMatch Free For All / Cyber74.ru", Addr = "cs2.cyber74.ru:27015",Timeout = 1},
        {Name = "Counter-Strike 1.6 Zombie Plague / Cyber74.ru", Addr = "cs3.cyber74.ru:27015",Timeout = 1},
        {Name = "Counter-Strike 1.6 Hide and Seek / Cyber74.ru", Addr = "cs4.cyber74.ru:27015",Timeout = 1},
        {Name = "Counter-Strike 1.6 Kreedz / Cyber74.ru", Addr = "cs5.cyber74.ru:27015",Timeout = 1}
  • L4D SERVERS:
    Код
        {Name = "L4D Server №1", Addr = "82.193.149.51:27015",Timeout = 1},
        {Name = "L4D Server №2", Addr = "82.193.149.51:27016",Timeout = 1},
        {Name = "L4D Server №3", Addr = "82.193.149.51:27017",Timeout = 1},
        {Name = "L4D Server №4", Addr = "82.193.146.197:27015",Timeout = 1},
        {Name = "L4D Server №5", Addr = "82.193.146.197:27016",Timeout = 1},
        {Name = "L4D Server №6", Addr = "82.193.146.197:27017",Timeout = 1}
Uncle_Dif
13.3.2009, 6:26 Texts
Прошу ;)
random name
12.3.2009, 20:06 История Чата + Антирекламма
API2 | Ведет лог чата
Исправте пожалуйста вот такие ошибки:

Код
:177: attempt to index global 'Cmds' (a nil value)

Код
:301: bad argument #1 to 'pairs' (table expected, got nil)
- эта ошибка вылетает очень часто

PS: Если что, вот мой скрипт лог чата
    1. Убрал меню(т.к. считаю что оно не нужно)
    2. Убрал нумеровку сообщений
    3. Лог в 24-х часовом формате

Кому интересно, юзайте big_smile.gif
мамин_парень
7.3.2009, 19:42 Комманды И Текст
Помогите пожалуйста ;-)
А можно API2
мамин_парень
14.2.2009, 20:00 Антимат Из Хуббы
API2
Цитата(Wariner @ 14.2.2009, 20:09) *
ставь историю чата ниже антимата!

спасибо, помогло!!!
мамин_парень
11.1.2009, 14:51 Режим Ушёл
API2
Название: AwayMsg
Версия API: 2
Идея и самый первый скрипт: STRELOK
Автор: Wariner
Версия скрипта: 2.0 Нововведение: Автоответчик на чат! (Добавил: STRELOK)
Команды: !away <причина> - включить режим ушёл; !back - отключить режим ушёл; Также можно воспользоваться меню хаба
Описание:
- Установка\снятие режима ушёл
- Отсылка сообщения об отсутствии если вам пишут в мейне или привате(с показам времени)

Скрипт: [attachment=2700:Away.lua]
Создать в папке scripts папку hub files и положить туда этот файл [attachment=4180:PM.lua]
Pro009, Тёмич
9.1.2009, 20:11 Скрипт Банов И Киков
Заметил недавно что в PtokaX нету функции показа бана или кика другим пользователям, кроме ОПераторам и Администраторам хаба
Когда банишь или кикаешь, обычный или зарегистрированный пользователь не видит бана, бан видит только администратор или ОПератор(

Цитата
[22:09:28] <Security> *** test с IP: 10.2.136.203 был временно забанен , пользователем STRELOK на: 1 мин потому, что: test.

это ссобщение увидит только администратор или оператор хаба(

Составьте плиз скрипт, чтобы сообщения бана или кика было видно всем пользователям:(
Killer47
25.11.2008, 10:31 Ptokax_0.4.1.1 Готовая Сборка, Включающая Множество Полезных Скриптов
Что нового?
Немного изменён русский язык
Добавлены все самые нужные скрипты для PtokaX
Обновлены настройки.

Что изменять?
Изменять в скриптах абсолютно ничего не нужно, в настройках вы можете изменять настройку языка, сообщение MOTD, антифлуд. Настройки ботов не трогать, кроме бота OpChat, бот Security - не изменять его конфигурацию.
zeusby

4 страниц V  < 1 2 3 4 >
RSS Сейчас: 23.11.2024, 1:26