Bombscript with revenge mode

[SpiKe^^]

is it possible to protect users from a bomb? i dont want: !bomb Bot

The script already tries to do this, but is done badly/incorrectly.
The script confuses nick with handle, they are not always the same thing:)

Have you added all the other bots (with +b) to the bot running the timebomb script?

[langer_hans]

i have only one bot

[SpiKe^^]

This might be a more correct way to prove nicks before continuing.

Replace the existing proc doTimebomb with this...

Code: Select all

proc doTimebomb {nick uhost hand chan arg} { 
  global botnick 
  set theNick $nick 

  set arg [split [string trim $arg]]
  if {[llength $arg] == 1} { 
    set theNick [lindex $arg 0] 
  } 

  if {[string tolower $theNick] == [string tolower $botnick]} { 
    IRCKick $nick $chan "I will not tollerate this!" 
    return 
  } 

  set hn [nick2hand $theNick $chan]

  if {$hn == ""} {
    IRCPrivMSG $chan "$theNick is not on $chan"
    return 
  } 

  if {$hn != "*" && [matchattr $hn "b|b" $chan]} {
    IRCKick $nick $chan "I will not tollerate that!" 
    return 
  } 

  StartTimeBomb $nick $theNick $chan 
} 

Test that out and verify you can not timebomb the bot.

[langer_hans]

very nice, works great.


[06:26:50] <@user1> !bomb Bot
[06:26:52] * You were kicked by Bot (I will not tollerate this!)

[caesar]

if {[string tolower $theNick] == [string tolower $botnick]} {

really? why don't you use built-in isbotnick function?
Anyway.. how about:

Code: Select all

proc doTimebomb {nick uhost hand chan text} {
	if {[scan $text {%s} who] != 1} { 
		set theNick $nick
	} else {
		set theNick $who
	}
	if {![onchan $theNick]} {
		IRCPrivMSG $chan "$theNick is not on $chan"
		return  
	}
	set hn [nick2hand $theNick $chan]	
	if {[isbotnick $theNick] || [matchattr $hn "b|b" $chan]} {
		IRCKick $nick $chan "I will not tollerate that!"
		return
  }
	StartTimeBomb $nick $theNick $chan
} 

[SpiKe^^]

That part worked, I left it as it was:)