Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- .section .data
- recenica: .ascii "Ana voli Milovana.\0"
- str_len = . - recenica
- .section .text
- .global main
- main:
- #smanjujem
- movl $0, %esi
- whileMala:
- cmpl $str_len, %esi
- je whileMalaKraj
- cmpb $'A', recenica(, %esi, 1)
- jl whileMalaBrojac
- cmpb $'Z', recenica(, %esi, 1)
- jg whileMalaBrojac
- addb $32, recenica(, %esi, 1)
- whileMalaBrojac:
- incl %esi
- jmp whileMala
- whileMalaKraj:
- #izbacujem
- movl $0, %esi
- whileUljezi:
- cmpl $str_len, %esi
- je whileUljeziKraj
- cmpb $0, recenica(, %esi, 1)
- je whileUljeziBrojac
- cmpb $'a', recenica(, %esi, 1)
- jl whileIzbaciUljeza
- cmpb $'z', recenica(, %esi, 1)
- jg whileIzbaciUljeza
- jmp whileUljeziBrojac
- whileIzbaciUljeza:
- movl %esi, %edi
- incl %edi
- movb $1, %al
- whileUljeziP:
- cmpb $0, %al
- je whileUljeziPKraj
- movb recenica(, %edi, 1), %al
- decl %edi
- movb %al, recenica(, %edi, 1)
- addl $2, %edi
- jmp whileUljeziP
- whileUljeziPKraj:
- whileUljeziBrojac:
- incl %esi
- jmp whileUljezi
- whileUljeziKraj:
- #brojim karaktere
- movl $0, %edi
- movb $1, %al
- whileKarakteri:
- cmpb $0, %al
- je whileKarakteriKraj
- incl %edi
- movb recenica(, %edi, 1), %al
- jmp whileKarakteri
- whileKarakteriKraj:
- #provjerava palindrom
- movl $1, %ebx
- movl $0, %esi
- decl %edi
- whilePalindrom:
- cmpl %edi, %esi
- jge kraj
- movb recenica(, %edi, 1), %al
- cmpb %al, recenica(, %esi, 1)
- jne nijePalindrom
- decl %edi
- incl %esi
- jmp whilePalindrom
- nijePalindrom:
- movl $0, %ebx
- jmp kraj
- kraj:
- movl $1, %eax
- movl $0, %ebx
- int $0x80
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement