Anonymous

On *:TEXT:!*:#: {
  if ($readini(Status.ini,$me,$chan) == DChan) { halt }
  elseif ( $1 == !timebomb ) && ( $2 ) && ( $nick isop $chan ) {
    if ( !$timer($+(tbomb.,$cid,.,#,.,$2)) ) {
      if ( $2 ison # ) {
        if ( $2 != $me ) {
          if ( $nick(#,$2).idle < 1800 ) {
            msg # $nick gives $2 a Bomb ! Try to find the correct Wire with !red, !blue or !green !!! Hurry Up you only have 20 Secs... (Bomb No. %tbomb.count $+ )
            $+(.timertbomb,.,$cid,.,$chan,.,$2) 1 20 $!iif($me isop # ,kick # $2 Too Late...BOOM!,msg # $2 $+ : You have been bombed!)
            set -e $+(%,tbomb.wire,.,$cid,.,#,.,$2) $gettok(!red !yellow !green,$r(1,3),32)
            inc %tbomb.count
          }
        else msg $chan $nick $+ : $2 is currently idle, please give it to someone else. }
      else msg $chan $nick $+ : I am not allowed to be given a bomb. }
    else msg $chan $nick $+ : $2 is not in # }
  else msg $chan $nick $+ : A bomb has already been set for $2 }
  elseif ( $istok(!red !blue !green,$1,32) ) {
    if ( $timer($+(tbomb.,$cid,.,#,.,$nick)) ) {
      if ( $1 == $($+(%,tbomb.wire,.,$cid,.,#,.,$nick),2) ) {
        $+(.timertbomb.,$cid,.,#,.,$nick) off
        msg # $nick $+ , you're safe!
        unset $+(%,tbomb.wire,.,$cid,.,#,.,$nick)
      }
    else msg $chan $nick $+ , wrong wire! }
  }
}