Помогите, работа со списком

string Path = "C:\list.txt"; // путь к файлу
string s[999];
int i;

if(fopen(Path, "r")) // открыть файл
{
int k=freadlineall(#s[0], sizearray(s)); // прочитать все строки
messagebox("Всего строк в файле: "+format(k));
fclose();

// перемешать массив со строками
for(i=0; i<k; i++)
{
if(k>1)
{
int r1 = rand(0, k);
int r2 = rand(0, k);
while(r1==r2)r2 = rand(0, k);

string temp = s[r1];
s[r1]=s[r2];
s[r2]=temp;
}
}

sendlanguage("00000419", formatiw(gethwnd())); // переключить кибор на рус. язык
for(i=0; i<k; i++) // цикл для всех строк
{
//writeclipboard(s[i]); // записать текст в буфер (если файл в ansi)
writeclipboard(utf8toansi(s[i])); // записать текст в буфер (если файл в utf8)
if(i<k-1)
{
int result = messageboxyn("Строка скопирована в буфер^r^nСкопировать следующую?");
if(result == -1) break;
}
else messagebox("Строка скопирована в буфер^r^nВсе строки быи скопированы");
}
}
else messagebox("Не удалось открыть файл");