can you please make a lua 5 from this i tried the converter but it did not work on this script
botname = "Botname"
trigall=1
trigs = {
["lol"]={
"Yeah, [CURUSER] that was funny, Hahahaha.",
"Hmm, ok that was funny, I think :)",
"[CURUSER] is laughing like a JACK-ASS !!!",
"what! [CURUSER] why are you laughing?",
"You shake when you laugh, like a bowl full of jelly",
"hilarious!",
"hehehehe",
"hohohohoh",
"Glad you can see the funny side"
},
}
function Main()
frmHub:RegBot(botname)
end
function DataArrival(curUser, data)
status=strsub(data,1,strlen(data)-1)
-- parse the command
s,e,cmd = strfind( status, "%b<>%s+(%S+)" )
if (cmd=="/quiet") then
trigall=0
SendToAll(botname, " Hmf, Okidoki I will be quiet :(( ")
return 1
elseif (cmd=="/talk") then
trigall=1
SendToAll(botname, " Okay, I will talk to you again :-)")
return 1
end
if( strsub(data, 1, 1) == "<" ) then
-- get the msg only using regular expression
s,e,msg = strfind(data, "%b<>([%a ]+)")
-- look in the table
if trigall==1 then
for key, value in trigs do
for key2, value2 in value do
if( strfind( strlower(msg), key) ) then
else break
end
if( strfind( strlower(msg), "!me") ) then
t="**"..curUser.sName
data=gsub (msg, "!me", t, 1 )
end
SendToAll( data ) -- send the original data
SetTimer(1800)
StartTimer()
answer, x = gsub(value[random(1,getn(value))], "%b[]", curUser.sName)
return 1; -- tell the hub we have processed the data
end
end
end
end
function OnTimer()
SendToAll( botname, answer ) -- send bot's answer
StopTimer()
end
end
__________________
owner of ? ?uffering ?ouls ? hub
Script is already converted. Use the search or try the next one.
Try Here (http://board.univ-angers.fr/thread.php?threadid=4628&boardid=12&styleid=1&sid=e3f97d54349dc44396748c9eaac124a9)
Grtzzz
DJ Bert