|
ME Labs, Inc. 719-520-5323 |
|
|
|
ME Labs, Inc. | 1-719-520-5323 | Example Program - EE16CE.pbpPICBASIC PRO program to demonstate the I2CREAD and I2WRITE Commands. Writes to the first 16 locations of internal I2C EEPROM. Reads first 16 locations back and send to serial out repeatedly. Note: for PIC16CE62x MCUs' Name : EE16CE.pbp
' Compiler : PICBASIC PRO Compiler 2.6
' Assembler : PM or MPASM
' Target PIC : PIC16CE62x or similar with internal I2C EEPROM
' Hardware : Non specific
' Oscillator : internal or external
' Keywords : I2CREAD, I2CWRITE, SEROUT
' Description : PICBASIC PRO program to demonstate the I2CREAD and I2WRITE Commands.
' Writes to the first 16 locations of internal I2C EEPROM. Reads first 16 locations
' back and send to serial out repeatedly. Note: for PIC16CE62x MCU's
'
Include "modedefs.bas" ' Include serial modes
Define I2C_INTERNAL 1
SO Con 0 ' Define serial output pin
DPIN Var EEINTF.1 ' Data line to internal EEPROM
CPIN Var EEINTF.2 ' Clock line to internal EEPROM
B0 Var byte
B1 Var byte
B2 Var byte
For B0 = 0 To 15 ' Loop 16 times
I2CWRITE DPIN,CPIN,$A0,B0,[B0] ' Write each location's address to itself
Pause 10 ' Delay 10ms after each write
Next B0
mainloop:
For B0 = 0 To 15 step 2 ' Loop 8 times
I2CREAD DPIN,CPIN,$A0,B0,[B1,B2] ' Read 2 locations in a row
Serout SO,N2400,[#B1," ",#B2," "] ' Print 2 locations
Next B0
Serout SO,N2400,[10] ' Print linefeed
Goto mainloop ' Loop forever
End
Download the program file. |
|
Copyright 2019 ME Labs, Inc. PO Box 8250 Asheville NC 28814 (719) 520-5323 (719) 520-1867 fax email: support@melabs.com |
|