Как-то так: Оффтоп
delphi Код:
var
OIDnpc:integer;
........
procedure Init; //Вызывается при включении скрипта
begin
......
OIDnpc:=0;
.....
end;
if fromclient and (pck[1]=#$04) and (OIDnpc=0) then OIDnpc:=(ReadD(2));
- по аналогии и ОИД итема, только использовать пакет на юз итема
__________________
На фразы в аську типа "слух карочь 1)как точить 2)как раскачаться за 5 мин" - игнор. ИМХО идиотизм
Дай голодному рыбу - он будет один день сыт. Покажи ему, как удить рыбу - он пошлёт тебя и скажет, что у него есть более интересные занятия, чем забрасывать снасти в воду
David Kastrup @ de.comp.text.tex.
"Приобретенные навыки общения с маленькими детьми - сильно упрощают взаимопонимание на форумах..."
А вы знаете, что для качественной сварки - место шва нужно протереть спиртом?
Последний раз редактировалось Breadfan, 04.08.2010 в 22:51.
|