H:01:OnFocus=today(this)
H:02:readonly
H:03:readonly
H:04:readonly
H:05:readonly
H:09:readonly
H:10:readonly
D:02:OnMouseUp=textad(%d)
