Problem: Morse decode

Code: Morse+decode/whio_1765643199

Nibbles version: 0.2 | 0.21 | 0.22 | 0.23 | 0.24 | 0.25 | 1.00

Format: Compact | Simple | +Type | Table | JSON | .nbl (DeBruijn) | .nbl (names)


* (join):[chr] 
    " " (string):[chr] 
    . (map):[[chr]] 
        % (split (remove empties)):[[chr]] 
            @ (= fstLine):[chr] 
            ~ (auto = words):auto 
        . (map):[chr] <--arg( A:[chr] ) 
            % (split (remove empties)):[[chr]] 
                $ (= A):[chr] 
                '/' (char):chr 
            = (subscript (wrapped)):chr <--arg( B:[chr] ) 
                % (modulus):int 
                    `@ (from base):int 
                        2 (integer):int 
                        + (add):[int] 
                            ~ (auto = 1):auto 
                            . (map):[int] 
                                $ (= B):[chr] 
                                % (modulus):int <--arg( C:chr ) 
                                    $ (= C):chr 
                                    ~ (auto = 2):auto 
                    32 (integer):int 
                `D (to base from data):[chr] 
                    -29 (to base from data arg):null 
(postdata (hex): to base from data)
33256c256ec3237574a93e82436f08f14a
("etianmsurwdkgohvf,l.pjbxcyzq")

Back to the index