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

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

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

скрипт на коленке писался.. самим тяжело догадаться что надо ?
case readd(10) of
__________________
L2Ext - project closed.
alexteam вне форума   Ответить с цитированием
За это сообщение alexteam нажился 2 спасибками от:
Старый 11.02.2010, 18:53   #632
Новичок
 
Регистрация: 23.01.2010
Сообщений: 7
Сказал Спасибо: 3
Имеет 0 спасибок в 0 сообщенях
xeno пока неопределено
По умолчанию

Цитата:
Сообщение от alexteam Посмотреть сообщение
скрипт на коленке писался.. самим тяжело догадаться что надо ?
case readd(10) of
и правда, так гораздо лучше.
xeno вне форума   Ответить с цитированием
Старый 10.04.2010, 19:23   #633
Новичок
 
Регистрация: 10.04.2010
Сообщений: 2
Сказал Спасибо: 4
Имеет 0 спасибок в 0 сообщенях
Михаил111 пока неопределено
По умолчанию

Люди добрые! Никак не могу найти скрипт на авто-рыбалку для л2пх 3.5.33.164... Пробовал изданные раньше скрипты, не работают. Помогите пожалуйста!
Михаил111 вне форума   Ответить с цитированием
Старый 10.04.2010, 19:29   #634
Рыцарь
 
Аватар для QaK
 
Регистрация: 28.09.2007
Сообщений: 1,558
Сказал Спасибо: 71
Имеет 351 спасибок в 244 сообщенях
QaK пока неопределено
По умолчанию

Михаил111, учиться, учиться, и еще раз учиться. Бери скрипты, какие есть - правь сам под свой сервак.
QaK вне форума   Ответить с цитированием
За это сообщение QaK нажился спасибкой от:
Старый 10.04.2010, 19:37   #635
Новичок
 
Регистрация: 10.04.2010
Сообщений: 2
Сказал Спасибо: 4
Имеет 0 спасибок в 0 сообщенях
Михаил111 пока неопределено
По умолчанию

Не умею, пардоньте... Может подскажете как? У нас на сервере есть Рыболов-Бот, но покупать его за бешенные цены... серв l2rx.com

