Вернуться   CoderX :: Forums > Lineage II > L2PacketHack
Войти через OpenID

L2PacketHack Форум программы L2PacketHack, всё что с ней связано находится тут.
Правила раздела! Обсуждение багов Lineage ЗАПРЕЩЕНО!

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 13.10.2007, 22:27   #1
Новичок
 
Регистрация: 13.10.2007
Сообщений: 5
Сказал Спасибо: 0
Имеет 0 спасибок в 0 сообщенях
etoManiak
По умолчанию 1 пакетхак - 5 клиентов (запуск скриптов)

Можно ли как-то запускать скрипты сразу в 5 клиентах??

Когда использую 1 клиент - все работает на ура... когда подгружаю ещё 2.... скрипты перестают работать...
т.е. выбираю соединение.. активирую скрипт...выбираю другое соединение... там уже скрипты активированы с прошлого...
при нажатии на тэст Инит скрипт не работает не в одном соединении....

ПакетХак 18, скрипт на сдачу манора с этого форума..

заранее спасибо.

Добавлено спустя 54 минуты 15 секунд:
все клиенты пытаются сдать одни и те же семена... то есть скрипт вычитывает пакет с 1 клиента и посылает его всем...
etoManiak вне форума   Ответить с цитированием
Старый 23.04.2008, 18:03   #2
Новичок
 
Регистрация: 17.04.2008
Сообщений: 18
Сказал Спасибо: 6
Имеет 0 спасибок в 0 сообщенях
Fifty пока неопределено
По умолчанию

const
Name='aIreX';
SendToServerEx('aIreX');
SendToClientEx('aIreX');

Вот у мну норм скрипт все в порядке с синтаксисом а почему то идет 1 пакет на все клиенты,выкиньте скрипт плз что только имея поменял если не трудно)
Fifty вне форума   Ответить с цитированием
Старый 24.04.2008, 19:50   #3
Местный
 
Регистрация: 13.12.2007
Сообщений: 126
Сказал Спасибо: 10
Имеет 39 спасибок в 32 сообщенях
Zergatul
По умолчанию

Вопрос по сабжу : если в через первый запущеный скрипт в списке прошол пакет pck, мы его изменили. Через другие запущеные скрипты он пройдет изменным ?
Zergatul вне форума   Ответить с цитированием
Старый 24.04.2008, 21:58   #4
Admin!
 
Аватар для xkor
 
Регистрация: 04.08.2007
Сообщений: 2,360
Сказал Спасибо: 113
Имеет 1,566 спасибок в 651 сообщенях
xkor на пути к лучшему
По умолчанию

Zergatul, да
__________________
Я здесь практически не появляюсь!, Skype - ikskor
xkor вне форума   Ответить с цитированием
Старый 25.04.2008, 17:50   #5
Новичок
 
Регистрация: 17.04.2008
Сообщений: 18
Сказал Спасибо: 6
Имеет 0 спасибок в 0 сообщенях
Fifty пока неопределено
По умолчанию

xkor,

Посмтрим плз
delphi Код:
//СКРИПТ АВТОМАТИЧЕСКОЙ СДАЧИ МАНОРА //использование: скрипт запускается за несколько минут до объявления об олимпиаде //при получении системного сообщения об ее начале засекается системное время и вычисляется время //сдачи манора, также активируется таймер с интервалом ХХХ МС для контроля системного времени. //после этого пытаемся сдать свои всходы- вручную. при этом мы получим ошибку что- //манор система: выключена в данный момент. но при етом пакет на сдачу манора- скрипт запомнит в //память для дальнейшего использования. через заданное время скрипт отправит 10 раз запомненный //пакет с интервалом 0,3сек. //проверено что: если манор сдастся примерно на 4-й раз (4-й повтор пакета) то остальные 6 повторов //сервер принимает без ошибок, хотя в инвенторе отсутствуют нужные всходы- сервер на это не ругается const Name='aIreX'; <<== Ник перса который здает var PaketManora: string; //Пакет на сдачу манора, который мы отправим серваку зараннее с помощью клиента // и запомним его для того чтобы вручную не формировать его кодом. //важно что оправлять его нужно после после объявления об олимпиаде. //так как в пакете манора используются ИД сессии, которые изменяются //каждый ровный час. timer1: TTimer; //таймер контролирующий системное время StartTime: TDateTime; EndTime: TDateTime; x:integer; procedure Init; //Вызывается при включении скрипта begin timer1:=TTimer.Create(nil); timer1.OnTimer:=@OnTimer; // timer1.enabled:=false; // таймер по умолчанию выключен timer1.interval:=150; // через каждые 0,4сек будем засекать контрольное время сдачи манора x:=0; end; procedure Free; //Вызывается при выключении скрипта begin timer1.Free; //освобождаем занимаемую память таймером end; //вызывается при срабатывании таймера procedure OnTimer(Sender: TObject); begin //если наступило время сдавать манор и скрипт пока еще не отправил 30 попыток его сдать то if (time >= EndTime) and (x<30) then begin //пишем сами себе в чат - что "ПОПЫТКА" buf:=hstr('4A AB F6 A0 48 02 00 00 00 2D 00 3E 00 56 00 4F 00 52 00 4F 00 4E 00 37 00 00 00 3F 04 3E 04 3F 04 4B 04 42 04 3A 04 30 04 20 00 41 04 34 04 30 04 42 04 4C 04 00 00'); SendToClientEx('aIreX'); <<<=== Ник перса который здает отправка клиенту // отправляем пакет на сдачу манора. buf:=PaketManora; SendToServerEx('aIreX'); <=== Отправка серверу //счетчик попыток x:=x+1; end; end; begin //если перехвачен пакет на сдачу манора то if FromClient and (pck[1]=#$D0) and (pck[2]=#$09) and (pck[3]=#$00) then begin //запоминаем его полностью PaketManora:=pck; end; //если получен пакет об начале олимпиады то if FromServer and (pck[1]=#$64) and (pck[2]=#$69) and (pck[3]=#$06) then begin //засекаем текущее время StartTime:=time; //вычисляем время сдачи манора (прибавляем нужное время которое нужно засеч после получения сообщения об илимпиаде) EndTime:=StartTime + EncodeTime(0,5,49,0); // изменяем и корректируем ето число в формате (ЧЧ,ММ,СС,МС) //активируем таймер timer1.enabled:=true; //а ето- отправка сам себе сообщения о том что ВРЕМЯ ПОШЛО buf:=hstr('4A AB F6 A0 48 02 00 00 00 2D 00 3E 00 56 00 4F 00 52 00 4F 00 4E 00 37 00 00 00 32 04 40 04 35 04 3C 04 4F 04 20 00 3F 04 3E 04 48 04 3B 04 3E 04 00 00'); SendToClientEx('aIreX'); <<<== Опять клиенту end; end.


