.data
minus:  .asciiz "texto em minusculas"
maius:  .space 20

.text
.globl main

main:
    la $t0, minus  # Address of minus
    la $t1, maius  # Address of maius
    li $t2, 0      # Index i = 0

loop:
    lb $t3, 0($t0)       # Load byte from minus[i]
    beq $t3, $zero, end  # If minus[i] == '\0', end loop

    addi $t3, $t3, -32   # Convert to uppercase (ASCII diff)
    sb $t3, 0($t1)       # Store byte to maius[i]

    addi $t0, $t0, 1     # i++
    addi $t1, $t1, 1
    j loop

end:
    la $a0, maius
    li $v0, 4            # syscall for print_str
    syscall

    li $v0, 10           # syscall for exit
    syscall