Цитата:
Сообщение от Breadfan
9: begin
if (prof=1) then begin buf:=hstr(b9); SendToServerEx(bufer); end;
x:=x+1
end;
|
Цитата:
Сообщение от Breadfan
12: begin
if (prof=1) then begin buf:=hstr(b12); SendToServerEx(bufer); end;
x:=x+1
end;
|
Не хватает ';' точки с запятой после x:=x+1!
Поверяй скрипт в пакетхаке нажатием кнопки "ПРОВЕРИТЬ СИНТАКСИС".