myDC.ru

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

 
История благодарностей участнику X-Sky. Спасибо сказали: 73
Дата поста: В теме: За сообщение: Спасибо сказали:
5.1.2010, 5:31 Поддомены вида ***.kreadc.ru
Готово big_smile.gif
FallenAngel
4.1.2010, 13:49 Ник пользователя в контекстном меню
как?
Код
function UserConnected(tUser)
Core.SendToUser(tUser,"$UserCommand 1 3 Персональное меню для "..tUser.sNick.."\\Действие меню$<%[mynick]> !команда&*#124;|")
end
RegConnected,OpConnected=UserConnected,UserConnected


* - убрать
Amaterasu
23.12.2009, 23:58 Today
API2 | Показ даты, времени, описания времени суток в гл. чате
Название скрипта: Today
Версия API: API 2
Автор: X-Sky
Описание скрипта:
Скрипт по командам (!date, !today, !дата, !сегодня) выдает в чат произвольное описание времени суток, дату и время, установленные на сервере.
Пример:
Цитата
[00:49:04] <X-Sky> !дата
[00:49:04] <[=^.^=]> *** Тёмное время суток. Сегодня: 24.12.2009 Время в Красноярске: 00:49:04

[attachment=3703:Today.lua]
Invisible, Saymon21, striker, Виктор, goncharov08, killserver, AfLc
23.12.2009, 21:10 Time
API2 | Показ времени в гл. чате
Название скрипта: Time
Версия API: API 2
Автор: X-Sky
Описание скрипта:
Скрипт по командам (!тайм, !время, !time) выдает в чат произвольное описание времени суток и время, установленное на сервере.
Пример:
Цитата
[00:47:25] <X-Sky> !тайм
[00:47:25] <[=^.^=]> *** Вечер. Затихает городская суета..) Точное время 22:47:25


[attachment=3700:Time.lua]
Saymon21, санек, striker, AfLc
23.12.2009, 5:03 Новогодняя шапка форума
как вам?
Воруй уже, пока все спят go.gif
LOKI
22.12.2009, 22:14 Confirmer
скрипт согласия с правилами хаба
ВАСЯ, достаточно было изменить return 1 на return true
Лови:
Нажмите СЮДА для открытия просмотра кода скрипта
BOT = SetMan.GetString(21)
SET = "sIP" -- определение по IP, "sName" -- по нику
Mode = 1 -- 1 - в общий, 2 - в приват. 0 - не отсылать

IConfirm = "я соглашаюсь с правилами"

Confirm = { }
data_file = Core.GetPtokaXPath().."scripts/1/data.txt"
dofile(data_file)

function UserConnected(user)
Core.GetUserAllData(user)
if Confirm[user[SET]] == nil then
SendTo(user, BOT, SendConfirm)
end
end
OpConnected = UserConnected

function ChatArrival(user,data)
Core.GetUserAllData(user)
local _,_, Message = string.find(data, "%b<>%s+("..IConfirm..")")
IConfirmPars(user, Message)
if Confirm[user[SET]] == nil then
return SendTo(user, BOT, SendConfirm)
end
end

function SendTo(user, BOT, SendConfirm)
if Mode == 1 then
Core.SendToNick(user.sNick,"<"..BOT.."> ".. SendConfirm)
elseif Mode == 2 then
Core.SendPmToNick(user.sNick,BOT, SendConfirm)
elseif Mode == 0 then
end
return true
end

function ToArrival(user,data)
Core.GetUserAllData(user)
local _,_,To,From,Message = string.find(data,"$To:%s+(%S+)%s+From:%s+%S+%s+$<(%S+)>%s+(.*)|")
if To == BOT then
IConfirmPars(user, Message )
end
end

function IConfirmPars(user, Message )
if Message == IConfirm then
Confirm[user[SET]] = 1
SendTo(user, BOT,"Теперь вы полноправный участник чата!")
SaveToFile(data_file, Confirm, "Confirm")
end
end

function ReadFile(file)
local f = io.open(file, "r")
return f:read("*all")
end; rules_txt = ReadFile(Core.GetPtokaXPath().."scripts/1/info.txt")
SendConfirm = "Перед тем, как начать общение, ознакомьтесь с информацией хаба и правилами поведения в чате. \n" .. rules_txt .. "\n" .. "Если вы согласны с правилами - напишите фразу: " .. IConfirm .." и отправьте в чат."

function SaveToFile(file , table , tablename)
local handle = io.open(file,"w+")
handle:write(Serialize(table, tablename))
handle:flush()
handle:close()
collectgarbage(collect)
end

function Serialize(tTable, sTableName, sTab)
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.."}"
return sTmp
end
RegConnected = UserConnected
engineer, мамин_парень
22.12.2009, 20:57 Thanks
API2 | Скажи спасибо другому юзеру
В папке "Scripts" создать папку "Hub files" в которой создать файл "Thanks.tbl"
engineer, w3rtu
22.11.2009, 13:20 Нужен скрипт приветствия
Скрипты
Цитата(m3gap1x3L @ 22.11.2009, 11:49) *
Помогите ! Нужен скрипт , специально составленный ! Который выдаёт инфу , при входе на хаб ! .....


