Someone

      notice $nick $wc1 Whois check is already on for $wc2 $+ $chan
    }
    else {
      set %whois $addtok(%channel,$chan,44)
      msg $chan $wc1 $+ Whois check is now on for $wc2 $+ $chan
    }
  }
}
on *:TEXT:!whois off*:#: {
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick == [-God-]) {
    if (%whois) { 
      set %whois $remtok(%channel,$chan,1,44)
      msg $chan $wc1 $+ Whois check is now off for $wc2 $+ $chan
    }     
    else { 
      notice $nick $wc1 $+ Whois check is not on for $wc2 $+ $chan    
    }  
  }
}
on *:JOIN:%whois: {
  whois $nick
  set %msgchan msg #rips.whois
  set %nick $nick
}
raw 319:*:{
  %msgchan $wc1 $+ %nick is on: - $wc3 $+ $replace($3-,$chr(43),$chr(32))
  unset %chan
  unset %nick
}
ON *:TEXT:brb*:#:{ if ($2 == $null) {
    set %away $+ $nick $nick
    set %why $+ $nick N/a
    set %tim $+ $nick $ctime
    msg $chan 4 $+ $nick Will be right back:2 N/a 
    halt
  }
  else {
    set %away $+ $nick $nick
    set %why $+ $nick $2-
    set %tim $+ $nick $ctime
    msg $chan $nick 4Will be right back:2 $2-
  }
}
ON *:TEXT:*back*:#:{ if (%away [ $+ [ $nick ] ] == $nick) {
    msg $chan 4 $+ $nick $+ , Welcome back from2 %why [ $+ [ $nick ] ] $+ 4. You where gone for2 $duration($calc( $ctime - %tim [ $+ [ $nick ] ] ))
    unset %away $+ $nick
    unset %why $+ $nick
    unset %tim $+ $nick  
  }
}
on *:TEXT:@8ball*:#:{ 
  if ($2 == $null) {
    /msg $chan type @8ball 4[qeustion no empty spaces]
  }
  else {
    /set %8ball $rand(1,7) 
    if (%8ball == 1) msg $chan 12the 8ball is rolling and the answer is.. :::4Nooo! 
    if (%8ball == 2) msg $chan 12the 8ball is rolling and the answer is.. :::13mmh, Yes 
    if (%8ball == 3) msg $chan 12the 8ball is rolling and the answer is.. :::11well... Maybe 
    if (%8ball == 4) msg $chan 12the 8ball is rolling and the answer is.. :::8haha! of course !
    if (%8ball == 5) msg $chan 12the 8ball is rolling and the answer is.. :::7Are you crazy?!?! Dude -.-
    if (%8ball == 6) msg $chan 12the 8ball is rolling and the answer is.. :::9ermm, How should I know? 
    if (%8ball == 7) msg $chan 12the 8ball is rolling and the answer is.. ::: 7,5 What The?? what are u thinking? that i'm an idiot or something?:O of course! 4 NOT!
  }