Sashafaq
12.01.2009, 15:52
я не силен в программировании сделал фиговенький скрипт который очень тормазит с большимим количетсвом вещей как например в ИТ
что посоветуете сделать?
Скрипт состоит в том чтобы не видить не нужные мне ресурсы и стрелы,
тк я не знал как воплотить сделал так, еще не будут видны другие вещи но они мне тоже не важны.
Прошу помощи как лучше всего это реализовать
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.
что посоветуете сделать?
Скрипт состоит в том чтобы не видить не нужные мне ресурсы и стрелы,
тк я не знал как воплотить сделал так, еще не будут видны другие вещи но они мне тоже не важны.
Прошу помощи как лучше всего это реализовать
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.