@.S PARA MI ORDENADOR, .INC PARA EL LAB
.include   "inter.s"

.text
infi:
        ldr     r0, =GPBASE
/* guia bits            xx999888777666555444333222111000*/
        ldr      r1, =0b00000000001000000000000000001000
		str      r1, [r0, #GPFSEL1]
/* guia bits            10987654321098765432109876543210*/
		ldr      r1, =0b00000000000000100000100000000000
        str     r1, [r0, #GPSET0]

/* guia bits            10987654321098765432109876543210*/
		ldr      r1, =0b00000000000000100000100000000000
        str     r1, [r0, #GPCLR0]

	b infi

@El tiempo de ejecución es tan pequño, que no da tiempo a ver el encendido y el apagado, simplemente vemos el led con menos intensidad