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

	.text
main:	# Inicializar el registro Cause
	mtc0 $0, $13

	# Habilitar la interrupción de reloj y enmascarar el resto
	add  $t0, $0, $0
	ori  $t0, $t0, 0x8011
	mtc0 $t0, $12

	# Inicializar el reloj
	addi $t2, $0, 100
	mtc0 $t2, $11
	mtc0 $0,  $9

	# 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