Adri555

Any can post link for La2Robot? I think robot work xD

Thanks

Pff is bad server for buy adrenaline xD thanks

wait 1 hour

Ye after around 1h we can enter again, just want ask if cracked adrenaline work in this server :)

FIX:

 

 

 

 

Oh, when i have a laptop i will try but i dont have it :(

Hello. In this server http://l2grasf.com/ , when i try logg with me adrenaline, i have error You have been disconnect from the server, and after error: You have been temporally banned from this server.

I think its smartguard or something, but for bot in this server i just can buy legit adrenaline or can do something ?

Thanks :)

bests places to bot: 

 

hungry parasitic leech

gem dragon

emerald dragon

 

3 bot on every place

 

gg

 

 

fog = trash

Gonna try emerald drakes maybe, thanks xD

kariks for sur

Its unkillable with 3 spellhowlers + bishop xD I have a grade

Hey guys, where can i bot wind-earth stones pls? :P with bishop and spellhowlers?

That parameter in in %, so basically your character will never sit since you are doing it with 200% hp (impossible), stand is the same the parameter is in % so, you can put around 30% to sit and 90% to stand, for example :)

Oh wow true, thanks man :)

Any know how work this "relax" mode in adrenaline?

I try put in part "sit" MP <= for example 200 for sit when i have 200 mana, and in part "stand" MP => 999.

But me char sit when i have full mana :/

Sorry for me sh1t english xD

I cant open more than 1 char, is posible open 2 chars with adrenaline or something? I poor no money for donate xD

Ey la2nigma, you script include for stop scrip with a button?

YE no problem, you explain good just im noob and dont understand xd

______

Any scripter can share argument script with this script for stop that with key? If is for free better, but maybe we can negociate a small price

Ye man sorry but me english is limited and im not good in scripts xd

I understand i need add this you code

begin
Script.NewThread(@SuspendScript);
Script.NewThread(@AugmentScriptMain);
end.

But where? Cause this full script we end in end.

And maybe we need add: SuspendScript; in procedure AugmentScriptMain; like this or something:

procedure AugmentScriptMain;
begin
while Engine.Status = lsOnline do begin
delay(100);
mouseClick(403,726,400);	///mouse click
SetCursorPos(133, 339);		///mouse move
pressKey($62);			///press key 2
pressKey($65);			///press key 5 for add gemstone count
delay(500);
augments;			///and check procedure augments for skill detect
SuspendScript;
end;
end;

For call this suspendscript action? I tryed but still dont work and script do nothing.

Thanks for patience adr.bot with noob newbies xD

http://delphi.about.com/od/objectpascalide/l/blvkc.htm

its numpad 9

Yes i know, but still dont work, holy fuck i dont want imagine if i want make script for autofarm ...

function keybd_event(bVk,bScan:byte;dwFlags,dwExtraInfo: integer): integer;  stdcall; external 'user32.dll';
function SetCursorPos(x, y : integer): boolean; stdcall; external 'user32.dll';
function mouse_event(dwFlags, dx, dy, dwData: byte; dwExtraInfo: integer): void; stdcall; external 'user32.dll';

procedure SuspendScript;
var keycode,i:integer;
 begin
while true do begin
delay(150);
Engine.WaitAction([lakey], KeyCode, i);
  if (KeyCode = $69) then begin
  script.Suspend;
  end;
  end;
end;

procedure pressKey(hexCode: BYTE);
begin
  keybd_event(hexCode, 45, 1, 0 );
  delay(200);
end;

procedure mouseClick(x, y, _delay : integer); 
begin
SetCursorPos(x, y);
mouse_event($0002, 0, 0, 0, 0);
delay(_delay);
mouse_event($0004, 0, 0, 0, 0);
end;

procedure augments;
var obj: TL2Effect;
begin
while 
(SkillList.ByID(3124, obj)) or
(SkillList.ByID(3259, obj)) do delay(3000);
end;

begin
while Engine.Status = lsOnline do begin
delay(100);
mouseClick(515,891,400);	///mouse click
SetCursorPos(504, 886);		///mouse move
delay(500);
augments;			///and check procedure augments for skill detect
end;
end.

I tryed 3000000000 changes and never

Ok now its fine but look, in this part: if (KeyCode = $7B) then begin i think this $7B is the key for stop script no? So i changed to $69 and dont work, script dont stop, i think this $69 is key 9 true?

I'm now like this xddd:

Not sure if im just retarded, or its cause is me first time with this program/scripts, but i dont understand never xd

I added what you say : 

procedure SuspendScript;
begin
while true do begin
delay(150);
var keycode,i:integer;
Engine.WaitAction([lakey], KeyCode, i);
  if (KeyCode = $7B) then begin
  script.Suspend;
  end;
  end;
