# Zona de datos
	.data 0x10010000
cadena: .asciiz "Esto es un texto de prueba."

	# Zona de instrucciones
	.text
main:	lui  $t0,0xffff	# $t0 <- 0xFFFF0000
				# (dir base de los registros de E/S)
	la   $t1, cadena	# Carga la dirección de la cadena

bucle:	lb   $t2, 0($t1)	# Lee un byte de cadena
	beqz $t2, fin		# Ir a fin si se ha llegado al final

	sb   $t2, 0xC($t0)	# Escribe el caracter en la pantalla
	addi $t1, $t1, 1	# Incrementa el puntero de cadena

ret:	# +
ret1:	# | Bucle de retardo, en blanco, por ahora
	# +

	j bucle

fin:	li   $v0,10		 # Finaliza la ejecución
	syscall