HEllo, Auto-Answer

[isis123]

Hello, I´d like to have an autoanswer script, which automatically respons on opening a query. What do I have to type? Thanks

[Sir_Fz]

Code: Select all

set response {
 "bla"
 "yeah, bla bla"
 "exetra.. bla"
}

bind msgm - * response

proc response {nick uhost hand arg} {
 puthelp "privmsg $nick :[lindex $::response [rand [llength $::response]]]"
}

This will respond with a random line from $response whenver someone sends a message to the bot.

[isis123]

thanks, very helpful. Another question just bothers me, I made an advertisement script, but the bot only posts in the first set channel, not in all.

Code: Select all

set adchannel "#omfgnaps #jonathan"
set adtime 1

set adtext { 
 { 
  ":: IAC :: Du suchst oder hast Accounts? :: Von WoW bis Steam? :: Von GW bis ESL? :: Bei uns bist du richtig! :: IAC ::" 
 } 
 { 
  ":: IAC :: " 
 } 
} 

if {![string match "*go*" [timers]]} { timer $adtime go } 

proc go {} { 
 global adchannel adtime adtext 
  set text [lindex $adtext [rand [llength $adtext]]] 
  foreach line $text { 
    putserv "PRIVMSG $adchannel :$line" 
  } 
 if {![string match "*go*" [timers]]} { timer $adtime go } 
}

So in this case, it only posts in the first channel #omfgnaps, Whats wrong? thanks.

Code: Select all

[demond]

you don't have a loop by channels, which is curious, since you had that loop yesterday when you asked for timer help, and for some reason you have removed it

[isis123]

you don't have a loop by channels, which is curious, since you had that loop yesterday when you asked for timer help, and for some reason you have removed it

How do i fix that? Thanks

[demond]

just go back to your original code from yesterday