Autre > aaaa

Titreaaaa
Postée le06-03-2011
Affichée230
Mini-lien
Description

aaa

EtatNe contient pas d'erreurs. Ne contient pas d'erreurs.
Code d'insertion
Options
Afficher les numéros de lignes  Mettre la source en plein ecran  Selectionner la source  Partager sur Facebook 
Téléchargement Telecharger en format txt  Telecharger en format pdf
Plein ecran
;*********************************************************************
;                      PROGRAMME PRINCIPAL                           *
;*********************************************************************

        start
                bcf STATUS,C            ; Met le bit Carry du registre STATUS à 0
                bsf PORTB,0                     ; Met le bit 0 du port B à 1
       
        etiquette1
                call tempo                      ; Appeler la tempo de 0.5s
                bsf STATUS,C            ; Met le bit Carry du registre STATUS à 1
                rlf PORTB,f                     ; Décaler les bits du PORTB de 1 rang vers la gauche
                BTFSS STATUS,C          ; Tester si le bit C du registre STATUS est à 1

        goto etiquette1

        etiquette2
                call tempo                      ; Appeler la tempo de 0.5s
                bcf STATUS,C            ; Met le bit Carry du registre STATUS à 0
                rrf PORTB,f                     ; Décaler les bits du PORTB de 1 rang vers la gauche
                BTFSS STATUS,C          ; Tester si le bit C du registre STATUS est à 1

        goto etiquette1

        goto etiquette2

        END                                     ; Directive fin de programme