Супер , отлично работает.. А что там еще кроме NetPing'a нужно посылать? можешь сказать? Просто боюсь чара забанят , жалко бд ..
Добавлено через 1 минуту
А вот еще вопрос , можно ли сделать так , чтобы от ника Amorality этот выгруженный клиент сразу принимал пати . а при команде в пати чат '-dance' танцевал 2 дансА?
Последний раз редактировалось Amorality, 30.07.2008 в 01:39.
Причина: Добавлено сообщение
Супер , отлично работает.. А что там еще кроме NetPing'a нужно посылать? можешь сказать? Просто боюсь чара забанят , жалко бд ..
Если стоять, то вроде кроме NetPing'а ничего не надо, но это не 100%. В панели просмотр можно выяснить, что шлет клиент.
Цитата:
Сообщение от Amorality
А вот еще вопрос , можно ли сделать так , чтобы от ника Amorality этот выгруженный клиент сразу принимал пати . а при команде в пати чат '-dance' танцевал 2 дансА?
Если я зык Паскаль знаешь, то всё можно сделать. Посмотри форум. По изучай скрипты. Много готовых решений можно позаимствовать.
А вот еще вопрос , можно ли сделать так , чтобы от ника Amorality этот выгруженный клиент сразу принимал пати
Примерно так
delphi Код:
beginif FromServer and(pck[1]=#$39)then//от сервера получен пакет $39 AskJoinPartyif ReadS(2) = 'Amorality'begin//проверяем от кого
pck :=''; //убиваем этот пакет
buf:=hstr('2A 01 00 00 00'); //Создаем пакет "принять пати"
SendToServer; //Отправляем его на серверend;
end.
Добавлено через 13 минут
ой, нет
В вашем случае, когда клиент уже выгружен, надо так
delphi Код:
beginif FromServer and(pck[1]=#$39)thenbegin//от сервера получен пакет $39 AskJoinPartyif ReadS(2) = 'Amorality'then//проверяем от кого
buf:=hstr('2A 01 00 00 00'); //Создаем пакет "принять пати"else
buf:=hstr('2A 00 00 00 00'); //Создаем пакет "Отказать в пати"
pck :=''; //убиваем этот пакет
SendToServer; //Отправляем его на серверend;
end.
и кстати, тоже надо сделать с приемом трейда, и другими действиями, на которые клиент сам отвечает через определенный промежуток времени. Ибо консперация.
Последний раз редактировалось PanAm, 30.07.2008 в 05:00.
Причина: Добавлено сообщение
PanAm,
Спасибо .. Только лучше наверно сделать так , чтобы БД никак не отвечал на запросы от других ников , а то слишком заметно , что бот .. Просто нужно убрать Else и строчку под ним? А хотя нет , клиент же выгружен , а можно поставить в Else так , чтобы через несколько секунд отвечал НЕТ , как клиент?
Добавлено через 28 минут
Вроде же так получается:
begin
if FromServer and (pck[1]=#$39) then begin //от сервера получен пакет $39 AskJoinParty
if ReadS(2) = 'Amorality' //проверяем от кого
buf:=hstr('2A 01 00 00 00'); //Создаем пакет "принять пати"
else
delay(5000)
buf:=hstr('2A 00 00 00 00'); //Создаем пакет "Отказать в пати"
pck :=''; //убиваем этот пакет
SendToServer; //Отправляем его на сервер
end;
end.
----
Это ведь будет задержка 5 секунд? Кто кстати знает сколько точно ждет клиент перед тем как ответить нет?
Последний раз редактировалось Amorality, 30.07.2008 в 04:58.
Причина: Добавлено сообщение
Amorality, посмотри, есть еще пакет ValidatePosition от клиента, поделай все действия, которые хочешь реализовать в боте и посмотри, когда шлется этот пакет, хотя не критично, но по логам мона спалиться.