Print Page - moddiey this script

Title: moddiey this script
Post by: Mr.T on 12 January, 2008, 17:22:17

is it possible to make this script so only op master and founder can download and search in the hub i wont have that in my reg hub

Code Select

--[[

	ChatOnly 1.0 LUA 5.0/5.1	01/28/07

	by Mutor

	Blocks file transfers and searches.
]]

function NewUserConnected(user, data)
	-- Botname pulled from the hub
	local BlockBot = frmHub:GetHubBotName()
	-- Message to send to users at login
	local msg = "\r\n\r\n\tL?gg m?rke till "..user.sName..", H?r inne "..
	"Kan man inte tanka filer eller s?ka i denna hub endast f?r reg till Lino-Hub.\r\n\r\n"
	user:SendData(BlockBot,msg)
end
OpConnected = NewUserConnected

ConnectToMeArrival = function(user, data)
	user:SendData("Transfers are disabled here in "..
	frmHub:GetHubName()..". Please clear your download queue.")
	return 1
end
RevConnectToMeArrival,MultiConnectToMeArrival = ConnectToMeArrival,ConnectToMeArrival

SearchArrival = function (user, data)
	local s,e,search = string.find(data,"([^%?]+)|$")
	local res = "Unknown Path"..string.char(92)..user.sName..", This is a chat "..
	"only hub search is disabled. "..string.rep("\t",100)..search
	user:SendData("$SR "..frmHub:GetHubBotName().." "..res.." 0 0/0"..
	frmHub:GetHubName().." ("..frmHub:GetHubIp()..":"..frmHub:GetHubUdpPort()..")")
	return 1
end

SRArrival = function(user, data)
	return 1
end
UDPSRArrival = SRArrival

Title: Re: moddiey this script
Post by: bastya_elvtars on 12 January, 2008, 18:22:59

Purpose of such a restriction?

Title: Re: moddiey this script
Post by: Mr.T on 12 January, 2008, 19:08:46

reg and user cant download or search vip op master netfounder can serach in the hub if you now what i mean ;)

Title: Re: moddiey this script
Post by: speedX on 12 January, 2008, 20:14:06

Maybe this will work:

Code Select


--[[

   ChatOnly 1.0 LUA 5.0/5.1   01/28/07

   by Mutor

   Blocks file transfers and searches.

   Mod by speedX   01/12/08
]]
-- Select the Profiles to be blocked: 1 = Block; 0 = Dont Block
tBlock = {
        [-1] = 1,       -- Unregistered User
        [0] = 0,        -- Master
        [1] = 0,        -- Operator
        [2] = 0,        -- Vip
        [3] = 1,        -- Registered User
}
        
function NewUserConnected(user, data)
  if tBlock[user.iProfile] == 1 then
   -- Botname pulled from the hub
   local BlockBot = frmHub:GetHubBotName()
   -- Message to send to users at login
   local msg = "\r\n\r\n\tL?gg m?rke till "..user.sName..", H?r inne "..
   "Kan man inte tanka filer eller s?ka i denna hub endast f?r reg till Lino-Hub.\r\n\r\n"
   user:SendData(BlockBot,msg)
  end
end
OpConnected = NewUserConnected

ConnectToMeArrival = function(user, data)
  if tBlock[user.iProfile] == 1 then
   user:SendData("Transfers are disabled here in "..
   frmHub:GetHubName()..". Please clear your download queue.")
   return 1
  end
end
RevConnectToMeArrival,MultiConnectToMeArrival = ConnectToMeArrival,ConnectToMeArrival

SearchArrival = function (user, data)
  if tBlock[user.iProfile] == 1 then
   local s,e,search = string.find(data,"([^%?]+)|$")
   local res = "Unknown Path"..string.char(92)..user.sName..", This is a chat "..
   "only hub search is disabled. "..string.rep("\t",100)..search
   user:SendData("$SR "..frmHub:GetHubBotName().." "..res.." 0 0/0"..
   frmHub:GetHubName().." ("..frmHub:GetHubIp()..":"..frmHub:GetHubUdpPort()..")")
   return 1
  end
end

SRArrival = function(user, data)
   return 1
end
UDPSRArrival = SRArrival

Title: Re: moddiey this script
Post by: Gnuff? on 13 January, 2008, 05:03:20

Quote from: Mr.T on 12 January, 2008, 19:08:46
reg and user cant download or search vip op master netfounder can serach in the hub if you now what i mean ;)

Why not make it a private hub then, if users are not allowed to search and download?

Title: Re: moddiey this script
Post by: Mr.T on 13 January, 2008, 10:52:09

Thanks speedX i works great :)

PtokaX forum

Archive => Archived 5.1 boards => Request for scripts => Topic started by: Mr.T on 12 January, 2008, 17:22:17