Будьте добры Рескил (нужна помощ)

[Hezgar]

Code: Select all

program res;
{$Include 'all.inc'}
const
EnemyID = $000F965E;
Bandage = $0E21;
GostType = $0192;
PlayerType = $0190;

var t : integer;
begin
    while not Dead do
    begin
    Hungry(1,Backpack);
    if GetQuantity(Findtype(Bandage,Backpack)) < 100 then AddToSystemJournal('Bintov ostalos ' +  IntToStr(GetQuantity(Findtype(Bandage,Backpack))));
        for t := 1  to 10 do
        begin
            if (GetType(EnemyID) = PlayerType) then attack(EnemyID);
            if (GetType(EnemyID) = GostType) then
            begin
            waittargetobject(EnemyID);
            useObject(Findtype(Bandage,Backpack));
            clearjournal
            waitJournalline(now, 'You bring your patient back to life',10000)
            end;
        wait(4000)   
        end;
    end;
end.

Нашел такой скрипт, работает безотказно.

Если кого не затруднит, помогите мне. Добавьте в него что бы он после того как реснул, полностью отхиливал жертву, и опять убивал.

Безгранично буду благодарен.

[MuDaCk]

А ещё найди скрипт на атаку перса, добавить отхил противника и можно будет собрать полноценный скрипт.

[Fenix]

Да есть там атака перса. Ему просто нужно юзание бинтов на цель до тех пор пока цель полностью не отхилится (с соответствующей задержкой на хил).

[Hezgar]

Fenix правильно сказал... нужно добавить что бы он цель отхиливал, а потом опять убивал.

помогите пожалуйста...

[Hezgar]

Апну! Помогите товарищи, очень прошу.