L2PacketHackФорум программы L2PacketHack, всё что с ней связано находится тут.
Правила раздела!
Категорически запрещено:
* Просить пакеты/скрипты на шмот/адену/другие вещи;
* Просить (помочь) взломать/сломать сервак/аккаунт или раздеть/наказать кого-то на любом серваке;
* Просить научить работать с программой, если не понимаете элементарных вещей в отношениях клиент-сервер (так как, если вы их понимаете, то вопросов по основным возможностям программы быть недолжно);
* Все посты не удовлетворяющие этим запретам, а так же не относящиеся к теме будут удаляться при первой возможности.
* Запрещается создавать темы с просьбой выполнить какую-то работу за автора темы.
* Форум является средством общения и общего поиска решения. Вашу работу за Вас никто выполнять не будет.
* Данные запреты неподлежат обсуждению.
А вот тест в котором paxScript более чем в 2 раза лучше себя показывает чем FastScript
итак код paxScript:
delphi Код:
uses SysUtils,dialogs;
var
i, k, j, u, x, y, z: Integer;
t,r: double;
begin
t := time();
z := 20;
for i := 0to z dofor j := 0to z dofor u := 0to z dofor x := 0to z dofor y := 0to z do
k := k xor i xor j xor u xor x xor y;
r:= (time() - t)*86400000;
showmessage(String(r));
showmessage(String(k));
end.
код FastScript:
delphi Код:
procedure Init; //Вызывается при включении скриптаvar
i, k, j, u, x, y, z: Integer;
t,r: double;
begin
t := time();
z := 20;
for i := 0to z dofor j := 0to z dofor u := 0to z dofor x := 0to z dofor y := 0to z do
k := k xor i xor j xor u xor x xor y;
r:= (time() - t)*86400000;
showmessage(floattostr(r));
showmessage(IntToStr(k));
end;
beginend.
А вот тест ...
paxScript - 1563 мс
FastScript - 3797 мс
Delphi - 15 мс
Может все-таки лучше сделать стандартный интерфейс к dll и писать эту dll на Delphi (или мне больше нравится C++)?
От пакетхака-то ведь по большому счету требуется "пакет" а так же инфа откуда он и чей (пакет).
Незнаю как другие а я использую пакетхак как ингейм-бота и для меня оч. важна скорость выполнения.
P.S. А так же мечтаю о многопоточности
Последний раз редактировалось MHz, 02.06.2008 в 14:19.
Причина: скобку добавил в quote