Кружок нубов(Вопрос-Ответ)

[DeVolf]

//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.

где я ошибся?

[PanAm]

QaK, ИМХО, TTimer фактически создает альтернативный поток (именно по этому для отправки по таймеру SendTo*Ext приходится использовать).

[zorg]

Сообщение от QaK

zorg, убейся, потом юзни поиск, потом снова убейся, это не чит-форум, если тебе хамелеон сказал - его и спрашивай!

мда умом не шлешиш у меня вопрос про пакеты а не читы и проста так люди Ы бижами +15 не раздают всему серверу !

[NLObP]

Сообщение от Sieg

Абсолютно нупский вопрос, ответ на который мне не дает спать:
возможно ли запускать на выполнение альтернативные потоки? И если можно, то как?

Может быть вместо альтернативных потоков устроит параллельное исполнение до 64 скриптов и передача информации между ними?

Пример взаимодействия скриптов:
getvars.txt

function getVar (s: string; i: integer): variant;
const x = 5;
begin
  Result := 'ваш '+ s +' = '+ IntToStr (i * x);
end;

begin end.

myscript.txt

procedure Init;
var res: variant;
begin
   res := CallSF ('getVars', 'getVar', ['SP', 10]);
   sendMSG(res);
end;

begin
end.

[Sieg]

PanAm, Не спорю. И эту особенность я использовал в некоторых своих скриптах, НО. Это крайне неудобно. И, кроме того, хоть сам таймер может и создает альтернативный поток, функция, которую он вызывает в назначенное время, все же выполняется в основном. Проверить просто: тот же delay в вызываемой таймером функции подвешивает весь скрипт.
NLObP, еще не смотрел примеры - чуть позже займусь. Но поделюсь наперед некоторыми мыслями. На сколько я понимаю механизм работы скриптов, основной их минус (для меня) в том, что они выполняются не сами по себе, а запускаются на каждый пришедший пакет. Мне же нужна возможность запустить скрипт на бесконечный цикл, и чтобы при этом он не прерывал работу самой линейки - т.е. не блокировал проходящие пакеты. Если приведенные тобой примеры позволяют это сделать - жди спасибки =)

[QaK]

Sieg, юзай плугины - полный функционал дельфовский.

Добавлено через 16 секунд
ну, или почти полный =)

[Sieg]

QaK, У меня версия пнх 3.3.2, в которой плагинов нету. Более высокие версии не хотят работать с моим клиентом: пишет, что клиент пропатчен, но коннект не появляется и пакеты не видит. Да и я понятия пока что не имею, что есть плагин....
Да, кстати, я же говорил, что не дружу с паскалем. Потому, слова "полный Дельфовский функционал" не намного понятнее китайской грамоты. Вот еслиб это Си был, то вопросов нима.....

[PanAm]

Sieg, в скриптах нет необходимости в бесконечеых циклах, по крайней мере в мой извращеный ум, неприходит ни одна идея где это можно использовать.

[Sieg]

PanAm, Ок, простой пример: одна часть скрипта, которая вызывается для каждого проходящего пакета, занимается сбором информации о состоянии персонажа - ХП, МП, ЦП, персонажи вокруг, баффы и т.д. Сама она не посылает пакеты, разве что изменяет некоторые - не более того. Вторая часть - уже на основе данных полученных первой частью, совершает активные действия: пьет бутылки, бегает за ведущим, атакует, спойлит - всё то, что должен делать человек руками. Вот вторая часть - это и есть тот самый бесконечный цикл. И он не должен мешать первой части. Реализовав это, считай и бот готов. Дальше - лишь вопрос терпения, кто и каким функционалом наполнит эту модель.

[QaK]

Sieg, бот, рализованый на скриптах, будет очень сильно тупить, уже пробовали ...

[Sieg]

Я никого и не прошу бота для меня писать. Всего лишь ищу способы решения поставленной задачи. Если они вообще есть.