Storing Strings using the Write command

Hi All,
I wanted to use a variable to point to the eeprom address using the WRITE command, but it generates an error. After searching for a solution last night I keep comming back to my original (clumsy) solution!

I want to be able to do this:

FOR T1= 10 to 23
messline[T1]=phone1[T1]
WRITE T1,phone[T1]
NEXT

But I can only get this to work:
FOR T1= 10 to 23
messline[T1]=phone1[T1]
NEXT
write 10,phone1[0]
write 11,phone1[1]
write 12,phone1[2]
write 13,phone1[3]
write 14,phone1[4]
write 15,phone1[5]
write 16,phone1[6]
write 17,phone1[7]
write 18,phone1[8]
write 19,phone1[9]
write 20,phone1[10]
write 21,phone1[11]
write 22,phone1[12]

Is there a 'neater' solution.

Thanks,
Bob

May be something like this?

FOR T1= 10 to 23
messline[T1]=phone1[T1]
write T1,phone1[10-T1]
NEXT

Ioannis

Many thanks, Couldn't see it. Must of been past my bedtime last night!!!

Thanks,
Bob