	include declare.h
	xref	_init_afficheurs,_initgen,POSITION,VALEUR,TEMPO
	xdef	AFFICH

	section code,,c
DEBUT	jsr	_initgen          /*initialistation générale*/
	
AFFICH	jsr	_init_afficheurs  /*initialisation de l'afficheur*/
	
	MOVE.B	POSITION,PBDR     /*PBDR correspond au port B qui commande la séléction des afficheurs, ici on choisit l'afficheur dont la valeur a été stocké dans POSITION*/
	MOVE.B	VALEUR,PADR       /*PADR correspond au port A qui commande les segments en paralléle a afficher, ici on choisit d'afficher une certaine valeur. Grace a la table, on met le code dans VALEUR*/
	
BOUCLE	SUB.L	#$00000001,TEMPO          /*TEMPO est ici notre compteur que l'on décrémente*/
	CMP.L	#$00000000,TEMPO
	BNE	suite		  /*tant que TEMPO est différent de 0, on retourne a BOUCLE ce qui relance l'affichage*/
	JMP	BOUCLE
	
suite	MOVE.B	#$FF,PADR         /*une fois la durée d'affichage souhaité écoulé, il faut éteindre l'afficheur en replacant des 1 partout*/

	rts			  /*rts est l'instruction qui délimite le sous-programme AFFICH*/
	

	end	DEBUT
