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

Скриптинг Форум посвещенный созданию скриптов для L2PacketHack

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 09.07.2010, 19:01   #1
Местный
 
Аватар для supernewbie
 
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
supernewbie пока неопределено
По умолчанию массив с пакетами

Можно ли как-то сделать массив в котором будет пакеты?
Пробовал делать стринговый, но не работает.
array of hex тоже не робит
supernewbie вне форума   Ответить с цитированием
Старый 09.07.2010, 19:05   #2
Рыцарь
 
Аватар для alexteam
 
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
alexteam на пути к лучшему
По умолчанию

tstringlist
__________________
L2Ext - project closed.
alexteam вне форума   Ответить с цитированием
Старый 09.07.2010, 19:13   #3
Местный
 
Аватар для supernewbie
 
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
supernewbie пока неопределено
По умолчанию

Код:
var
panelki:array [1..20] of tstringlist;

procedure scanpanelki;
begin
for i:=1 to 20 do
if ConnectName=NamesArray[i] then
begin
pck:=panelki[i];
end;
end;
ругается(

Добавлено через 45 секунд
PSS на строку pck:=panelki[i];

Последний раз редактировалось supernewbie, 09.07.2010 в 19:13. Причина: Добавлено сообщение
supernewbie вне форума   Ответить с цитированием
Старый 09.07.2010, 19:19   #4
Рыцарь
 
Аватар для alexteam
 
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
alexteam на пути к лучшему
По умолчанию

ты реально издеваешься...
http://www.z-oleg.com/secur/avz_doc/...?script_tf.htm

var
panelki: tstringlist;

procedure init;
begin
panelki := tstringlist.create;
panelki.add('пакет к которому можно получить доступ по panelki.strings[0]');
panelki.add('пакет к которому можно получить доступ по panelki.strings[1]');
panelki.add('пакет к которому можно получить доступ по panelki.strings[2]');
.....

end;


и вообще.
panelki:array [1..20] of string;
не работает чтоле ?
__________________
L2Ext - project closed.

Последний раз редактировалось alexteam, 09.07.2010 в 19:32.
alexteam вне форума   Ответить с цитированием
Старый 09.07.2010, 19:37   #5
Местный
 
Аватар для supernewbie
 
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
supernewbie пока неопределено
По умолчанию

Цитата:
Сообщение от alexteam Посмотреть сообщение
ты реально издеваешься...
http://www.z-oleg.com/secur/avz_doc/...?script_tf.htm

var
panelki: tstringlist;

procedure init;
begin
panelki := tstringlist.create;
panelki.add('пакет к которому можно получить доступ по panelki.strings[0]');
panelki.add('пакет к которому можно получить доступ по panelki.strings[1]');
panelki.add('пакет к которому можно получить доступ по panelki.strings[2]');
.....

end;


и вообще.
panelki:array [1..20] of string;
не работает чтоле ?
2ое не работает...

Добавлено через 3 минуты
делаю первое так вообще скрипт не работает)

Добавлено через 30 секунд
попроще то никак нельзя?

Добавлено через 1 минуту
нужно преобразование HexToStr

Последний раз редактировалось supernewbie, 09.07.2010 в 19:37. Причина: Добавлено сообщение
supernewbie вне форума   Ответить с цитированием
Старый 09.07.2010, 20:07   #6
Рыцарь
 
Аватар для alexteam
 
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
alexteam на пути к лучшему
По умолчанию

Цитата:
делаю первое так вообще скрипт не работает)
я очень редко даю код который можно просто втупую копипастить.

нивыдержал. запустил пх.
фастскрипт прекрасно понимает массивы вида.
Цитата:
var
Test : array[0..10] of string;
__________________
L2Ext - project closed.
alexteam вне форума   Ответить с цитированием
Старый 09.07.2010, 20:27   #7
Местный
 
Аватар для supernewbie
 
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
supernewbie пока неопределено
По умолчанию

Цитата:
Сообщение от alexteam Посмотреть сообщение
я очень редко даю код который можно просто втупую копипастить.

нивыдержал. запустил пх.
фастскрипт прекрасно понимает массивы вида.
да уж, вот попробуй туда запихнуть pck и потом его из масива достать и отправить...
supernewbie вне форума   Ответить с цитированием
Старый 09.07.2010, 21:06   #8
Рыцарь
 
Аватар для alexteam
 
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
alexteam на пути к лучшему
По умолчанию

ну, вот тебе. к примеру.
delphi Код:
var   Test : array[0..10] of string;   procedure Init; begin end; procedure Free; begin end; begin   Test[1] := pck; //"вот попробуй туда запихнуть pck" ©   pck := ''; //   buf := test[1]; //"и потом его из масива достать" ©   if fromclient then sendtoclient else sendtoserver; //"и отправить..." © end.
__________________
L2Ext - project closed.
alexteam вне форума   Ответить с цитированием
Старый 09.07.2010, 21:36   #9
Местный
 
Аватар для supernewbie
 
Регистрация: 23.09.2009
Сообщений: 1,232
Сказал Спасибо: 119
Имеет 172 спасибок в 134 сообщенях
supernewbie пока неопределено
По умолчанию

пакет битый приходит...
supernewbie вне форума   Ответить с цитированием
Старый 09.07.2010, 21:44   #10
Рыцарь
 
Аватар для alexteam
 
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
alexteam на пути к лучшему
По умолчанию

скрипт выше прекрасно отрабатывает.
__________________
L2Ext - project closed.
alexteam вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг



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

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


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

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

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