chao cac ban!

[DSP]

MÌNH DÙNG 555 PHÁT XUNG ĐƯA VÀO RC2,DƯỚI ĐÂY LÀ ĐOẠN CODE


__CONFIG _CP_OFF & _WDT_OFF & _PWRTE_ON & _HS_OSC & _LVP_OFF & _BODEN_OFF & _WRT_OFF & _CPD_OFF

PROCESSOR P16F877A
#INCLUDE <P16F877A.INC>

PB EQU PORTB
PC EQU PORTC
TB EQU TRISB
TC EQU TRISC
PD EQU PORTD
TD EQU TRISD

B0 EQU 0X00
B1 EQU 0X80



ORG 0X00
GOTO MAIN
ORG 0X04
GOTO NGAT

NGAT
BCF STATUS,RP0
BTFSC PIR1,CCP1IF
GOTO CAPTURE
BTFSC PIR1,TMR1IF
GOTO TMR

ERROR1
BSF PD,1
BCF PD,1
GOTO ERROR1

TMR
BCF PIR1,TMR1IF
RETFIE
;-------------------------------
;NGAT DO CAPTURE
;-------------------------------
CAPTURE
MOVLW B'11111111'
MOVWF PB
RETFIE
;------------------------------
;MAIN
;------------------------------
MAIN
BANKSEL B0
CLRF PB
CLRF PC
CLRF PD
CLRF INTCON
CLRF PIR1

BANKSEL B1
CLRF TB
CLRF TD
BSF TC,2
MOVLW 0X06
CLRF ADCON1
CLRF PIE1
BSF PIE1,CCP1IE
BSF PIE1,TMR1IE

BANKSEL B0
CLRF TMR1L
CLRF TMR1H
MOVLW 0X30
MOVWF T1CON
BSF INTCON,PEIE
BSF INTCON,GIE
MOVLW b'00000101'
MOVWF CCP1CON
BSF T1CON,TMR1ON

loop
GOTO loop

END