написал скрипт, а он как всегда

[Breadfan]

Да только в этом блоке

charid[o]:=idchar;
charname[o]:=namechar;
clanchar[o]:=ReadD(310 + (length(namechar) * 2 + 2) + (length(titlechar) * 2 + 2));
charx[o]:=ReadD(2);
chary[o]:=ReadD(6);
charz[o]:=ReadD(10);
profa[o]:=ReadD(30 + (length(namechar) * 2 + 2));
chardead[o]:=ReadC(333 + (length(namechar) * 2 + 2) + (length(titlechar) * 2 + 2));

уже задействованы 8 таких массивов. Причем работает так: приходит char info ("if fromserver and (connectname=name) and (pck[1]=#$31) then") - и значит начнем цикл в 1,5к (!!!) повторений. Это при приходе КАЖДОГО чаринфо пакета...а сколько их там бегает постоянно туда-сюда? То же самое при удалении объекта случается...Фактически выходит что почти в любой момент времени у тебя будет крутиться один из таких вот 1,5к циклов. Можно немного жизнь облегчить используя переменную для хранения "потолкового" значения "о", и использовать вместо "for o:=1 to 1500 do" какойнть "for o:=1 to max do", но это все равно не лучший выход по-моему

ЗЫ: кстати: а чего скрипт вообще должен делать? Судя по блоку объявлений переменных - хантер-бот какой-то получается, для охоты на варов.