FLAG EQU 0X20
FLAG1 EQU 0X21
COUNT EQU 0X22
;
;
;
;
;***************初始化程序*************
INIT_ALL
BCF STATUS,RP0
CLRF GPIO ;Init GPIO
BSF STATUS,RP0
MOVLW B'11001000'
MOVWF OSCCAL
MOVLW B'00111100' ;Set GP <5:2> as inputs
MOVWF TRISIO ;GP0 GP1 OUTPUT
BCF STATUS,RP0
;*****
CLRF INTCON
BSF INTCON,GPIE
BSF INTCON,GIE
BSF INTCON,PEIE
BSF INTCON,INTE
;************
BSF STATUS,RP0
MOVLW B'01000001' ;1:2
MOVWF OPTION_REG
BCF STATUS,RP0
MOVLW D'206'
MOVWF TMR0 ;0.1MS
BCF STATUS,RP0
;************
MOVLW B'00111100' ;允许GP3 GP4 GP5电平中断
MOVWF GPIO