То есть то, что видно в i2c дебагере (команды записи) это все виртуально пишется во флеш или нет?
Я тут попробовал несколько скриптов, но считывается не то, что я записал..
$regfile = "m16def.dat" ' specify the used micro
$crystal = 8000000
$baud = 19200 ' use baud rate
$lib "lcd4.lib"
'$lib "i2c.lbx"
$lib "i2c_twi.lbx"
Config Lcdpin = Pin , Rs = Porta.0 , E = Porta.2 , Db4 = Porta.4 , Db5 = Porta.5 , Db6 = Porta.6 , Db7 = Porta.7
Config Lcd = 16 * 2
$hwstack = 32 ' default use 32 for the hardware stack
$swstack = 10 ' default use 10 for the SW stack
$framesize = 40 ' default use 40 for the frame space
Cls
Dim Adress As Word , Content As Byte , Dat As Byte , Hi_addr As Byte , Low_addr As Byte
Adress = 16384
Content = 123
Hi_addr = High(adress)
Low_addr = Low(adress)
Cursor Off
Locate 1 , 1
Lcd "wr:" ; Bin(content)
Locate 2 , 1
Lcd "adress:" ; Adress
I2cstart
I2cwbyte 160
I2cwbyte Hi_addr
I2cwbyte Low_addr
I2cwbyte Content
I2cstop
Waitms 1200
Waitms 1200
Dim Read_dat As Byte
Hi_addr = High(adress)
Low_addr = Low(adress)
I2cstart
I2cwbyte 160
I2cwbyte Hi_addr
I2cwbyte Low_addr
I2cstart
I2cwbyte &HA1
I2crbyte Read_dat , Nack
I2cstop
Waitms 1200
Cls
Locate 1 , 1
Lcd "read:" ; Bin(read_dat);
Locate 2 , 1
Lcd "adress:" ; Adress;
End
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 16