Szukam Skryptu, który wpłaca kase do banku jak ma np. 1k Mój bo to tibia bot ng
aiviczek.mybrute.com stwórz własnego wojownika i walcz z innymi!! Przy okazji pomagając mi :)
Ostatnio zmieniony przez r0gaT : 01-12-2008, 15:40
Ostatnio zmieniony przez Eldereq : 03-12-2008, 22:09
Const
NumberOfMonsters = 2
idTrain = 3291 // knife
idFight = 860 // crimson
function CountMonstersBesideYou:Integer;
begin
Result := 0;
UpdateWorld;
for i := 0 to creatures.Count -1 do
begin
if i >= Creatures.Count then break
for x := -1 to 1 do
begin
if x >= 2 then break
for y := -1 to 1 do
begin
if y > 1 then break;
if Creatures.Creature[i].NPC then
if (Creatures.Creature[i].x = Self.X +x) and (Creatures.Creature[i].y = Self.y + y) then
Result := Result + 1;
end;
end;
end;
end;
function GetItemFromOpenBackpack(ID: integer): TItem;
var
x: integer;
y: integer;
begin
Result := nil;
for x := 0 to Self.Containers.Count - 1 do
begin
if x >= Self.Containers.Count then Break;
for y := 0 to Self.Containers.Container[x].Count - 1 do
begin
if y >= Self.Containers.Container[x].Count then Break;
if Self.Containers.Container[x].Item[y].ID = ID then
begin
Result := Self.Containers.Container[x].Item[y];
Exit;
end;
end;
end;
end;
while not terminated do
begin
UpdateWorld;
if (CountMonstersBesideYou > NumberOfMonsters) and (self.righthand.id = idTrain) then
begin
espada := GetItemFromOpenBackpack(idFight);
if espada <> nil then
begin
espada.movetobody(self.righthand,1);
end;
end;
if (CountMonstersBesideYou <= NumberOfMonsters) and (self.righthand.id = idFight) then
begin
espada := GetItemFromOpenBackpack(idTrain);
if espada <> nil then
begin
espada.movetobody(self.righthand,1);
end;
end;
sleep(100);
end;
Ostatnio zmieniony przez Gray : 03-12-2008, 22:09
Aktualnie 1 użytkowników przegląda ten temat. (0 użytkowników i 1 gości)
Zakładki