define hirestime as custom
protected mDateTime, mSeconds, mZeroDate

function init
	with this
		.mSeconds = seconds()
		.mDateTime = datetime()
		.mZerodate = dtot({^1970/01/01})
	endwith
	return .t.
endfunc

function hour()
	return hour(this.mDateTime)
endfunc

function minute()
	return minute(this.mDateTime)
endfunc

function centisec()
	return this.millisec() / 10
endfunc

function millisec()
	return this.mSeconds % 1000
endfunc

enddefine