PtokaX forum

Archive => Archived 4.0 boards => Request for Lua 4 scripts => Topic started by: angelsanges on 03 March, 2004, 22:13:37

Title: Agree bot...
Post by: angelsanges on 03 March, 2004, 22:13:37
it is possible to build a bot that locks the login to an hub untill you type I AGREE?

out there there is a bot that locks "ConnectToMe", "MultiConnectToMe", "RevConnectToMe", "Search", "MultiSearch"untill you do not type I AGREE ...this bot is very useful but it does not lock the login to the hub example: i can read main-chat and send & receive messages....It is possible to lock also this untill you do not accept the disclaimer?

SORRY FOR MY ENGLISH  ?(
Title:
Post by: kepp on 03 March, 2004, 22:49:00
[-- vim:ts=4:sw=4:noet:syntax=lua
-- Disclamer Bot. (OpiumVolage 26/09/2003)

tabAccept = {}
msgOui = "I AGREE"

tabCommands = { "ConnectToMe", "MultiConnectToMe", "RevConnectToMe", "Search", "MultiSearch","To" }

function Main()
frmHub:EnableFullData(1)
end

function NewUserConnected(user)
if user.iProfile > 0 then return end
user:SendData("Disclamer", "Send a message containing "..msgOui.." in CC to enable full hub.")
tabAccept[user.sName] = 1
end

function DataArrival(user, data)
-- On teste le niveau de l'utilisateur.
if (user.iProfile > 0) or not tabAccept[user.sName] then return end
if strfind(data, "^%b<>%s+"..msgOui) then
tabAccept[user.sName] = nil
user:SendData("Disclamer", "Thank you to agree.")
return 1 end
local s, e, cmd = strfind(data, "^$(%S+)")
return foreach(tabCommands, function(id, value)
if value == %cmd then return 1 end end)
end

This one blocks PM's aswell

i don't know how the client send the main chat part
is it $< or just '<'?
Title:
Post by: uradweeb on 12 July, 2004, 05:31:35
I can't get it to work,,,,ended up getting no errors but just doesn't work...all of my members are VIPS. could this have something to do with it? Also what is the first script you was talking about and where can i get it>? The one that allows chat vut not downloads until you type "I Agree"? I appreciate any help. Thank you.
Title:
Post by: plop on 12 July, 2004, 10:14:41
QuoteOriginally posted by kepp
i don't know how the client send the main chat part
is it $< or just '<'?
it's "<".

plop