# code: http://golf.shinh.org/reveal.rb?Moving+Average/tails_1645678436&nbb
# target Nibbles version: 0.21
# commenter version: 0.1.2.181

#(implicit map):[chr,[chr],[chr]] 
    `\ #(special scans):[[chr]] 
        allLines #(;;@):[[chr]] 
        #(foldop: undefined nibble 0xc (try Nibbles version >=0.22)):null 
    \B A 
    ~~ #(3-ary tuple):chr,[chr],[chr] 
        / #(foldr1):chr 
            B #($):[chr] 
            \D C 
            C #(@):chr 
        "Average:" #(string):[chr] 
        : #(append):[chr] 
            : #(append):[chr] 
                \ #(reverse):[chr] 
                    `) #(swapped uncons):[chr] 
                        \ #(reverse):[chr] 
                            `p #(int to str):[chr] 
                                / #(divide):int 
                                    + #(sum):int 
                                        ; #(let):[int] 
                                            . #(map):[int] 
                                                < #(take):[chr] 
                                                    5 #(integer):int 
                                                    \ #(reverse):[chr] 
                                                        B #($):[chr] 
                                                \E 
                                                r #(read str at base):int 
                                                    : #(append):[chr] 
                                                        ? #(if/else):[chr] 
                                                            E #($):chr 
                                                            \F 
                                                            ; #(let):[chr] 
                                                                "." #(string):[chr] 
                                                            sets G 
                                                            5 #(integer):int 
                                                        2 #(integer):int 
                                                    , #(length):int 
                                                        G #($):[chr] 
                                        sets H 
                                    10 #(integer):int 
                    sets I 
                G #(_):[chr] 
            #(implicit arg = I):chr