Tableau comparatif

  BSF STATUS, RP0 ;Bank 1
  BCF STATUS, RP0 ;Return to Bank 0
  

Les registres d'entrées/sorties

• l’alimentation (la 5 (0 volts) et la 14(+5 volts))
• l’oscillateur(pattes 16 et 15)

CLRF PORTA   ;Initialiser PORTA en réglant les bits en sortie
            
MOVLW 0x07  ;Désactiver les comparateurs et
MOVWF CMCON ;activer les broches pour les fonctions d'E/S sans inversion
BCF STATUS, RP1 ;RP1=0
BSF STATUS, RP0 ;RP0=1  ->BANK1
MOVLW 0x1F  ;Valeur utilisée pour initialiser la direction des données
MOVWF TRISA ;Définissez RA <4: 0> comme entrée TRISA <5> toujours comme «1».
            ;TRISA <7: 6> dépend du mode de l’oscillateur

• f : Registre (File Register).
• d : Destination de l'opération ( W si d=0 ou f si d=1).
• K : Valeur immédiate (Literal value).
• b : Position du bit dans l'octet.

• TO (Time Out)
• PD (Power Down)
• C (Carry) est la retenue, ou la détection d’un overflow (255+1 par exemple)
• Z (Zero) est actif à 1 si le résultat de l’instruction est 0
• DC (Digital Carry) passe à 1 si nous avons un débordement des 4 derniers bits

BCF STATUS, RP1     
BSF STATUS, RP0     ;RP1=0 RP0=1 ->BANK1
BSF EECON1, WREN    ;Enable write   WREN=1 Permet les cycles d'écriture
BCF INTCON, GIE     ;Disable INTs. GIE: Global Interrupt Enable bit, 0 = Disables all interrupts
BTFSC INTCON,GIE    ;Vérifie l'état du bit GIE dans INTCON et saute s'il est nulle
GOTO $-2            ;sinon recommence
MOVLW 55h           ;
MOVWF EECON2        ;Write 55h EECON2=0x55
MOVLW AAh           ;
MOVWF EECON2        ;Write AAh  EECON2=0xAA
BSF EECON1,WR       ;Set WR bit
                    ;begin write
BSF INTCON, GIE     ;Enable INTs.
BCF EECON1, WREN    ;Disable write

BCF STATUS, RP1 
BSF STATUS, RP0     ;RP1=0 RP0=1 ->BANK1
MOVLW DATA_EE_ADDR   ;W=DATA_EE_ADDR
MOVWF EEADR         ;Address to read
BSF EECON1, RD      ;EE Read
MOVF EEDATA, W      ;EEDATA=W
BCF STATUS, RP0     ;RP1=0 RP0=0 ->BANK0

INCLUDE 
 
 cblock 0x20
 char0
 COUNT1
 COUNT2
 endc 
 
ORG 0x00
goto init
 
init bsf STATUS, RP0   ;bank 1
 ;---CONFIGURE SPBRG FOR DESIRED BAUD RATE
 movlw D'25'   ;baud rate =  9600bps
 movwf SPBRG   ;at 4MHZ
;---CONFIGURE TXSTA
 movlw B'00100100'
 movwf TXSTA
;Configures TXSTA as 8 bit transmission, transmit enabled, async mode, high speed baud rate
 bcf STATUS, RP0   ;bank 0
 movlw B'10000000'
 movwf RCSTA   ;enable serial port receive
 
 movlw 0x41
 movwf char0   ;put A (ascii code 0x41) character to char0 register
 
main movf char0, W
 movwf TXREG   ;place the A character to TXREG
 goto wthere
 goto main
 
wthere btfss TXSTA, TRMT ;check if TRMT is empty
    	goto wthere   ;if not, check again
 bcf STATUS, RP0   ;bank 0, if TRMT is empty then the character has been sent
 return
 
 end
 

 INCLUDE 
 
org 0x00
goto start
 
start bsf STATUS, RP0
      movlw .103     ;baud rate =  9600bps at 4MHZ
      movwf SPBRG   
      movlw 0x24
      movwf TXSTA
      clrf TRISB
      bcf STATUS, RP0
      movlw 0x90
      movwf RCSTA
 
main  btfss PIR1, RCIF
      goto main
      movf RCREG, W
      movwf PORTB
      goto main
   

