eep2:
inp = 0 'used only to step thru the serdata array to reserve the value of bcnt
xbyte = xbyte + bcnt
For eepstart = eepstart To xbyte
I2CWrite sda, scl, 0xa0, eepstart, serdata(inp)
WaitMs 7
inp = inp + 1
Next eepstart
this is the WHOLE PROBLEM !!! after it runs through the loop the value is xbyte
then i erroneously add xbyte to it again, then pretty soon i am on the wrong address.
' eepstart = eepstart + xbyte
i changed bcnt to eepstart in the for loop. sometimes i wish i could kick my own butt
thank eric.
End