PRESERVE8
	THUMB   
	INCLUDE Driver/DriverJeuLaser.inc

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


;Section RAM (read write):
	area    maram,data,readwrite
		
FlagCligno dcd 0
	
; ===============================================================================================
	
	EXPORT FlagCligno
	EXPORT callback

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

	
	
callback proc
	push	{lr}
	ldr 	r1,=FlagCligno
	ldr     r2,[r1]
	cmp 	r2, #1
	beq 	allume_led
	mov		r0, #1
	str  	r0, [r1]
	bl 		GPIOB_Clear
	pop 	{lr}
	bx 		lr
	

allume_led
	mov		r0, #0
	str  	r0, [r1]
	mov 	r0, #1
	bl 		GPIOB_Set
	pop		{lr}
	bx		lr
	endp	
		
	END