func OnLineHeader () {
	output(LH);      /* output line header unchaged */
}

func OnTrace() {

	H1 = Tr.TVPT01;  /* value in header word 51 */
	H2 = Tr.TVPV01;  /* value in header word 52 */
	H3 = Tr.TVPT02;  /* value in header word 53 */
	H4 = Tr.TVPV02;  /* value in header word 54 */

	H44 = H4 + 150;   /* modify this value */
	print("Old hdr value= ",H4," New value= ",H44,"\n");
	Tr.TVPV02 = H44;  /* modified header value */

	output(Tr);
}

/*
run this by typing

ufh  marney.ufh  < inputdata  > outputdata

or by piping into and/or out of
*/