.data
cadena:	.asciiz  "Esto es una prueba\n"

	.text

main:	# $t1 <- dirección base de los controladores (0xffff 0000)
	lui  $t1, 0xffff

	# Activación de las interrupciones del teclado
	lw   $t0, 0($t1)
	ori  $t0, $t0, 2
	sw   $t0, 0($t1)

	# Inicialización del registro Cause
	mtc0 $0, $13

	# Habilitación de las interrupciones de nivel de prioridad uno y
	# enmascaramiento del resto (en el procesador)
	add  $t0, $0, $0
	ori  $t0, $t0, 0x811
	mtc0 $t0, $12

	# Bucle infinito que imprime la cadena «Esto es un prueba»
bucle:	la   $a0, cadena
	li   $v0, 4
	syscall

	addi $t7, $0, 30000
	sll  $t7, $t7, 3	# $t7<-30000*8
rtdo:	addi $t7, $t7,-1
	bnez $t7, rtdo

	j bucle