Ище вопрос(знаю достал уже)

[Kvik]

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

С твоими познаниями, ближайшая подсказка будет - готовый скрипт...не меньше. Так что сиди и изучай! на этом форуме есть много скриптов, что работающих, что элементарно показывающих идею и принципы, похожие и нужные для тебя. А то читаешь твои посты складывается впечатление что ты прочитал 1 гайд и дальше не пытаешься идти, ну или очень медленно соображаешь.

А и да, ты в 3-м классе и у тебя такие ужасные знания грамматики русского языка или ты сидишь через promt?

Попрошу об язике не писать я русский не учил поетому и ошибки есть!!!
просто если есть уже готовий скрипт зачем щас вникать в язик програмирования если можна ево использовать.
я так понял на халяву никто не даст но помочь могут розобрать если что не так вот:

var
IDObj:string;
begin
if FromClient and (pck=Hstr('19 82 8A 66 40 00 00 00 00')) then  //если используем предмет идет проверка
begin
if FromServer and (pck[1]=#$2D) then       //на пакет joinpladge
begin
IDObj:=pck[2] + pck[3] + pck[4] + pck[5];   //запоминаем ид нпс из пакета
buf:=hstr('1F') +  IDObj;   //пишем в буфер действие action + ид нпс и отправляем
SendToServer;
end;
end;
end.

запускаю не работает что не так кто подскажет???
а да оправляю тока пакет action и ид нпс так как серв не ругаетса ели нет координатов.