PROCESSOR '16F876A'
	INCLUDE 

	__CONFIG _XT_OSC & _WDT_OFF & _PWRTE_OFF & _CP_OFF & _LVP_OFF & _BODEN_OFF

	CBLOCK 0x20
	D1
	D2
	FADE_STATE ;IF = 0x00 INCREMENT CCPR1L ELSE DECREMENT CCPR1L
	ENDC
	
	ORG 0x0000
INIT:
	;PWM PERIOD = [(PR2)+1] * 4 * TOSC * (TMR2 PRESCALE VALUE) ;PR2 = TMR2 PERIOD REGISTER, TOSC = PIC CLOCK PERIOD (FOSC = 1 / TOSC)
	;PWM DUTY CYCLE = (CCPR1L:CCP1CON<5:4>) * TOSC * (TMR2 PRESCALE VALUE)
	
	;;;SET PWM FREQUENCY;;;
	BSF STATUS, RP0 ;SELECT BANK 01
	MOVLW D'128'    ;SET PR2 TO 128 DECIMAL SO THE PWM PERIOD = 2064uS => PWM FREQUENCY = 484Hz
	MOVWF PR2       ;PR2=128
	BCF STATUS, RP0 ;SELECT BANK 00
	
	;;;SET PWM STARTING DUTY CYCLE;;;
	CLRF CCPR1L

	MOVLW B'00001100' ;SET PWM MODE, BITS 5 AND 4 ARE THE TWO LSBs OF THE 10BIT DUTY CYCLE REGISTER (CCPR1L:CCP1CON<5:4>)
	MOVWF CCP1CON
	
	;;;SET PWM PIN TO OUTPUT MODE;;;
	BSF STATUS, RP0     ;SELECT BANK 01
	BCF TRISC, 2        ;SET RC2 AS OUTPUT, TO USE FOR PWM
	BCF STATUS, RP0     ;SELECT BANK 00
	
	;;;SET TIMER 2 PRESCALE VALUE;;;
	;PRESCALE = 16 SO THE PWM PERIOD = 2064uS => PWM FREQUENCY = 484Hz
	MOVLW B'00000010'
	MOVWF T2CON
	
	;;;CLEAR TIMER 2 MODULE;;;
	CLRF TMR2
	
	;;;ENABLE TIMER 2 MODULE;;;
	BSF T2CON, TMR2ON
	
	CLRF FADE_STATE
	
MAIN:
	CALL DELAY
	MOVLW 0x00
	IORWF FADE_STATE, W
	
	BTFSS STATUS, Z ;IF FADE_STATE == 0 GOTO INC_CCPR1L
	GOTO DEC_CCPR1L ;ELSE GOTO DEC_CCPR1L
	
INC_CCPR1L:
	INCFSZ CCPR1L ;INCREMENT CCPR1L
	GOTO MAIN
	GOTO CHANGE_STATE_0 ;IF WE HAVE AN OVERFLOW GOTO CHANGE_STATE
	
DEC_CCPR1L:
	DECFSZ CCPR1L ;DECREMENT CCPR1L
	GOTO MAIN
	;IF WE HAVE AN OVERFLOW GOTO CHANGE_STATE
	
CHANGE_STATE:
	COMF FADE_STATE, F ;TOGLE FADE_STATE BITS
	INCFSZ CCPR1L
	GOTO MAIN
	
CHANGE_STATE_0:
	COMF FADE_STATE, F ;TOGLE FADE_STATE BITS
	DECFSZ CCPR1L
	GOTO MAIN
	

DELAY
	;9993 CYCLES
	MOVLW	0xCE    ;               1 cy
	MOVWF	D1      ;D1=0xCE .206   1 cy
	MOVLW	0x08    ;               1 cy
	MOVWF	D2      ;D2=0x08        1 cy
DELAY_0
	DECFSZ	D1, F   ;Décrémente D1 et saute si le résultat est 0, 1 cycle si non, 2 si oui
	GOTO	$ + 2   ;sinon boucle   en 4 cycles 0xCE 207*5+4=1039
	DECFSZ	D2, F   ;Décrémente D2 et saute si le résultat est 0, 1 cycle si non, 2 si oui
	GOTO	DELAY_0 ;sinon boucle   en 2 cycles (1039+3)*9=9378
                    
	;3 CYCLES
	GOTO	$ + 1
	NOP

	;4 CYCLES (INCLUDING CALL)
	RETURN
	
	END