- TibiaBot NG Bot NG

[adrian9787]

Elo mam 2 pytania dotyczoce bota ng pod tibie 8.54 a wiec:
1.ja w bocie ng ustawic ze gdy bije potworka z broni to bije mi czarem exori hur
2. Gdy zostane postrzelony run? paralize czy jest skrypt / a moze gdzies to sie ustawia ze mi automatycznie wpisuje czar utani hur

Uwaga za szybko i poprawno odpowiedz REPUT LECI

 

[czarny1233]

Odp: Bot NG

ja mam skrypta ale to nie za darmo chce sms za to

 

[czarny1233]

Odp: Bot NG

pisz na gg 13002426

 

[Ten Fajny]

Odp: Bot NG

A ja Ci dam za darmo....

const 
MonsterName = 'Nazwa Potwora' ; 
Attack_Spell = 'exori hur' ; 
Min_Mana = 100 ; 
Min_Monster_HP = 1 ;  
Max_Monster_HP = 100 ; 
Range = 5 ; 

var 
x: Integer; 
Creature:TCreature; 

function GetCreatureByID(ID: integer): 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].ID = ID then 
begin 
Result := Creatures.Creature[x]; 
Exit; 
end; 
end; 
end; 

function GetCreatureByName(Name: string): 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].Name = Name 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) and (c.Health >= Min_Monster_HP) and (c.Health <= Max_Monster_HP) then 
begin 
Result := True; 
end; 
end; 

while not Terminated do 
begin 
UpdateWorld; 
Creature := GetCreatureByID(Self.Attacking); 
if (Self.Mana >= Min_Mana) and (Creature <> nil) then 
for i := low(monstername) to high(monstername) do 
begin 
if (MonsterName[i] = Creature.Name) and (IsCreatureAttackable(Creature)) then 
begin 
Self.Say(Attack_Spell); 
sleep(2000); 
end; 
end; 
sleep(100); 
end;

 

[adrian9787]

Odp: Bot NG

A co do tego postrzelenia run? paralize macie tez skrypt ? Zeby jak dostane paraliza do mi uzywa czaru utani hur. A i ten skrypt /\ UP /\ nie dziala

 

[Ten Fajny]

Odp: Bot NG

A uzupe?ni?e? chocia? nazw? potwora, w kt?rego ma bi? z czaru? H?? - ten skrypt dzia?a

 

[Phess]

Odp: Bot NG

Prosz?, oto skrypty o kt?re prosi?e? :

       Const
  MinMana = 500
  Spell = 'exori hur'

while not terminated do
begin
  UpdateWorld;
  if Self.Mana >= MinMana then
  if Self.Attacking then
  Self.Say(Spell);
  sleep(500); // you may change the delay (in millseconds)
end;

const
minMana = 50;

while not Terminated do
begin
UpdateWorld;
if Self.Mana > minMana then
begin
if Self.Slowed then
Self.Say('exura<-- tutaj wpisujemy czar');
end;
Sleep(300);
end;