About writing word variables into the eeprom

[Jerson]

Since you're dealing with word variables, the size is known to be 2bytes on the PIC. So, something like this will work

SaveArray:
FOR ArrayPosition = 0 TO 20-1
    WRITE ArrayPosition*2,Array[ArrayPosition].Byte0,Array[ArrayPosition].Byte1
Next
return

ReadArray:
FOR ArrayPosition = 0 TO 20-1
    READ ArrayPosition*2,Array[ArrayPosition].Byte0,Array[ArrayPosition].Byte1
Next
return

[Ted's]

I disagree here.

WRITE ArrayPosition*2,Array[ArrayPosition].Byte0,Array[ArrayPosition].Byte1

is for ArrayPosition = 0

WRITE 0,Array[0].Byte0,Array[0].Byte1

...

is for ArrayPosition = 19

WRITE 38,Array[19].Byte0,Array[19].Byte1


According to the manual, to write a word, each of the 2 bytes that make up the word must be written separately:
w Var Word
WRITE 0,w.BYTE0
WRITE 1,w.BYTE1

in other words, WRITE does not accept 3 arguments.

[Jerson]

Ted, you're right on this. I goofed. But you got the idea though

[Ted's]

Yes. But it does not seem to be efficient enough.

A one or two-liner should be enough. Maybe using the remainder // ?

[mackrackit]

When you say efficient, do you mean speed or code size?

[Darrel Taylor]

If you alias the Word array as a Byte array, you can just write 1 byte at a time in the loop.

arraysize  CON 20
Array      VAR WORD[arraysize]

@ByteArray = _Array
ByteArray  VAR BYTE EXT

FOR ArrayPosition = 0 TO (arraysize*2-1)
    WRITE ArrayPosition, ByteArray(ArrayPosition)
NEXT ArrayPosition

[Ted's]

When you say efficient, do you mean speed or code size?

The latter.

[Ted's]

If you alias the Word array as a Byte array, you can just write 1 byte at a time in the loop.

arraysize  CON 20
Array      VAR WORD[arraysize]

@ByteArray = _Array
ByteArray  VAR BYTE EXT

FOR ArrayPosition = 0 TO (arraysize*2-1)
    WRITE ArrayPosition, ByteArray(ArrayPosition)
NEXT ArrayPosition

I do not understand your code. Please comment.