Что не так написано в скрипте?У меня таких 2 скрипта исправленых под 2 персов,здающих разные плоды в разные города в 2 окна.
Но в итоге у меня происходит так что пакет с последней здавшейся поптыкой отправляется на 2 клиента и следовательно они здают одинаковые плоды ну и 1 клиент не здает(

Подскажите что исправить......Зарание балгодарен

Последний раз редактировалось QaK, 01.09.2008 в 10:40.
Fifty вне форума   Ответить с цитированием
Старый 25.04.2008, 17:55   #6
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от Fifty Посмотреть сообщение
Name='aIreX'; <<== Ник перса который здает

...
//пишем сами себе в чат - что "ПОПЫТКА"
...
SendToClientEx('aIreX'); <<<=== Ник перса который здает отправка клиенту
// отправляем пакет на сдачу манора.
buf:=PaketManora;
SendToServerEx('aIreX'); <=== Отправка серверу
...
//а ето- отправка сам себе сообщения о том что ВРЕМЯ ПОШЛО
...
SendToClientEx('aIreX'); <<<== Опять клиенту
Подскажите что исправить......Зарание балгодарен
Вместо SendToClientEx('aIreX'); <<<== Опять клиенту
везде пиши SendToClientEx(Name);
или SendToServerEx(Name);

Последний раз редактировалось NLObP, 25.04.2008 в 18:37. Причина: ошибся
NLObP вне форума   Ответить с цитированием
За это сообщение NLObP нажился спасибкой от:
Старый 25.04.2008, 19:21   #7
Новичок
 
Регистрация: 17.04.2008
Сообщений: 18
Сказал Спасибо: 6
Имеет 0 спасибок в 0 сообщенях
Fifty пока неопределено
По умолчанию

Тоесть вот так.Например:
SendToClientEx('aIreX'); <<<== Опять клиенту
Пишем SendToClientex(aIreX);
SendToServerEx('aIreX'); <=== Отправка серверу
Пишем SendToServerex(aIreX);

Просто 'Галочки' ставить не надо было,правильнО?Но все равно спс жду ответа...
Fifty вне форума   Ответить с цитированием
Старый 25.04.2008, 20:26   #8
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Ты неправильно понял.
в константе NAME задается соединение от которого получаем или которому шлём пакеты. Эта константа в разных скриптах должна быть разная, например:
Scrpt1
Name='first';
Scrpt2
Name='second';

а потом в теле обоих скриптов как
SendToServerEx(Name);
или
SendToClientEx(Name);

то есть универсальная, для Name, которое описывается в начале скрипта.

Последний раз редактировалось NLObP, 26.04.2008 в 01:20.
NLObP вне форума   Ответить с цитированием
Старый 25.04.2008, 20:33   #9
Новичок
 
Регистрация: 17.04.2008
Сообщений: 18
Сказал Спасибо: 6
Имеет 0 спасибок в 0 сообщенях
Fifty пока неопределено
По умолчанию

Цитата:
Сообщение от NLObP Посмотреть сообщение
SendToServerEx(Name);
или
SendToClientEx(Name);
Здесь заменяем Name-На ник перса который здает правильно?

Name='first;
Scrpt2
Name='second;

Здесь все так и оставлять прально?

И галочки ставить тока в начале First или после тоже?а то у тебя написано ток с 1 галкой)
Fifty вне форума   Ответить с цитированием
Старый 26.04.2008, 01:20   #10
Рыцарь
 
Аватар для NLObP
 
Регистрация: 25.02.2008
Адрес: г.Волгоград
Сообщений: 2,009
Сказал Спасибо: 1,285
Имеет 1,458 спасибок в 793 сообщенях
NLObP пока неопределено
По умолчанию

Цитата:
Сообщение от Fifty Посмотреть сообщение
Здесь заменяем Name-На ник перса который здает правильно?

Name='first;
Scrpt2
Name='second;

Здесь все так и оставлять прально?

И галочки ставить тока в начале First или после тоже?а то у тебя написано ток с 1 галкой)
Две галочки конечно, торопился.
Скрипты у тебя будут отличаться только константой Name='имя_чара'
весь остальной текст скрипта один и тот же. Это так называемая централизация кода, чтобы не искать 100 мест, где надо переменную поменять.
NLObP вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack



Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 03:02.

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!