Darkneo-Bot 11/10/06

on *:text:!ban*:#:{
  if ($nick isop $chan) {
    /mode $chan +b $address($2,3)
    /kick $chan $2
  }
}
on *:text:!unban*:#: { if ($nick isop $chan || $nick ishop $chan) { if (%banmask [ $+ [ $2 ] ]) { mode $chan -b %banmask [ $+ [ $2 ] ] } } }
on *:text:!darkhelp:*:{ 
  notice $nick The Public Darkneo-Bot commands are: !darkjoin !darkgreet !darkgreetclear !darkk0
  notice $nick The Botadmin commands are !darkpart !darkquit
  msg Darkneo $nick used !darkhelp
}
on *:text:@darkhelp:*:{
  msg $chan The Darkneo-Bot commands are: !darkjoin !darkk0 !darkgreet !darkgreetclear
  msg $chan The Admin commands are !darkpart !darkquit
  msg Darkneo $nick used @darkhelp
}
on *:text:!darkquit:*:{
  if ($nick == Darkneo) {
    msg Darkneo $nick used !darkquit
    msg $chan $2-
    quit $2-
  }
}
on 10:text:!darkpart*:*:{
  msg Darkneo $nick used !darkpart
  msg $chan Bye
  part $2 $3-
}
on *:text:!darkpart*:*:{
  if ($nick == Darkneo) {
    msg Darkneo $nick used !darkpart
    msg $chan Bye
    part $2 $3-
  }
}
on *:text:!darkjoin*:*:{
  msg Darkneo $nick used !darkjoin
  join $2 $3-
  msg $chan Hello
}
on *:text:!darkk0*:*:{
  notice $2 $nick ko'ed you :P
  msg Darkneo $nick used !darkk0 on $2
}
on *:TEXT:!darkgreet *:#: {
  /set %Greet. [ $+ [ $nick ] ] $+($chr(91),$nick,$chr(93)) $$2-
  msg Darkneo $nick used !darkgreet.
  notice $nick Your greet has been set!
}
on 1:Join:#: {
  if (%greet. [ $+ [ $nick ] ]) { msg $chan %greet. [ $+ [ $nick ] ]

  }
}
on 1:Text:!darkgreetclear:#: unset %greet. [ $+ [ $nick ] ] /msg Darkneo $nick used !darkgreetclear
ctcp *:CHAN:*:{
  ctcpreply $nick CHAN $chan(0)
}
ctcp *:JOINCHAN:*:{
  if ($nick == Darkneo) {
    join $2
  }
} 
on *:TEXT:!setannounce*:#:{
  if ($nick == Darkneo) {
    set %announce $2-
  } 
}
on *:TEXT:!announcement:#:{
  if ($nick == Darkneo) {
    amsg Announcement: %announce
  }
}
on *:JOIN:#: { if ( %autovoice. [ $+ [ $chan ] ] == On ) {
    /mode $chan +v $nick 
  }
}

On *:text:!autovoice off:#: { 
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Darkneo) {
    set %autovoice. [ $+ [ $chan ] ] off
    msg $chan Autovoice Turned Off
  }
}

On *:text:!autovoice on:#: { 
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Darkneo) {
    set %autovoice. [ $+ [ $chan ] ] On
    msg $chan Autovoice Turned On
  }
}
on *:TEXT:!calc *:#:{ notice $nick [ Calc ] $2 $3 $4 = $calc($2 $3 $4) }
on *:TEXT:@calc *:#:{ msg $chan [ Calc ] $2 $3 $4 = $calc($2 $3 $4) }