func Begin(){
        RecordNumber = 1162; /* this is the trace number of the first trace */
	CurrentTrace = 1;
}

func OnLineHeader(){
	nsamp = LH.NumSmp; /* pick up number of samples */
	ntrc = LH.NumTrc;
	output(LH);        /* output the line header */
}

func OnTrace(){

	if(Tr.RecNum != RecordNumber && CurrentTrace < ntrc){    /* if trace number is not sequential */

                YT = Tr; /*assign trace to temporary trace */

			Tr.Series[0:nsamp-1]=0.0;  /* zero the trace data */
			Tr.StaCor = 30000;
		
		for(i=CurrentTrace;i<ntrc+1;i++){
			output(Tr);     /* output zero trace */
		}

		Tr = YT;  /* reload YT into trace */

                RecordNumber = Tr.RecNum;
		CurrentTrace = 1;
	/*	print (RecordNumber,"\n");  */
	}
	output(Tr);   /* output trace data */
	CurrentTrace++;
	if ( CurrentTrace > ntrc ) {
	RecordNumber++;
	CurrentTrace = 1;
/*	print ( "Going To Record ",RecordNumber,"\n"); */
        }
}