function dump(){
	print c, s, e,mr,H,strand
	o=0;rs=0;
}

BEGIN {
    FS= "\t"; OFS="\t";H=0;
    getline;
    if (th==0) {th=2;}
#print th
}{
    re=$NF;
    if (re>=th) {
#print "a"$0
	rs+=re;
	if (o==1) {
	    if (($1==c)&&(e>=$2)&&(s<=$2)) {
		if (re>mr){mr=re;}
		e=$3;
	    } else {
		dump();
		o=1;s=$2;e=$3;c=$1;mr=re; 
	    }
	} else {
	    o=1;s=$2;e=$3;c=$1;mr=re;
	}
    } else {
	if (o==1) {
	    dump();
	}
    }
}END{
	if (o==1) {
	    dump();
	}
}