Move around dodging empty lines

nonempty.kak

def nonempty -params 1 %{
    exec -no-hooks %arg{1}
    try %{
        exec -no-hooks -draft \;Gg<a-k>(\n.*){3}<ret>
        exec -no-hooks -draft \;Ge<a-k>(\n.*){3}<ret>
        exec -no-hooks -draft \;<a-x><a-k>\A[\n]\Z<ret>
        nonempty %arg{1}
    }
}

map global normal j ':nonempty j<ret>'
map global normal k ':nonempty k<ret>'
map global normal J ':nonempty J<ret>'
map global normal K ':nonempty K<ret>'