//Script by Usilok
var
PlayerId:integer;
st:single;
control:boolean;
procedure Init; //Вызывается при включении скрипта
begin
st:=12;
end;
begin
if FromServer and (control=True) and (ReadC(1)=$34) then
begin
PlayerId:=ReadD(6);
buf:=HStr('34 00 44 CB FF ');
WriteD(PlayerId);
buf:=buf+pck[10]+pck[11]+pck[12];
WriteN(st);
sendtoclient;
pck:='';
end;
if FromClient and (ReadC(1)=$A9) and ((pck[7]+pck[9]+pck[11]+pck[13]=#$2E#$73#$70#$64) or (pck[7]+pck[9]+pck[11]+pck[13]=#$2E#$41#$3F#$34))then
begin
st:=StrToFloat(ReadS(15));
buf:=HStr('09 00 44 F6 FF 07 00 01 00 00 00 21 04 25 04 00 00 ');
WriteS(FloatToStr(st));
sendtoclient;
pck:='';
end;
if FromClient and (pck[1]+ pck[6]=#$F9+#$1A) then
begin
if (control=False) then
begin
control:=True;
buf:=HStr('09 00 44 F6 FF 07 00 01 00 00 00 21 04 25 04 00 00 ');
WriteS('включен');
end
else
begin
control:=False;
buf:=HStr('09 00 44 F6 FF 07 00 01 00 00 00 21 04 25 04 00 00 ');
WriteS('выключен');
end;
sendtoclient;
pck:='';
end;
end.
Активация - клавиша "Ю",
Установка скорости - команда в чат ".spd#" или ".спд#",
где # - требуемая скорость, будь это 10, 12.5, или хоть 1000!
А при использовании назад не откидывает? А то пыталась сделать СХ на финале, но либо клиент закрывется либо назад откидывает и тоже клиент закрывается после полмнуты бега быстрого.
А при использовании назад не откидывает? А то пыталась сделать СХ на финале, но либо клиент закрывется либо назад откидывает и тоже клиент закрывается после полмнуты бега быстрого.
на рулезе не откидывает назад...но с анимацией скиллов проблемы бывают( пока что впадлу искать причину, потом может сделаю)
а если на финале откидывает назад - знач фикс СХ!