Shell Programming and Scripting

A1,A2,A4,A6,B3,B6,B7,C1,C2,C5,C7,D2,D5,D7,E2,E3,E4,F1,F5,F6,G2,G5

"\t"AB CDE FG
1   XX    
2      X X   
3
4
5
6
7

    nrows=${1:-8}

    for col in "  " A B "  " C D E "  " F G    # print header row
        do
            printf "%s" "$col"
        done
            printf "\n"

    for (( row=1; row < $nrows; row++ ))    # print rows
        do
            printf "%s\n" "$row"
        done

awk -F, ' 
BEGIN{ for(i=65;i<=71;i++) al[sprintf("%c",i)]=++j }
{
        for(i=1;i<=NF;i++){
                match($i,/([A-Z]*)([0-9]*)/,arr)
                a[arr[1]"-"arr[2]]=$i
        }
}
END{
        printf "\t"
        for(i in al) printf i"\t"
        for(i=1;i<=7;i++){
                printf "\n"i
                for(j in al) {
                        printf "\t"
                        printf a[j"-"i]?"X":""
                }
        }
        printf"\n"
}
' infile