$(FS=_)=$0{for(;$++i;o=o RS)for(j=65;$i>=d=sprintf("%c",j++);)o=o d}$0=o