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

[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.

где я ошибся?

[karne]

да вначале гружу пх потом клиент

[S1ON]

Мне никто помоч не может?

[NLObP]

Последовательность работы с пакетхаком:
1. скачиваем дистрибутив здесь или здесь.
2. настраиваем для работы с сервером (читаем факи и темы по настройке).
3. пакетхак должен быть запущен первым.
4. затем запускаем клиент и заходим чаром.
5. в пакетхаке должно быть видно, что зашли конкретным чаром (имя соединения - имя чара или в последних версиях имя закладки с именем чара) видно список принятых/отосланных пакетов и правильная их расшифровка.
6. только теперь можно пробовать работать со скриптами/пакетами.

7. Иначе, если имя соединения - пусто/не имя чара(набор букв), то либо косяк в настройках пакетхака либо защита сервера от пакетхака. Первое правим, второе в поиск и орбучаемся самостоятельно искать решения (доступного на форуме скорее всего нет и без вашего участия не появится).

PS: сначало прочитайте весь форум и не только этот про настройку, работу программы, пакеты, скрипты и т.д и т.п., а потом задавайте конкретные вопросы.

[konst666]

со строчкай выбора квеста все ни как врубитца не могу как написать ему =(
Написано [Delivery of Special licuor]
пишу DLGSEL([Delivery of Special licuor])
опять же написано [Delivery of special liquor (в процессе)]
опять же пишу DLGSEL([Delivery of special liquor (в процессе)])
Визде где есть ети еб... квадратные скобки он не может выбрать квест, шок 3х10. если нада, могу еще скринчики дать..
МБ комунибуть ето под силу..

Пробовал писать скрипт на этот квет на ЭКСТРИМЕ 1х100. Вот кусок скрипта на взятие квеста:

NPCSEL(Jeremy[ID=31521])
NPCDLG(Jeremy[ID=31521])
DELAY(3000)
DLGSEL(Квест)
DELAY(3000)
DLGSEL( [Delivery of special liquor])
DELAY(4000)
DLGSEL(I'll deliver your liquor.)
DELAY(3000)

Перед первой квадратной скобкой пробел, и слово liquor пишется через q. Слово Квест по-русски. По этому скрипту квест у меня берется.
Далее с завершением квеста были проблемы. После перебора различных вариантов подошла такая строка:

NPCSEL(Jeremy[ID=31521])
NPCDLG(Jeremy[ID=31521])
DELAY(2000)
DLGSEL(Квест)
DELAY(3000)
DLGSEL( [Delivery of special liquor)
DELAY(3000)
DLGSEL("I completed the delivery.")

Перед первой квадратной скобкой опять пробел, но второй квадратной скобки и надписи (в процессе) нет . Почему так - не знаю, но квест завершается. После Jeremy надо тп в Годдард и идти в ВХ для получения награды.

ЗЫ. Возможно понадобится фикс диалоговых окон для бота. У меня стоят 3 фикса: мульти фикс, фикс на соски и фикс на диалоговые окна. Все в архиве.

[Imperial2008]

const
   nik1='Империал';          //Чар Империал   
   nik2='Lolita';          //Чар Lolita  

  begin
if fromclient and (pck=#$56#$18#$00#$00#$00#$00#$00#$00#$00#$00) then 
begin
     buf:=hstr('1F 84 CF 06 10 59 AE 00 00 B6 D4 00 00 47 F2 FF FF 00');
     buf:=hstr('01 84 CF 06 10 59 AE 00 00 B6 D4 00 00 47 F2 FF FF 00');
     SendToServerEx(nik1);
end;
     
 if FromClient then
begin
     buf:=hstr('01 73 70 02 10 6B AE 00 00 BF D4 00 00 48 F2 FF FF 00');
     buf:=hstr('39 F8 03 00 00 00 00 00 00 00');
     SendToServerEx(nik2);    
     end;
end.

Суть такая: нужно чтобы первый чар бил второго (выполняет), а второй чар в ответ ударит его (а поскольку первый 1 левела - его второй кильнет), потом реснит...но второе действие (кильнет-реснит) не выполняется((( В чем моя ошибка?

[TAMBIK]

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

const
   nik1='Империал';          //Чар Империал   
   nik2='Lolita';          //Чар Lolita  

  begin
if fromclient and (pck=#$56#$18#$00#$00#$00#$00#$00#$00#$00#$00) then 
begin
     buf:=hstr('1F 84 CF 06 10 59 AE 00 00 B6 D4 00 00 47 F2 FF FF 00');
     buf:=hstr('01 84 CF 06 10 59 AE 00 00 B6 D4 00 00 47 F2 FF FF 00');
     SendToServerEx(nik1);
end;
     
 if FromClient нехватает then//при поллучение ЧЕГО будет выполняться дальнейшее
begin
     buf:=hstr('01 73 70 02 10 6B AE 00 00 BF D4 00 00 48 F2 FF FF 00');
     buf:=hstr('39 F8 03 00 00 00 00 00 00 00');
     SendToServerEx(nik2);    
     end;
end.

Суть такая: нужно чтобы первый чар бил второго (выполняет), а второй чар в ответ ударит его (а поскольку первый 1 левела - его второй кильнет), потом реснит...но второе действие (кильнет-реснит) не выполняется((( В чем моя ошибка?

как

[Imperial2008]

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

как

Пробовал вставить туда приход от клиента пакета, но к сожалению тоже ничего....подскажите какое-то решение)

[TAMBIK]

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

Пробовал вставить туда приход от клиента пакета, но к сожалению тоже ничего....подскажите какое-то решение)

http://coderx.ru/showthread.php?t=14 ПОЧИТАЙ

[Imperial2008]

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

http://coderx.ru/showthread.php?t=14 ПОЧИТАЙ

Почитал...вот что вішло:

        begin
    if FromClient and (ConnectName='Империал')and (pck=#$56#$18#$00#$00#$00#$00#$00#$00#$00#$00) then begin
    buf:=hstr('1F 84 CF 06 10 B0 42 01 00 89 95 00 00 C8 F9 FF FF 00');
    buf:=hstr('01 84 CF 06 10 B0 42 01 00 89 95 00 00 C8 F9 FF FF 00'); 
    SendToServerEx('Империал');
    end;     
    
        if FromServer and (ConnectName='Lolita')and (pck=#$33#$73#$70#$02#$10#$84#$CF#$06#$10#$00#$00#$00#$00#$80#$00#$43#$01#$00#$C2#$95#$00#$00#$C8#$F9#$FF#$FF#$00#$00#$DD#$42#$01#$00#$A4#$95#$00#$00#$C8#$F9#$FF#$FF) then begin
    buf:=hstr('1F 73 70 02 10 F1 42 01 00 A7 95 00 00 C8 F9 FF FF 00');
    buf:=hstr('01 73 70 02 10 F1 42 01 00 A7 95 00 00 C8 F9 FF FF 00');   
    SendToServerEx('Lolita');
    end;     
    
        if FromServer and (ConnectName='Империал')and (pck=#$00#$73#$70#$02#$10#$01#$00#$00#$00#$00#$00#$00#$00#$01#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00#$00) then begin
    buf:=hstr('7D 02 00 00 00');
    buf:=hstr('3A');      
    buf:=hstr('0F D2 42 01 00 3A 96 00 00 AD F9 FF FF D4 42 01 00 A9 96 00 00 C8 F9 FF FF 01 00 00 00'); 
    SendToServerEx('Империал');
    end;


end.

НО ВСЕ РАВНО НИЧЕГО НЕ РАБОТАЕТ

[Yegor]

Imperial2008,

Что значит присваивание 3 раза подряд в массив буф разных значений а потом отправка только последнего?

buf:=hstr('7D 02 00 00 00');
buf:=hstr('3A');
buf:=hstr('0F D2 42 01 00 3A 96 00 00 AD F9 FF FF D4 42 01 00 A9 96 00 00 C8 F9 FF FF 01 00 00 00');
SendToServerEx('Империал');