Уважаемый NLObP, если есть время помоги проверить скрипт на манор для нескольких окон, происходит сдача манора сразу по приходу пакета о начале олимпа.
const
Name='NICK'; //ник перса
.....
//если перехвачен пакет на сдачу манора то
if FromClient and (ConnectName=Name) and (pck[1]=#$D0) and (pck[2]=#$09) and (pck[3]=#$00) then
begin
//запоминаем его полностью
PaketManora[ConnectID]:=pck;
end;
//если получен пакет об начале олимпиады то
if FromServer and (ConnectName=Name) and (pck[1]=#$64) and (pck[2]=#$69) and (pck[3]=#$06) then
begin
//засекаем текущее время
StartTime[ConnectID]:=time;
//вычисляем время сдачи манора (прибавляем нужное время которое нужно засеч после получения сообщения об илимпиаде)
EndTime[ConnectID]:=StartTime[ConnectID] + EncodeTime(0,5,49,0); // изменяем и корректируем ето число в формате (ЧЧ,ММ,СС,МС)
//активируем таймер
timer1.enabled:=true;
//а ето- отправка сам себе сообщения о том что ВРЕМЯ ПОШЛО
buf:=hstr('4A AB F6 A0 48 02 00 00 00 2D 00 3E 00 56 00 4F 00 52 00 4F 00 4E 00 37 00 00 00 32 04 40 04 35 04 3C 04 4F 04 20 00 3F 04 3E 04 48 04 3B 04 3E 04 00 00');
SendToClientEx(Name);
end;
end.
|