скрипт элементаль закла 2.7

react667 · 12.02.2012, 12:35

Помогите плиз с переделкой данного скрипта под версию 2.7, просто не могу достучаться до автора скрипта(Usilok77)

Код:

//Script by Usilok v_2.1
var 
Mob_id,Elem_id,i,temp:integer;
msgName,skill:string;

procedure PHX_Message(msg1:string);
begin
         buf:=HStr('17 54 D4 07 00 00 00 00 00 ');
         msgName:='Attack';
         WriteS(msgName);
         WriteS(msg1);
         SendToClient;
end;
begin
//проверяем пакет
    if FromClient  then
    case pck[1] of   
//узнаем id элема
    #$27: 
         begin   
            temp:=Elem_id;
            Elem_id:=readD(4);
            if (Elem_id <> temp) then    
               PHX_Message('Найден элементаль!');
        end;
//узнаем id моба
    #$b5: 
         begin   
            Mob_id:=readD(4);
            if (Mob_id<>0) then
                PHX_Message('Найден таргет!');
        end;    
//ловим скилл
    #$23:
        begin 
            if(skill<>pck) then
            begin
                skill:=pck;
                PHX_Message('Найден атакующий скилл, можно бить!');
            end;
        end;
    #$c9: 
         begin               
                    //Эмоция "Думать" (любая команда элементаля, отловленная скриптом)
            if pck=HStr('C9 57 66 15 21 00 00 00 00 00') then
                begin   
               //  цикл ударов элементаля
               PHX_Message('Атакую!');
                 i:=1;
                 For i:=1 to 70 do  
                 begin 
                    buf:=skill;
                    writed(Elem_id,4);
                    writed(Mob_id,11);
                    sendtoserver; 
                    i:=i+1; 
                 end;
                PHX_Message('Атака выполнена!'); 
                end            
        end;
    end;
end.

Отпишись плиз автор