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

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

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 17.03.2009, 17:01   #1
Новичок
 
Регистрация: 19.02.2009
Сообщений: 16
Сказал Спасибо: 3
Имеет 1 спасибку в 1 сообщении
Arhangel пока неопределено
По умолчанию

Да,видимо Timer1.Ontimer надо использовать,но так ругается,а при OnTimer без Timer1 пишет Event handler must be a procedure.
Arhangel вне форума   Ответить с цитированием
Старый 17.03.2009, 17:02   #2
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

Цитата:
Сообщение от Arhangel Посмотреть сообщение
Да,видимо Timer1.Ontimer надо использовать,т.к. при OnTimer без Timer1 пишет Event handler must be a procedure.
Попробуй изменить @OnTimer1 на @OnTimer .. Хотя не уверена
Amorality вне форума   Ответить с цитированием
Старый 17.03.2009, 17:06   #3
Новичок
 
Регистрация: 19.02.2009
Сообщений: 16
Сказал Спасибо: 3
Имеет 1 спасибку в 1 сообщении
Arhangel пока неопределено
По умолчанию

Цитата:
Сообщение от Amorality Посмотреть сообщение
Попробуй изменить @OnTimer1 на @OnTimer .. Хотя не уверена
Да что ты будешь делать=) Всеравно ругается, ";" требует=)

Цитата:
Сообщение от QaK Посмотреть сообщение
Timer1:=TTimer.Create(nil);
Timer1.OnTimer:=@OnTimer1;
Timer1.enabled:=false;
Timer1.interval:=1000; //задержка 1 сек;

жирным выделено то, как должна называтья процедурка.

Можно хоть Scukonax назвать.
Попробывал просто тупо изменить имя:
Код:
Timer1:=TTimer.Create(nil);
Timer1.OnTimer:=@proba;
Timer1.enabled:=false;
Timer1.interval:=1000; //задержка 1 сек;

actions[1]:='43 01 00 00 00';
actions[2]:='39 13 01 00 00 00 00 00 00 00 ';
actions[3]:='39 12 01 00 00 00 00 00 00 00 ';
actions[4]:='39 0F 01 00 00 00 00 00 00 00 ';
actions[5]:='44';
actions[6]:='1F 55 EF 30 48 AF 3D 02 00 75 64 00 00 24 F8 FF FF 00';
end;

procedure proba(Sender:Tobject);
begin if nm>6 then Timer1.Enabled:=false
else begin buf:=Hstr(actions[nm]);
SendToServerEx(BD);
inc(nm);
Ошибки исчезли,но про работе скрипта,когда в игре нажимаешь соц.действ. вылетает ошибка Access violation at address 0056EE30 in module 'l2pbx.exe'. Read of address 00000000.

Последний раз редактировалось Arhangel, 17.03.2009 в 17:12.
Arhangel вне форума   Ответить с цитированием
Старый 17.03.2009, 17:24   #4
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

Arhangel,
buff может опискА? переменная buf называется

Добавлено через 1 минуту
А, это я смотрела на старый вариант.. тут все ок

Добавлено через 4 минуты
Ты в переменную BD ник бд верно занес?

Последний раз редактировалось Amorality, 17.03.2009 в 17:27. Причина: Добавлено сообщение
Amorality вне форума   Ответить с цитированием
Старый 17.03.2009, 17:27   #5
Новичок
 
Регистрация: 19.02.2009
Сообщений: 16
Сказал Спасибо: 3
Имеет 1 спасибку в 1 сообщении
Arhangel пока неопределено
По умолчанию

Цитата:
Сообщение от Amorality Посмотреть сообщение
Arhangel,
buff может опискА? переменная buf называется

Добавлено через 1 минуту
А, это я смотрела на старый вариант.. тут все ок

Добавлено через 4 минуты
Ты в переменную BD ник бд верно занес?

И
12 Код:
begin if nm>6 then Timer1.Enabled:=false
Может лучше begin if nm>=6 then Timer1.Enabled:=false
Ммм,исправил скрипт,что бы пати брал без соц действия,все заработало=) Теперь проблема в том,что из пати выходит слишком быстро и делает только 2 данса=)
Arhangel вне форума   Ответить с цитированием
Старый 17.03.2009, 17:28   #6
Местный
 
Регистрация: 11.10.2007
Сообщений: 144
Сказал Спасибо: 44
Имеет 7 спасибок в 7 сообщенях
Amorality
По умолчанию

Arhangel, Timer1.interval:=1000;

ПОставь не 1000, а 2500..
Amorality вне форума   Ответить с цитированием
За это сообщение Amorality нажился спасибкой от:
Старый 17.03.2009, 17:29   #7
Новичок
 
Регистрация: 19.02.2009
Сообщений: 16
Сказал Спасибо: 3
Имеет 1 спасибку в 1 сообщении
Arhangel пока неопределено
По умолчанию

Цитата:
Сообщение от Amorality Посмотреть сообщение
Arhangel, Timer1.interval:=1000;

ПОставь не 1000, а 2500..
Спасибо,уже сам дошел=)
Все вроде работает,всем спасибо за экстренную помощь=)
Arhangel вне форума   Ответить с цитированием
Ответ

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



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

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


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

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

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