7s/.\{7\}: \(.\{6\}\)  .\{3\}/\1/
t sub
b eight
: sub
h
: eight
8s/.\{7\}: \(.\{2\}\).\{4\}  .\{3\}/\1/
t print
b exit
: print
H
g
s/\(.\{6\}\)\n\(.\{2\}\)/\1\2/
s/\(.\{2\}\)\(.\{2\}\)\(.\{2\}\)\(.\{2\}\)/\3\4\2\1_/
s/\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)\(.\)/\1№7 \2№6 \3№5 \4№4 \5№3 \6№2 \7№1 \8№0 /
#s/a/10/
#s/b/11/
#s/c/12/
#s/d/13/
#s/e/14/
#s/f/15/
#: whl1
s/^1/^1/
t tone
b none
: tone
    s/\([^0]№1\)/\1/
    t zone
    b e_one
    : zone
    s/№1/№1################/
    s/1№1/0№1/
    s/2№1/1№1/
    s/3№1/2№1/
    s/4№1/3№1/
    s/5№1/4№1/
    s/6№1/5№1/
    s/7№1/6№1/
    s/8№1/7№1/
    s/9№1/8№1/
    s/a№1/9№1/
    s/b№1/a№1/
    s/c№1/b№1/
    s/d№1/c№1/
    s/e№1/d№1/
    s/f№1/e№1/
    t tone
    : e_one

: none
#s/[^_]//
#t whl1
#b e_whl1
#: e_whl1
h
g
p
: exit