nujen prosten'kiy scriptik

[Rashka]

Вобщем суть такая, нужно чтоб 1 ебло пиздило другое (с авто атаки) находятся они в пати, если кто-то может напишите, а то скриптами не занимаюсь, а нужно очень

 

[Алеку]

var
buff : TL2Buff;
weapon : TL2Item;
control : TL2Control;
secondChar : String;

const
fists = 8810;
sword = 10434;
shield = 15621;

begin
control:= Engine;
secondChar:= 'izRo';
while Delay(100) do begin
if not control.GetUser.Buffs.ByID(789, buff) or (buff.EndTime < 15000) then begin
control.FaceControl(0, false);
if not control.GetUser.Buffs.ByID(5564, buff) and not control.GetUser.Buffs.ByID(778, buff) then
control.UseSkill(788);

Delay(1000);

if control.GetInventory.User.ByID(fists, weapon) and not weapon.Equipped then
control.UseItem(fists);

Delay(100);
control.SetTarget(secondChar);
Delay(300);

while ((control.GetUser.Buffs.ByID(5564, buff) and (buff.Level < 3)) or control.GetUser.Buffs.ByID(788, buff)) and (control.GetUser.Target.Name = secondChar) do begin
control.Attack(100, true);
end;

end;
if control.GetUser.Buffs.ByID(5564, buff) and (buff.Level = 3) then begin

control.UseSkill(789);

if control.GetUser.Buffs.ByID(789, Buff) and (buff.EndTime > 55000) then begin

delay(200);

if control.GetInventory.User.ByID(shield, weapon) and not weapon.Equipped then
control.UseItem(shield);

if control.GetInventory.User.ByID(sword, weapon) and not weapon.Equipped then
control.UseItem(sword);

control.FaceControl(0, true);
Delay(10000);

if secondChar = User.Name then begin
secondChar:= control.GetUser.Name;
control:= Engine;
end else begin
control:= GetControl(secondChar);
secondChar:= User.Name;
end;

end;
end;
end;
end.
автор rsd