2015 Challenge24 Finals: C2 by HoChockiGon

alias 0 tmp
alias 4 i
alias 104 n
alias 108 sizeint
alias 120 floop
alias 128 finputloop_end
alias 132 D
alias 136 old
alias 144 finnerloop
alias 148 fchoose_old
alias 156 fadd_and_cont

mov sizeint,SLOW_SIZEINT
mov floop,addr_loop
mov finputloop_end,addr_inputloop_end
mov D,SLOW_D
mov finnerloop,addr_innerloop
mov fchoose_old,addr_choose_old
mov fadd_and_cont,addr_add_and_cont

jmp inputloop
add_and_cont:
    rmov tmp,*i
inputloop:
    in tmp
    jz tmp,*finputloop_end
    mov i,tmp
    div i,D
    mul i,sizeint
    mov old,*i
    jz old,*fadd_and_cont
    innerloop:
        sub old,tmp
        jneg old,*fchoose_old
        mov old,*i
        choose_new:
            rmov tmp,*i
            mov tmp,old
        choose_old:
            add i,sizeint
            mov old,*i
            jz old,*fadd_and_cont
            jmp *finnerloop
inputloop_end:

xor i,i
add i,OFFSET
rmov SLOW_MONE,*i
mov i,SLOW_TSIZE
loop:
    mov tmp,*i
    sub i,sizeint
    jz tmp,*floop
    jneg tmp,0
    out tmp
    jmp *floop

SLOW_SIZEINT:
dw 4
SLOW_TSIZE:
dw 6868
SLOW_D:
dw 1250000
addr_loop:
dw loop
addr_inputloop_end:
dw inputloop_end
addr_innerloop:
dw innerloop
addr_choose_old:
dw choose_old
SLOW_MONE:
dw -1
addr_add_and_cont:
dw add_and_cont
OFFSET:
dw 3196