/leave {
  set %time $ctime(hh,mm,ss)
set %reason $iif($1,$1-,No Reason) }

/back { 
  if (%reason) {
    Amsg Bood1 is now back | %reason | He has been gone for $time(%ctime,mmmm dd h:nn:ss TT)
  }

  On $*:TEXT:/bl?ood1?/Si:#:{ notice $nick Bood1 Is currentaly away Reasion: | %reason | Left At %time . }