Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
Scribd Logo
Upload

Welcome to Scribd!

  • 17 views

    Les Projets

    Uploaded by

    martin souman moulsia
    The document contains code for several microcontroller projects. It defines functions for timing delays in microseconds, milliseconds and seconds. The code for each project initializes ports and toggles outputs on different ports based on the state of a button to control lights or seven segment displays.

    Copyright:

    © All Rights Reserved
    Download as PDF, TXT or read online from Scribd

    Les Projets

    Uploaded by

    martin souman moulsia
    17 views19 pages
    The document contains code for several microcontroller projects. It defines functions for timing delays in microseconds, milliseconds and seconds. The code for each project initializes ports and toggles outputs on different ports based on the state of a button to control lights or seven segment displays.

    Original Title

    LES PROJETS

    Copyright

    © © All Rights Reserved

    Available Formats

    PDF, TXT or read online from Scribd

    Did you find this document useful?

    Is this content inappropriate?

    The document contains code for several microcontroller projects. It defines functions for timing delays in microseconds, milliseconds and seconds. The code for each project initializes ports and toggles outputs on different ports based on the state of a button to control lights or seven segment displays.

    Copyright:

    © All Rights Reserved
    Download as PDF, TXT or read online from Scribd
    Download as pdf or txt
    17 views19 pages

    Les Projets

    Uploaded by

    martin souman moulsia
    The document contains code for several microcontroller projects. It defines functions for timing delays in microseconds, milliseconds and seconds. The code for each project initializes ports and toggles outputs on different ports based on the state of a button to control lights or seven segment displays.

    Copyright:

    © All Rights Reserved
    Download as PDF, TXT or read online from Scribd
    Download as pdf or txt
    of 19

    PROJET 2_2

    list p=18F87K22
    #include<p18F87K22.inc>

    CBLOCK 0x20
    X,Y,w
    ENDC

    Org 0

    BANKSEL ANCON0
    CLRF ANCON0
    BANKSEL ANCON1
    CLRF ANCON1
    BANKSEL ANCON2
    CLRF ANCON2

    ;PORT D'ENTRE
    BANKSEL TRISA
    BSF TRISA,1

    ;PORT DE SORTIE
    BANKSEL TRISB
    CLRF TRISB
    BANKSEL TRISC
    CLRF TRISC
    BANKSEL TRISD
    CLRF TRISD
    BANKSEL TRISE
    CLRF TRISE
    BANKSEL TRISF
    CLRF TRISF
    BANKSEL TRISG
    CLRF TRISG
    BANKSEL TRISH
    CLRF TRISH
    BANKSEL TRISJ
    CLRF TRISJ

    ;INITIALIASATION DES PORT SORTIE


    CLRF PORTB
    CLRF PORTC
    CLRF PORTD
    CLRF PORTE
    CLRF PORTF
    CLRF PORTG
    CLRF PORTH
    CLRF PORTJ

    OPERATION
    BTFSS PORTA,1
    GOTO ALLUME_B_C_D_E_F_G_H_J
    GOTO CLIGNOTE_C_H

    ALLUME_B_C_D_E_F_G_H_J
    MOVLW 0xFF
    MOVWF PORTE
    CLRF PORTC
    CLRF PORTD
    CLRF PORTB
    MOVWF PORTF
    CLRF PORTG
    CLRF PORTH
    CLRF PORTJ
    CALL tempo_1s
    MOVLW 0xFF
    MOVWF PORTE
    CLRF PORTC
    MOVWF PORTD
    CLRF PORTB
    MOVWF PORTF
    MOVWF PORTG
    CLRF PORTH
    CLRF PORTJ
    CALL tempo_1s
    MOVLW 0xFF
    MOVWF PORTE
    MOVWF PORTC
    MOVWF PORTD
    CLRF PORTB
    MOVWF PORTF
    MOVWF PORTG
    MOVWF PORTH
    CLRF PORTJ
    CALL tempo_1s
    MOVLW 0xFF
    MOVWF PORTE
    MOVWF PORTC
    MOVWF PORTD
    MOVWF PORTB
    MOVWF PORTF
    MOVWF PORTG
    MOVWF PORTH
    MOVWF PORTJ
    CALL tempo_1s
    CLRF PORTB
    CLRF PORTC
    CLRF PORTD
    CLRF PORTE
    CLRF PORTF
    CLRF PORTG
    CLRF PORTH
    CLRF PORTJ
    CALL tempo_1s
    MOVLW 0xFF
    MOVWF PORTB
    MOVWF PORTC
    MOVWF PORTD
    MOVWF PORTE
    MOVWF PORTF
    MOVWF PORTG
    MOVWF PORTH
    MOVWF PORTJ
    CALL tempo_1s
    CLRF PORTB
    CLRF PORTC
    CLRF PORTD
    CLRF PORTE
    CLRF PORTF
    CLRF PORTG
    CLRF PORTH
    CLRF PORTJ
    CALL tempo_1s
    GOTO OPERATION

    CLIGNOTE_C_H
    CLRF PORTB
    CLRF PORTE
    CLRF PORTD
    MOVLW 0xFF
    MOVWF PORTC
    MOVWF PORTH
    CLRF PORTG
    CLRF PORTF
    CLRF PORTJ
    CALL tempo_1s
    CLRF PORTB
    CLRF PORTC
    CLRF PORTD
    CLRF PORTE
    CLRF PORTF
    CLRF PORTG
    CLRF PORTH
    CLRF PORTJ
    CALL tempo_1s

    tempo_500µs
    MOVLW 0x28
    MOVWF X
    temps_1
    DECFSZ X,1
    GOTO temps_1
    NOP
    RETURN

    tempo_100ms
    MOVLW 0xC1
    MOVWF Y
    temps_2
    CALL tempo_500µs
    DECFSZ Y,1
    GOTO temps_2
    RETURN

    tempo_1s
    MOVLW 0x0A
    MOVWF w
    temps_3
    CALL tempo_100ms
    DECFSZ w,1
    GOTO temps_3
    RETURN

    end

    PROJET 3_1
    list p=18F87K22
    #include<p18F87K22.inc>

    CBLOCK 0x20
    X,Y,w,a,b,c
    ENDC

    Org 0

    BANKSEL ANCON0
    CLRF ANCON0
    BANKSEL ANCON1
    CLRF ANCON1
    BANKSEL ANCON2
    CLRF ANCON2

    ;PORT D'ENTRE
    BANKSEL TRISA
    BSF TRISA,1

    ;PORT DE SORTIE
    BANKSEL TRISB
    CLRF TRISB
    BANKSEL TRISD
    CLRF TRISD
    BANKSEL TRISF
    CLRF TRISF
    BANKSEL TRISH
    CLRF TRISH

    ;INITIALISATION DES PORT DE SORTIE


    CLRF PORTB
    CLRF PORTD
    CLRF PORTF
    CLRF PORTH
    STRITE_LIGHT
    BTFSS PORTA,1
    GOTO ORANGE_LIGHT
    GOTO GREEN_RED_LIGHT

    ORANGE_LIGHT
    BSF PORTB,5
    BSF PORTD,5
    BSF PORTF,5
    BSF PORTH,5
    CALL tempo_1s
    BCF PORTB,5
    BCF PORTD,5
    BCF PORTF,5
    BCF PORTH,5
    CALL tempo_1s
    GOTO STRITE_LIGHT

    GREEN_RED_LIGHT
    BSF PORTB,6
    BSF PORTF,6
    BSF PORTD,4
    BSF PORTH,4
    CALL tempo_45s
    BCF PORTB,6
    BCF PORTF,6
    BSF PORTB,5
    BSF PORTF,5
    BSF PORTD,4
    BSF PORTH,4
    CALL tempo_15s
    BCF PORTB,5
    BCF PORTF,5
    BCF PORTD,4
    BCF PORTH,4
    BSF PORTB,4
    BSF PORTF,4
    BSF PORTD,6
    BSF PORTH,6
    CALL tempo_45s
    BSF PORTB,4
    BSF PORTF,4
    BCF PORTD,6
    BCF PORTH,6
    BSF PORTD,5
    BSF PORTH,5
    CALL tempo_15s
    BCF PORTD,5
    BCF PORTH,5
    BCF PORTB,4
    BCF PORTF,4
    GOTO STRITE_LIGHT

    tempo_500µs
    MOVLW 0x28
    MOVWF X
    temps_1
    DECFSZ X,1
    GOTO temps_1
    NOP
    RETURN

    tempo_100ms
    MOVLW 0xC1
    MOVWF Y
    temps_2
    CALL tempo_500µs
    DECFSZ Y,1
    GOTO temps_2
    RETURN

    tempo_1s
    MOVLW 0x0A
    MOVWF w
    temps_3
    CALL tempo_100ms
    DECFSZ w,1
    GOTO temps_3
    RETURN

    tempo_15s
    MOVLW 0x0F
    MOVWF a
    temps_4
    CALL tempo_1s
    DECFSZ a,1
    GOTO temps_4
    RETURN
    tempo_45s
    MOVLW 0x2D
    MOVWF b
    temps_5
    CALL tempo_1s
    DECFSZ b,1
    GOTO temps_5
    RETURN

    tempo_60s
    MOVLW 0x3C
    MOVWF c
    temps_6
    CALL tempo_1s
    DECFSZ c,1
    GOTO temps_6
    RETURN

    end

    PROJET 3_2
    list p=18F87K22
    #include<p18F87K22.inc>

    CBLOCK
    X,Y,w,a,b,c
    ENDC

    Org 0

    BANKSEL ANCON0
    CLRF ANCON0
    BANKSEL ANCON1
    CLRF ANCON1
    BANKSEL ANCON2
    CLRF ANCON2

    ;PORT D'ENTRE
    BANKSEL TRISA
    BSF TRISA,1

    ;PORT DE SORTIE
    BANKSEL TRISB
    CLRF TRISB
    BANKSEL TRISE
    CLRF TRISE
    BANKSEL TRISH
    CLRF TRISH

    ;INITIALISATION DES PORT DE SORTIE


    CLRF PORTB
    CLRF PORTE
    CLRF PORTH

    STRITE_LIGHT
    BTFSS PORTA,1
    GOTO ORANGE_LIGHT
    GOTO GREEN_RED_LIGHT

    ORANGE_LIGHT
    BSF PORTB,5
    BSF PORTE,5
    BSF PORTH,5
    CALL tempo_1s
    BCF PORTB,5
    BCF PORTE,5
    BCF PORTH,5
    CALL tempo_1s
    GOTO STRITE_LIGHT

    GREEN_RED_LIGHT
    BSF PORTB,6
    BSF PORTE,4
    BSF PORTH,4
    CALL tempo_45s
    BCF PORTB,6
    BSF PORTB,5
    BSF PORTE,4
    BSF PORTH,4
    CALL tempo_15s
    BCF PORTB,5
    BCF PORTE,4
    BSF PORTB,4
    BSF PORTE,6
    BSF PORTH,4
    CALL tempo_45s
    BSF PORTB,4
    BCF PORTE,6
    BSF PORTE,5
    BSF PORTH,4
    CALL tempo_15s
    BCF PORTE,5
    BCF PORTH,4
    BSF PORTB,4
    BSF PORTE,4
    BSF PORTH,6
    CALL tempo_45s
    BSF PORTB,4
    BSF PORTE,4
    BCF PORTH,6
    BSF PORTH,5
    CALL tempo_15s
    BCF PORTB,4
    BCF PORTE,4
    BCF PORTH,5
    GOTO STRITE_LIGHT

    tempo_500µs
    MOVLW 0x28
    MOVWF X
    temps_1
    DECFSZ X,1
    GOTO temps_1
    NOP
    RETURN

    tempo_100ms
    MOVLW 0xC1
    MOVWF Y
    temps_2
    CALL tempo_500µs
    DECFSZ Y,1
    GOTO temps_2
    RETURN

    tempo_1s
    MOVLW 0x0A
    MOVWF w
    temps_3
    CALL tempo_100ms
    DECFSZ w,1
    GOTO temps_3
    RETURN

    tempo_15s
    MOVLW 0x0F
    MOVWF a
    temps_4
    CALL tempo_1s
    DECFSZ a,1
    GOTO temps_4
    RETURN

    tempo_45s
    MOVLW 0x2D
    MOVWF b
    temps_5
    CALL tempo_1s
    DECFSZ b,1
    GOTO temps_5
    RETURN
    tempo_60s
    MOVLW 0x3C
    MOVWF c
    temps_6
    CALL tempo_1s
    DECFSZ c,1
    GOTO temps_6
    RETURN

    end

    PROJET 4_1
    list p=18F87K22
    #include<p18F87K22.inc>

    CBLOCK 0x20
    X,Y,w
    ENDC

    Org 0

    BANKSEL ANCON0
    CLRF ANCON0
    BANKSEL ANCON1
    CLRF ANCON1
    BANKSEL ANCON2
    CLRF ANCON2

    ;PORT D'ENTRE
    BANKSEL TRISA
    BSF TRISA,1
    ;PORT DE SORTIE
    BANKSEL TRISE
    CLRF TRISE

    ;INITIALISATION DE PORT DE SORTIE


    CLRF TRISE

    COUNT
    BTFSS PORTA,1
    GOTO DISPLAY_0
    GOTO COUNT_UP

    DISPLAY_0
    MOVLW 0x40
    MOVWF PORTE
    GOTO COUNT
    COUNT_UP
    MOVLW 0x40
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x79
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x24
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x30
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x19
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x12
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x02
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x78
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0
    MOVWF PORTE
    CALL tempo_1s
    MOVLW 0x10
    MOVWF PORTE
    CALL tempo_1s
    GOTO COUNT

    tempo_500µs
    MOVLW 0x28
    MOVWF X
    temps_1
    DECFSZ X,1
    GOTO temps_1
    NOP
    RETURN

    tempo_100ms
    MOVLW 0xC1
    MOVWF Y
    temps_2
    CALL tempo_500µs
    DECFSZ Y,1
    GOTO temps_2
    RETURN

    tempo_1s
    MOVLW 0x0A
    MOVWF w
    temps_3
    CALL tempo_100ms
    DECFSZ w,1
    GOTO temps_3
    RETURN

    end

    You might also like