Hola
Tengo un problema con una eeprom I2C conectada a un 16F88. Va como una especie de consola, asi que elijo escribir o leer, luego meto el adress, y o bien escribo un dato, o bien recibo un dato.
El caso es, que al parecer escribe el dato bien, pues recibo el mensaje de haberlo escrito. Luego, al intentar leer, no recibo ningun acuse (mensaje mediante puerto serie) , ahi radica mi problema. O sea, o se produce un reset, o el codigo se queda estancado, o nose. Ahi va el codigo:
Codigo:
device=16f88
xtal=8
HSERIAL_BAUD = 2400 " Set baud rate to 9600
HSERIAL_RCSTA = %10010000 " Enable serial port and continuous receive
HSERIAL_TXSTA = %00100000 " Enable transmit and asynchronous mode
HSERIAL_CLEAR = ON " Optionally clear the buffer before receiving
SCL_PIN = PORTB.4
SDA_PIN = PORTB.1
BOOTLOADER=FALSE
ALL_DIGITAL=TRUE
DIM X[10] AS BYTE
DIM RX AS BYTE
DIM ADRESS AS WORD
DIM TMPDAT AS BYTE
DF:
RX=""
HRSOUT "[E]SCRIBIR O [L]EER",13
SERIN PORTB.2,396,[RX]
HRSOUT 13
IF RX="E" THEN GOTO ESCRIBIR
IF RX="L" THEN GOTO LEER
HRSOUT "COMANDO ERRONEO",13
GOTO DF
LEER: "¡Este es el bucle que me da problemas!
HRSOUT "LEER>DIRECCION DE 0 A 65535? [X] PARA ACABAR NUMERO",13
SERIN PORTB.2,396,[DEC ADRESS]
HRSOUT 13
HBSTART
HBUSOUT %10100000
HBUSOUT ADRESS.HIGHBYTE
HBUSOUT ADRESS.LOWBYTE
HBRESTART
HBUSOUT %10100001
TMPDAT=HBUSIN
HBSTOP
HRSOUT "DATO EN LA DIRECCION ", DEC ADRESS ,":",13 "¡¡¡NO RECIBO ESTO!!!!
HRSOUT TMPDAT " ¡¡¡NI ESTO!!!!
GOTO DF
ESCRIBIR:
HRSOUT "ESCRIBIR>DIRECCION DE 0 A 65535? [X] PARA ACABAR NUMERO",13
SERIN PORTB.2,396,[DEC ADRESS]
HRSOUT 13,"DATO A ESCRIBIR?",13
SERIN PORTB.2,398,[TMPDAT]
HBSTART
HBUSOUT %10100000
HBUSOUT ADRESS.HIGHBYTE
HBUSOUT ADRESS.LOWBYTE
HBUSOUT TMPDAT
HBSTOP
DELAYMS 10
HRSOUT 13,"DATO ESCRITO CON EXITO",13
GOTO DF
end
Todo empieza en el bucle DF, segun la eleccion irá a un sitio a LEER o a ESCRIBIR.
Espero vuestras posibles soluciones, muchisimas gracias.
salu2!
