s/.*/B/
h
:
s/\(.#.\)\(\w* \)/#\2\1/
t
s/# //
s/\(.\)#\1/\U\1/g
/#/!{y/ABCDEFGHIJ/0123456789/
p
g
/bjf/Q
s/.j*$/\U&/
y/ABCDEFGHIJ/bcdefghija/
s/^a/ba/
h}
s/[F-J]/+&/g
y/ABCDEFGHIJ/acegiacegi/
s/a#//g
:s
s/#a//g
s/#./\U&/g
y/BCDEFGHIJ/abcdefghi/
s/j#/+/g
s/.#/\U&/g
s/\(.\)+/\u\1/g
s/J/+a/g
y/ABCDEFGHI/bcdefghij/
s/^+/b/
ts
s/.*/&#& /
b
Note that non-ascii characters in the above source code will be escaped (such as \x9f).