Potrzebuje skryptu do ELFA by wywalal pod siebie puste bp
Wersja do druku
Potrzebuje skryptu do ELFA by wywalal pod siebie puste bp
@up o ile wiem raczej taki skrypt nie istnieje
Potrzebuje Skrypciora do elfbota ze po x czasu idzie do x miejsca i daje exita
@down
chodz Ci moze o
?Kod:const
playermsg = 'Player to msg' // Put name of player you msg when someone attack You
var
Finished:boolean;
function GetCreatureByID(ID: integer): TCreature;
begin
UpdateWorld;
Result := nil
for x := 0 to Creatures.Count - 1 do
begin
if Creatures.Creature[x].ID = ID then
begin
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
procedure Event_Attacked(ID: integer);
var
AttackingCreature: TCreature;
begin
UpdateWorld;
AttackingCreature := GetCreatureByID(ID);
if not AttackingCreature.NPC then
begin
for i := 0 to VipList.Count - 1 do
begin
if VipList.Vip[i].Online then
Self.PrivateMessage(playermsg.Name,'help, ' + AttackingCreature.Name + ' is attacking me!');
Sleep(2000);
end;
Finished := true;
end;
end;
begin
Finished := false;
while (not Terminated) and (not finished) do
begin
UpdateWorld;
ProcessEvents;
Sleep(100);
end;
end;
szukam skryptu do NG bota, a mianowicie gdy jakis gracz pokaze sie na ekranie (niedaleko mnie) postac mowi: No kill please I Training!
Szukam skryptu dość dziwnego.
Do ng pod 8.42 tibie
Chce zeby sorc expil ze spike swordem i wand of cosmic energy, a mianowicie:
Kiedy mam powyzej 1100many bot zaklada wanda a jezeli jest ponizej 700 many bot zaklada sworda
Z góry dziekuje;)
@edit, Najlepiej zeby zmienial na full defa kiedy zaklada wanda a dawaj full attack kiedy zaklada sworda
Trzeba mi skryptu na kamienie a oczywiscie na to ze jak skilluje na slime i koncza sie w łapie kamienie to z bp zakłąda następne :d
Nie podałeś do jakiego bota. Jeśli do elfa to tutaj masz skrypta:
auto 2000 refillammo
@@@@@@@@@
Poszukuję skrypta do elfa który będzie mi strzelał automatycznie w typów ( Aimbot do otsa 8.4 bez hotów ).
@Down
Helooooooouuuuuuuuuuu a ja?
Pod NG. Skrypt nie mój.Cytuj:
const
WeaponID = 3297
SpearID = 1781
SpearOz = 3.60
SpearAmount = 20
Fluid = [99, 2886, 2887, 2887, 2888, 2889, 2890, 2891]
Procedure PickUpSpears(Spears: TItem);
begin
if (Self.Capacity <= (Spears.Amount * SpearOz)) then
begin
if (Self.Capacity/SpearOz) > 1 then
Spears.MoveToContainer(Self.Containers.Container[0], 0, Int(Self.Capacity/SpearOz));
end else Spears.MoveToContainer(Self.Containers.Container[0], 0, 0);
Sleep(500);
end;
Procedure FindSpears;
var
x, y, z, i, f: integer;
Tile: TTile;
begin
for x := -1 to 1 do
begin
for y := -1 to 1 do
begin
Tile := Screen.Tile[x + 7, y + 5];
begin
for i := 0 to Tile.Count-1 do
begin
if i >= Tile.Count then Break;
if Tile.Item[i].ID = SpearID then
begin
if i = 1 then PickUpSpears(Tile.Item[i]);
else for f := Low(Fluid) to High(Fluid) do if Tile.Item[i-1].ID = Fluid[f] then PickUpSpears(Tile.Item[i]);
else Tile.Item[i-1].MoveToGround(Self.X+Random(-2,3), Self.Y+Random(-2,3), Self.Z, 0);
end;
end;
end;
end;
end;
end;
Function GetItemFromOpenBackpack(ID, Index: 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;
if x = Index then Continue;
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;
function CountItemAmountFromOpenBackpack(ID: integer): integer;
var
x: integer;
y: integer;
begin
Result := 0;
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 := Result + Self.Containers.Container[x].Item[y].Amount;
end;
end;
end;
end;
while not terminated do
begin
UpdateWorld;
FindSpears;
Weapon := GetItemFromOpenBackpack(WeaponID, Self.Containers.Count);
if Weapon <> nil then Weapon.MoveToBody(Self.Arrow, 0);
Spear := GetItemFromOpenBackpack(SpearID, 0);
if Spear <> nil then Spear.MoveToContainer(Self.Containers.Container[0], 0, 0);
if (Self.RightHand.ID = SpearID) then
begin
if (Self.RightHand.Amount < 90) then
begin
Spear := GetItemFromOpenBackpack(SpearID, Self.Containers.Count);
if Spear <> nil then Spear.MoveToBody(Self.RightHand, 0);
end;
end else begin
SpearCount := CountItemAmountFromOpenBackpack(SpearID);
if SpearCount >= SpearAmount then
begin
Self.RightHand.MoveToBody(Self.Arrow, 0);
Sleep(500);
Spear := GetItemFromOpenBackpack(SpearID, Self.Containers.Count);
if Spear <> nil then Spear.MoveToBody(Self.RightHand, 0);
end else if Self.RightHand.ID = 0 then Self.Arrow.MoveToBody(Self.RightHand, 0);
end;
Sleep(500);
end;
Poprosiłbym skrypt do Elfa na auto reconnect , żeby otwierał bp i przywracał cave bota , targetinga i wszystkie skrypty...
W 'extras' zaznacz Open Backpack at login.
Tu masz na reconnecta, czy to save czy to kick
A do cavebota myślę że ci samo wróci.Kod:auto 100 ifnot $connected { reconnect | wait 6000 }
JA POTRZEBUJE SKRYPTA NA AIMBOTA DO ELFA, ŻEBY MI STRZELAŁO Z BP A NIE Z HOTA : C ( poraz drugi ). Dzięki.
Prośba o Skrypt [tibia bot NG]:
Witam chcaiłbym prosić o skrypta na expienie na Ratach i bugach pod sklepem Al'Dee i żeby jak uzbiera 500 gp poszedł zanieść do banku. Druga prośba dotyczy skilowania w Ab'Dendriel na trolach. Dało by się ?
I żeby w obydwu skryptaCH było żeby jadł wsztsko co znajdzie [oczywiscie do jedzenia xD], a jak będzie "Full" to niech zbiera do Backpacka, a jak nie bedzie capa to niech zostawi i nic z tym nie robi :). Z góry dzięki. Pozdrawiam.
@Edit
sory ale nie zauważyłem że player @up prosił też o skrypta :/. Jeszcze raz sorry :(
Tibia Bot Ng .
Scrypt żeby ponizej xx hp. używał Exury , a poniżej xx hp używał exury gran .
Oraz ma ktoś Scrypt na Larvy -1 Floor Nad Shadow Tombem ? Również Ng .
Szukam skrypta do TibiaBotNG by dawał mi "Exura" gdzie jakieś potwór lub gracz mnie sparaliżuje
Z góry dzięki :)
Ten skrypt działał pod 8.11 ztestuj go teraz.
Cytuj:
const
minMana = 30;
while not Terminated do
begin
UpdateWorld;
if Self.Mana > minMana then
begin
if Self.Slowed then
Self.Say('exura');
end;
Sleep(300);
end;
Jest jakis scrypt żeby po w logowaniu była zaznaczona opcja logot -> player on screen ?? botng