alias ab {
  if (%afknick == $null) {
    set %afknick $$?="Away nick?"
  }
  if (%away == no) {
    set %nnick $me
    set %reason $$?="Reason?"
    away %reason
    amsg 15,4[[4,15I Am Leaving At $time(hh:nntt) 15,4]]4,15 ~~~~~ 15,4[[4,15The Reason I Am Leaving~~> %Reason 15,4]]
    set %away yes
    nick %afknick
  }
  else {
    set %away no
    nick Noobie
    away
    back Im back
    amsg 15,4[[4,15I Have Returned At $time(hh:nntt) 15,4]]4,15 I Was Away For4,15 $duration($awaytime) 15,4[[4,15 Reason- %Reason 15,4]]
  }
}
on *:TEXT:noobie*:#: {
if (%away == yes)
notice $nick Sorry i am currently away with reason: %reason
}