end;

And now have red error in var keycode,i:integer; , and this script.newthread we need add at last end; of script? So fucking hard make auto argument xd

So hard learn about that, but i go try :) Good video.

in l2 move mouse where you whant and press "1" then it print in bot message window your mouse position

Hmm this is hard as fuck xDDD

I now trying add this key script for stop script but like this:

function keybd_event(bVk,bScan:byte;dwFlags,dwExtraInfo: integer): integer;  stdcall; external 'user32.dll';
function SetCursorPos(x, y : integer): boolean; stdcall; external 'user32.dll';
function mouse_event(dwFlags, dx, dy, dwData: byte; dwExtraInfo: integer): void; stdcall; external 'user32.dll';

procedure SuspendScript;
 begin
while true do begin
delay(150);
Engine.WaitAction([lakey], KeyCode, i);
  if (KeyCode = $7B) then begin
  script.Suspend;
  end;
  end;
end;

procedure pressKey(hexCode: BYTE);
begin
  keybd_event(hexCode, 45, 1, 0 );
  delay(200);
end;

procedure mouseClick(x, y, _delay : integer); 
begin
SetCursorPos(x, y);
mouse_event($0002, 0, 0, 0, 0);
delay(_delay);
mouse_event($0004, 0, 0, 0, 0);
end;

procedure augments;
var obj: TL2Effect;
begin
while 
(SkillList.ByID(3124, obj)) or
(SkillList.ByID(3259, obj)) do delay(3000);
end;

begin
while Engine.Status = lsOnline do begin
delay(100);
mouseClick(403,726,400);	///mouse click
SetCursorPos(133, 339);		///mouse move
pressKey($62);			///press key 2
pressKey($65);			///press key 5 for add gemstone count
delay(500);
augments;			///and check procedure augments for skill detect
end;
end.

But got red error in this part: Engine.WaitAction([lakey], KeyCode, i);

uses sysutils,classes;
function GetCursorPos(var lpPoint: TPoint): integer; stdcall; external 'user32.dll';
var 
 P: TPoint;
 KeyCode, i: integer;
begin
while true do begin
delay(150);
Engine.WaitAction([lakey], KeyCode, i);
  if (KeyCode = $31)  then begin   //key 1
  GetCursorPos(P);
    print('X: '+IntToStr(P.x))+'. Y: '+IntToStr(P.y);
   end;
  end;
end.

Who know how work this wtfxD I used this but no happens nothing

you need edit augments procedure, to add more skill when whant stop when get that skill, and you need edit "mouseClick" and etc, suspend script just look litle bit up and you see example

Ok, i found arguments ids in this post for if any need: http://www.maxcheaters.com/topic/136087-shareaugment-skills-ids/

But how can i know what is me monitor coordinates if is 1920x1080?

function keybd_event(bVk,bScan:byte;dwFlags,dwExtraInfo: integer): integer;  stdcall; external 'user32.dll';
function SetCursorPos(x, y : integer): boolean; stdcall; external 'user32.dll';
function mouse_event(dwFlags, dx, dy, dwData: byte; dwExtraInfo: integer): void; stdcall; external 'user32.dll';

procedure pressKey(hexCode: BYTE);
begin
  keybd_event(hexCode, 45, 1, 0 );
  delay(200);
end;

procedure mouseClick(x, y, _delay : integer); 
begin
SetCursorPos(x, y);
mouse_event($0002, 0, 0, 0, 0);
delay(_delay);
mouse_event($0004, 0, 0, 0, 0);
end;

procedure augments;
var obj: TL2Effect;
begin
while 
(SkillList.ByID(3124, obj)) or
(SkillList.ByID(3259, obj)) do delay(3000);
end;

begin
while Engine.Status = lsOnline do begin
delay(100);
mouseClick(403,726,400);	///mouse click
SetCursorPos(133, 339);		///mouse move
pressKey($62);			///press key 2
pressKey($65);			///press key 5 for add gemstone count
delay(500);
augments;			///and check procedure augments for skill detect
end;
end.

Not sure what i need edit any can help me pls? And if this script use mouse, how i can stop script? with keyboard?

l2adr that version of you? you tried to create a polygon attack "add new position"

Think is 1.71 cracked version. And not sure about what are u talking with this "polygon attack" xD

Edit: I try editing zone in virtual map with adrenaline and work fine, i edit 2 zones for farm, but if i try edit 3-4 zones i got error, any know do more than 2?

Hello. First of all sorry for me english.

Yesterday i download adrenaline, and work fine, can bot in alot of zones, but i dont know how i can bot in Dark Omens or in another catacomb.

If i want bot in 1 Hall dont have problem, but how i can bot in 3-4 halls or more? Me char bug alot in walls for example.

Thanks you.