Регистрация Главная Пользователи Все разделы прочитаны
Сообщения за день Справка Регистрация

Помогите со скриптом

-

Боты, скрипты и прочий софт для Lineage 2

- Весь софт по Lineage 2 и все, что связано с ботоводством, скриптописанием и брутом - в этом разделе

Ответ
 
Опции темы
Старый 21.11.2009, 20:54   #1
 Разведчик
Аватар для Lafisarrr
 
Lafisarrr неизвестен в этих краяхLafisarrr неизвестен в этих краях
Регистрация: 01.11.2009
Сообщений: 36
Популярность: -189
Сказал(а) спасибо: 10
Поблагодарили 22 раз(а) в 8 сообщениях
 
По умолчанию Помогите со скриптом

можете ктонить выложить скрипт на заточку для хелбонда а то чот найти немогу другие скрипты чот непашут
________________
Помог? тыкай спасибо КТО знает баги или дюы шок ворлда отпишите в личку
  Ответить с цитированием
Старый 21.11.2009, 20:56   #2
 Пехотинец
Аватар для pareHbry6axa
 
pareHbry6axa на правильном путиpareHbry6axa на правильном пути
Регистрация: 06.11.2009
Сообщений: 63
Популярность: 129
Сказал(а) спасибо: 101
Поблагодарили 113 раз(а) в 47 сообщениях
 
По умолчанию Re: Помогите со скриптом

Цитата:
Сообщение от LafisarrrПосмотреть сообщение
можете ктонить выложить скрипт на заточку для хелбонда а то чот найти немогу другие скрипты чот непашут

Код:
const
   nik='pixel';
   Enchant=13;

var
   UseItem, EnchantItem: string;
   Count, CurrentEnch: integer;
   Timer01: TTimer;

procedure Init;
begin
   Timer01:=TTimer.Create(nil);
   Timer01.OnTimer:=@OnTimer01;
   Timer01.enabled:=false;
   Timer01.interval:=800;
end;

procedure OnTimer01(Sender: TObject);
begin
   buf:=UseItem;
   SendToServerEx(nik);
   buf:=EnchantItem;
   SendToServerEx(nik);
   if CurrentEnch=Enchant-1 then Timer01.enabled:=false;
end;

procedure Free;
begin
  Timer01.free;
  count:=0;
  CurrentEnch:=0;
end;

begin
    if FromServer and (pck[1]=#$87) then CurrentEnch:=ReadD(2);
    if FromClient and (pck[1]=#$19) then UseItem:=pck;
    if FromClient and (pck[1]=#$5F) then EnchantItem:=pck;
    if FromClient and (pck=#$34#$02#$00#$00#$00) then
       begin
          pck:='';
          Timer01.enabled:=not(Timer01.enabled);
       end;
end.
  Ответить с цитированием
Пользователь сказал cпасибо:
Lafisarrr (21.11.2009)
Ответ

Опции темы

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

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

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Проблема со скриптом Lafisarrr Боты, скрипты и прочий софт для Lineage 2 7 21.11.2009 22:06
[Информация] Помогите со скриптом ikari Общение и обсуждение, архив Lineage 2 4 18.10.2009 20:51
кто поможет с скриптом lokerdog58 Боты, скрипты и прочий софт для Lineage 2 10 28.08.2009 13:20
Народ, помогите пожалуйста со скриптом! JonnyKord Боты, скрипты и прочий софт для Lineage 2 4 07.08.2009 22:04
Помогите со скриптом Lumer Rising Force Online 1 24.12.2008 23:07

Заявление об ответственности / Список мошенников

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

Пишите нам: [email protected]
Copyright © 2024 vBulletin Solutions, Inc.
Translate: zCarot. Webdesign by DevArt (Fox)
G-gaMe! Team production | Since 2008
Hosted by GShost.net