AutoCP

[FataLis]

Здравствуйте ув.мастера своего дела)
Хотел попросить вас об одной услуги.
Мне нужно немного переделать скрипт на АВТО ЦП,Чтоб он пил еще и квики так чтобы до фулл хп,а то он пьёт квики всегда,даже если фулл хп,всеравно пьет,а цп работает норм.
И еще в этом скоиптике,хотелось бы чтобы убрали АвтоКТР,к ГК хрен подойдеш,постоянно окном щелкать надоедает.Заранее блгодарю.

667

Я ненашёл похожей темки,если она есть сорри за новую

[TAMBIK]

удали
function StrToHex(packet: string):string;
var
i:integer;
tmp:byte;
function ByteToHex(b: byte): Char;
begin
if b<10 then result:=chr(b+$30)
else result:=chr(b+$37);
end;
begin
result:='';
for i:=1 to length(packet) do begin
tmp:=ord(packet[i]) div 16;
result:=result+ByteToHex(tmp);
tmp:=ord(packet[i]) - tmp*16;
result:=result+ByteToHex(tmp)+' ';
end;
end;

[xkor]

Переезжаем в скриптинг...

[FataLis]

Спасибо за ответ
//nlobp: в другой раз жми кнопку "спасибо". Не надо лишних сообщений.