Скрипт для пп и ее,что бы не умиреть от игрока.
1) в name вводите ваш ник
2) в N кол-во СР, если ваше СР будет ниже этого числа, будет использован скилл "Return"
Код
{
Скрипт для пп и ее,что бы не умиреть от игрока.
1) в name вводите ваш ник
2) в N кол-во СР, если ваше СР будет ниже этого числа, будет использован скилл "Return"
}
const
name = 'сюда'; //НИК
N = 1000; //СР
var ATTR,cp:integer;
procedure Init; //Вызывается при включении скрипта
begin
end;
procedure Free; //Вызывается при выключении скрипта
begin
end;
//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin
if fromserver and (pck[1]=#$0E) and (ConnectName=name) then
begin
ATTR:=ReadD(06);
if ATTR = 4 then
begin
CP:=ReadD(30);
IF CP < N THEN BEGIN buf:=hstr('2F 1A 04 00 00 00 00 00 00 00'); SendToServerEX(name);END;
end;
end;
end.