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

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

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
 
 
Опции темы Опции просмотра
Старый 04.09.2009, 20:43   #6
Рыцарь
 
Аватар для alexteam
 
Регистрация: 07.03.2009
Сообщений: 9,139
Сказал Спасибо: 70
Имеет 2,820 спасибок в 1,735 сообщенях
alexteam на пути к лучшему
По умолчанию

plugin_demo4 не в помощь ?

Добавлено через 7 минут
кстати... гдето я кидал 2 процедурки сторящие и удаляющие элементы в массиве со смещением...

Добавлено через 8 минут
во. нашел.
http://coderx.ru/showpost.php?p=35707&postcount=787
добавить еще такую функцию
delphi Код:
Function ObjIdInArray(value:integer):integer; var  i:integer; begin   result := 0;   while (i < itemcount) and (itemarray[result] <> value) do inc(result); end;

Существует ли значение в массиве (value = ObjId прочитаный с пакета. index : integer; )

delphi Код:
index := ObjIdInArray(value); //лучше поуступать так. избегая повторного запуска цикла. If index < itemcount then   //значение существует. его к примеру можно удалить вот так   GetItemIdAndMove(index) //индекс мы получили выше else   //значение не существует, добавляем   additemtoarray(value)
ну и в этом духе

Добавлено через 1 минуту
проверка на превышение -
if itemcount >= 255 then ....
__________________
L2Ext - project closed.

Последний раз редактировалось alexteam, 04.09.2009 в 20:43. Причина: Добавлено сообщение
alexteam вне форума   Ответить с цитированием
За это сообщение alexteam нажился спасибкой от:
 

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


Опции темы
Опции просмотра

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

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


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

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

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