L2PacketHackФорум программы L2PacketHack, всё что с ней связано находится тут.
Правила раздела!
Категорически запрещено:
* Просить пакеты/скрипты на шмот/адену/другие вещи;
* Просить (помочь) взломать/сломать сервак/аккаунт или раздеть/наказать кого-то на любом серваке;
* Просить научить работать с программой, если не понимаете элементарных вещей в отношениях клиент-сервер (так как, если вы их понимаете, то вопросов по основным возможностям программы быть недолжно);
* Все посты не удовлетворяющие этим запретам, а так же не относящиеся к теме будут удаляться при первой возможности.
* Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы.
* Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.
* Данные запреты неподлежат обсуждению.
//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.
где я ошибся?
Последний раз редактировалось QaK, 30.08.2010 в 18:56.
var
CheckPointList: TList;
Point: array[0..2] of integer;
begin
CheckPointList:=TList.Create;
Point[0]:=111;
CheckPointList.Add(Point);
Point[0]:=222;
CheckPointList.Add(Point);
//
end;
Вопрос: array(CheckPointList[0])[0] равно ли array(CheckPointList[1])[0] ?
то есть по сути: Добавление элемента в список происходит по ссылке или по значению? Другими словами: копируется ли массив при добавлении в список или туда ложится ссылка на него?
Читал мануал - не нашел этого.
м.. поднимался вопрос месяца 2 назад про двумерные и 3-х мерные и т.д. массивы.. но пришли к выводу вроде что нельзя ето на фаст скрипт создать.. но кто то вроде придумал какото муляж 2-у мерного масива.. array of array типа того... но хз чем експеримент закончился.. епомню в какой теме ето обсуждалось.. но помню что синтаксис объявления двумерного массива от дельфи тут некатит..
щас вот подумал.. а может RECORD создать? типа x[1].y[2]= xxxx
__________________
Цитата:
Сообщение от pybukon
прежде чета попросить я немнога раскажу чтоб вы понили как мне плоха
Цитата:
Сообщение от Byrger
А как сделать мой скрипт бесконечным?
Цитата:
Сообщение от XKOR
.. каждый день ионизированной ногой протирает больную)
Цитата:
Сообщение от PsyR
Вылоджите пожалуйста скрипт на рыбалку желательно что бы сам в ВХ клал адаптированый под шоки и так же скрипт на ТТ рец, тоже с диалогами
Последний раз редактировалось VORON, 10.07.2008 в 05:56.
const
UseCP='2F 2C 05 00 00 01 00 00 00 00 '; \\Пакет на использование скила
CP='27 01 00 02 00 04 00 5D 32 10 40 D8 15 00 00 33 01 00 00 05 00 00 00 00 00 00 00 00 00 00 00 00 00 '; \\Пакет на получения банок
RelogReq='46'; \\Запрос релога
CharSel='0D 00 00 00 00'; \\Выбор чара
begin
buf:=hstr(UseCP); \\Посылаем запрос на юзание скила
SendToServer;
end.;
if FromServer and(pck=27010002000400 5D 321040 D8 150000330100000500000000000000000000000000)then \\получаем банки
begin
buf:=hstr(RelogRec); \\посылаем запрос на релог
SendToServer;
end;
if FromServer and(pck=5F 01000000 6F 00 6B 002000 6D 0065007200 6F 00 6E 006700 7E 002000 6B 0068006100680061000000)then \\получаем подтверждение релога
begin
buf:=hstr(CharSel); \\Посылаем выбор чара
SendToServer;
end;
end.
Думаю ошибок в коде оОченнь много после получения цп банок, скрипт начинает постоянно посылать пакеты на юзание скила, вместо того чтобы делать релогин(
Последний раз редактировалось QaK, 18.07.2008 в 14:36.