Szukasz skryptu? Zajrzyj tutaj!

Daggyn · 16-05-2009 18:23

Potrzebuje skryptu do ELFA by wywalal pod siebie puste bp

Noru$ · 17-05-2009 00:19

@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;

?

credo · 17-05-2009 00:30

szukam skryptu do NG bota, a mianowicie gdy jakis gracz pokaze sie na ekranie (niedaleko mnie) postac mowi: No kill please I Training!

Evó · 18-05-2009 20:20

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

Smeldi · 19-05-2009 20:06

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

Klamer · 20-05-2009 16:48

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?

Jaanek · 20-05-2009 17:43

Smeldi napisał

Cytat został ukryty, ponieważ ignorujesz tego użytkownika. Pokaż cytat.

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

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;

Pod NG. Skrypt nie mój.

Poducha · 20-05-2009 22:44

Poprosiłbym skrypt do Elfa na auto reconnect , żeby otwierał bp i przywracał cave bota , targetinga i wszystkie skrypty...

Klamer · 21-05-2009 10:01

Poducha napisał

Cytat został ukryty, ponieważ ignorujesz tego użytkownika. Pokaż cytat.

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

Kod :

auto 100 ifnot $connected { reconnect | wait 6000 }

A do cavebota myślę że ci samo wróci.

JA POTRZEBUJE SKRYPTA NA AIMBOTA DO ELFA, ŻEBY MI STRZELAŁO Z BP A NIE Z HOTA : C ( poraz drugi ). Dzięki.

Mr. Duel · 21-05-2009 14:55

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 :(

danon17 · 26-05-2009 15:51

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 .

Evó · 26-05-2009 23:22

danon17 napisał

Cytat został ukryty, ponieważ ignorujesz tego użytkownika. Pokaż cytat.

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 .

w ww. spa wte ch nik. pl /down loa d/t ibia/ng_pac k.rar Wielki pack waytpoitsów -100% bezpieczny By:Scheutz

@Pokasuj spacje

zoxo · 27-05-2009 13:15

Szukam skrypta do TibiaBotNG by dawał mi "Exura" gdzie jakieś potwór lub gracz mnie sparaliżuje
Z góry dzięki :)

Evó · 28-05-2009 11:56

Ten skrypt działał pod 8.11 ztestuj go teraz.

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;

alejakto · 30-05-2009 15:07

Jest jakis scrypt żeby po w logowaniu była zaznaczona opcja logot -> player on screen ?? botng

Temat: Szukasz skryptu? Zajrzyj tutaj!

Narzędzia tematu

Oceń ten temat

Informacje o temacie

Użytkownicy przeglądający temat

Podobne tematy

Szukasz teamu? Zajrzyj tutaj!

Jaka to piosenka? Zajrzyj tutaj, jeśli szukasz tytułu zasłyszanego gdzieś kawałka.

Szukasz Mappera? Zajrzyj tu!

[7.4] Szukasz oldschoolowego ots'a pod 7.4? Zajrzyj!

Nie wiesz gdzie trenić? Zajrzyj tutaj!

Zakładki

Zakładki

Zasady postowania