Skocz do zawartości

Skrypty TibiaBot NG

Od ostatniej odpowiedzi w tym temacie minęło 204 dni. Pamiętaj, że odkopywanie takich tematów jest niewskazane, chyba że chcesz wnieść coś nowego do dyskusji.

Polecane posty

Ma ktoś skrypt na auto jedzenie fooda (ham) gdy postać jest głodna? Albo przynajmniej co x czasu.

SZUKAŁEM w google i NICZEGO nie ma. Przeszukałem 11 stron w tym temacie - pusto.

 

I jak by było to autologin jak wyloguje. Ale bez podawania passów. Chodzi o taki skrypt co jak wyrzuci do menu wybierania postaci to albo klikał "enter" albo po prostu daną postać wybierał.

 

 

 

Z góry dzięki, zależy mi na tym bardzo.

Udostępnij ten post


Link to postu
Pani Kasia

siema zrobisz mi skrypt na manarune zeby po wpisaniu danej komendy np mana verdil / mana nick... bot manarunowal kumpli?

Udostępnij ten post


Link to postu
Pani Kasia

Witam.

Czy ktoś mógłby zrobić skrypt na używanie utamo vita? Wiem, że w tym temacie był taki:

while not terminated do
begin
 UpdateWorld;
 if not Self.MagicShield then
 begin
   Self.Say('utamo vita');
   Sleep(2000);
 end;     
 sleep(100);
end;

 

Jednakże mam z nim niewielki problem. Otóż skrypt ten działa na zasadzie, że utamo vita jest włączane dopiero jak się skończy. Niestety mój net jest zdradliwy i czasami są dość spore lagi, przez co zanim utamka zostanie z powrotem włączona zostaję ubity. Czy ktoś mógłby dodać taki skrypt, który włącza utamkę co x sekund (dokładnie co 50 :P)?

Z góry dzięki.

Udostępnij ten post


Link to postu

Ma ktoś skrypt na auto attack z SD runy w potwory? (DZIAŁAJĄCY)

Bardzo proszę!!

Edytowano przez malykon

Udostępnij ten post


Link to postu

Czy mógłbym poprosić o skrypt który zmienia broń jak 2+spear a jak sie skończą zamienia na serpent sword , i gdy więcej niż 2 potworki używa serpent sword

bardzo bym o to prosił .:)


Daj Plusa :P +

Udostępnij ten post


Link to postu
Pani Kasia

Siema.Potrzebuje skrpyta ktory co pol godziny wklada nowego sword ringa na miesjce ringa xD ringi sa w bp.

Udostępnij ten post


Link to postu
Pani Kasia

Elo ,

istnieje możliwość zrobienia skrypta na Ots ? .

Dokladniej na Dragon Lordy , żeby przed nimi ciekał (WaVe) i używal mana runy na manie 3000

~~

Edytowano przez ZbiEram Minusy

Daj minusa! ------------------ To nie boli..

Udostępnij ten post


Link to postu

Manarune

const
 minMana = 3000 // Tutaj ustawiamy przy jakiej ilości many bot ma użyć manaruny. 

while not terminated do
begin
 UpdateWorld;
 if Self.Mana < minMana then
     Self.Containers.UseItemWithSelf(3181); //  Numerek "3157" oznacza  ID manaruny. ID można sprawdzić klikając prawym przyciskiem myszki na  manarune i wybierając "Show Item Number" 
     Sleep(1000);// Oznacza ile czasu ma odczekać przed kolejnym użyciem. (1000 = 1 sekunda)
end; 		  

Uciekanie (nie wiem czy działa)

Const
Wanted='Dragon';// whice monster to keep diagnoling
AttackAt = 25
RampsID = [1950, 1952, 1954, 1956, 385, 1947, 434, 414, 604]

var
x,Bla:Integer;
Looting: boolean;


function IsCreatureBesideYou(c: TCreature): boolean;
begin
UpdateWorld;
if (abs(c.X-self.X) <= 1) and (abs(c.Y-self.Y) <= 1) then begin
if c.Z = self.Z then
begin
Result := True;
Exit;
end;
end;
Result := False;
end;


function GetTileFromXYZ(X, Y, Z: integer): TTile;
begin
Result := nil;
if abs((Self.X - 7) - X) > 14 then Exit;
if abs((Self.Y - 5) - Y) > 11 then Exit;
if Self.Z <> Z then Exit;
Result := Screen.Tile[abs((Self.X - 7) - X), abs((Self.Y - 5) - Y)];
end;
function IsTileWalkable(Tile: TTile): boolean;
begin
Result := True;
for Z := 0 to Tile.Count - 1 do
begin
if Tile.Item[Z].Properties.Hole then
begin
Result := False;
end
else if Tile.Item[Z].Properties.Stairs then
begin
Result := False;
end
else if not Tile.Item[Z].Properties.Walkable then
begin
OutputDebugString('Not Walk: ' + IntToStr(Tile.Item[Z].ID));
Result := False;
end;
else
begin
for x := low(RampsID) to high(RampsID) do
begin
if Tile.Item[Z].ID = RampsID[x] then Result := False;
end;
end;
end;
end;

function GetCreatureBesideYou: TCreature;
begin
UpdateWorld;
Result := Nil;
for x := 0 to Creatures.Count - 1 do
begin
UpdateWorld;
if (Creatures.Creature[x].Name=Wanted) then
if IsCreatureBesideYou(Creatures.Creature[x]) then
begin
if Creatures.Creature[x].ID <> Self.ID then
begin
UpdateWorld;
Result := Creatures.Creature[x];
Exit;
end;
end;
end;
end; 
var
Moved:boolean;

