Please Connection skrypt very need
Strzelanie z run
Const
RuneID = 3155 // tutaj id runy
MinHP = 1100 // ponizej xx hp nie strzeli z runy
function GetAttackedCreature:TCreature;
begin
UpdateWorld;
result := nil;
for i := 0 to Creatures.Count -1 do
begin
if i >= Creatures.Count then break;
if Creatures.Creature.ID = Self.Attacking then
Begin
result := Creatures.Creature;
exit;
end;
end;
end;
while not terminated do
begin
UpdateWorld;
Creature := GetAttackedCreature;
if Creature <> nil then
if Self.Health >= MinHP then
Self.Containers.UseItemWithCreature(RuneID,Creatur e);
sleep(3000);
end;
Manarune
Const
Manarune_ID = 3194
Minmana = 1119200
Maxmana = 1119200
while not terminated do
begin
UpdateWorld;
if Self.mana <= Minmana then
while Self.mana < Maxmana do
begin
if terminated then break;
self.containers.useitemwithself(ManaRune_ID);
sleep(5);
UpdateWorld;
end;
sleep(100);
end;
Strzelanie z run
Const
RuneID = 3155 // tutaj id runy
MinHP = 1100 // ponizej xx hp nie strzeli z runy
function GetAttackedCreature:TCreature;
begin
UpdateWorld;
result := nil;
for i := 0 to Creatures.Count -1 do
begin
if i >= Creatures.Count then break;
if Creatures.Creature.ID = Self.Attacking then
Begin
result := Creatures.Creature;
exit;
end;
end;
end;
while not terminated do
begin
UpdateWorld;
Creature := GetAttackedCreature;
if Creature <> nil then
if Self.Health >= MinHP then
Self.Containers.UseItemWithCreature(RuneID,Creatur e);
sleep(3000);
end;
Manarune
Const
Manarune_ID = 3194
Minmana = 1119200
Maxmana = 1119200
while not terminated do
begin
UpdateWorld;
if Self.mana <= Minmana then
while Self.mana < Maxmana do
begin
if terminated then break;
self.containers.useitemwithself(ManaRune_ID);
sleep(5);
UpdateWorld;
end;
sleep(100);
end;