да и вообще охота посмотреть на ваше детищеdmitrykit wrote:kakto tiho na forume.. novyh predlozhenij net.. da i vobwe narod kudato podevalsja..
Injection + Perl
Moderators: Murderator+, Murderator
Если уж серьезно делаете, добавьте в него интерфейс для доп библиотек. то есть где-то, либо в самом модуле, либо в ини-файле чтобы можно было прописать доп длл-ки, модуль при запуске опрашивал библиотеки, брал их таблицы функций, а при встрече в скрипте вызова этих функций передавал в соответствующую функцию параметры и принимал возвращаемое значение...
vsem zhelajuschim isprobyvat':
kachat' nizhe...
sintaksis:
sub firstsub{
&uo("findtype", "-1", "-1", "ground");
while (&uo("findcount")>0) {
&uo("info","finditem");
&uo("ignore","finditem");
&uo("findtype", "-1", "-1", "ground");
}
&uo("ignorereset");
}
katchat' otsjuda:
http://crap.sylix.org/script.dll
dlja raboty trebujet perl58.dll
sintaksis:
sub firstsub{
&uo("findtype", "-1", "-1", "ground");
while (&uo("findcount")>0) {
&uo("info","finditem");
&uo("ignore","finditem");
&uo("findtype", "-1", "-1", "ground");
}
&uo("ignorereset");
}
katchat' otsjuda:
http://crap.sylix.org/script.dll
dlja raboty trebujet perl58.dll
Last edited by dmitrykit on 2006-04-04 21:41:00, edited 1 time in total.
Code: Select all
sub firstsub{
&uo("findtype", -1, -1, "ground");
while (&uo("findcount")>0) {
&uo("info","finditem");
&uo("ignore","finditem");
&uo("findtype", -1, -1, "ground");
}
&uo("ignorereset");
}и запускаем.
Также можно заметить что
&uo("findtype"," -1 -1 ground");
равносильно
&uo("findtype", -1, -1, "ground");
Ничего на том сайте не понялGrin wrote: тут
-
DerMeister =)
- Expert!
- Posts: 1032
- Joined: 2006-02-25 21:48:38
Уже заждался, щас поставлю и буду тестить...

Тока один вопрос, как раз по скорости работы: смогу ли я выполнить 1000000 простых сравнений за 100мс ?
типа:
Тока один вопрос, как раз по скорости работы: смогу ли я выполнить 1000000 простых сравнений за 100мс ?
типа:
Code: Select all
if a==b then{
}Господа, немогу выразить мое восхишение новым скриптовым модулем, тк как сие чудо у меня незаработало!
Поставил перл билда ActivePerl-5.8.8.817-MSWin32-x86-257965
скопировал и заменил skript.dll запускаю инжект и вылетает сообшение
"не удается найти компонент"
................. ptl60.bpl не был найден.
..... ля ля ля................................
Раскажите в чем изЮминка или оРешенка?
Поставил перл билда ActivePerl-5.8.8.817-MSWin32-x86-257965
скопировал и заменил skript.dll запускаю инжект и вылетает сообшение
"не удается найти компонент"
................. ptl60.bpl не был найден.
..... ля ля ля................................
Раскажите в чем изЮминка или оРешенка?