Версия для печати темы
Нажмите сюда для просмотра этой темы в обычном формате
MyDC.ru _ Kорзина _ Бан И Кик
Автор: SlavaX 28.11.2008, 1:05
Вот народ, такая фигня у меня. Как мне в тхундере прописать, чтобы в меню банил сразу и по нику и по IP вот пример:
Код
user:SendData("$UserCommand 1 3 Быстрое меню админа\\Забанить на\\5 минут$<%[mynick]> !fulltempbanip %[ip] 5m %[line:Укажите причину]||")
Тут он банит по IP
А вот тут по нику:
Код
user:SendData("$UserCommand 1 3 БЫстрое меню админа\\Забанить на\\Завершить БАН$<%[mynick]> !fulltempban %[nick] 1m пока||")
Вот как мне объеденить в одну комманду??? Скажите ПЛИЗЗЗ. Буду оч оч оч благодарен))))))
Автор: *FoxMalder* 28.11.2008, 1:11
с помощью команд никак... эт надо скриптом
Автор: SlavaX 28.11.2008, 1:41
Цитата(*FoxMalder* @ 28.11.2008, 1:11) 
с помощью команд никак... эт надо скриптом
Так тогда как скриптом??? Чо делать??
Автор: Setuper 28.11.2008, 2:04
Код
function OpConnected(tUser)
tUser:SendData("$UserCommand 1 3 Быстрое меню админа\\Забанить юзера$<%[mynick]> !banuser %[line:Введите ник] %[line:Время бана в минутах] %[line:Укажите причину]&#*124;|$UserCommand 1 2 Быстрое меню админа\\Забанить этого юзера$<%[mynick]> !banuser %[nick] %[line:Время бана в минутах] %[line:Укажите причину]&#*124;")
end
function ChatArrival(tUser,sData)
sData=sData:sub(tUser.sName:len()+4,-2)
local _,_,sCmd,sNick,iTime,sReason=sData:find("%s*%p(%S+)%s*(%S*)%s*(%d*)%s*(.*)")
if sCmd and sCmd=="banuser" then
if sNick and sNick~="" then
local tUs=GetItemByName(sNick)
if tUs then
iTime=iTime and tonumber(iTime) or 0
TempBan(tUs.sIP,iTime,sReason or "",tUser.sName,1)
NickTempBan(sNick,iTime,sReason or "",tUser.sName)
tUser:SendData("*** Пользователь "..sNick.." ["..tUs.sIP.."] успешно забанен.")
else
tUser:SendData("*** Пользователь с ником "..sNick.." не существует или в оффлайне.")
end
else
tUser:SendData("*** Не ведён ник.")
end
return 1
end
end
удалить * между &# и 124
tUser:SendData("$UserCommand 1 3 Быстрое меню админа\\Забанить юзера$<%[mynick]> !banuser %[line:Введите ник] %[line:Время бана в минутах] %[line:Укажите причину]&#*124;|$UserCommand 1 2 Быстрое меню админа\\Забанить этого юзера$<%[mynick]> !banuser %[nick] %[line:Время бана в минутах] %[line:Укажите причину]&#*124;")
end
function ChatArrival(tUser,sData)
sData=sData:sub(tUser.sName:len()+4,-2)
local _,_,sCmd,sNick,iTime,sReason=sData:find("%s*%p(%S+)%s*(%S*)%s*(%d*)%s*(.*)")
if sCmd and sCmd=="banuser" then
if sNick and sNick~="" then
local tUs=GetItemByName(sNick)
if tUs then
iTime=iTime and tonumber(iTime) or 0
TempBan(tUs.sIP,iTime,sReason or "",tUser.sName,1)
NickTempBan(sNick,iTime,sReason or "",tUser.sName)
tUser:SendData("*** Пользователь "..sNick.." ["..tUs.sIP.."] успешно забанен.")
else
tUser:SendData("*** Пользователь с ником "..sNick.." не существует или в оффлайне.")
end
else
tUser:SendData("*** Не ведён ник.")
end
return 1
end
end
Автор: SlavaX 19.1.2009, 18:28
Самое огромное тебе СПАСИБА, =) РЕСПЕКТ) :smile2: