push 0
push 1

0:
    swap
    dup
    onum
    push 10
    ochr
    copy 1
    add
    jump 0