SpeedHack скрипт.

[AppleZai]

Пользователь
Сообщения
513
Лайки
11
Баллы
0
Скрипт на спидхак для l2phx.
Включается эмоцией "Отжаться", выключается ей же.
В отличие от других скриптов после включения спидхака, не будет глюков с возвращением вашей скорости в "нормальную" после прыжка или смены локации и т.д., и вам не придется заново отправлять пакет на сх. Проблем с выключение сх тоже ни разу не наблюдалось.
Данный скрипт перед использованием нужно настроить. Изначально в спидхак настроен на скорость 32.0, но ее можно легко изменить. Для того чтобы изменить скорость надо запустить l2phx и зайти в пункт "Преобразования", там поставить переключатель на пункт "Single" и в левом поле ввести нужную скорость, например, 13,7 (обязательно надо ставить запятую. 13.7 не сработает). После того как ввели скороть нужно нажать на стрелочку вправо и в правом поле появится ваша скорость в hex. Далее надо заменить скорость в скрипте на вашу скорость. Для этого нужно обратить внимание на строчки:
Код:
Speed := '00 00 00 42';
StartSpeed := '00 00 C0 40'; 
PlayerID := $003B2146;
в процедуре Init. цифры 00 00 00 42 заменяем на то что получили в "Преобразованиях". Цифры 00 00 C0 40 это ваша начальная скорость (без сх). По умолчанию 6.0, но можно изменить (такиже методом как и спидхак скорость). (кстати говоря, если начальная скорость у вас, например, 7.3, то после выключения сх скрипт поставит вам скорость 6.0, НО это всего на пару "шагов". Стоит пробежать пару метров и скорость вернется на вашу начальную).
Далее ОБЯЗАТЕЛЬНО нужно изменить PlayerID. Для того чтобы узнать PlayerID нужно навести на себя таргет и поймать пакет CM_TARGET_SELECT (оранжевый), данный пакет имеет вид B5 57 72 9E 7B 3A 00 00. Цифры выделенные красным это и будет ваш PlayerID. У меня получился 9E 7B 3A 00, и для того чтобы настроить скрипт я должен изменить строчку PlayerID := $003B2146; на строчку PlayerID := $003A7B9E;
Важно: если ид игрока например AB CD EF GH, то строчка будет PlayerID := $GHEFCDAB; (то есть обратный порядок байт).
После того как внесены изменения в скрипт можно запускать, и в игре нажимать на эмоцию "Отжаться" и в чате появится строчка "SpeedHack ВКЛЮЧЕН" (Видна только вам если что ;)).
P.S. Если кому-то лень настраивать все эти "скорости" и устраивает скорость 32.0, то можно изменить только PlayerID на свой, и радоваться спидхаку.
Ну и сам скрипт:
Код:
var
    SpeedhackTimer:TTimer;
    Speed:string; 
    StartSpeed:string;
    PlayerID:integer;

procedure Init;
begin
    SpeedhackTimer := TTimer.Create(nil);
    SpeedhackTimer.OnTimer := @SpeedHackEvent;
    SpeedhackTimer.Enabled := false;
    SpeedhackTimer.Interval := 50;  
    
    Speed := '00 00 00 42';
    StartSpeed := '00 00 C0 40'; 
    PlayerID := $003B2146; 
end;

procedure Free;
begin
    SpeedhackTimer.Free;
end;

procedure SpeedHackEvent(Sender: TObject);
begin
    buf := HStr('42 65 D4');
    WriteD(PlayerID);
    buf := buf + HStr('23 01 00');
    buf := buf + HStr(Speed);
    WriteD(PlayerID);
    SendToClientEx(ConnectName);  
end;

begin
    if FromClient and (ReadC(1)=$C9) and (ReadH(4)=$5015) then
    begin  
        if SpeedhackTimer.Enabled = true then
        begin
            SpeedhackTimer.Enabled := false;
            buf := HStr('17 54 D4 19 00 00 00 00 00 00 00');
            WriteS('SpeedHack ВЫКЛЮЧЕН!');
            buf := buf + HStr('00 00');
            SendToClient;            
            
            buf := HStr('42 65 D4');
            WriteD(PlayerID);
            buf := buf + HStr('23 01 00');
            buf := buf + HStr(StartSpeed);
            WriteD(PlayerID);
            SendToClientEx(ConnectName);  
        end
        else
        begin
            SpeedhackTimer.Enabled := true; 
            buf := HStr('17 54 D4 19 00 00 00 00 00 00 00');
            WriteS('SpeedHack ВКЛЮЧЕН!');
            buf := buf + HStr('00 00');   
            SendToClient;
        end;  
        pck := ''; 
    end;  
    if FromServer and (ReadC(1)=$42) and (ReadC(8)=$23) and (ReadD(4)=PlayerID) then
    begin
        pck := '';
    end;
end.
 
Сверху