PIC16F84產(chǎn)生兩組PWM輸出的實例源程序

;**********************************************************************
list p=16F84 ; list directive to define processor
＃i nclude p16F84.inc> ; processor specific variable definitions

__CONFIG _CP_OFF _WDT_OFF _PWRTE_OFF _RC_OSC

; '__CONFIG' directive is used to embed configuration data within .asm file.
; The lables following the directive are located in the respective .inc file.
; See respective data sheet for additional information on configuration word.

;********************** CONST DEFINITIONS******************************
FULL_WORK = 10 ; 程???P戳w]?
DEF_WORK1 = 2 ; PWM1??P戳w]?
DEF_WORK2 = 8 ; PWM2??P戳w]?
PORT_OUT = PORTB ; PWM塊?梆
PIN_PWM1 = 0 ; PWM1塊?}?
PIN_PWM2 = 1 ; PWM2塊?}?
;********************** VARIABLE DEFINITIONS***************************
CBLOCK 0x0C
w_temp ; variable used for context saving
status_temp ; variable used for context saving
PWM_FULL ; 程???P戳p計竟(?計)
PWM_WORK_CFG1 ; PWM1 ??P戳]w既?竟
PWM_WORK_CFG2 ; PWM2 ??P戳]w既?竟
PWM_WORK_CNT1 ; PWM1 ??P戳p計竟(?計)
PWM_WORK_CNT2 ; PWM2 ??P戳p計竟(?計)
ENDC
;**********************************************************************
;****************** 垂??m?{Αi?I ***********************
;**********************************************************************
ORG 0x000 ; processor reset vector
ResetStart
goto main ; go to beginning of program
;**********************************************************************
;****************** い_A叭{Αi?I *************************
;**********************************************************************
ORG 0x004 ; interrupt vector location
movwf w_temp ; save off current W register contents
movf STATUS,w ; move status register into W register
movwf status_temp ; save off contents of STATUS register

bsf STATUS,RP0
bcf INTCON,T0IF ; M埃p?竟い_X腹
bcf STATUS,RP0

decfsz PWM_FULL,F ; 浪dO?ЧΘ??P戳
goto ISR_PWM1
bsf PORT_OUT,PIN_PWM1 ; PWM1/PWM2?_Highq?
bsf PORT_OUT,PIN_PWM2
movlw FULL_WORK ; ?s]w???P戳p計竟
movwf PWM_FULL
movf PWM_WORK_CFG1,W
movwf PWM_WORK_CNT1
movf PWM_WORK_CFG2,W
movwf PWM_WORK_CNT2
goto ISR_EXIT
ISR_PWM1
decfsz PWM_WORK_CNT1,F ; 浪dPWM1??P戳
goto ISR_PWM2
bcf PORT_OUT,PIN_PWM1 ; ??P戳擋??N塊?]?Lowq?
ISR_PWM2
decfsz PWM_WORK_CNT2,F ; 浪dPWM2??P戳
goto ISR_EXIT
bcf PORT_OUT,PIN_PWM2 ; ??P戳擋??N塊?]?Lowq?
ISR_EXIT
movf status_temp,w ; retrieve copy of STATUS register
movwf STATUS ; restore pre-isr STATUS register contents
swapf w_temp,f
swapf w_temp,w ; restore pre-isr W register contents
retfie ; return from interrupt
;**********************************************************************
;****************** ?lてPWM *******************************
;**********************************************************************
InitPWM