on *:text:!service on:#:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Aile) {
    set %stat [ $+ [ $chan ] ] on
    msg $chan I will now act as a service bot.
  }
}
on *:text:!service off:#:{
  if ($nick isop $chan) || ($nick ishop $chan) || ($nick == Aile) {
    unset %stat [ $+ [ $chan ] ]
    msg $chan Service bot commands are now off.
  }
}
on *:text:!kick*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($me isop # || $me ishop #) && ($nick isop # || $nick ishop #) {
      kick $chan $iif($2,$2 $iif($3,$3-,Requested),$nick Requested)
    }
  }
}
on *:text:!kb*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($me isop # || $me ishop #) && ($nick isop # || $nick ishop #) {
      mode $chan +b $address($iif($2,$2,$nick),2)
      kick $chan $iif($2,$2 $iif($3,$3-,Requested),$nick Requested)
    }
  }
}
on *:text:!ban*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($me isop # || $me ishop #) && ($nick isop # || $nick ishop #) {
      mode $chan +b $address($iif($2,$2,$nick),2)
    }
  }
}
on *:text:!unban*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($me isop # || $me ishop #) && ($nick isop # || $nick ishop #) {
      mode $chan -b $address($iif($2,$2,$nick),2)
    }
  }
}
on *:text:!op *:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan) && ($me isop $chan) { 
      mode $chan +o $iif($2,$2,$nick)
    }
  }
}
on *:text:!deop*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan) && ($me isop $chan) && ($2 != $me) {
      mode $chan -o $iif($2,$2,$nick)
    }
  }
}
on *:text:!halfop*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan) && ($me isop $chan) && ($2 != $me) {
      mode $chan +h $iif($2,$2,$nick)
    }
  }
}
on *:text:!dehalfop*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($nick isop $chan) && ($me isop $chan) && ($2 != $me) {
      mode $chan -h $iif($2,$2,$nick)   
    }
  }
}
on *:text:!voice*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($me isop # || $me ishop #) && ($nick isop # || $nick ishop #) {
      mode $chan +v $iif($2,$2,$nick)
    }
  }
}
on *:text:!devoice*:#:{
  if (%stat [ $+ [ $chan ] ] == on) {
    if ($me isop # || $me ishop #) && ($nick isop # || $nick ishop #) {
      mode $chan -v $iif($2,$2,$nick)
    }
  }
}