begin
updateworld;
G:=false;
T:=false;
while not terminated do
begin
Bla:=Self.Containers.Count;
updateworld;
Creature:=GetCreatureBesideYou;
if Creature<>nil then
if Creatures.Creature[x].Health>AttackAt then
begin
if (Self.X<>Creature.X) and (Self.Y=Creature.Y) then
begin
Tile:=GetTileFromXYZ(Self.x,Self.y-1,self.z);
if Tile<>nil then
if IsTileWalkable(Tile) then
begin
Self.MoveUp;
Moved:=true;
end;
If (Moved=False) then
begin
Tile:=GetTileFromXYZ(Self.x,Self.y+1,self.z);
if Tile<>nil then
if IsTileWalkable(Tile) then
Self.MoveDown;
end;
end;
Moved:=false;
if (Self.X=Creature.X) and (Self.Y<>Creature.Y) then
begin
Tile:=GetTileFromXYZ(Self.x-1,Self.y,self.z);
if Tile<>nil then
if IsTileWalkable(Tile) then
begin
Self.MoveLeft;
Moved:=true;
end;
If (Moved=False) then
begin
Tile:=GetTileFromXYZ(Self.x+1,Self.y,self.z);
if Tile<>nil then
if IsTileWalkable(Tile) then
Self.MoveRight;
end;
end;
end;
sleep(1000);
end;
end;


52126142219396245817.jpeg

Udostępnij ten post


Link to postu

Do autora tematu. Wszystko pięknie ale te skrypty mogłyby być w spoilerach.

Poza tym + i dzięki za skrypty


snikersproject1.png

Udostępnij ten post


Link to postu

Witam potrzebuje Skrypt na MEGA UH`a pod BOTA NG 8.7

na server fortera

id runy w mapedit to 2299 jest to złota/żółta runa cameleon

problem polega w tym iz w skrypcie pacz poniżej nie działa ID i nie jestem pewien czy poprawnie jest napisany skrypt

proszę o pomoc

 

 

const

minHealth = 3000;

while not Terminated do

begin

UpdateWorld;

if (Self.Health < minHealth) then

begin

Self.Containers.UseItemWithSelf(2299)

Sleep(1000);

end;

Sleep(100);

end;

Edytowano przez kazabiel

Udostępnij ten post


Link to postu

Poprosiłbym o skrypta zeby robil mi SD(dwa na raz) jak zrobi zeby zmienil na Blanka jak bp caly bedzie to zeby zmienil go na nastepny zeby mi uzywal manarun i przy braku blankow zeby sie wylogowal

Udostępnij ten post


Link to postu

Witam, potrzebował bym skrypta. A mianowicie, kiedy jest 1 potworek by bił z exori hur, a gdy jest 2 lub więcej by bił z exori. Z góry dzięki ;)

Udostępnij ten post


Link to postu

szukam skryptu na auto robienie m wall pod tibie 7.92 czyli moja postac musi przerzucac blank rune z bp do reki

Udostępnij ten post


Link to postu

const

MiniCreatureHP = 90; //Ilosc % przy ktorym cie leczy.

Targetlist = ['Chansey']; //nick.

Range = 8 //Bez zmian

Pot = 3161

 

var

Creature: TCreature;

CreatureName: string;

 

 

function GetCreatureByName: TCreature;

var

x: integer;

begin

Result := nil;

for x := 0 to Creatures.Count - 1 do

begin

if x >= Creatures.Count then Break;

if Creatures.Creature[x].Z = Self.Z then

for i := low(TargetList) to high(targetlist) do

if Creatures.Creature[x].Name = TargetList then

begin

Result := Creatures.Creature[x];

Exit;

end;

end;

end;

 

function IsCreatureAttackable(c: TCreature): boolean;

begin

UpdateWorld;

Result := False;

if (c.Z = self.Z) and (abs(c.X-self.X) <= Range) and (abs(c.Y-self.Y) <= Range) and (c.outfit<>0) then

begin

Result := True;

end;

end;

 

begin

while not Terminated do

begin

UpdateWorld;

Creature := GetCreatureByName;

for i := low(targetlist) to high(targetlist) do

if Creature <> nil then

if (TargetList = Creature.Name) and (IsCreatureAttackable(Creature)) then

if ((Creature.Health) <(MiniCreatureHP)) then

Self.Containers.UseItemWithCreature(Pot,Creature);

Sleep(50);

end;

end;

 

Jak to zrobić żeby używał potiona gdy nie ma potwora na ekranie lub gdy wszystko zabite???


Bulixs.png

Udostępnij ten post


Link to postu
Od ostatniej odpowiedzi w tym temacie minęło 204 dni. Pamiętaj, że odkopywanie takich tematów jest niewskazane, chyba że chcesz wnieść coś nowego do dyskusji.

Bądź aktywny! Zaloguj się lub utwórz konto

Tylko zarejestrowani użytkownicy mogą komentować zawartość tej strony

Utwórz konto

Zarejestruj nowe konto, to proste!

Zarejestruj nowe konto

Zaloguj się

Posiadasz własne konto? Użyj go!

Zaloguj się
  • Kto przegląda   0 użytkowników

    Brak zalogowanych użytkowników przeglądających tę stronę.

×
Okienko zamknie się za 5 sekund...