Can sum1 convert this pls?
-- antinetlimiter for QuikThinker by bastya_elvtars
todo=2 -- 1 to disconnect, 2 to timeban, 3 to ban
timeban=30 -- in minutes
-- no edit below plz
OpConnected=NewUserConnected
function DataArrival(user,data)
if strsub(data, 1, 7) == "$MyINFO" then
if strfind(strlower(data),"netlimiter") then
local what,doin=hasto(user)
user:SendData("NoNetLimiter","You are using NetLimiter, now you are "..what)
SendToOps("NoNetLimiter",user.sName.." is using netlimiter, he/she was "..what)
return doin
end
end
end
function hasto(user)
if todo==1 then
return "disconnected.",user:Disconnect()
elseif todo==2 then
return "timebanned for "..timeban.." minutes.",user:TimeBan(timeban)
elseif todo==3 then
return "banned.",user:Ban()
end
end
Thanx in advance.
i can (http://fdc.webhop.net/kuru.gif)
-- antinetlimiter for QuikThinker by bastya_elvtars
-- to LUA 5 converted on Earth
todo=2 -- 1 to disconnect, 2 to timeban, 3 to ban
timeban=30 -- in minutes
-- no edit below plz
OpConnected=NewUserConnected
function MyINFOArrival(curUser,data)
if curUser.sConnection then
if string.find(string.lower(data),"netlimiter") then
local what,doin=hasto(curUser)
curUser:SendData("NoNetLimiter","You are using NetLimiter, now you are "..what)
SendToOps("NoNetLimiter",curUser.sName.." is using netlimiter, he/she was "..what)
return doin
end
end
end
function hasto(curUser)
if todo == 1 then
return "disconnected.",curUser:Disconnect()
elseif todo == 2 then
return "timebanned for "..timeban.." minutes.",curUser:TimeBan(timeban)
elseif todo == 3 then
return "banned.",curUser:Ban()
end
end
is this to supposed tokick people who use netlimiter to limu upload?
That's the idea anyway.
Netlimiter in connection is some DC, not actual use of the program. Ask yourself what's worse, people telling you they using it (what this script will catch) or peope using it, but not telling you. ?