upss.. no cupo todo esta es la ultima parte.
haaa se me olvidava esto es un juego de luces y sonido de antemano gracias.
Label_0018 MOVF tmr0 , W
ANDLW 0x03
MOVWF 0x14
RETURN
Label_0006 BCF porta , 03
BSF porta , 02
CALL Label_0018
MOVF 0x17 , W
MOVWF fsr
BCF status , c
MOVF 0x16 , W
XORLW 0x00
BTFSC status , z
GOTO Label_0019
XORLW 0x01
BTFSC status , z
GOTO Label_001A
XORLW 0x03
BTFSC status , z
GOTO Label_001B
RLF 0x14 , f
RLF 0x14 , f
Label_001B RLF 0x14 , f
RLF 0x14 , f
Label_001A RLF 0x14 , f
RLF 0x14 , f
Label_0019 MOVF indf , W
IORWF 0x14 , W
MOVWF indf
INCF 0x16 , f
BTFSS 0x16 , 02
RETURN
CLRF 0x16
INCF 0x17 , f
RETURN
Label_0007 CLRF 0x18
MOVLW 0x1A
MOVWF 0x19
Label_0021 MOVF 0x19 , W
MOVWF fsr
MOVF indf , W
MOVWF 0x27
MOVF 0x18 , W
XORLW 0x00
BTFSC status , z
GOTO Label_001C
XORLW 0x01
BTFSC status , z
GOTO Label_001D
XORLW 0x03
BTFSC status , z
GOTO Label_001E
RRF 0x27 , f
RRF 0x27 , f
Label_001E RRF 0x27 , f
RRF 0x27 , f
Label_001D RRF 0x27 , f
RRF 0x27 , f
Label_001C MOVF 0x27 , W
ANDLW 0x03
MOVWF 0x14
CALL Label_001F
CALL Label_000A
CALL Label_000A
CALL Label_000A
INCF 0x18 , f
BTFSC 0x18 , 02
GOTO Label_0020
Label_0022 MOVF 0x18 , W
XORWF 0x16 , W
BTFSS status , z
GOTO Label_0021
MOVF 0x19 , W
XORWF 0x17 , W
BTFSC status , z
RETURN
GOTO Label_0021
Label_0020 CLRF 0x18
INCF 0x19 , f
GOTO Label_0022
Label_001F CALL Label_000F
MOVWF 0x11
MOVLW 0x20
MOVWF 0x12
MOVLW 0x05
BTFSS porta , 04
MOVLW 0x05
MOVWF 0x13
CALL Label_0011
CLRF portb
RETURN
Label_000F MOVF 0x14 , W
XORLW 0x00
BTFSC status , z
GOTO Label_0023
XORLW 0x01
BTFSC status , z
GOTO Label_0024
XORLW 0x03
BTFSC status , z
GOTO Label_0025
GOTO Label_0026
Label_0023 BSF portb , 04
RETLW 0x5F
Label_0024 BSF portb , 05
RETLW 0x4C
Label_0025 BSF portb , 06
RETLW 0x40
Label_0026 BSF portb , 07
RETLW 0x33
Label_0008 BCF porta , 02
BSF porta , 03
CLRF 0x18
MOVLW 0x1A
MOVWF 0x19
Label_002C MOVF 0x19 , W
MOVWF fsr
MOVF indf , W
MOVWF 0x27
MOVF 0x18 , W
XORLW 0x00
BTFSC status , z
GOTO Label_0027
XORLW 0x01
BTFSC status , z
GOTO Label_0028
XORLW 0x03
BTFSC status , z
GOTO Label_0029
RRF 0x27 , f
RRF 0x27 , f
Label_0029 RRF 0x27 , f
RRF 0x27 , f
Label_0028 RRF 0x27 , f
RRF 0x27 , f
Label_0027 MOVF 0x27 , W
ANDLW 0x03
MOVWF 0x14
CALL Label_002A
XORLW 0x00
BTFSC status , z
RETLW 0x00
MOVF 0x15 , W
XORWF 0x14 , W
BTFSS status , z
RETLW 0x00
INCF 0x18 , f
BTFSC 0x18 , 02
GOTO Label_002B
Label_002D MOVF 0x18 , W
XORWF 0x16 , W
BTFSS status , z
GOTO Label_002C
MOVF 0x19 , W
XORWF 0x17 , W
BTFSC status , z
RETLW 0x01
GOTO Label_002C
Label_002B CLRF 0x18
INCF 0x19 , f
GOTO Label_002D
Label_002A CLRF 0x15
MOVLW 0x07
BTFSS porta , 04
MOVLW 0x03
MOVWF 0x0E
Label_0034 MOVLW 0xFF
MOVWF 0x0D
Label_0033 MOVLW 0xFF
MOVWF 0x0C
Label_0032 BTFSC portb , 00
GOTO Label_002E
BTFSC portb , 01
GOTO Label_002F
BTFSC portb , 02
GOTO Label_0030
BTFSC portb , 03
GOTO Label_0031
DECFSz 0x0C , f
GOTO Label_0032
DECFSz 0x0D , f
GOTO Label_0033
DECFSz 0x0E , f
GOTO Label_0034
RETLW 0x00
Label_002E BSF portb , 04
CLRF 0x15
MOVLW 0x5F
GOTO Label_0035
Label_002F BSF portb , 05
BSF 0x15 , 00
MOVLW 0x4C
GOTO Label_0035
Label_0030 BSF portb , 06
BSF 0x15 , 01
MOVLW 0x40
GOTO Label_0035
Label_0031 BSF portb , 07
BSF 0x15 , 00
BSF 0x15 , 01
MOVLW 0x33
Label_0035 MOVWF 0x11
MOVLW 0x20
MOVWF 0x12
MOVLW 0x03
MOVWF 0x13
Label_0036 CALL Label_0011
MOVF portb , W
ANDLW 0x0F
XORLW 0x00
BTFSS status , z
GOTO Label_0036
CLRF portb
RETLW 0x01
Label_0009 MOVLW 0x01
MOVWF 0x13
CALL Label_000E
MOVLW 0x01
MOVWF 0x13
CALL Label_000E
CALL Label_0007
MOVLW 0x01
MOVWF 0x13
CALL Label_000E
MOVLW 0x01
MOVWF 0x13
CALL Label_000E
CALL Label_000A
CALL Label_000A
CALL Label_000A
MOVLW 0x00
MOVWF eeadr
BSF status , rp0
BSF eecon1 , 00
BCF status , rp0
MOVF eedata , W
SUBWF 0x28 , W
BTFSC status , c
GOTO Label_000C
CLRF 0x10
MOVLW 0x10
MOVWF 0x13
Label_0038 CALL Label_000A
MOVF 0x10 , W
CALL Label_0037
MOVWF 0x11
INCF 0x10 , f
MOVF 0x10 , W
CALL Label_0037
MOVWF 0x12
CALL Label_0011
INCF 0x10 , f
MOVF 0x10 , W
XORLW 0x16
BTFSS status , z
GOTO Label_0038
CALL Label_000A
CALL Label_000A
CALL Label_000A
GOTO Label_0039
Label_000C MOVLW 0x00
MOVWF eeadr
MOVF 0x28 , W
MOVWF eedata
BSF status , rp0
BSF eecon1 , 02
MOVLW 0x55
MOVWF eecon2
MOVLW 0xAA
MOVWF eecon2
BSF eecon1 , 01
BCF eecon1 , 02
Label_003A BTFSC eecon1 , 01
GOTO Label_003A
BCF status , rp0
CLRF 0x10
Label_003C INCF 0x27 , f
MOVF 0x27 , W
ANDLW 0x03
MOVWF 0x14
CALL Label_000A
CALL Label_000F
MOVLW 0x05
MOVWF 0x13
MOVF 0x10 , W
CALL Label_003B
MOVWF 0x11
INCF 0x10 , f
MOVF 0x10 , W
CALL Label_003B
MOVWF 0x12
CALL Label_0011
CLRF portb
INCF 0x10 , f
MOVF 0x10 , W
XORLW 0x6C
BTFSS status , z
GOTO Label_003C
CALL Label_000A
CALL Label_000A
CALL Label_000A
GOTO Label_0039
Label_000A MOVLW 0xC3
MOVWF 0x0D
Label_003E MOVLW 0xFF
MOVWF 0x0C
Label_003D DECFSz 0x0C , f
GOTO Label_003D
DECFSz 0x0D , f
GOTO Label_003E
RETURN
ORG 0x2000
DATA 0x0F
DATA 0x0F
DATA 0x0F
DATA 0x0F
ORG 0x2007
DATA 0x13
ORG 0x2100
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
DATA 0xFF
END