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

[Problem] ze skryptami.


Zingo

Rekomendowane odpowiedzi

Opublikowano

Witam. Mam taki problem że chcę sobie załadować jakieś skrypty do bota, wszystko idzie okej, ale po pewnym czasie występują następujące problemy.

Przykładowo w skrypcie na auto atak z sd postać często nie atakuje potwora którego powinna. Znaczy nie bije z sd, nie robi wtedy nic.

Gdy ustawiłem skrypta na utamo vita, to po jakimś czasie spadła mi utamka i nie wziął czaru.

Nie wiem czy to ma coś z tym wspólnego, ale gdy te skrypty są włączone to nie bot expi tylko ja sam.

Czy może mi ktoś w tym pomóc?

Skrypt na sd mam następujący.

 

 

const
delay = 0.1
MonsterName = 'Hydra'
MinHP = 0
MonsterHP = 0
RuneID = 3155
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;
procedure Attack(Name:string);
var
Player:TCreature;
x:integer;
begin
updateworld;
Monster :=GetCreatureByName(Name);
if monster <> nil then
if Self.Health>MinHp then
begin
Self.Containers.UseItemWithCreature(RuneID, Monster);
updateworld;
end
end;
while not terminated do
begin
Yes := false;
UpdateWorld;
for i := 0 to creatures.Count - 1 do
begin
if creatures.Creature.Z = Self.Z then
If Creatures.Creature.Name = MonsterName then
begin
Yes := true;
repeat
Attack(MonsterName);
Sleep(Delay * 1000);
UpdateWorld;
for g := 0 to creatures.Count -1 do
begin
if creatures.Creature.Z = Self.Z then
If Creatures.Creature.Name = MonsterName then
Yes := True else Yes := false; else yes := false;
end;
until Yes = false;
end;
sleep(100);
end;
Sleep(100);
end;
Opublikowano

Więc pomoże ktoś czy nie?

I jest jeszcze sprawa dotycząca tworzenia run.

Chce dostać skrypt który będzie mi automatycznie otwierał kolejny backpack który znajduję się w aktualnie otwartym.

Żeby brał blank rune do miejsca na broń/tarczę i mówił czar do zrobienia sd (adori vita vis).

Zarchiwizowany

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

×
×
  • Dodaj nową pozycję...