ORG 0000H GOTO MAIN ORG 0008H GOTO CHK_INT ORG 0040H CHK_INT BTFSC INTCON,TMR0IF BRA T0_ISR BTFSC PIR1,TMR1IF BRA T1_ISR RETFIE ORG 00100H MAIN BSF TRISC,T13CKI CLRF TRISD BCF TRISB,6 MOVLW 0x08 MOVWF T0CON MOVLW 0x00 MOVWF TMR0H MOVLW 0x00 MOVWF TMR0L BCF INTCON,TMR0IF MOVLW 0x6 MOVWF T1CON MOVLW D'255' MOVWF TMR1H MOVLW -D'200' MOVWF TMR1L BCF PIR1,TMR1IF BSF T0CON,TMR0ON BSF T1CON,TMR1ON BSF INTCON,TMR0IE BSF PIE1,TMR1IE BSF INTCON,PEIE BSF INTCON,GIE OVER BRA OVER T0_ISR ORG 200H INCF PORTD MOVLW 0x00 MOVWF TMR0L MOVLW 0x00 MOVWF TMR0H BCF INTCON,TMR0IF GOTO CHK_INT T1_ISR ORG 300H BTG PORTB,6 MOVLW D'255' MOVWF TMR1H MOVLW -D'200' MOVWF TMR1L BCF PIR1,TMR1IF GOTO CHK_INT END