-- DC++ Max slots LUA script by aMutex 
-- 04.02.2003 

maxslots = 10 
function NewUserConnected(curUser) 
if strfind(curUser.sMyInfoString,"<++") then 
_,b, dcver = strfind(curUser.sMyInfoString,"V:(%w.%w+)") 
_,b, mode = strfind(curUser.sMyInfoString,"M:([AP])",b) 
_,b, hubs = strfind(curUser.sMyInfoString,"H:(%d+)",b) 
_,b, slots = strfind(curUser.sMyInfoString,"S:(%d+)",b) 
if (tonumber(slots)>tonumber(maxslots)) then 
curUser:SendPM("SlotBot","Please open max "..maxslots.." slots! -> Disconnect")
curUser:Disconnect() 
end 
end 
end