http://mydc.ru/ipb.html?act=attach&type=post&id=1441

Цитата
И ещё нужен простой скрипт , по команде выдающий инфу (У меня просто хаб на тематику кино , и инфа должна выглядеть примерно так)
тра-ля-ля тра-ля-ля


+1 к посту Варинера
LOKI
12.11.2009, 23:24 ShowTopic
API2 | Показ топика в чате
Название скрипта: ShowTopic
Версия API: 2
Автор: X-Sky
Дата написания: 13.11.09
Описание: По команде выводит в чат топик, заданный на хабе в данный момент. (может кому понадобится)
[attachment=3495:ShowTopi...Sky_API2.lua]

Вывод в чат топика по двум командам (например !топик и !топег)
[attachment=3496:ShowTopi...Sky_API2.lua]

Показ топика только для юзера
[attachment=3497:ShowTopi...Sky_API2.lua]
Saymon21, Pro009
23.10.2009, 8:52 Чат Комнаты
API2 | Возможно создать несколько чат комнат
Лови, имя комнаты [VIP]Комната, видна в списке и доступна только VIР'ам
Не забывай про кнопку спасибоbig_smile.gif
[attachment=3400:ChatRooms.rar]
Invisible, crake
8.10.2009, 18:05 Greeting_in_OpChat
API2 | Пришёл/ушёл для администрации в ОпЧате
Название скрипта: Greeting in OpChat
Версия API: API2
Автор: X-Sky
Дата написания: 8.10.2009
Описание скрипта: Приветствие/прощание состава администрации в ОпЧате
Прикрепленный скрипт: [attachment=3356:Greeting_in_OpChat.lua]

P.S. Поздравьте, мой первый написанный "с нуля" скрипт big_smile.gif По голове не бейте, если что не так victory.gif
Saymon21, Тёмич, Kocha, shur49, chelovek
7.10.2009, 9:19 Чат Комнаты
API2 | Возможно создать несколько чат комнат
Получите, распишитесь big_smile.gif
Все 2 файла кидаем в папку "Scripts"
[attachment=3352:ChatRooms.rar]

P.S. На всякий случай, есть такая кнопочка "Спасибо" victory.gif
VNoName, ozonek, TiGRpp, dimavolna, Kar@bas
26.9.2009, 16:36 HubTopic_by_mariner
API2 | тема чата
Да,конечно, просьба разобраться с этим делом)

================================
Разобрался сам))

Выкладываю в таком виде, чтобы не приходилось ничего создавать самому)

[attachment=3303:HubTopic.rar]
TiGRpp
20.9.2009, 23:23 Чат Комнаты
API2 | Возможно создать несколько чат комнат
Цитата(Uncle_Dif @ 13.9.2009, 22:16) *
Я озадачен, скачал и установил этот скрипт и теперь у меня два оп-чата :пацталом:.
Пытался стереть оп-чат в птоке (0411), не удаётся. Зачем не два оп-чата... Что посоветуете?

Лови, убрал ОПчат.

[attachment=3271:chatrooms.lua]
Kar@bas
19.9.2009, 23:46 Ваши Хабы И Их Адреса
Название: KreazoneDC++
Адрес: dc.kreadc.ru
Движка: PtokaX 0.4.1.1
Мин шара: 0 байт
Ограничения длины ника: мин - 2, макс - 15 символов
Пик юзеров: 1122
Местоположение: Россия, Красноярск
Правила:

Раскрывающийся текст

===== Правило =====
===== (Минимальная мера пресечения) =====

Длина ника должна быть от 2-х до 15-и символов
(Запрет входа на хаб ботом)

Правил касательно ников нет, но если вы собираетесь общаться в чате, имейте читабельный ник
(Бан от 1-ой минуты)

Запрещён флуд, смайло-флуд, частоповторяющиеся сообщения, не несущие смысловой нагрузки
(Бан, либо заглушка от 1-ой минуты)

Запрещены оскорбления, флейм, провокации на нарушение правил
(Бан, либо заглушка от 10-и минут)

Запрещено написание сообщений в верхнем регистре, то есть на CapsLock'е
(Бан, либо заглушка от 1-ой минуты)

Запрещена реклама сторонних ресурсов без согласия администрации хаба
(Бан, либо заглушка от 1-ого месяца)

Запрещён обход бана, заглушки, путём смены IP-адреса, либо путём использования прокси-серверов
(Бан от 1-ого месяца)

Запрещена подделка ников администрации хаба, подделка ников ботов
(Постоянный бан по нику)

Запрещено обсуждение действий администрации в главном чате хаба
(Бан от 1-ой минуты)

Запрещены частоповторяющиеся ссылки на интернет-ресурсы, реклама реферальных ссылок
(Бан, либо заглушка от 10-и минут)

Запрещена эмуляция шары и распространение фейков
(Бан от 1-ой минуты как предупреждение, за последующие нарушения бан от 12-и часов)

Запрещена реклама и распространение детской порнографии
(Бан от 1-ого месяца)
NiKe10

2 страниц V  < 1 2
RSS Сейчас: 15.4.2024, 9:06