Skocz do zawartości
  • 👋 Witaj na MPCForum!

    Przeglądasz forum jako gość, co oznacza, że wiele świetnych funkcji jest jeszcze przed Tobą! 😎

    • Pełny dostęp do działów i ukrytych treści
    • Możliwość pisania i odpowiadania w tematach
    • System prywatnych wiadomości
    • Zbieranie reputacji i rozwijanie swojego profilu
    • Członkostwo w jednej z największych społeczności graczy

    👉 Dołączenie zajmie Ci mniej niż minutę – a zyskasz znacznie więcej!

    Zarejestruj się teraz

Kto mi przerobi skrypt do TibiaBotNG?


Htp

Rekomendowane odpowiedzi

Pomocnik
Opublikowano

Kto mi to przerobi???

const

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

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

Pot = 3161

Range = 8 //Bez zmian

 

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.UseItemWithSelf(Pot)---Próbowałem to przerobić na creature to skrypt nie chciał działać help!!!

Sleep(50);

end;

end;

Bulixs.png

Zarchiwizowany

Ten temat przebywa obecnie w archiwum. Dodawanie nowych odpowiedzi zostało zablokowane.

×
×
  • Dodaj nową pozycję...