Jump to content

Recommended Posts

Posted (edited)

1: ok now i open the question but imposible select class :S. i try with this code but nothing.

 

d6JLnw.jpg

    engine.openquestion;
    delay(500);
    engine.dlgsel('Orc Raider.');
    delay(500);
    engine.dlgsel('Orc Raider');
    delay(500);
    engine.dlgsel(1);
    delay(500);
    engine.bypasstoserver ('Orc Raider.');
    delay(500);
    engine.bypasstoserver ('bypass -h Orc Raider.');
    delay(500);      
    engine.bypasstoserver ('-h Orc Raider.');

or https://imageshack.us/i/pad6JLnwj

 

2: ok

3: i don't understand :S

4: ok 

 

Ty a lot

Edited by varrakuda
Posted (edited)

Hi, 

is it possible to use hotkeys in scripts?

I'd like to start the following script only if i hit a hotkey, lets say "B".

Edit: I tried Script.Suspend and Script.Resume but i dont know how to assign a hotkey.

var i:integer;
begin
  for i := 0 to CharList.Count - 1 do begin
     if Charlist.items(i).attackable and ((User.DistTo(Charlist.Items(i)) < 400))
     and  not Charlist.items(i).dead then begin
      engine.settarget(Charlist.items(i));
end;
end;
end.
Edited by jorvus
Posted

 

Hi, 

is it possible to use hotkeys in scripts?

I'd like to start the following script only if i hit a hotkey, lets say "B".

Edit: I tried Script.Suspend and Script.Resume but i dont know how to assign a hotkey.

var i:integer;
begin
  for i := 0 to CharList.Count - 1 do begin
     if Charlist.items(i).attackable and ((User.DistTo(Charlist.Items(i)) < 400))
     and  not Charlist.items(i).dead then begin
      engine.settarget(Charlist.items(i));
end;
end;
end.

yeah you need waitaction

var 
 KeyCode, k: integer;
begin
while true do begin
delay(150);
Engine.WaitAction([lakey], KeyCode, k);
  if (KeyCode = $31)  then begin   //key 1
  //
  // do something
  //
  end;
end;
end.

at this case it must be like

var 
 KeyCode, k: integer;
 i:integer;
begin
while true do begin
delay(150);
Engine.WaitAction([lakey], KeyCode, k);
  if (KeyCode = $31)  then begin   //key 1
  //
  for i := 0 to CharList.Count - 1 do begin
     if Charlist.items(i).attackable and ((User.DistTo(Charlist.Items(i)) < 400))
     and  not Charlist.items(i).dead then begin
      engine.settarget(Charlist.items(i));
      end;
      end;
  //
  end;
end;
end. 
Posted

hi, if posible take or save something in warehouse?.

 

Thanks a lot.

 

 

with cracked not posible, about new bot i dont know probably not posible too

 

mmm ok. i try to send all with mail but dont work you know why?

var
y, id, total: Integer;
item: tl2Item;

begin
  if (y=0) then begin
    for id := 1 to 20000 do
      if inventory.user.byid(id, item) then begin
        total := item.count;
        engine.sendmail('calvo', 'theme','text', [id, total]);
      end;
  end;     
end.

and if posible send mail whit 2 or more diferent items (coal, charcoal and adena)?

Posted

mmm ok. i try to send all with mail but dont work you know why?

var
y, id, total: Integer;
item: tl2Item;

begin
  if (y=0) then begin
    for id := 1 to 20000 do
      if inventory.user.byid(id, item) then begin
        total := item.count;
        engine.sendmail('calvo', 'theme','text', [id, total]);
      end;
  end;     
end.

and if posible send mail whit 2 or more diferent items (coal, charcoal and adena)?

you need send mail like

engine.sendmail('calvo', 'theme','text', [57, 1]); //57 adena id, 1 count

about +random item, i dont know

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...