A script for !gag command.
who help me?
:D
? its inbuilt
Yes but I want to see which it is the script of the !gag command.
You would be very kind if you make me it to see.
Thank you :D
hmm sumit like
Bot = "Gag"
mcmd = "#"
Gagged = {}
function DataArrival(user,data)
if strsub(data, 1, 1) == "<" then
data=strsub(data,1,strlen(data)-1)
s,e,cmd = strfind(data,"%b<>%s+(%S+)")
if Gagged[user.sName] then
return 1
else
if cmd == mcmd.."gag" then
s,e,cmd,who = strfind(data,"%b<>%s+(%S+)%s+(%S+)")
if GetItemByName(who) then
Gagged[who] = 1
user:SendData(Bot,who.sName.." has been gagged!")
return 1
else
user:SendData(Bot,"No such user!")
return 1
end
end
end
end
end
i guess ;)
thank phatty you are very glad :D