Co nowego?
  • logo_cipsoft
    Nowe serwery zostały otwarte 19 Lut 2025:
    Noctalia (Open PvP) Ignitera (Open PvP) us_logo Xybra (Open PvP)

- Skrypt [NG] Trzymanie ataku

Status
Zamknięty.

Marcinoos66

Senior User
Dołączył
Grudzień 18, 2008
Posty
1196
Liczba reakcji
97
Bot trzyma atak, skrypt podobny jak w elfbocie, ci?gle mamy zaznaczonego targeta...

PHP:
var  
LockID:integer;  
 
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;  
 
begin  
updateworld;  
while self.attacking=0 do  
begin  
sleep(200);  
updateworld;  
end;  
LockID:=self.attacking;  
while not terminated do  
begin  
updateworld;  
ProcessEvents;  
if ((self.attacking)<>(LockID)) and ((self.attacking)<>(0)) then  
LockID:=Self.Attacking;  
If Self.Attacking=0 then 
begin 
Creature:=GetCreatureByID(LockID);  
If Creature<>nil then Creature.Attacking:=true;  
end;  
 
sleep(100);  
end;  
end;
 
Status
Zamknięty.
Do góry