14000 H = 0 14010 SR = PEEK(56587) 14020 IF SR AND 128 THEN H = 12 14030 H = H + ((SR AND 112) / 16) * 10 14040 H = H + (SR AND 15) 14050 SM = PEEK(56586) 14060 M = ((SM AND 240) / 16) * 10 14070 M = M + (SM AND 15) 14080 SR = PEEK(56585) 14090 S = ((SR AND 240) / 16) * 10 14100 S = S + (SR AND 15) 14110 Z = PEEK(56584) 14120 RETURN