on *:text:!addadmin*:#: {
  if ($nick == Daryl|) {
    write Staff.txt $nick
    msg $chan 4[14$4Staff14$4]5 $2 14has been added to the 5Staff14 List!
  }
}

on *:join:#: {
  if ($nick == Daryl|) { HALT }
  if $read(Staff.txt,w,$nick) {
    msg # 4[14$4Staff14$4] .:.14 $nick 4.:.10 has joined5 $chan
  }
}


on *:join:#: {
  if ($nick == $me) {
    msg #skyf 4[14^2Joined14^4]14 $chan
  }
}

on *:part:#: {
  if ($nick == $me) {
    msg #skyf 4[14^2Part14^4]14 $chan
  }
}


on $*:text:/^(!part|!out|!gtfo)/Si:#: {
  if ($nick isop $chan) || ($nick ishop $chan) {
    if ($2 == $me) {
      /part $chan 14Parting.. Requested by5 $nick
    }
  }
}

on $*:TEXT:/^(brb|bbs|bbl)/Si:#:{
  if ($chan == #bots) { HALT }
  writeini -n away.ini nicks $nick away
  $iif($2 != $null,writeini -n away.ini reason $nick $2-,writeini -n away.ini reason $nick Woops forgot to set away message!)
  writeini -n away.ini time $nick $ctime
  .msg $chan 4 $nick 14is now4 away 14Reason4 $readini(away.ini,n,reason,$nick) 14Left at4 $time(hh:nnTT)
}
on *:TEXT:*:#:{
  if ($chan == #bots) { HALT }
  if ($readini(away.ini,n,nicks,$nick)) {
    .msg $chan 4 $nick 14is now back from4 $readini(away.ini,n,reason,$nick)) 14Gone for4 $duration($calc($ctime - $readini(away.ini,n,time,$nick)))
    remini away.ini nicks $nick
    remini away.ini reason $nick
    remini away.ini time $nick
  }
}