ultimate smart ass chatbot
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

ultimate smart ass chatbot

Started by dvxjunkie, 01 August, 2004, 18:56:00

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

dvxjunkie

I want a chatbot that will listen for a yes or no question asked in main (such as "does anybody have" or "anyone got" ect and then it appears that all users in the hub answer "no" or "yes but you cant have it") I tried playing around with modifying the elfgirls script but it gave me a headache :o(  any chance someone could pull this off?

Troubadour

#1
Maybe this will help you.
I haven't checked it so it might be buggy.


-- Triggy by Troubadour --

botname = "Triggy"

opsnames = {
"[NL]-=DJ_Bert=-",
"Troubadour",
"Tarot",
"(NL)Bitmepper",
"(NL)bomarlon",
"[NL]Ricka",
"KeStJo1969",
"[NL]Xantia",
"Banjo5",
"Lexus",
"[NL]MrBuitenhuizen",
"[cable]erwianni",
"Soepkip",
"The_Boss",
"Whistler",
}

trigs = {
["does anyone have"]="Yes, but you can't have it! ",
["who has"]="We all, but it is illigal for you... ",
["can someone"]={
     "No, [USER] we can't do that.",
     "Duh! [USER]  what do you mean?",
     "Sure, can't you?",
     "Pffff, silly question dude!"   },
["anyone got"]="No, do you wanna give it to us? "
}

function Main()
frmHub:RegBot(botname)
end

function DataArrival(curUser, data)
       
   if( strsub(data, 1, 1) == "<" ) then
      -- get the msg only using regular expression
      s,e,msg = strfind(data, "%b<>%s+(.+)")
      -- look in the table
      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()
   theperson = opsnames[random(1,getn(opsnames))]
SendToAll(""..theperson, answer ) -- send bot's answer
   StopTimer()
end
Regards,

Troubadour

** Guardian Forum **

hubaddy:   nederfun.no-ip.com

SMF spam blocked by CleanTalk