GOTO L1
L12: MOVWF 0x34
BSF FSR,7
IORWF INDF,F
BCF FSR,7
CLRF 0x22
BTFSS 0x20,0
MOVWF 0x22
CALL L2
GOTO L3
L2: MOVF 0x34,W
XORWF 0x22,F
MOVLW 0x01
MOVWF 0x20
CLRF 0x21
L4: MOVF INDF,W
ANDWF 0x34,W
XORWF 0x22,W
BTFSS STATUS,Z
RETURN
INCF 0x20,F
BTFSC STATUS,Z
INCFSZ 0x21,F
GOTO L4
RETURN
L11: CLRF 0x23
MOVWF 0x22
L6: MOVLW 0xFF
ADDWF 0x22,F
BTFSS STATUS,C
ADDWF 0x23,F
BTFSS STATUS,C
GOTO L3
MOVLW 0x03
MOVWF 0x21
MOVLW 0xDF
CALL L5
GOTO L6
CLRF 0x21
L5: ADDLW 0xE8
MOVWF 0x20
COMF 0x21,F
MOVLW 0xFC
BTFSS STATUS,C
GOTO L7
L8: ADDWF 0x20,F
BTFSC STATUS,C
GOTO L8
L7: ADDWF 0x20,F
CLRWDT
INCFSZ 0x21,F
GOTO L8
BTFSC 0x20,0
GOTO L9
L9: BTFSS 0x20,1
GOTO L10
NOP
GOTO L10
L10: RETURN
L3: BCF STATUS,IRP
BCF STATUS,RP1
BCF STATUS,RP0
CLRWDT
RETURN
L1: BCF 0x06,3
BSF STATUS,RP0
BCF 0x06,3
MOVLW 0x0A
BCF STATUS,RP0
CALL L11
CLRF 0x20
MOVLW 0x06
MOVWF FSR
MOVLW 0x08
CALL L12
MOVF 0x20,W
MOVWF 0x38
MOVF 0x21,W
MOVWF 0x39