Another 'my code is optimized?' thread.

[nyce]

Hello, its me again with another question

What i plan with this script is drop 1 item for each tile around the character, using max distance allowed (2). 5x5, 25 tiles.

I feel it's taking a bit long to drop all 25, anything i can do to make it faster?

The server i play theres no delay to drop itens into ground.

Code: Select all

Procedure drop;
var x, y, myx, myy, myz : Integer;

begin
  myx := GetX(self);
  myy := GetY(self);
  myz := GetZ(self);
  DropDelay := 0; 
  for x := -2 to 2 do
  begin
    for y := -2 to 2 do
    begin
      FindType($1EBB,Backpack);
      MoveItem(FindItem,1,ground,myx+x,myy+y,myz);
    end;
  end;
end;

begin
  drop;
end.

[nyce]

any faster way to do this?

need advice.

[Vizit0r]

I feel it's taking a bit long to drop all 20, anything i can do to make it faster?

No.