here's something to change.
on $*:TEXT:/^[@.!]time$/Si:#: $iif($left($1,1) == @,msg #,notice $nick) $me $+ 's current time is $asctime(hh:mm:ss)