Прошу помощи

[Sashafaq]

я не силен в программировании сделал фиговенький скрипт который очень тормазит с большимим количетсвом вещей как например в ИТ
что посоветуете сделать?
Скрипт состоит в том чтобы не видить не нужные мне ресурсы и стрелы,
тк я не знал как воплотить сделал так, еще не будут видны другие вещи но они мне тоже не важны.
Прошу помощи как лучше всего это реализовать

procedure Init; //Вызывается при включении скрипта
begin
end;
procedure Free; //Вызывается при выключении скрипта
begin
end;
begin
if (FromServer) then
begin
if (pck[1]=#$0B)
and (pck[6]=#$4C) or (pck[6]=#$40) or (pck[6]=#$51) or (pck[6]=#$67)
and (pck[7]=#$07) or (pck[7]=#$05)
and (pck[8]=#$00) 
and (pck[9]=#$00)
then
pck:='';
end;
end.

а это для того чтоб при загрузки локации с вещами их тоже небыло видна попростоу спаун , как их обьеденить я тоже незнаю если вместе запускать то вылетает ошибка л2пнх

procedure Init; //Вызывается при включении скрипта
begin
end;
procedure Free; //Вызывается при выключении скрипта
begin
end;
begin
if (FromServer) then
begin
if (pck[1]=#$0C)
and (pck[10]=#$4C) or (pck[10]=#$40) or (pck[10]=#$51) or (pck[10]=#$67)
and (pck[11]=#$07) or (pck[11]=#$05)
and (pck[12]=#$00) 
and (pck[13]=#$00)
then
pck:='';
end;
end.

[Xelat]

Во-первых мне кажется тут не хватает скобочек

if (pck[1]=#$0B)
and ((pck[6]=#$4C) or (pck[6]=#$40) or (pck[6]=#$51) or (pck[6]=#$67))
and ((pck[7]=#$07) or (pck[7]=#$05))
and (pck[8]=#$00) 
and (pck[9]=#$00)

[Grinch]

надо при получении пакета о предмете слать пакет делет обжект клиенту предмет будет появляться но сразу изчезнет из памяти клиента. хотя те ж яйца тока вид с боку юзани поиск тут кто то писал скрипт который геран от гномов чистил и т.д.

[Sashafaq]

этот скрипт в жестком скриптинге и я в нем не разабрался, и он у меня както не оч работает иногда уберает и то тольконпсов людей вообше нефига

[Fer123]

что то вроде этого

const Excludes=[123,3451,2343] // id предметов
begin
if FromServer and (pck[1]=#$0C) and (ReadD(10) in Excludes) then pck:='';
if FromServer and (pck[1]=#$0B) and (ReadD(6) in Excludes) then pck:='';
end.

Если верить этому :
0B=SpawnItem:d(ObjectID)d(ItemID:Get.Func01)d(X)d( Y)d(Z)d(Stackable)d(Count)d(d)
0C=DropItem:d(PlayerID)d(ObjectID)d(ItemID:Get.Fun c01)d(X)d(Y)d(Z)d(Stackable)d(Count)d(d)

[Sashafaq]

если сразу и дроп и спаун то вылетают ошибки такого типа

Access violation at address 13232819 in module 'l2pbx.exe'. Read of address 00000000.

[dmitry501]

Ясен пень вылетят. Примерно так надо

begin
  if FromServer and (((pck[1]=#$0C) and (ReadD(10) in Excludes))
     or ((pck[1]=#$0B) and (ReadD(6) in Excludes))) then pck:='';
end.

[Sashafaq]

спасибо огромное всем
Вроде как заработало

[QaK]

Засим, прикрываем от флуда.