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

;**********************************************************************
?list????? p=16F84???????????? ; list directive to define processor
?＃i nclude ???????? ; 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.

? decfsz PWM_FULL,F? ; 浪琩琌?ЧΘ??㏄戳
? goto ISR_PWM1
? bsf PORT_OUT,PIN_PWM1 ; PWM1/PWM2?確High筿?
? bsf PORT_OUT,PIN_PWM2??????
? movlw FULL_WORK?????????????? ; ?穝砞﹚???㏄戳璸計(jì)竟
? 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???????? ; 浪琩PWM1??㏄戳
? goto ISR_PWM2
? bcf PORT_OUT,PIN_PWM1?????? ; ??㏄戳擋??盢塊?砞?Low筿?
ISR_PWM2
? decfsz PWM_WORK_CNT2,F???????? ; 浪琩PWM2??㏄戳
? goto ISR_EXIT
? bcf PORT_OUT,PIN_PWM2?????? ; ??㏄戳擋??盢塊?砞?Low筿?
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
;**********************************************************************
;******************????? ?﹍てPWM????? *******************************
;**********************************************************************
InitPWM?
? bsf???? STATUS,RP0? ; 砞﹚PWM1/PWM2竲?塊?
??????????????? bcf???? PORT_OUT,PIN_PWM1
??????????????? bcf???? PORT_OUT,PIN_PWM2
? bcf???? STATUS,RP0?
??????????????? bsf???? PORT_OUT,PIN_PWM1?????? ; 箇砞PWM1/PWM2塊?藹筿?
??????????????? bsf???? PORT_OUT,PIN_PWM2
? movlw FULL_WORK?????????????? ; 砞﹚?既?竟ぇ箇砞?
? movwf PWM_FULL
? movlw DEF_WORK1
? movwf PWM_WORK_CFG1
? movwf PWM_WORK_CNT1
? movlw DEF_WORK2
? movwf PWM_WORK_CFG2
? movwf PWM_WORK_CNT2
? retlw 0
;**********************************************************************
;******************????? ?﹍て璸?竟?? *******************************
;**********************************************************************
InitTimer
? bsf???? STATUS,RP0?
? bsf OPTION_REG,T0CS? ; 氨ゎ?歷竟?猧塊?
? bsf OPTION_REG,PSA? ; 砞﹚ぃㄏノ?猧箇埃竟
? bsf INTCON,GIE? ; ゴ秨?辦い耞秨閩(い耞羆秨閩)
? bcf INTCON,T0IF? ; 睲埃璸?竟い耞篨腹
? bcf???? STATUS,RP0?
? retlw 0
;**********************************************************************
;******************????? 幣笆璸?竟???? *******************************
;**********************************************************************
StartTimer
? bsf???? STATUS,RP0?
? bcf OPTION_REG,T0CS? ; 砞﹚?歷竟?猧塊?(1/4 osc)
? bsf INTCON,T0IE? ; ゴ秨璸?竟い耞
? bcf???? STATUS,RP0?
? retlw 0
;**********************************************************************
;******************????? 氨ゎ璸?竟???? *******************************
;**********************************************************************
StopTimer
? bsf???? STATUS,RP0?
? bsf OPTION_REG,T0CS? ; 氨ゎ?歷竟?猧塊?
? bcf INTCON,T0IE? ; 閩?璸?竟い耞
? bcf???? STATUS,RP0?
? retlw 0
;**********************************************************************
;******************????? ?祘Α秈?翴?? *******************************
;**********************************************************************
main
? bcf???? STATUS,RP0? ; select Page 0 for Port Access
? call InitPWM
? call InitTimer
? call StartTimer
? goto $
;**********************************************************************
? END??? ; directive 'end of program'