.data
    .align 2
	str:  .ascii "9" #cadena de dÌgitos
.text
.globl main

main:
        la $a0,str #cargamos la direccion memoria de str en $a0
        addi $sp,$sp,-8 #necesitamos 2 posiciones 0 y 4 para guardar el vector y $ra.
        sw $ra,4($sp);
        sb $a0,0($sp);
        add $t0,$zero,$zero #i=0
        addi $t3, $zero,10
        add $v0, $zero, $zero
bucle:
        add $t1,$t0,$a0 #Direccion de @ + i * 1(bytes)
        lbu $t2,0($t1); #$t2=str[i]
        beq $t2, $0, final
        blt $t2, 48, error
        bgt $t2, 57, error
        addi $t2, $t2, -48
        mul $v0, $v0, $t3    #v0 *= 10
        add $v0, $v0, $t2    #v0 += str[i]-'0'
        addi $t0, $t0, 1
        j bucle
error:
        addi $v0,$zero,-1
        j final
final:
        lw $ra, 4($sp)
        add $v0,$v0,$zero
        addi $sp,$sp,8
        jr $ra