.text
.arm
.global _start
_start:
        b reset
        b loop
        b loop
        b loop
        b loop
        nop
        b loop
        b loop

/* ==============================
*  TEST CODE
*  ==============================
*/
reset:
        mov r1,#0
        mov r4,#0
        mov r2,#VECT
	

otro: 	ldrb r3,[r2]
	cmp r3,#0 
        cmpne r3,#' '
        beq espacio 

	cmp r3,#'a'
	addlo r3,r3,#('a'-'A') 
        strb r3,[r2]
        add r4,r4,#1

seguir: add r2,r2,#1
        b otro

espacio:
        cmp r4,#3
        blo seguir_esp
        ldrb r5,[r2,-r4]
        sub r5,r5,#('a'-'A')
        strb r5,[r2,-r4]
seguir_esp:
        mov r4,#0                     
        cmp r3,#0
	bne seguir

salir:

loop:   b loop

/* ==============================
*  CONTANTES
*  ==============================
*/
VECT:	.asciz "oraCiOn PAra vER sI fUNCIonA"
        .balign 4

        .end