# code: http://golf.shinh.org/reveal.rb?alternating+case+lines/tails_1645795701&nbb
# target Nibbles version: 0.25
# commenter version: 0.1.6.187

! #(zip with):[int] 
    ;;@ #(= sndLine):[chr] 
    , #(range from 1):[int] <--arg( A:chr ) 
        ~ #(auto = infinity):auto 
    ~ #(zipop: by):null 
    % #(modulus):int <--arg( C:chr B:int ) 
        $ #(= C):chr 
        ? #(if/else):chr 
            % #(modulus):int 
                _ #(= fstInt):int 
                ~ #(auto = 2):auto 
            `) #(to uppercase):chr <--arg( D:int ) 
                @ #(= C):chr 
            `( #(to lowercase):chr 
                $ #(= C):chr