Jump to content

Recommended Posts

Posted (edited)

Good Beautiful community, one knows or has a scrip to buy the staff of life and Crystallize ? Help me a lot, I found this but it serves me begin while

true do begin delay(1000); if not inventory.user.byid(189) or (item.count<1) then begin Engine.SetTarget(30499); Engine.DlgOpen; Engine.DlgSel (1); Delay(500); Engine.DlgSel(1); Delay(500); Engine.NPCExchange(189, 1); // Staf of life Delay(1000); end; end; ask your help

Edited by xFranky
  • 4 weeks later...
Posted
var
  PURCHASE_DIALOGS: array of string = ['1st Dialog name','2nd Dialog name'];

  StaffID : integer  = 189;
  StaffCount : int64 = 1;
  StaffPrice : int64 = 1800000;
  
function ItemCounting(id: integer): int64;
var i: integer;
begin
  result:= 0;                                          
  for i:= 0 to Inventory.User.Count-1 do begin
    if (Inventory.User.Items(i).ID = id) then
      Inc(result, Inventory.User.Items(i).Count);
  end; 
end;

procedure OpenStore();
var i: integer;
begin
  for i:= Low(PURCHASE_DIALOGS) to High(PURCHASE_DIALOGS) do
    if Engine.DlgSel(PURCHASE_DIALOGS[i]) then delay(500);
end;

procedure PurchaseCrystallize();
var
  i: integer;
begin
  while delay(100) do begin
    if (Engine.Status = lsOnline)
    and (ItemCounting(57) > (StaffPrice*StaffCount)) then begin
      OpenStore();
      Engine.NpcExchange(StaffID, StaffCount);
      for i:= 1 to StaffCount do begin
        if Engine.CrystalItem(StaffID) then delay(200);
      end;
    end else begin
      Print('Havent enough adena for purchase!');
      Engine.BlinkWindow(true);
      Script.Stop;
    end;
  end;
end;

begin
  PurchaseCrystallize;
end.

 

Posted
22 minutes ago, xFranky said:

What is it exactly that you are looking for? What game? Is it a cheat code? Can you please be more specific? 

It's a script for adrenaline bot 

  • Sad 1
Posted
32 minutes ago, `Sanctus said:

It's a script for adrenaline bot 

Awesome. I am moving it to the bot section. Thank you for letting me know! I did not have the chance to work with Adrenaline Bot yet

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • Create New...