Specifications
***************************************************
* Sous Routine: DELAI ENTRE LES LECTURES *
***************************************************
SRDELAI LDA #$FF ; Nombre de fois que la boucle
; interne sera repetee(1 a 255)
CompInt LDX #$FF ; Valeur a compter de la boucle interne
Compteur DECX ; Decremente la Valeur a Compter interne
BNE Compteur; Branche a Compteur si CompInt n'est pas zero
DECA ; Enleve 1 a la valeur cible
BNE CompInt ; Recommence la boucle interne tant que
; la cible n'est pas zero
RTS
***************************************************
* Sous Routine : d'affiche *
***************************************************
SRAFFICHE LDA VALEUR ; LIRE VALEUR
STA PORTB ; AFFICHE PORT B
RTS
***************************************************
* SOUS-ROUTINE LED *
***************************************************
ALLED BSET 0,PORTc ;
bclr 1,portc ;
A CHANGER RTS
****************************************************
*****************************************************
* SOUS-ROUTINE DE RÉCEPTION DE CARACTERE *
*****************************************************
SRRECEPTION LDA #$00
STA DDRB
BCLR RRD,PORTA ; REMET LE UART EN RECEPTION
STOP LDA PORTB
STA ALARME
CMP #%00000001
BNE STOP
BCLR 2,PORTC
STOP1 LDA PORTB
STA ALARME
CMP #%00000010
BNE STOP1
BSET RRD,PORTA ; MET LE UART EN TX ET MET
; EN HAUTE IMPEDANCE LE
; RBR1-8
LDA #$FF
STA DDRB
Programme de micro 68705-R3
http://www.angelfire.com/electronic/azmuth1/progmic.html (5 of 6) [2001-03-28 22:45:20]










