anarchy golf - the source code

STRING by eban

while read
do
read s
read a
b=${a/-}
(($a!=$b))&&a=$b&&s=`rev<<<$s`
x=`printf %*s $a`
echo ${x// /$s}
done

Note that non-ascii characters in the above source code will be escaped (such as \x9f).