Something

on $*:TEXT:/^(luke|luke-alan|luke-alan0)/Si:#:{ 
  if (%bnc == on) {  
    /notice $nick 12i am  either 4asleep 12or 4AFK 12your message4 $2- 12has been noted.
    /msg luke-alan0 4 $nick 12from 4 $chan 12 called for u and left a message4 $2-
  }
} 

on $*:TEXT:/^[!`]bnc on ?/Si:#:{ 
  if ($address($nick,2) == $address($me,2)) {
    set %bnc on 
    /nick ownagebot[BNC]
    /amsg 4,15BNC 12,15on going 4,15AFK 12,15 or going to 4,15SLEEP
  }
}

on $*:TEXT:/^[!`]bnc off ?/Si:#:{ 
  if ($address($nick,2) == $address($me,2)) {
    set %bnc off 
    /nick ownagebot
    /amsg 4,15BNC 12,15off back from 4,15AFK 12,15 or 4,15SLEEP
  }
}