[Pomoc]Proszę .

[Duza chmura1998]

Witam od pewnego czasu próbuje przerobic skrypta na Energy Ringa i Might Ringa do Tibia Bot NG 4.5.0 7.

 

Próbuje przerobic tego oto skrypta :

 

1.

Const
// Ering //
EringHP = 5500 // ponizej tej HP wlozy RING <-------------------------------------- Tutaj jest dobrze.
EringID = 3051
// Might //
MightHP = 8000 // powyzej tej many wlozy inny amulet <---------------- A problem jest w tym ponieważ zakłada non stop might ringa.
MightID = 3048 // wpisz ID jakiegos innego ringa, ktory masz Pisze ze zaloży ringa powyzej HP a ma zakladac PONIŻEJ.

var
Amulet:TItem;
function GetItemFromOpenBackpack(ID: 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;
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;


begin
while not Terminated do
begin
updateworld;
If (Self.Health <= EringHP) and (Self.Ring.ID<>EringID) then <------- To są takie same liniki, dolna linika powinna byc przerobiona na ZAKLDANIE RINGA PONIZEJ HP.
begin
Amulet := GetItemFromOpenBackpack(EringID);
if Amulet<>nil then
Amulet.MoveToBody(Self.Ring, 0);
end;
If (Self.Health >= MightHP) and (Self.Ring.ID<>MightID) then <----------------------- Czy ta linika nie powinna byc zmieniona ?
begin
Amulet:=GetItemFromOpenBackpack(MightID);
if Amulet<>nil then
Amulet.MoveToBody(Self.Ring, 0);
end;
Sleep(100);
end;
end;

 

 

A zaklada powyzej many .

Czy mógł by ktos przerobic ?

Proszę o pomoc.

[Aim0w0w]

Też Prosił Bym O ten Skrypt!