BEGIN{FS=",";OFS="\t"}{
#in: paralyzer dist format
# 4 lines per cluster, line 3: ENSMUST00000000188-chr6---127095541-127096700,+,608,695,G1,ConversionPercent,....
    if ($6=="ConversionPercent"){
	for (i=7;i<=NF;i++){
	    x=$i;if (x>1){x=1;}isT[i]=1;if(x<0){x=0;isT[i]=0;}
	    pct[i]=x;
	}
    }
    if ($6=="ReadCount"){
	s=$3;tr=$1;nt=0;
    p=$1;cs=$2;ce=$3;ei=substr(p,1,18);
    t=substr(p,24,1);
    if (t=="-"){sp=25}else{sp=26}
    ch=substr(p,20,sp-21);
    st=substr(p,sp,1);n=split(substr(p,sp+2),a,"-");
	for (i=7;i<=NF;i++){
	    if (isT[i]==1){
    if (st=="+"){
	gs=a[1]+s;
    }else{
	gs=a[2]-s; if (gs<a[1]){print "ERR: ce "ce" beyond gs"a[1]" in line"NR;}
    }		
		x=int($i); nt2c=x*pct[i];
		gp[nt]=gs;
		t2c[nt]=int(x*pct[i]);
		nr[nt]=x;nt=nt+1;
#		print tr,s,x,nt2c;
	    }
	    s=s+1;
	}
	printf("%s,%s,%s,%s",tr,$2,$3,$4);
	for (i=0;i<nt;i++){
	    printf(",%d,%d,%d",gp[i],nr[i],t2c[i]);
	}
	printf("\n");
    }
}