.data 0x10010000        # data segment, at 0x1001 0000
	.ascii "Avec ses quatre dromadaires\n"
	.ascii "Don Pedro d'Alfaroubeira\n"
	.ascii "Courut le monde et l'admira.\n"
	.ascii "Il fit ce que je voudrais faire\n"
	.ascii "Si j'avais quatre dromadaires.\n"
	.byte 0   # zéro de fin de chaîne de caractères

	
	.text                   # code segment

	lui    $s0, 0x1001      # load address of data segment
	addiu  $s1, $s0, 0      # $s1 <- poeme
	
	lbu    $a0, ($s1)       # $a0 <- s1[0]
	addiu  $v0, $zero, 11   # $v0 <- 11 (print character in $a0)
	syscall

	# exit program
	addiu  $v0, $zero, 10
	syscall