Кружок нубов(Вопрос-Ответ)

[DeVolf]

//QaK:отдельная тема по подкючению пакетхака к серверу >>>>>>>>тут
любые вопросы по данной тематике в этом топе будут удаляться без предупреждения.

const
mp='8A 1B 15 01 10';
hp='8A 1A 15 01 10';
begin
if fromclient and (pck[1]=#$38#$F5#$00#$EF#$00#$00#$00#$03#$00#$00#$00) then
begin
buf:=hstr(hp);
SendToServer;
end;
if fromclient and (pck[2]=#$33#$F5#$00#$EF#$00#$40#$00#$03#$00#$00#$00) then
begin
buf:=hstr(mp);
SendToServer;
end;
end.

где я ошибся?

[Breadfan]

Может непонятно при чем тут БД? Так ведь принцип одинаков, вобщем посмотришь-поймешь

[-=Ma}{imuS=-]

нашел скрипт на авто подачу МР-банок:

const
    Name='';

var MyID:Word;
    OID:String;

begin
if (FromServer) and (pck[1]=#$27) and (ReadD(12)=726) then
OID:=pck[8]+pck[9]+pck[10]+pck[11];

 if FromServer and (pck[1]=#$04) then  MyID:=ReadD(18);
 if FromServer and (pck[1]=#$0e) and (ReadD(2)=MyID) then
  if ReadD(6)=4 then
   if (ReadD(82)<=400) then //400 - кол-во MP при котором начнется пьянка.
    begin
     buf:=#$14+OID+#$00#$00#$00#$00;
     SendToServerEx(Name);
    end;
end.

работает каряво, постоянно пьет МР банки пока не зальет полностю, на "400 - кол-во MP при котором начнется пьянка " даже не смотрит.
кроме того пьет не через каждые 15 сек а постоянно систем чат аж разрывается...

помогите разобратся, надо чтобы пил только при определенном кол-ве МП, предполагаю что ошибка здесь: if (ReadD(82)<=400), возможно вместо 82 другая цифра должна быть и скрипт просто не туда смотрит, но пакет UserInfo настолько большой я не смог найти там CurrentMP, да и вобще не знаю как искать конкретный кусок

и еще как зделать чтобы пил через 15 секунд?

[NLObP]

Сообщение от -=Ma}{imuS=-

возможно вместо 82 другая цифра должна быть и скрипт просто не туда смотрит, но пакет UserInfo настолько большой я не смог найти там CurrentMP, да и вобще не знаю как искать конкретный кусок

Скачай 4 версию пакетхака. Там для своего чара можно посмотреть смещение для MP. Смещение зависит от длины имени, поэтому разное.

PS: в версии 3.3.2 кстати, теперь тоже можно.

[Byrger]

const
r1='2B 7E 75 74 6F 6A 71 32 00 6C 00 61 00 63 00 6B FB 27 75 11 6F 0B 71 04 00 68 00 00 00';
r2='2B 7E 75 74 6F 6A 71 32 00 6C 00 61 00 63 00 6B FB 27 75 11 6F 0B 71 04 00 68 00 00 00';
r3='ляляляля';
r4='ляляляля';
r5='ляляляля';
var
timer1:=TTimer.
x1:integer;

procedure Init; 
begin
timer1:=TTimer.Create(nil);
timer1.OnTimer:=@OnTimer;
timer1.enabled:=false;
timer1.interval:=2000; 
x1:=1;
end;

procedure OnTimer(Sender:TObject);
begin case x1 of
1:begin buf:=HStr(r1);
    SendToServer;
    inc(x1);
end;
2:begin buf:=HStr(r1);
    SendToServer;
    inc(x1);
end;
3:begin buf:=HStr(r1);
    SendToServer;
    inc(x1);
end;
4:begin buf:=HStr(r1);
    SendToServer;
timer1.enabled:=false;
x1:=1;
end;

end;
end;
begin //здесь пишешь какое-нить условие, при котором делаешь Timer1.enabled:=true;

         end.

А как таймек запустить между отправками вот что я не понимаю...примеры я смотрел, но многое мне не понятно...вот и прошу показать на моём скрипте...

QaK: Поправил твой скрипт, а вообще в топе "Да будет бот", туева хонна примерофф, так что нефиг, учи матчасть, как гриццо.

[PanAm]

тут только один момент - если используются несколько окон, то в OnTimer неопределенность куда посылать пакет, надо использовать SendToServerExt и явно указывать соединение

[Byrger]

А как сделать мой скрипт бесконечным?
Ну и остановить скрипт вконце...по условию

[-=Ma}{imuS=-]

Сообщение от NLObP

Скачай 4 версию пакетхака. Там для своего чара можно посмотреть смещение для MP. Смещение зависит от длины имени, поэтому разное.

PS: в версии 3.3.2 кстати, теперь тоже можно.

где можно скачать? в файловом архиве я не нашел, можно ссылочку

[Grinch]

Byrger, http://coderx.ru/showthread.php?t=15 вот тема, и вот небольшая подборка идей и скриптов http://coderx.ru/showthread.php?t=14&page=29 учи матчасть

[NLObP]

Сообщение от -=Ma}{imuS=-

где можно скачать? в файловом архиве я не нашел, можно ссылочку

Здесь кусочек L2PHX4, а здесь модификация 3.2.0

[-=Ma}{imuS=-]

ок, спс.
вот тока я не понимаю как старые скрипты типа "Бот - локомотив", или скрипт на бутылки НР определяют это самое смещение, причем я их включаю на разных персах с разными именами и всегда работает