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

[VIP] Скрипт на дюп for PTS

-

Подполье Lineage 2 (0 уровень)

- Темы, перенесенные из Подполья 1 уровня (архивные за 2008-2015). Отличная основа для поиска новых уязвимостей.

Ответ
 
Опции темы
Старый 25.04.2009, 10:25   #1
-= Чит-Мастер =-
 Рыцарь-защитник
Аватар для Razzor
 
Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(
Регистрация: 23.04.2008
Сообщений: 583
Популярность: 26705
Золото Zhyk.Ru: 100
Сказал(а) спасибо: 1,365
Поблагодарили 2,428 раз(а) в 666 сообщениях
Отправить сообщение для Razzor с помощью ICQ Отправить сообщение для Razzor с помощью Skype™
 
По умолчанию [VIP] Скрипт на дюп for PTS

Как обещалось..Скрипт на дюп через ВХ для PTS серверов. Работает на многих серверах, пользуйтесь на здоровье

Код:
//WH Dupe Script by RaRus. 2008  //


// How to use!
// 1. You need clean wh.
// 2. You need item what you want to dupe first in the wh deposit list.
// How to do it:
// (Deposit your item what you want to dupe and withdraw it.
// You will have this item first in inv and deposit list).
// 3. Run the script using L2phx
// 4. Target a wh and try 'Deposit Item (Private Warehouse)'
// Script will deposit first item to wh
// 5. Do 'Withdraw Item (Private Warehouse)'
// (First time you will get msg : 'Dupe items: DB1(), DB2()'
// That means items is dupes.. Do it some times and you will get msg:
// 'WithDraw Duped: Amount()' Ok, dupe is done.

// 5575 = Ancient Adena
// 9374 = Donator Coin
// 6029 = Lunargent
// 1374 = Greater Haste Potion

var
  dbid1,dbid2,am1,am2,dbid1_d,am1_d,ammount_d,whtype,ItemID,i,type:integer;

const
 MIN=4;     // Min amount of items.(you need to have MIN+1)
 MAX=999; // Max amount of items (for AA or Adena can be more).
 ID=9374;   // ID of item what you want to dupe.


procedure Msg(msg:string);
begin 
     buf:=#$4A;
     WriteD(0);
     WriteD(9);
     WriteS('RaRus');
     WriteS(msg);
     SendToClient;
end;


procedure WithDraw2(OID,OID2,amountp:integer);
begin
     buf:=#$32;
     WriteD(3);
     WriteD(OID);
     WriteD(amountp);
     WriteD(OID2);
     WriteD(1);
     WriteD(OID2);
     WriteD(1);
     SendToServer;
     buf:=#$32;
     WriteD(3);
     WriteD(OID);
     WriteD(amountp);
     WriteD(OID2);
     WriteD(1);
     WriteD(OID2);
     WriteD(1);
     SendToServer;
end;

procedure DepItems(OID,amountp:integer);
begin
     buf:=#$31;
     WriteD(2);
     WriteD(OID);
     WriteD(amountp);
     WriteD(OID);
     WriteD(1);
     SendToServer;
end;

procedure WithDrawDuped(OID,amountp:integer);
begin
     buf:=#$32;
     WriteD(1);
     WriteD(OID);
     WriteD(amountp);
     SendToServer;
end;

begin

if FromServer and (pck[1]=#$41) then
begin
     ItemID:=ReadD(16);
     am1_d:=ReadD(20);
     dbid1_d:=ReadD(38);

     if ((ItemID) = ID) then
     begin

     if ((am1_d) > MIN) then
     begin
     ammount_d:=am1_d-3;
     DepItems(dbid1_d,ammount_d);
     Msg('Deposit items: DB1('+IntToStr(dbid1_d)+'), Amount('+IntToStr(ammount_d)+')');
     end;

     if ((am1_d) < MIN) then
     begin
     Msg('Deposit error: Amount('+IntToStr(am1_d)+')');
     end;

     if ((am1_d) > MAX) then
     begin
     Msg('Deposit error: Amount('+IntToStr(am1_d)+')');
     end;
     end;
end;



if FromServer and (pck[1]=#$42) then  //  Withdraw
begin
     whtype:=ReadH(8); //this is not a smile, this is number 8 and symbol )
     am1:=ReadD(20);
     am2:=ReadD(60);
     dbid1:=ReadD(38);
     dbid2:=ReadD(78);

     if ((am2) = 0) and ((am1) > 0) then
     begin
     WithDrawDuped(dbid1,am1);
     Msg('WithDraw Duped: Amount('+IntToStr(am1)+')');
     end;

     if ((am2) > 0 ) and ((whtype) = 2 ) then
     begin
     WithDraw2(dbid1,dbid2,am1);
     Msg('Dupe items: DB1('+IntToStr(dbid1)+'), DB2('+IntToStr(dbid2)+'), Amount('+IntToStr(am1)+')');
     end;

     if ((whtype) = 1 ) and ((am1) = 0) then
     begin
     Msg('WithDraw error: Amount('+IntToStr(am1)+')');
     end;

     if ((am1) > MAX) then
     begin
     Msg('WithDraw error: Amount more than MAX ('+IntToStr(am1)+')');
     end;
end;
end.
  Ответить с цитированием
Старый 25.04.2009, 15:07   #2
NoItemName
 Рыцарь
Аватар для J-Fobos
 
J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(J-Fobos сломал счётчик популярности :(
Регистрация: 12.04.2009
Сообщений: 394
Популярность: 47903
Сказал(а) спасибо: 515
Поблагодарили 1,124 раз(а) в 430 сообщениях
 
По умолчанию Re: Скрипт на дюп for PTS

Цитата:
// How to use!
// 1. You need clean wh.
// 2. You need item what you want to dupe first in the wh deposit list.
// How to do it:
// (Deposit your item what you want to dupe and withdraw it.
// You will have this item first in inv and deposit list).
// 3. Run the script using L2phx
// 4. Target a wh and try 'Deposit Item (Private Warehouse)'
// Script will deposit first item to wh
// 5. Do 'Withdraw Item (Private Warehouse)'
// (First time you will get msg : 'Dupe items: DB1(), DB2()'
// That means items is dupes.. Do it some times and you will get msg:
// 'WithDraw Duped: Amount()' Ok, dupe is done.

Раззор трудно было это перевести?) перевод на скрипт не повлияет)
________________

В любом из нас спит гений. И с каждым днем все крепче.
Запомните раз и навсегда:= 'Помочь' <> 'Сделайте за меня';
  Ответить с цитированием
Старый 25.04.2009, 20:47   #3
-= Чит-Мастер =-
 Рыцарь-защитник
Аватар для Razzor
 
Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(
Регистрация: 23.04.2008
Сообщений: 583
Популярность: 26705
Золото Zhyk.Ru: 100
Сказал(а) спасибо: 1,365
Поблагодарили 2,428 раз(а) в 666 сообщениях
Отправить сообщение для Razzor с помощью ICQ Отправить сообщение для Razzor с помощью Skype™
 
По умолчанию Re: Скрипт на дюп for PTS

Цитата:
Сообщение от NeverПосмотреть сообщение
Раззор трудно было это перевести?) перевод на скрипт не повлияет)


Кому и в правдо надо - переведет, не составит труда.
Время будет, переведу, пока такового нету...
  Ответить с цитированием
Старый 26.04.2009, 10:57   #4
Подпольщик ArcheAge
 Рыцарь
Аватар для Loreg
 
Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(
Регистрация: 02.05.2008
Сообщений: 324
Популярность: 11155
Сказал(а) спасибо: 629
Поблагодарили 315 раз(а) в 180 сообщениях
Отправить сообщение для Loreg с помощью ICQ Отправить сообщение для Loreg с помощью Skype™
 
По умолчанию Re: Скрипт на дюп for PTS

Сейчас буду тестить везде вплоть до Грации Финал. Ждите..

Добавлено через 4 часа 50 минут
Где я только не тестил, НИГДЕ НЕ РАБОТАЕТ...
________________
2nice <3

Последний раз редактировалось Loreg; 26.04.2009 в 15:47. Причина: Добавлено сообщение
  Ответить с цитированием
Старый 27.04.2009, 20:14   #5
-= Чит-Мастер =-
 Рыцарь-защитник
Аватар для Razzor
 
Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(Razzor сломал счётчик популярности :(
Регистрация: 23.04.2008
Сообщений: 583
Популярность: 26705
Золото Zhyk.Ru: 100
Сказал(а) спасибо: 1,365
Поблагодарили 2,428 раз(а) в 666 сообщениях
Отправить сообщение для Razzor с помощью ICQ Отправить сообщение для Razzor с помощью Skype™
 
Red face Re: Скрипт на дюп for PTS

Перевод:

/ / Как пользоваться!
/ / 1. Вам потребуется чистый WH.
/ / 2. Нужно положить итем, который вы хотите дюпнуть в первую строчку (ячейку) банка.
/ / Как это сделать:
/ / (Снимите и положите в вх итем который хотите дюпать.
/ / Объязательно положите в первую ячейку).
/ / 3. Запустите скрипт через L2phx
/ / 4. Встаньте рядом с ВХ и нажмите "Deposit Item" (положить на складу)
/ / Скрипт положит итем на склад (первая ячейка)
/ / 5. Затем скрипт возьмет итем со склада
/ / (Первый раз, когда вы получите сообщение: "Итемов дюпнулось: DB1 (), DB2 () '
/ / Это значит, итем дюпнулся .. Сделайте это несколько раз и вы получите сообщение:
/ / 'Снято Duped: Сумма ()' - вы сделали дюп.


Вроде перевел правильно, у кого какие замечания будут?
2Loreg, автор скрипта не я, работает на забугорных сервера - точно. В последних dle вампира пофикшено.

p.s. работает вроде только на интерлюде (хотя точных сведений нету)
  Ответить с цитированием
Старый 27.04.2009, 20:19   #6
Подпольщик ArcheAge
 Рыцарь
Аватар для Loreg
 
Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(Loreg сломал счётчик популярности :(
Регистрация: 02.05.2008
Сообщений: 324
Популярность: 11155
Сказал(а) спасибо: 629
Поблагодарили 315 раз(а) в 180 сообщениях
Отправить сообщение для Loreg с помощью ICQ Отправить сообщение для Loreg с помощью Skype™
 
По умолчанию Re: Скрипт на дюп for PTS

Сейчас тест дубль 2.
Вроде всё так и делал.
Но не понятен пункт 3.
Скрипт сначала не должен быть запущен т.е.?
*ушёл тест С4
________________
2nice <3
  Ответить с цитированием
Ответ

Метки
скрипт

Опции темы

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

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

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

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Скрипт на Анонсы HawkLord Боты, скрипты и прочий софт для Lineage 2 7 15.05.2009 16:36
Скрипт для Темных KpblceHok Боты, скрипты и прочий софт для Lineage 2 0 03.05.2009 11:36
[VIP] баг на заточку (скрипт) J-Fobos Архив 0 28.04.2009 13:25
Помогите скрипт на продажу SexCC Боты, скрипты и прочий софт для Lineage 2 1 27.04.2009 18:56

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

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

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