# code: http://golf.shinh.org/reveal.rb?Major+Scales/darrenks_1645763323&nbb
# target Nibbles version: 0.24
# commenter version: 0.1.2.181

| #(filter):[[chr]] 
    % #(split (remove empties)):[[chr]] 
        "\nA B C\9839 D E F\9839 G\9839\nA\9837 B\9837 C D\9837 E\9837 F G\nA\9839 B\9839 C\119082 D\9839 E\9839 F\119082 G\119082\nB C\9839 D\9839 E F\9839 G\9839 A\9839\nB\9837 C D E\9837 F G A\nB\9839 C\119082 D\119082 E\9839 F\119082 G\119082 A\119082\nC D E F G A B\nC\9837 D\9837 E\9837 F\9837 G\9837 A\9837 B\9837\nC\9839 D\9839 E\9839 F\9839 G\9839 A\9839 B\9839\nD E F\9839 G A B C\9839\nD\9837 E\9837 F G\9837 A\9837 B\9837 C\nD\9839 E\9839 F\119082 G\9839 A\9839 B\9839 C\119082\nE F\9839 G\9839 A B C\9839 D\9839\nE\9837 F G A\9837 B\9837 C D\nE\9839 F\119082 G\119082 A\9839 B\9839 C\119082 D\119082\nF G A B\9837 C D E\nF\9837 G\9837 A\9837 B\119083 C\9837 D\9837 E\9837\nF\9839 G\9839 A\9839 B C\9839 D\9839 E\9839\nG A B C D E F\9839\nG\9837 A\9837 B\9837 C\9837 D\9837 E\9837 F\nG\9839 A\9839 B\9839 C\9839 D\9839 E\9839 F\119082\n" #(string):[chr] 
        "\n" #(string):[chr] 
    \A 
    == #(equal?):int 
        / #(foldr1):[chr] 
            % #(split (remove empties)):[[chr]] 
                A #($):[chr] 
                ~ #(auto = words):auto 
            \C B 
            C #($):[chr] 
        \D 
        fstLine #(;$):[chr]