Считать время через systime часы умножить на 2 ,а минуты поделить на 30 потом получится число от 0 до 47.
Собственно все...