Что нужно знать для написания скриптов

[telefunken82]

Доброй ночки у меня вопросик есть, Xkor показал в первом обучающем скриптике;
begin
if FromClient and (ConnectName='SokolA')
and (pck=HStr('1b 04 00 00 00')) then begin
buf:=HStr('45 00 00 00 00 00 00 00 00 00');
SendToServerEx('SokolB');
pck:='';
end;
end.
я запустил 2 окна рнх включен и работает именя персов есть пакеты бегают ))
имена чаров заменил в скрипте на свои но после нажатия выполнить получаю следующее

List index out of bounds (24).

подскажите что сделал не правильно

Добавлено через 24 минуты
с ошибкой разобрался
изменил пакеты ( у меня грация финал)
begin
if FromClient and (ConnectName='terr1')
and (pck=HStr('56 0D 00 00 00 00 00 00 00')) then begin
buf:=HStr('56 0E 00 00 00 00 00 00 00 00');
SendToServerEx('terr2');
pck:='';
end;
end.

но теперь когда terr1 выполняет действие победа, терр2 стоит а терр1 выполняет ето же действие победа

[Grinch]

Сообщение от telefunken82

но теперь когда terr1 выполняет действие победа, терр2 стоит а терр1 выполняет ето же действие победа