PtokaX forum

Archive => Archived 5.0 boards => Help with scripts => Topic started by: java on 20 August, 2005, 02:16:25

Title: Help converting eddy-bot
Post by: java on 20 August, 2005, 02:16:25
Ive tried to convert this script from lua4 with nightlicht's converter but it still wont work.
Can anybody help me out on this one?
(I've removed most of the trigger, not to take to much space.)

botname = "Eddy"
 
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=string.sub(data,1,string.len(data)-1)  
-- parse the command  
s,e,cmd = string.find( 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( string.sub(data, 1, 1) == "<" ) then
-- get the msg only using regular expression
s,e,msg = string.find(data, "%b<>([%a ]+)")                                        
-- look in the table
                if trigall==1 then
for key, value in trigs do
                for key2, value2 in value do  
                     
if( string.find( string.lower(msg), key) ) then
              else break  
end
 
        if( string.find( string.lower(msg), "!me") ) then
                t="**"..curUser.sName
                data=string.gsub (msg, "!me", t, 1 )
end
 
SendToAll( data ) -- send the original data
                     
          SetTimer(1800)
                StartTimer()
answer, x = string.gsub(value[math.random(1,table.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
Title:
Post by: Markitos on 20 August, 2005, 12:06:51
Change this
function DataArrival(curUser, data)

to this
function ChatArrival(curUser, data)

NL converter doesn't convert all the script...
Title:
Post by: java on 20 August, 2005, 14:44:21
It worked like a charm.  :]
tyvm
Title:
Post by: Markitos on 20 August, 2005, 15:11:03
QuoteOriginally posted by java
It worked like a charm.  :]
tyvm
:)