# code: http://golf.shinh.org/reveal.rb?QRRBBNNpppppppp/tails_1707458637&nbb
# target Nibbles version: 1.00
# commenter version: 0.1.2.181

^ #(pow):int 
    0 #(integer):int 
    , #(length):int 
        > #(drop):[chr] 
            8 #(integer):int 
            + #(concat):[chr] 
                . #(map):[[chr]] 
                    =~ #(group by (also sorts)):[[chr]] 
                        fstLine #(@):[chr] 
                        \A 
                        A #($):chr 
                    \B 
                    > #(drop):[chr] 
                        % #(modulus):int 
                            / #(foldr1):chr 
                                B #($):[chr] 
                                \D C 
                                D #($):chr 
                            4 #(integer):int 
                        B #($):[chr]