Bomb script.

By Ghost-writer on Aug 12, 2009

Best bomb script on hawkee. 4 colours, a few cheats for the confused person and a bomb score thingy :P. commands are, !bombscore person !bomb person, if no person is given it will use you, you cannot bomb the bot. and to cut a wire just say the word in a sentence, and no, you cannot say !red !blue !black !green. it will use the last one you choose.

on $*:TEXT:/^[!@.]bombscore/Si:#:{
  var %person $iif($2,$2,$nick)
  var %score $calc($readini(bot.ini, bombd, %person) - $readini(bot.ini, Bombl, %person))
  msg # %person has a bomb score of %score
  if ( %score >= 30 ) {
    msg # %person is an 1,13Astronmocal Bomb Defuser
  }
  elseif ( %score >= 20 ) {
    msg # %person is an 4,8Insane Bomb Defuser
  }
  elseif ( %score >= 10 ) {
    msg # %person is an 1,8AMAZING Bomb Defuser
  } 
  elseif ( %score >= 5 ) {
    msg # wow %person is an  1,4Elite Bomb Defuser  
  }
  elseif ( %score >= 2 ) {
    msg # wow %person is a 0,14certified bomb defuser
  }
  elseif ( %score >= 0 ) { 
    msg # %person is a 0,1average Bomb Defuser
  }
  else {
    msg # %person is a 1,15Horrible Bomb Defuser
  }
}
on $*:TEXT:/^[!@.]bomb/Si:#:{
  if (!%bomba) {
    set %bombchan $chan
    if ($2 == $me) { msg # $nick You 0,1CANT bomb me >.> | halt }
    elseif ($strip($2) == $nick) || (!$2) {
      set %bomba 1
      set %bomber $nick   
      set %bombnick $iif($2,$strip($2),$nick)
      unset %radaruse
      var %sec $rand(15,40)
      set %color $read(colour.txt)
      var %time $calc( %sec / 1/2 )
      msg $chan $read(phrase.txt)
      msg $chan  $+ %bombnick $+ , type 0,4!red 0,12!blue 0,1black or 0,3!green to cut the wire and deactive the bomb!
      .timerbombremain 1 %time msg #  $+ %time seconds remaining!!
      .timerbombdead 1 %sec unset22
      .timerbombsecond 1 %sec unset %rad*
    }
    elseif ($2 ison $chan) {
      set %bomber $nick  
      set %bomba 1 
      set %bombnick $strip($2)
      var %sec $rand(20,50)
      set %color $read(colour.txt)
      var %time $calc( %sec / 1/2 )
      msg $chan $read(phrase2.txt)
      msg $chan  $+ $2 $+ , type 4,0!red 12,0!blue 1,0!Black or 3,0!green to cut the wire and deactive the bomb!
      set %color $read(colour.txt)
      .timerbombremain 1 %time msg #  $+ %time seconds remaining!!
      .timerbombtime 1 %sec unset22
    }
    else { .notice $nick I do not see that person, im sorry. }
  }
  else { $iif(!%bombtalked,.msg $chan %bombnick is currently being bombed.) | set %bombtalked 1 }
}
alias unset22 {
  var %x $iif($readini(bot.ini, Bombl, %bombnick),$readini(bot.ini, bombl, %bombnick),0)
  inc %x
  writeini bot.ini bombl %bombnick %x
  msg %bombchan %bombnick 4(((~~~~~KABOOOOOMMM!!!!~~~~~))) Congratulation, You were bombed by %bomber $+ ! %bombnick has died %x times.
  unset %bomb*
}
alias colours {
  var %x $iif($regex($1,(b|B)lue|(r|R)ed|(B|b)lack|(g|G)reen),$true,$false)
  return %x
}
alias colourcheck {
  if ($colours($1)) { var %x $1 }
  if ($colours($2)) { var %x $2 }
  if ($colours($3)) { var %x $3 }
  if ($colours($4)) { var %x $4 }
  if ( %x isin %color ) { 
    set -u3 %b $iif(!%x,0,%x) 
  } 
}
on $*:TEXT:*:#: {
  if ($nick == %bombnick) {
    colourcheck $1-
    if (%b) {
      var %defused $iif($readini(bot.ini, bombd, $nick),$readini(bot.ini, bombd, $nick), 0)
      inc %defused
      writeini bot.ini bombd $nick %defused
      msg $chan Great, the bomb is off! I bet %bombnick feels lucky today!
      msg $chan %bombnick has defused $readini(bot.ini, bombd, $nick) bombs
      .timerbomb* off
      unset %bomb*
      halt
    }
    if ($regex($1-,(b|B)lue|(r|R)ed|(B|b)lack|(g|G)reen)) {
      var %x $iif($readini(bot.ini, Bombl, $nick),$readini(bot.ini, bombl, $nick),0)
      inc %x 1
      writeini bot.ini bombl $nick %x
      msg %bombchan %bombnick 4(((~~~~~KABOOOOOMMM!!!!~~~~~))) you just pick up the wrong wire! %bombnick has died %x times.
      .timerbomb* off
      unset %bomb*
    }
  }
}
on *:load: {
  .remove phrase.txt
  .remove phrase2.txt
  write Phrase2.txt 0,1 well i guess a man must do what a man must do DISABLE THIS BITCH >:) you got % $+ sec seconds to live $+ !!!
  write phrase2.txt 0,4XD TIME TO DIE MOTHA PUCKA >:) got % $+ sec seconds to live good luck >:)
  write phrase2.txt 0,4Meet my little friend % $+ bombnick :), Bomb thrown, % $+ sec seconds to live, thats all :o. 
  write phrase.txt 0,1Whoa, u wanna suicide, $ $+ nick $+ ? Okay, the bomb will explode in % $+ sec seconds! 
  write phrase.txt 4,1well i can see you're not about living so alright :P KABOOM TIME >:) bomb explodes in % $+ sec seconds 
  write phrase.txt 0,4XD TIME TO DIE MOTHA PUCKA >:) YOU GOT % $+ sec SECONDS TO LIVE@@@@
}

Comments

Sign in to comment.
RicJames   -  Aug 10, 2010

what's the point of a bomb snippet if it doesn't kick anyone?

 Respond  
waifish-shirk   -  Dec 02, 2009

it always picks black D:

 Respond  
Phoenix-   -  Aug 28, 2009

There is no 6.36 out yet.
You most likely have remotes off.

 Respond  
Ghost-writer   -  Aug 13, 2009

6.36 wtf o.o when did this come out?
just remember you cant activate this yourself, make sure somone else activates it or you put it in a bot. If all else fails try putting it in a new remote, maybe you have another on text event. other than that i cant think of any reasons because atm it works fine for me.

 Respond  
[HANZam]   -  Aug 13, 2009

why its not working on me...

im using
• mIRC 6.36
• dalnet server

 Respond  
Ghost-writer   -  Aug 12, 2009

Wizard, It works fine when i use it. Whats wrong with it that you say it doesnt work?

 Respond  
wizard38   -  Aug 12, 2009

doesnt work

 Respond  
VinX   -  Aug 12, 2009

too long and doesnt kick users .. >.<

 Respond  
D2K7   -  Aug 12, 2009

To, long and, messy....But good LOL

 Respond  
Ryan-   -  Aug 12, 2009

EH

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.