#!/bin/sh

./mkbit qrit.jpg

wrk="tmp/$$.qrit.wrk"; export wrk

>${wrk}
cat qrit.bit |
while read rowdata
do
echo "${rowdata}" |
sed -e "
s~0~_~g
s~_1_~___~g
s~_1~_A~g
s~1_~Z_~g
s~1~_~g
" >>${wrk}
done

xcol=1; export xcol
while [ ${xcol} -lt 2290 ]
do
echo -n "col=${xcol}"
echo -n " A-"
<${wrk} cut -c ${xcol}-${xcol} |
tr -dc "A" |
wc -c | tr -dc "[0-9]"
echo -n " Z-"
<${wrk} cut -c ${xcol}-${xcol} |
tr -dc "Z" |
wc -c | tr -dc "[0-9]"
echo ""
xcol="$(( ${xcol} + 1 ))"
done


rm -f ${wrk}