Here's a shortened form of the orginal dialog. though I re-arranged dialog IDs, changed \clock\ to \dclock and used c.jpg instead of col.jpg:

alias dclock { 
  if ($dialog(dclock)) dclock2 $*
  else dialog -m dclock dclock
}
alias -l dclock2 if ($mid($time(hhnnsst),$1,1) $+ .jpg != $nopath($did(dclock,$1))) did -g dclock $1 1 dclock\ $+ $v1
Dialog dClock {
  title "Clock"
  size -1 -1 143 21
  icon 1, 1 0 16 21, dClock\0.jpg, noborder
  icon 2, 17 0 16 21, dClock\0.jpg, noborder
  icon 3, 40 0 16 21, dClock\0.jpg, noborder
  icon 4, 56 0 16 21, dClock\0.jpg, noborder
  icon 5, 79 0 16 21, dClock\0.jpg, noborder
  icon 6, 95 0 16 21, dClock\0.jpg, noborder
  icon 7, 111 0 16 21, dClock\a.jpg, noborder
  icon 8, 72 0 7 21, dClock\c.jpg, noborder
  icon 9, 33 0 7 21, dClock\c.jpg, noborder
  icon 10, 127 0 16 21, dClock\m.jpg, noborder
}
on *:dialog:dClock:init:0:.timerdclock 0 1 dclock 1 2 3 4 5 6 7 | .timerdclock -e
on *:dialog:dClock:close:0:.timerdclock off

Edited to shorten code EVEN more x3 or x4, at this point I can't even remember