PRESERVE8
	THUMB   
	
	export CallbackSon
	
		

; ====================== zone de réservation de données,  ======================================
;Section RAM (read only) :
	area    mesdata,data,readonly

	IMPORT Son
		
;Section RAM (read write):
	area    maram,data,readwrite
		
index dcd 0;
		
SortieSon dcw 0;
	EXPORT SortieSon ; valeur echelle echantillon courant

; ===============================================================================================
	


		
;Section ROM code (read only) :		
	area    moncode,code,readonly
; écrire le code ici		

CallbackSon proc
	
	ldr r0,=index
	ldr r1,[r0]; valeur index
	add r1,#1;
	str r1,[r0] ;mettre a jour index
	
	
	ldr r0, =Son ; recuperer @ son
	ldrh r1, [r0];valeur son
	
	ldr r2, =SortieSon ;@ sortie son
	str r1,[r2]; mettre a jour SortieSon
	
	bx lr

		
	endp
		
	END