Добавлено через 4 минуты
Ах да, еще нашел тему со скриптами на рыбалку, но вот незадача - немогу скачать, пишет:
Warning: copy(./downloads///ec_tmp/fishing_by_NLObP.zip) [function.copy]: failed to open stream: Permission denied in /downloads.php on line 700
ERROR: File not found.

Последний раз редактировалось Михаил111, 10.04.2010 в 19:37. Причина: Добавлено сообщение
Михаил111 вне форума   Ответить с цитированием
Старый 10.04.2010, 19:41   #636
Рыцарь
 
Аватар для QaK
 
Регистрация: 28.09.2007
Сообщений: 1,558
Сказал Спасибо: 71
Имеет 351 спасибок в 244 сообщенях
QaK пока неопределено
По умолчанию

Михаил111, посмотри тему "Скриптинг" и "Жесткий скриптинг"
QaK вне форума   Ответить с цитированием
За это сообщение QaK нажился спасибкой от:
Старый 02.06.2010, 13:18   #637
Новичок
 
Регистрация: 03.03.2009
Сообщений: 5
Сказал Спасибо: 4
Имеет 0 спасибок в 0 сообщенях
KaBuKi пока неопределено
По умолчанию

Нужна помощь в изменении скрипта помошник в PvP и PK. Попытался сделать пакеты на использование банок константами, но при старте скрипта ничего не происходит.
Код:
//by mks
//помошник в PvP и PK.
//пьет CP и HP пробирки в нужное время(можно добавить и MP для пвп серваков), и освобождает вас от небоходимости зажатия клавиши Ctrl, которая так меня раздражает!(думаю это раздражает и не только меня)
///////////////////////////////////////////////////////
///////////////Master PvP by MKS v.1.0/////////////////
///////////////////////////////////////////////////////

//после активации скрипта необходимо выпить сначала банку CP, потом HP для получения их ID
const
   Name='kabUki';  //ник перса
   PckUseCP='14 75 DC 4C 40 00 00 00 00';
   PckUseHP='14 68 E6 4C 40 00 00 00 00';
var
   CurHP,MaxHP,CurCP,MaxCP: integer;
   CPuse,HPuse: string;

   TimerCP,TimerHP: TTimer;

procedure Init; //Вызывается при включении скрипта
begin


  TimerCP:=TTimer.Create(nil);
  TimerCP.OnTimer:=@OnTimerCP;
  TimerCP.enabled:=false;
  TimerCP.interval:=1000;  //интервал 1сек, т.к. чаще пить CP всеравно не будет, дабы не засорять трафик

  TimerHP:=TTimer.Create(nil);
  TimerHP.OnTimer:=@OnTimerHP;
  TimerHP.enabled:=false;
  TimerHP.interval:=15000; //интервал 15сек, т.к. действие одной бутылки = 15сек
end;

procedure OnTimerCP(Sender: TObject);
begin
  buf:=HStr(PckUseCP);
  SendToServerEx(Name);
end;
procedure OnTimerHP(Sender: TObject);
begin
  buf:=HStr(PckUseHP);
  SendToServerEx(Name);
end;

procedure Free; //Вызывается при выключении скрипта
begin
  TimerCP.free;
  TimerHP.free;
  HPuse:='';
  CPuse:='';
end;

//основная часть скрипта
//вызывается при приходе каждого пакета если скрипт включен
begin

//пьем сначала CP, потом HP банку что б запомнить их ID(я решил взять эти пакеты целиком, дабы не усложнять)
//  if FromClient and (ConnectName=Name) and (pck[1]=#$14) and (CPuse='') then CPuse:=pck;
//  if FromClient and (ConnectName=Name) and (pck[1]=#$14) and (CPuse<>pck) and (HPuse='') then HPuse:=pck;


//считываем текущие и максимальные значения CP и HP
if FromServer and (pck[1]+pck[6]=#$0E#$04) then
  begin
    CurHP:=ReadD(14);
    MaxHP:=ReadD(22);
    CurCP:=ReadD(30);
    MaxCP:=ReadD(38);
  end;

//если вы используете не грэйтер CP то вместо 200 подставьте кол-во CP сколько восстанавливает 1 банка
//if (CurCP<MaxCP-200) and (CPuse<>'') then TimerCP.enabled:=true else TimerCP.enabled:=false;
//if (CurHP<MaxHP) and (HPuse<>'') then TimerHP.enabled:=true else TimerHP.enabled:=false;
if (CurCP<MaxCP-200) then TimerCP.enabled:=true else TimerCP.enabled:=false;
if (CurHP<MaxHP) then TimerHP.enabled:=true else TimerHP.enabled:=false;

//если используем скилы или заклинания добавляем флаг Ctrl, что б не надо было удерживать контрол
if FromClient and (ConnectName=Name) and (pck[1]=#$2F) then pck[6]:=#$01;

//если наводим таргет, повторное нажатие по нему подменивается на атаку, опять же что б не удерживать контрол
//if FromClient and (ConnectName=Name) and (pck[1]=#$04) then pck[1]:=#$0A;

end.
KaBuKi вне форума   Ответить с цитированием
Старый 05.06.2010, 21:12   #638
Рыцарь
 
Аватар для QaK
 
Регистрация: 28.09.2007
Сообщений: 1,558
Сказал Спасибо: 71
Имеет 351 спасибок в 244 сообщенях
QaK пока неопределено
По умолчанию

KaBuKi, недостаточно информации, давай более развернуто, что как делаешь, в какой последовательности, версия пакетхака/хроники сервера и все такое прочее
QaK вне форума   Ответить с цитированием
Старый 07.06.2010, 10:57   #639
Новичок
 
Регистрация: 03.03.2009
Сообщений: 5
Сказал Спасибо: 4
Имеет 0 спасибок в 0 сообщенях
KaBuKi пока неопределено
По умолчанию

Использую l2phx.3.4.1.83, версия протокола 660. Собственно изначальный скрипт работает отлично, но мне не нравится там необходимость при старте скрипта выпивать банки СР и НР, для того чтобы сохранились пакеты использования банок. Соответственно эти пакеты я через "просмотр" перехватил, задал константы на эти пакеты, некоторые условия убрал (CPuse<>'', HPuse<>'') в оригинальном скрипте убрал. Впринципе, можно удалить переменные CPuse и HPuse. Как я понял при приходе пакета StatusUpdate из него извлекаются текущие и максимальные значения СР и НР, если выполняются неравенства, то запускается таймер и начинают отсылаться пакеты на использование банок, но почему-то они не используются. Части скрипта которые я изменил - закомментил, так что различия между моим скриптом и оригиналом видны сразу. При старте скрипта и изменении НР и СР ничего не происходит.

Последний раз редактировалось KaBuKi, 07.06.2010 в 11:21.
KaBuKi вне форума   Ответить с цитированием
Старый 07.06.2010, 12:29   #640
Местный
 
Аватар для Sherman
 
Регистрация: 24.04.2008
Сообщений: 364
Сказал Спасибо: 15
Имеет 116 спасибок в 83 сообщенях
Sherman пока неопределено
По умолчанию

Пакет RequestUseItem по определению константным быть не может, т.к. содержит в себе ObjID - идентификатор объекта в инвентаре, который в свою очередь может меняться. При грамотном подходе к реализации подобного скрипта, следует отслеживать инвентарь, анализировать его содержимое, но не как не константами забивать пакеты.
Sherman вне форума   Ответить с цитированием
Ответ

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



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

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


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

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

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