HOLA! Vereis, es que me quiero pasar a los 18f y entonces me puesto a empollar el datasheet del 18f2620 y bueno, pues he hecho un programa, que, como no, no funciona
asique aqui os lo dejo haber si me podeis decir el porque de esta desgracia, muchas gracias por la ayuda
Codigo:
list p=18f2620
#include <P18F2620.INC>
CONFIG OSC = INTIO67
CONFIG FCMEN = OFF
CONFIG IESO = OFF
CONFIG PWRT = ON
CONFIG BOREN = OFF
CONFIG BORV = 46
CONFIG WDT = OFF
CONFIG WDTPS = 1
CONFIG MCLRE = ON
CONFIG LPT1OSC = OFF
CONFIG PBADEN = OFF
CONFIG CCP2MX = PORTC
CONFIG STVREN = OFF
CONFIG LVP = ON
CONFIG XINST = OFF
CONFIG DEBUG = OFF
CONFIG CP0 = OFF
CONFIG CP1 = OFF
CONFIG CP2 = OFF
CONFIG CP3 = OFF
CONFIG CPB = OFF
CONFIG CPD = OFF
CONFIG WRT0 = OFF
CONFIG WRT1 = OFF
CONFIG WRT2 = OFF
CONFIG WRT3 = OFF
CONFIG WRTB = OFF
CONFIG WRTC = OFF
CONFIG WRTD = OFF
CONFIG EBTR0 = OFF
CONFIG EBTR1 = OFF
CONFIG EBTR2 = OFF
CONFIG EBTR3 = OFF
CONFIG EBTRB = OFF
ORG 0x0000
GOTO inicio
inicio CALL INI_clk
CALL INI_A
BSF PORTA,2
MOVLW 0xAA
MOVWF EEDATA
CLRF EEADRH
CLRF EEADR
CALL GRABA_EPROM
bucle GOTO bucle
LEE_EPROM BCF EECON1,EEPGD
BCF EECON1,CFGS
BSF EECON1,RD
RETURN
GRABA_EPROM BCF EECON1,EEPGD
BCF EECON1,CFGS
BSF EECON1,WREN
BCF INTCON,GIE
MOVLW 0x55
MOVWF EECON2
MOVLW 0xAA
MOVWF EECON2
BSF EECON1,WR
BSF INTCON,GIE
grabando BTFSC EECON1,WR
GOTO grabando
BCF EECON1,WREN
RETURN
INI_clk MOVLW B"11000000"
MOVWF OSCTUNE
MOVLW B"01111111"
MOVWF OSCCON
RETURN
INI_A CLRF PORTA
CLRF LATA
MOVLW 0xFF
MOVWF ADCON1
MOVLW 0x07
MOVWF CMCON
CLRF TRISA
BSF TRISA,0
BSF TRISA,1
RETURN
END
Cuando quito la llamada a la subrituna ini_clk me oscila(no se a cuanto) y me graba en eeprom
es un avance!pero si pongo esa llamada la jodo, y no hace na
y si oscila no me enciende el led en PORTA,2...ME VA A MATARRR
Muchas gracias!
