Subject:
change an asm pic file
From:
"bob bob" ####@####.####
Date:
1 Oct 2001 23:10:59 -0000
Message-Id: <F29xQEfQm5UpSKyeoCU000035c0@hotmail.com>
HELLO
can you change this asm file for he fonctionnaly in mode pge/pge and no
octete/octete this is for my student
thanks
>
> LIST P=16F84, F=INHX8M
> include "P16FXX.inc"
> ORG 0x0000
>
> GOTO Label_0001
>Label_0016 BSF STATUS , RP0
> BSF EECON1 , 00
> BCF STATUS , RP0
> MOVF EEDATA , W
> RETURN
>Label_0030 MOVWF EEDATA
> BSF STATUS , RP0
> BCF INTCON , GIE
> BSF EECON1 , 02
> MOVLW 0x55
> MOVWF EECON2
> MOVLW 0xAA
> MOVWF EECON2
> BSF EECON1 , 01
>Label_0002 BTFSC EECON1 , 01
> GOTO Label_0002
> BCF STATUS , RP0
> RETURN
>Label_0017 MOVWF EEDATA
> COMF EEDATA , f
> MOVLW 0x7F
> TRIS PORTB
> MOVLW 0x80
> IORWF 0x0E , f
> BCF PORTB , 07
> MOVLW 0x08
> MOVWF 0x0C
>Label_0004 CALL Label_0003
> MOVF EEDATA , W
> ANDLW 0x80
> XORWF 0x0E , f
> XORWF PORTB , W
> XORWF PORTB , f
> RLF EEDATA , f
> DECFSZ 0x0C , f
> GOTO Label_0004
> CALL Label_0003
> MOVF 0x0E , W
> XORWF PORTB , W
> XORWF PORTB , f
> CALL Label_0003
> MOVLW 0xFF
> TRIS PORTB
> MOVLW 0x28
> CALL Label_0005
> RETURN
>Label_0006 BTFSC PORTB , 07
> GOTO Label_0006
> MOVLW 0x2A
> CALL Label_0005
> MOVLW 0x09
> MOVWF 0x0C
>Label_0007 BCF STATUS , C
> BTFSC PORTB , 07
> BSF STATUS , C
> RLF EEDATA , f
> CALL Label_0003
> DECFSZ 0x0C , f
> GOTO Label_0007
> RRF EEDATA , f
> MOVLW 0x28
> CALL Label_0005
> COMF EEDATA , f
> MOVF EEDATA , W
> RETURN
>Label_0003 MOVLW 0x1A
>Label_0005 MOVWF 0x0F
>Label_0008 DECFSZ 0x0F , f
> GOTO Label_0008
> RETURN
>Label_0028 CALL Label_0009
> CALL Label_000A
> MOVLW 0x0E
> ANDWF 0x0E , W
> MOVWF 0x10
> MOVLW 0xA1
> XORWF 0x10 , W
> CALL Label_000B
> CALL Label_000C
> CALL Label_000D
> MOVWF EEDATA
> CALL Label_000E
> CALL Label_000F
> MOVF EEDATA , W
> RETURN
>Label_002D MOVWF EEDATA
> CALL Label_0009
> MOVF EEDATA , W
> CALL Label_000B
> CALL Label_000C
> CALL Label_000F
> BTFSS 0x0E , 06
> GOTO Label_0010
>Label_0011 CALL Label_000A
> MOVLW 0xA0
> CALL Label_000B
> CALL Label_000C
> CALL Label_000F
> BTFSS 0x0E , 06
> GOTO Label_0011
>Label_0010 RETURN
>Label_0009 CALL Label_000A
> MOVLW 0x0E
> ANDWF 0x0E , W
> MOVWF 0x10
> MOVLW 0xA0
> XORWF 0x10 , W
> CALL Label_000B
> CALL Label_000C
> BTFSS 0x0E , 06
> GOTO Label_0012
> MOVF EEADR , W
> CALL Label_000B
> CALL Label_000C
>Label_0012 RETURN
>Label_0027 BCF STATUS , C
> RRF 0x14 , f
> BTFSC STATUS , C
> BSF 0x0E , 04
> BCF STATUS , C
> RRF 0x13 , f
> BTFSC STATUS , C
> BSF 0x14 , 07
> MOVLW 0x48
> SUBWF 0x14 , f
> BTFSS STATUS , C
> DECF 0x13 , f
> MOVLW 0x01
> SUBWF 0x13 , f
> MOVF 0x14 , W
> MOVWF EEADR
> BCF STATUS , C
> RLF 0x13 , f
> MOVLW 0xF1
> ANDWF 0x0E , f
> MOVF 0x13 , W
> IORWF 0x0E , f
> RETURN
>Label_000A MOVLW 0xCF
> TRIS PORTB
> BSF PORTB , 05
> BSF PORTB , 04
> CALL Label_0013
> BCF PORTB , 04
> CALL Label_0013
> BCF PORTB , 05
> CALL Label_0013
> BSF PORTB , 04
> RETURN
>Label_000F BCF PORTB , 05
> BCF PORTB , 04
> CALL Label_0013
> BSF PORTB , 05
> CALL Label_0013
> BSF PORTB , 04
> CALL Label_0013
> MOVLW 0xFF
> TRIS PORTB
> RETURN
>Label_000C MOVLW 0xDF
> TRIS PORTB
> BCF PORTB , 05
> CALL Label_0013
> BSF PORTB , 05
> BCF 0x0E , 06
> BTFSS PORTB , 04
> BSF 0x0E , 06
> BCF PORTB , 05
> MOVLW 0xCF
> TRIS PORTB
> RETURN
>Label_000E MOVLW 0xCF
> TRIS PORTB
> BCF PORTB , 05
> BSF PORTB , 04
> CALL Label_0013
> BSF PORTB , 05
> CALL Label_0013
> BCF PORTB , 05
> RETURN
>Label_000B MOVWF 0x0D
> MOVLW 0x08
> MOVWF 0x0C
>Label_0014 BCF PORTB , 05
> BTFSS 0x0D , 07
> BCF PORTB , 04
> BTFSC 0x0D , 07
> BSF PORTB , 04
> CALL Label_0013
> BSF PORTB , 05
> CALL Label_0013
> BCF PORTB , 05
> RLF 0x0D , f
> DECFSZ 0x0C , f
> GOTO Label_0014
> BSF PORTB , 04
> RETURN
>Label_000D MOVLW 0xDF
> TRIS PORTB
> MOVLW 0x08
> MOVWF 0x0C
> CLRF 0x0D
>Label_0015 BCF PORTB , 05
> CALL Label_0013
> BSF PORTB , 05
> CALL Label_0013
> RLF 0x0D , f
> BCF 0x0D , 00
> BTFSC PORTB , 04
> BSF 0x0D , 00
> DECFSZ 0x0C , f
> GOTO Label_0015
> BCF PORTB , 05
> MOVF 0x0D , W
> RETURN
>Label_0013 NOP
> NOP
> NOP
> NOP
> NOP
> NOP
> NOP
> RETURN
>Label_0001 CLRF PORTB
> CLRF PORTA
> BSF STATUS , RP0
> MOVLW 0x7F
> MOVWF OPTION_REG
> BCF STATUS , RP0
> CLRF EEADR
> CALL Label_0016
> MOVWF 0x10
>Label_0018 INCF EEADR , f
> CALL Label_0016
> CALL Label_0017
> DECFSZ 0x10 , f
> GOTO Label_0018
>Label_0026 MOVLW 0x90
> MOVWF 0x16
> MOVLW 0x00
> MOVWF 0x17
>Label_001D MOVF 0x16 , W
> CALL Label_0017
> MOVF 0x17 , W
> CALL Label_0017
> CALL Label_0006
> MOVWF 0x11
> CALL Label_0006
> MOVWF 0x12
> CALL Label_0006
> MOVWF 0x13
> CALL Label_0006
> MOVWF 0x14
> CALL Label_0006
> MOVWF 0x15
> MOVLW 0xBC
> XORWF 0x11 , W
> BTFSC STATUS , Z
> GOTO Label_0019
> MOVLW 0xEE
> XORWF 0x11 , W
> BTFSC STATUS , Z
> GOTO Label_001A
> MOVLW 0xDE
> XORWF 0x11 , W
> BTFSC STATUS , Z
> GOTO Label_001B
> MOVLW 0xAA
> XORWF 0x11 , W
> BTFSC STATUS , Z
> GOTO Label_001C
> MOVLW 0x6E
> MOVWF 0x16
> CLRF 0x17
> GOTO Label_001D
>Label_0019 MOVLW 0xB0
> XORWF 0x12 , W
> BTFSC STATUS , Z
> GOTO Label_001E
> MOVLW 0x20
> XORWF 0x12 , W
> BTFSC STATUS , Z
> GOTO Label_001F
> MOVLW 0x40
> XORWF 0x12 , W
> BTFSC STATUS , Z
> GOTO Label_0020
> MOVLW 0x70
> XORWF 0x12 , W
> BTFSC STATUS , Z
> GOTO Label_0021
> MOVLW 0x80
> XORWF 0x12 , W
> BTFSC STATUS , Z
> GOTO Label_0022
> MOVLW 0xC0
> XORWF 0x12 , W
> BTFSC STATUS , Z
> GOTO Label_0023
> MOVLW 0xD0
> XORWF 0x12 , W
> BTFSC STATUS , Z
> GOTO Label_0024
> MOVLW 0x6D
> MOVWF 0x16
> CLRF 0x17
> GOTO Label_001D
>Label_001F MOVF 0x12 , W
> CALL Label_0017
> CALL Label_0006
> CALL Label_0006
> CALL Label_0006
> CALL Label_0006
> MOVLW 0x2C
> MOVWF 0x18
>Label_0025 CALL Label_0003
> DECFSZ 0x18 , f
> GOTO Label_0025
> GOTO Label_0026
>Label_0020 MOVF 0x12 , W
> CALL Label_0017
> CALL Label_0003
> CALL Label_0003
> GOTO Label_0026
>Label_001E MOVF 0x12 , W
> CALL Label_0017
> CALL Label_0027
>Label_0029 CALL Label_0028
> CALL Label_0017
> BCF STATUS , C
> RRF 0x0E , f
> INCF EEADR , f
> BTFSC STATUS , Z
> INCF 0x0E , f
> BCF STATUS , C
> RLF 0x0E , f
> DECFSZ 0x15 , f
> GOTO Label_0029
> GOTO Label_0026
>Label_0021 MOVF 0x12 , W
> CALL Label_0017
> CALL Label_0003
> CALL Label_0003
> GOTO Label_0026
>Label_0022 MOVLW 0x20
> MOVWF FSR
>Label_002A MOVLW 0x7F
> CALL Label_0017
> CALL Label_0006
> MOVWF INDF
> INCF FSR , f
> DECFSZ 0x15 , f
> GOTO Label_002A
> GOTO Label_0026
>Label_0023 MOVF 0x12 , W
> CALL Label_0017
> MOVLW 0x20
> MOVWF FSR
>Label_002B MOVF INDF , W
> CALL Label_0017
> INCF FSR , f
> DECFSZ 0x15 , f
> GOTO Label_002B
> GOTO Label_0026
>Label_0024 MOVLW 0x20
> MOVWF FSR
> MOVF 0x15 , W
> MOVWF 0x18
>Label_002C MOVLW 0x2F
> CALL Label_0017
> CALL Label_0006
> MOVWF INDF
> INCF FSR , f
> DECFSZ 0x15 , f
> GOTO Label_002C
> MOVLW 0x20
> MOVWF FSR
> CALL Label_0027
>Label_002E MOVF INDF , W
> CALL Label_002D
> BCF STATUS , C
> RRF 0x0E , f
> INCF EEADR , f
> BTFSC STATUS , Z
> INCF 0x0E , f
> BCF STATUS , C
> RLF 0x0E , f
> INCF FSR , f
> DECFSZ 0x18 , f
> GOTO Label_002E
> GOTO Label_0026
>Label_001C MOVLW 0x20
> MOVWF FSR
> MOVF 0x15 , W
> MOVWF 0x18
>Label_002F CALL Label_0006
> MOVWF INDF
> INCF FSR , f
> DECFSZ 0x15 , f
> GOTO Label_002F
> MOVLW 0x20
> MOVWF FSR
> CLRF EEADR
> MOVF 0x18 , W
> CALL Label_0030
>Label_0031 MOVF INDF , W
> INCF EEADR , f
> CALL Label_0030
> INCF FSR , f
> DECFSZ 0x18 , f
> GOTO Label_0031
> GOTO Label_0026
>Label_001A MOVLW 0x20
> MOVWF FSR
> MOVF 0x15 , W
> MOVWF 0x18
>Label_0032 CALL Label_0006
> MOVWF INDF
> INCF FSR , f
> DECFSZ 0x15 , f
> GOTO Label_0032
> MOVF 0x14 , W
> MOVWF EEADR
> MOVF 0x13 , W
> MOVWF 0x0E
> BCF STATUS , C
> RLF 0x0E , f
> MOVLW 0x20
> MOVWF FSR
>Label_0033 MOVF INDF , W
> CALL Label_002D
> RRF 0x0E , f
> INCF FSR , f
> INCF EEADR , f
> BTFSC STATUS , Z
> INCF 0x0E , f
> RLF 0x0E , f
> DECFSZ 0x18 , f
> GOTO Label_0033
> GOTO Label_0026
>Label_001B MOVF 0x14 , W
> MOVWF EEADR
> MOVF 0x13 , W
> MOVWF 0x0E
> BCF STATUS , C
> RLF 0x0E , f
>Label_0034 CALL Label_0028
> CALL Label_0017
> BCF STATUS , C
> RRF 0x0E , f
> INCF EEADR , f
> BTFSC STATUS , Z
> INCF 0x0E , f
> BCF STATUS , C
> RLF 0x0E , f
> DECFSZ 0x15 , f
> GOTO Label_0034
> GOTO Label_0026
>Label_0035 GOTO Label_0035
>
> ORG 0x2000
> DATA 0x0F
> DATA 0x0F
> DATA 0x0F
> DATA 0x0F
>
> ORG 0x2007
> DATA 0x01
>
> ORG 0x2100
> DATA 0x07
> DATA 0x3F
> DATA 0x65
> DATA 0x25
> DATA 0x08
> DATA 0x36
> DATA 0x04
> DATA 0x6C
> 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
_________________________________________________________________
Téléchargez MSN Explorer gratuitement à l'adresse
http://explorer.msn.fr/intl.asp
