myDC.ru

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

 
 
Ответить в данную темуНачать новую тему

> Скрипт Стоп трепет

Теги
Нет тегов для показа
Lesh™
сообщение 16.10.2009, 13:43
Сообщение #1


Активный участник
***

Группа: Пользователи
Сообщений: 62
Регистрация: 11.10.2008
Пользователь №: 775
Спасибо сказали: 4 раза




Помогите дописать в скрипте проверку по профелю, плиз...
Код
-- Стоп Треп - запрещает говорить больше N сообщений подряд в чате
-- Автор Nickolya
-- 06.11.08

sMsg = "Вы разговариваете сам с собой. Дождитесь пока кто-то вам ответит!"
iCnt = 10 --количество пропускаемых сообщений

function Main()
    sOne = 1
    sBot = frmHub:GetHubBotName()
    Core = {}
    Core.SendToUser = function(tUser, sData)
        tUser:SendData(sData)
    end
end

function OnStartup()
    sBot = SetMan.GetString(21)
end

iCounter = 0
sNick = ""

function ChatArrival(tUser)
    local sUserNick = tUser.sNick or tUser.sName
    if sNick == sUserNick then
        if iCounter >= iCnt then
            Core.SendToUser(tUser, "<"..sBot.."> "..sMsg)
            return sOne or true
        else
            iCounter = iCounter + 1
        end
    else
        sNick = sUserNick
        iCounter = 1
    end
end
Go to the top of the page
+Quote Post
X-Sky
сообщение 16.10.2009, 17:02
Сообщение #2


Освоившийся участник
*****

Группа: Модераторы
Сообщений: 352
Регистрация: 25.7.2009
Пользователь №: 3 960
Спасибо сказали: 73 раза




Зачем выкладывать весь код? Достаточно просто прикрепить к посту скрипт!
Go to the top of the page
+Quote Post
Setuper
сообщение 16.10.2009, 18:22
Сообщение #3


RusHub team lead
**************

Группа: Модераторы
Сообщений: 4 030
Регистрация: 20.6.2008
Из: г. Королёв (Моск. обл.)
Пользователь №: 46
Спасибо сказали: 1708 раз




Иногда качать файл не очень хочется. Если код маленький (как этот). Почему бы не выложить кодом. Тем более, что это более наглядно в данной ветке форума.

Ограничения по профилю можно сделать так:

Код
local tProfiles = {
  [0] = true, -- master
  [1] = true, -- operator
  [2] = false, -- vip
  [3] = false, -- reg
}

function ChatArrival(tUser)
  if tProfiles[tUser.iProfile] then
    local sUserNick = tUser.sNick or tUser.sName
    ...
  end
end

Go to the top of the page
+Quote Post
Alexey
сообщение 17.10.2009, 8:26
Сообщение #4


7 квадратиков
*******

Группа: Модераторы
Сообщений: 793
Регистрация: 21.1.2009
Пользователь №: 1 895
Спасибо сказали: 301 раз




Вот-бы ещё подсветку синтаксиса...
Go to the top of the page
+Quote Post

Ответить в данную темуНачать новую тему
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

Collapse

> Похожие темы

  Тема Ответов Автор Просмотров Последнее сообщение
No new Topic has attachmentsНерабочий скрипт ВИПа по шаре
16 Damaks 18 462 23.2.2023, 7:16 Посл. сообщение: mod
No new Topic has attachmentsMagneto - Бесплатный Скрипт Портала Обмена Dc-ссылками Для Локальной Сети
26 UserSide 39 269 27.8.2019, 11:01 Посл. сообщение: CyberGhost404
No New Posts От: Новогодний Скрипт
От темы с ID: 871
0 Евгений 2 782 15.10.2018, 21:44 Посл. сообщение: Евгений
No New Posts А бывают такой скрипт бота?
Скрипт который создает виртуалных юзеров, но с реальными шарами
5 MarkDark 7 308 26.12.2017, 10:47 Посл. сообщение: мамин_парень
No New Posts Скрипт: Бот который отвечает в лс
4 мамин_парень 6 958 11.11.2017, 5:57 Посл. сообщение: мамин_парень
No New Posts как сделать вот этот скрипт
12 мамин_парень 11 098 13.9.2017, 10:51 Посл. сообщение: dimetro
No New Posts Topic has attachmentsИщу скрипт переадресации (redirect)
Переадресация интернет-юзеров
3 AS_Com 6 590 27.8.2017, 8:05 Посл. сообщение: Ksan
No New Posts Topic has attachmentsСкрипт Thunder.lua
7 Евген76 14 492 9.8.2017, 11:48 Посл. сообщение: Ksan
No New Posts Требуется скрипт
Нужен скрипт запрета на подключение
5 Nikolaevich 8 776 20.8.2016, 19:52 Посл. сообщение: Ksan
No new ВАЖНО: Topic has attachmentsСкрипт банов для RusHub
тестим и комменьтруем
79 Wariner 99 143 28.9.2015, 13:34 Посл. сообщение: NeirRon
No New Posts Скрипт загрузки файла
1 FreeNas 5 976 21.7.2015, 10:58 Посл. сообщение: HackFresse
No new Как вызвать bash скрипт из Lua
14 Iskandark 15 929 3.3.2015, 12:42 Посл. сообщение: Iskandark
No new Topic has attachmentsНовогодний Скрипт
API2
22 Tsd 33 756 12.12.2014, 16:28 Посл. сообщение: Tsd
No New Posts Скрипт запрета видеть чат
запрет видеть чат
2 dimetro 6 795 5.12.2014, 17:37 Посл. сообщение: dimetro
No New Posts Topic has attachmentsпеределать скрипт kinozal.tv
6 BOKOREZ 11 998 30.10.2014, 18:29 Посл. сообщение: Dani_Filth

 



RSS Сейчас: 29.3.2024, 11:20