[Скрипт] СпидХаК 2.7

[c-lavr]

Скрипт на СпидХак

Активация: пишем в чат команду

сх24,4
или
sh24,4

где
сх или sh - команда на запуск скрипта
24,4 - скорость передвижения, задаёте сами (можно выставлять до 7 знака после запятой, но значение в игре округлиться до 1 знака после запятой)

Скрипт

//Script by CLAVR
var
 PlayerId:integer;
  
begin
     if FromClient and (ReadC(1)=$45)  then                                
         PlayerId:=ReadD(6); 
              
     if FromClient and (ReadC(1)=$B2) and (ReadC(7)=$41) and (ReadC(9)=$45) or 
                       (ReadC(1)=$B2) and (ReadC(7)=$73) and (ReadC(9)=$68) then 
                       
         begin
            buf:=hstr('45 00 54 E2 FF ');
            WriteD(PlayerId);
            buf:=buf+hstr('23 01 00 ');
            WriteN(StrToFloat(ReadS(11)));
            sendtoclient;
            pck:='';
         end;   
end.

Для выключения делаем прыжок или юзаем любой скилл

Сделал, второй скрипт, который не слетает

//Script by CLAVR
var
 PlayerId:integer;
 st:single;
 control:boolean;
 
Procedure Speed(control:boolean);
      begin
          if FromClient and (ReadC(1)=$45)  then                                
                PlayerId:=ReadD(6); 
          buf:=hstr('45 00 54 E2 FF ');
          WriteD(PlayerId);
          buf:=buf+hstr('23 01 00 ');
          WriteN(st);
          If (control=True) then 
          sendtoclient;
      end;
  
begin          
     if (st<1)  then st:=12
            else
                 begin         
                     if FromClient and (ReadC(1)=$B2) and (ReadC(7)=$41) and (ReadC(9)=$45) or 
                                       (ReadC(1)=$B2) and (ReadC(7)=$73) and (ReadC(9)=$68) then 
                        begin              
                             st:=StrToFloat(ReadS(11));
                             Speed(control);
                             pck:='';               
                        end
                              else Speed(control);
                 end; 
         
     if FromClient and  (pck[1]+ pck[6]=#$C2+#$1A) then  
                     if (control=False) then
                   
                         begin
                             control:=True;
                             buf:=HStr('16 00 54 D5 FF 22 00 00 00 00 00 00 00 21 04 3F 04 38 04 34 04 25 04 30 04 3A 04 3A 00 20 00 ');
                             WriteS('включен');
                             sendtoclient; 
                         end                   
                       else 
                         begin                                           
                             control:=False;
                             buf:=HStr('16 00 54 D5 FF 22 00 00 00 00 00 00 00 21 04 3F 04 38 04 34 04 25 04 30 04 3A 04 3A 00 20 00 ');
                             WriteS('выключен');
                             sendtoclient;                            
                         end;
                   
end.

Команды управления:

сх24,4
 или  -  аналогично предыдущему (по умолчанию выставлена скорость 12)
sh24,4

Нажатие клавиши Ю - переключает по очереди СпидХак/бег/шах

Также выводит в чат сообщение о включение/выключении скрипта

[dreamzy]

Супер, пашет, спс , ты гений

[r15]

1 скрипт слетает (((((

2 скрпт вырубает соски и с ним лагают скилы (((((
Клавр)))) тут еще нуна поработать )))

[c-lavr]

Первый предназначен просто для перемещения. любое действие и он слетит.

Над вторым работаю

[artem2543]

автор просто бомба. Но у меня при использовании первого и второго скриптов также пропала анимация.Все скилы работают и ничего не лагает. Это круто но палево Автору хотел бы поставить спасибо но не могу

[Diaval]

Автор спс всё робит тестил на нью)

[Daren1]

У кого лагает попробуйте сделать релог с включенным скриптом, лично мне помогло.
Автор те спс, хотелось бы скрипт на анимацию)

[Rainallo]

Супер Всё работает автор спс

[Photoshoper]

тоесть скрипт еще работает как ноаниматион тоесть скилы без анимации все работают?

[Slavniy]

Спсибо всё работает!!!

[Kainys]

на прайме не фунциклирует,пх пакеты ловит все дела)ну или я тугой такой

[Hyyujs98]

Все работает проверял сегодня .Большое спасибо.Автор молодец!

[Kainys]

а где проверял?на х5 или 200?

[c-lavr]

Цитата: Сообщение от Kainys на прайме не фунциклирует,пх пакеты ловит все дела)ну или я тугой такой

Выложено 2 скрипта. 2 Не работают? опишите подробнее

[Mystmuse]

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