PtokaX forum

Well I wanted my members to join my hub by theirself, cause I was feeling lazy... this script needs to be run with "Self Register 1.0c - By nErBoS" It's very simple, but is still affective, and is my first script.

It will stop people from searching, downloading and chatting in main-chat.

-- Bouncer v1.0 by Silky

dlregonly = 1;
srregonly = 1;
chatregonly = 1;

disabledSearchMsg = "\r\n\r\n Please Register To Search In ?xclusive?harez! \r\n\r\n 1. Type /fav \r\n 2. Right click on the name below and select Send Private Message. \r\n\r\n [.?.[-??-].?.]?-?RegBot \r\n\r\n 3. Now in the Private Message type !regme password\r\n(Password meaning what you want as your password!\r\n\r\n"

disabledDownloadMsg = "\r\n\r\n Please Register To Download In ?xclusive?harez! \r\n\r\n 1. Type /fav \r\n 2. Right click on the name below and select Send Private Message. \r\n\r\n [.?.[-??-].?.]?-?RegBot \r\n\r\n 3. Now in the Private Message type !regme password\r\n(Password meaning what you want as your password!\r\n\r\n"

disabledChatMsg = "\r\n\r\n Please Register To Chat In ?xclusive?harez! \r\n\r\n 1. Type /fav \r\n 2. Right click on the name below and select Send Private Message. \r\n\r\n [.?.[-??-].?.]?-?RegBot \r\n\r\n 3. Now in the Private Message type !regme password\r\n(Password meaning what you want as your password!\r\n\r\n"

function SearchArrival(curUser, Data)
  if curUser.bRegistered==nil and srregonly==1 then
   curUser:SendData(""..disabledSearchMsg)
   return 1;
  end
end

function ChatArrival(curUser, Data)
  if curUser.bRegistered==nil and srregonly==1 then
   curUser:SendData(""..disabledChatMsg)
   return 1;
  end
end

function ConnectToMeArrival(curUser, Data)    
  if curUser.bRegistered==nil and dlregonly==1 then
   curUser:SendData(""..disabledDownloadMsg)
   return 1;
  end
end
       
function MultiConnectToMeArrival(curUser, Data)
  if curUser.bRegistered==nil and dlregonly==1 then
   curUser:SendData(""..disabledDownloadMsg)
   return 1;
  end
end        

function RevConnectToMeArrival(curUser, Data)
  if curUser.bRegistered==nil and dlregonly==1 then
   curUser:SendData(""..disabledDownloadMsg)
   return 1;
  end
end

Also you will have to rename the botname [.?.[-??-].?.]?-?RegBotIn nErBoS' script and in this one, mostof you should know what to do lol.

Once again my first script so don't hate  8)  

Goodie!