GetTime:
	lea $bfea01,a0
	moveq #0,d0
	move.b (a0),d0
	swap d0
	move.b -$100(a0),d0
	rol.w #8,d0
	move.b -$200(a0),d0
	RTS