Hmmm, bitwise EEPROM,
How bout ...Code:EEPROM 0,[0,1,2,3,4,5,6,7,8,9,0] ; Just some data to work with TheBit VAR WORD ; (256*8 = 2047 max) TheByte VAR BYTE BitMask VAR BYTE Result VAR BYTE TheBit = 42 GOSUB GetEEbit ; Result = 1 (bit 2 of byte 5) STOP GetEEbit: TheByte = TheBit / 8 BitMask = DCD (TheBit // 8) READ TheByte, Result Result = Result & BitMask if Result then Result = 1 RETURN
Bookmarks