# uzywane do wykresow NMR
{
	if (NF<9) {
		npeak++
		flag=0
		for (i=1;i<=ninpeak;i++) {
			if (d[i]<1) {
				flag=1
				print npeak,res[i,1],res[i,2],0
			}
		}
		if (flag==0) {
			for (i=1;i<=ninpeak;i++) print npeak,res[i,1],res[i,2],1
		}
		ninpeak=0
#} else if ($8=="H" && $9=="H") {
	} else {
		ninpeak++
		peak[ninpeak]=$5
		res[ninpeak,1]=$2
		res[ninpeak,2]=$4
		d[ninpeak]=$6-$7
	}

}