Скажите вот кусок из скрипта :
Код:
//=============================================
if FromServer and (pck[1]=#$21) then
case ReadD(12) of
1061,1539: begin//Зелье Исцеления ID:1061
hpID:=ReadD(8);
SendMsg2('запомнил: З е л ь е Исцеления')
end;
734,1374: begin//Зелье Ускорения ID:734
uskorID:=ReadD(8);
Timer2.enabled:=true;
SendMsg2('запомнил: З е л ь е Ускорения');
end;
735,1375: begin//Зелье Быстрой Атаки ID:735
atakID:=ReadD(8);
Timer3.enabled:=true;
SendMsg2('запомнил: З е л ь е Атаки');
end;
и т.д
//==================================================
Можно как то подругому
проще это все выполнить
ОПТИМИЗИРОВАТЬ действия