;File: tic41hr.a51
;Author: Eckart Hartmann Date:15/10/2003
;Development progress: Tic834.df
;
;TicHr==========Reads HOUR.
;C Function prototype: char TicHr(void);
;Description of Function: Reads HOUR counter.
;User interface: Call TicHr function. Returns HOUR.
;Robustness:
;Side effects: None.
;
NAME TICHR
$NOMOD51
 $IC(..kei841.inc) ; Parameter passing registers for Keil .
 $IC(..kei841.dat) ; SFR definition for Keil .
;
public TicHr

?PR?TicHr?TICHR	SEGMENT CODE
	RSEG	?PR?TicHr?TICHR
;
TicHr:
	mov	cP1l,HOUR
	ret
;
;Function End==========================================================Function End
END