mov A, #0
    add ADM, #0, A
    mov A, #10
    add D, #0, A
loop:
    mov A, loop
    dec.jne D, D
    hlt