.section .data
    a: .fill 30,4,0
    string: .fill 400,1,0
    string1: .fill 400,1,0
    gr: .long 0
.section .text
.globl main
main:
    movl $3, %eax
    movl $0, %ebx
    leal string,%ecx
    movl $400, %edx
    int $0x80
    leal string, %edi
    movl $0, %esi
    movl $0, %eax
    movl $10, %ecx
petlja:
    cmpl $10, (%edi)
    je dalje
    xorl %ebx, %ebx
    movb (%edi), %bl
    cmpb $' ', %bl
    je razmak
    cmpb $'-', %bl
    incl %edi
    je minus
    cmpb $'0' , %bl
    jb greska
    cmpb $'9', %bl
    ja greska
    subb $48, %bl
    addl %ebx, %eax
    incl %edi
    mull %ecx
    jc greska
    jmp petlja
minus:
    cmpb $' ', %bl
    je razmak1
    cmpb $'0' , %bl
    jb greska
    cmpb $'9', %bl
    ja greska
    subb $48, %bl
    addl %ebx, %eax
    mull %ecx
    jc greska
    jmp minus
razmak1:
    divl %ecx
    negl %eax
    movl %eax, a(,%esi,4)
    incl %edi
    incl %esi
    jmp petlja
razmak:
    divl %ecx
    movl %eax, a(,%esi,4)
    incl %esi
    jmp petlja
dalje:
    movl $0, %ecx
    movl $0, %edx
blok1:
    cmpl %ecx, %esi
    jl dalje2
    movl %ecx, %edx
blok2:
     incl %edx
     cmpl %edx, %esi
     jl blok3
     movl a(,%ecx,4), %edi
     cmpl %edi, a(,%edx,4)
     jle blok2
     xchgl %edi, a(, %edx,4)
     movl %edi, a(, %ecx,4)
     jmp blok2
blok3:
    incl %ecx
    jmp blok1
dalje2:
    leal string1, %edi
    movl $0, %esi
    movl $10, %ebx
abc:
    movl a(,%esi,4), %eax
    incl %esi
dec_cifra:
    xorl %edx, %edx
    divl %ebx
    addb $'0', %dl
    movb %dl, (%edi)
    incl %edi
    andl %eax, %eax
    jnz dec_cifra
    decl %edi
    leal dec_br, %esi
obrni:
    cmpl %edi, %esi
    jae kraj
    movb (%esi), %ah
    movb (%edi), %al
    movb %al, (%esi)
    movb %ah, (%edi)
    decl %edi
    incl %esi
    jmp obrni

kraj:
    movl $1, %eax
    int $0x80