read a;for((d=36#$a%58%9;a=d+101;d+=7,d%=30+w/8^w&2/w+1)){ \\n%02d:;printf "${a/1/${_:d<7?!w++*2%(13-w):7} }" $w;}