100
range1
m:
    show-space
    ":"
    show-space
    counter
    binary #(num to list)
    reverse
    1
    index
    double
    inc
    @5
    @1
    inc
    shift-right
    shift-left
    show-line