on *:TEXT:!tcalc *:#:{
  /set %hourl. $2
  /set %minl. $3 
  /set %secl. $4
  /set %hourr. $6
  /set %minr. $7
  /set %secr. $8
  /set %hourl2. $calc(%hourl. * 3600) $+  
  /set %minl2. $calc{%minl. * 60) $+
  /set %secl2. $calc(%secl. * 1) $+
  /set %hourr2. $calc(%hourr. * 3600) $+
  /set %minr2. $calc(%minr. * 60) $+
  /set %secr2. $calc(%sec5. * 1) $+
  /set %hour. $calc(%hourl. $5 %hourr.) $+
  /set %min. $calc(%minl. $5 %minr.) $+
  /set %sec. $calc(%secl. $5 %secr.) $+
  /msg $chan %hour. hours %min. minutes %sec. seconds 
  /unset %hourl. $2
  /unset %minl. $3 
  /unset %secl. $4
  /unset %hourr. $5
  /unset %minr. $6
  /unset %secr. $7
  /unset %hourl2. $calc(%hourl. * 3600) $+  
  /unset %minl2. $calc{%minl. * 60) $+
  /unset %secl2. $calc(%secl. * 1) $+
  /unset %hourr2. $calc(%hourr. * 3600) $+
  /unset %minr2. $calc(%minr. * 60) $+
  /unset %secr2. $calc(%sec5. * 1) $+
  /unset %hour. $calc(%hourl. $5 %hourr.) $+
  /unset %min. $calc(%minl. $5 %minr.) $+
  /unset %sec. $calc(%secl. $5 %secr.) $+
}