Yosip
20.04.2015, 20:51
Всем здрасте! :)
На многих серверах лимит веса ограничен поэтому фармить магами не очень удобно так как много маны и сосок с собой не поятнеш. Я вот подумал если допустим взять крафтера напихать ему кучу сосок и кучу маны и посадить на офф торг в зоне где фармиш то ненадо каждый раз в город бегать, но нужен скрипт что бы бот покупал у крафтера. Нашол 2 скрипта из которых как я думаю можно слепить 1 на покупку если количество банок маны или сосок упало например ниже 5, но так как я в скриптописании не бум-бум прошу помощи знатоков :)
Всем заранее спасибо :)
Вот первый:
function CheckItemCount (const itemID: Integer; const quest: Boolean = False) : Integer;
var tempItem: TL2Item;
begin
if quest then Inventory.Quest.ByID(itemID, tempItem)
else Inventory.User.ByID(itemID, tempItem);
Result := tempItem.Count;
end;
Вот второй:
uses SysUtils, Classes;
var Figth_Flag:boolean;
Item: TL2Item;
Npc: TL2Npc;
begin
Print('Продаю дроп'); // Пишет в систем чат что продает дроп
Delay(500); // Пауза
Engine.SetTarget('Manor Manager'); // Выбрать в таргет НПС с таким то ником
Engine.MoveToTarget(-20); // Подойти к НПС
Engine.DlgOpen; // Начать диалог с НПС
Engine.DlgSel(5); // Выбрать диалог по списку
Delay(2500); // Пауза
Engine.NPCTrade(true,[15785,99999]); // Продать дроп (true,[ID предмета,кол-во])
Delay(3000); // Пауза
end.
Забыл добавить что скрипт для адреналина.
На многих серверах лимит веса ограничен поэтому фармить магами не очень удобно так как много маны и сосок с собой не поятнеш. Я вот подумал если допустим взять крафтера напихать ему кучу сосок и кучу маны и посадить на офф торг в зоне где фармиш то ненадо каждый раз в город бегать, но нужен скрипт что бы бот покупал у крафтера. Нашол 2 скрипта из которых как я думаю можно слепить 1 на покупку если количество банок маны или сосок упало например ниже 5, но так как я в скриптописании не бум-бум прошу помощи знатоков :)
Всем заранее спасибо :)
Вот первый:
function CheckItemCount (const itemID: Integer; const quest: Boolean = False) : Integer;
var tempItem: TL2Item;
begin
if quest then Inventory.Quest.ByID(itemID, tempItem)
else Inventory.User.ByID(itemID, tempItem);
Result := tempItem.Count;
end;
Вот второй:
uses SysUtils, Classes;
var Figth_Flag:boolean;
Item: TL2Item;
Npc: TL2Npc;
begin
Print('Продаю дроп'); // Пишет в систем чат что продает дроп
Delay(500); // Пауза
Engine.SetTarget('Manor Manager'); // Выбрать в таргет НПС с таким то ником
Engine.MoveToTarget(-20); // Подойти к НПС
Engine.DlgOpen; // Начать диалог с НПС
Engine.DlgSel(5); // Выбрать диалог по списку
Delay(2500); // Пауза
Engine.NPCTrade(true,[15785,99999]); // Продать дроп (true,[ID предмета,кол-во])
Delay(3000); // Пауза
end.
Забыл добавить что скрипт для адреналина.