!brb Colorful

on *:text:!brb*:#:{ set %awt $+ $nick $ctime | set %reason $+ $nick $2- | set %awnick $+ $nick AW | msg $chan 4 $nick  14on nüüd eemal: %reason [ $+ [ $nick ] ]   $+ , 14 Ta lahkus kell:  4 $time  $+  } 
on *:text:*:#:{ if (%awnick [ $+ [ $nick ] ] == AW) { msg $chan 4 $nick  14on nüüd tagasi! 4Põhjus: %reason [ $+ [ $nick ] ] 14Ta oli eemal: 4 $duration($calc($ctime - %awt  [ $+ [ $nick ] ] )) |  unset %awt [ $+ [ $nick ] ]  $ctime | unset %reason $+ $nick $2- | unset %awnick $+ $nick AW } }