ginji Posted March 14, 2017 Share Posted March 14, 2017 well as i said, somewhere i see it, that means i just see, but i dont have it, if good remember i see it ~2year ago at l2bot.eu (now lineage2bot.com) Thanks for your info! i'll try search deeper. Quote Link to comment Share on other sites More sharing options...
ginji Posted March 15, 2017 Share Posted March 15, 2017 hello, how do i declare string array ? Sth like this String[] array = {'x';'y';'z'} Quote Link to comment Share on other sites More sharing options...
adr.bot Posted March 15, 2017 Share Posted March 15, 2017 hello, how do i declare string array ? Sth like this String[] array = {'x';'y';'z'} a:array of string = ['x', 'y', 'z']; Quote Link to comment Share on other sites More sharing options...
ginji Posted March 16, 2017 Share Posted March 16, 2017 a:array of string = ['x', 'y', 'z']; Thanks, one more question, where can I learn the script syntax ? Quote Link to comment Share on other sites More sharing options...
adr.bot Posted March 16, 2017 Share Posted March 16, 2017 Thanks, one more question, where can I learn the script syntax ? http://www.delphibasics.co.uk/ for me very helped other examples when i started Quote Link to comment Share on other sites More sharing options...
ginji Posted March 17, 2017 Share Posted March 17, 2017 http://www.delphibasics.co.uk/ for me very helped other examples when i started Thanks ! Quote Link to comment Share on other sites More sharing options...
Babaloo Posted April 3, 2017 Share Posted April 3, 2017 Hello, I am looking for working script for augmentation on interlude server Quote Link to comment Share on other sites More sharing options...
tisonakos Posted May 4, 2017 Share Posted May 4, 2017 Good morning people i have paid version of adrenaline i am playing at la2dreams at the moment. ( Interlude) I woulk like to know if there is any script for mass sweep in interlude. thank you in advance P.S Show me love please no hate !! :) Quote Link to comment Share on other sites More sharing options...
adr.bot Posted May 4, 2017 Share Posted May 4, 2017 Good morning people i have paid version of adrenaline i am playing at la2dreams at the moment. ( Interlude) I woulk like to know if there is any script for mass sweep in interlude. thank you in advance P.S Show me love please no hate !! :) var int: integer; mob: tl2npc; sweep: tl2skill; begin while true do begin for int:=0 to npclist.count-1 do begin mob := npclist.items(int); if mob.valid and mob.dead and mob.sweepable and (skilllist.byid(42,sweep) and (sweep.endtime = 0)) then if (user.distto(mob) < 300) then //max range of sweeping if engine.settarget(mob) then engine.useskill(sweep); end; delay(100); end; end. author krn (if im not wrong) Quote Link to comment Share on other sites More sharing options...
kose Posted May 6, 2017 Share Posted May 6, 2017 I'm having a hard time dropping the Sage's Stone that can help me. thank you so much 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($2, 0, 0, 0, 0); delay(_delay); mouse_event($4, 0, 0, 0, 0); end; var Figth_Flag:boolean; Item: TL2Item; Npc: TL2Npc; Obj: TL2Buff; IdBuff: integer; Buffs:TL2Buff; var L2Skill: TL2Skill; var QuestItem: TL2Item; begin Delay(1000); Engine.UseItem(7130); Delay(30000); Engine.SetTarget('Karin'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(4); Delay(3000); Engine.SetTarget('Ladd'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(4); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Delay(3000); Engine.SetTarget('Merian'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Delay(3000); Engine.MoveTo(84972,16390,-4296); Delay(500); Engine.MoveTo(85622,16722,-4296); Delay(500); Engine.SetTarget('Wesley'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(5); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.MoveTo(85541,16213,-4280); Delay(500); Engine.SetTarget('Alchemist''s Mixing Urn'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(2); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(14); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(3); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.MoveTo(85475,15797,-4272); Delay(500); Engine.MoveTo(84856,15882,-4296); Delay(500); Engine.SetTarget('Karin'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(4); Delay(3000); Engine.SetTarget('Ladd'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(4); Delay(1500); Engine.DlgSel(1); Delay(3000); Engine.SetTarget('Merian'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(4); Delay(3000); Engine.SetTarget('Joan'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(5); Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(1); Delay(3000); Engine.SetTarget('Mariell'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(2); Delay(3000); Engine.SetTarget('Verona'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(3); Delay(4); Engine.SetTarget('Elisa'); Delay(1500); Engine.DlgOpen; Delay(1500); Engine.DlgSel(1); Delay(1500); Engine.DlgSel(17); Delay(3000); Engine.MoveTo(171939,56504,-5280); Delay(500); Engine.MoveTo(173247,56470,-5840); Delay(500); Engine.CancelTarget; if not (Inventory.Quest.ByID(6322, QuestItem) = true) then begin Engine.FaceControl(0,true); end; Engine.FaceControl(0,false); end. end. Quote Link to comment Share on other sites More sharing options...
paulosbk Posted May 6, 2017 Share Posted May 6, 2017 i need script for l2 warland for quest TT recipes anyone can be help me?! Quote Link to comment Share on other sites More sharing options...
tisonakos Posted May 7, 2017 Share Posted May 7, 2017 var int: integer; mob: tl2npc; sweep: tl2skill; begin while true do begin for int:=0 to npclist.count-1 do begin mob := npclist.items(int); if mob.valid and mob.dead and mob.sweepable and (skilllist.byid(42,sweep) and (sweep.endtime = 0)) then if (user.distto(mob) < 300) then //max range of sweeping if engine.settarget(mob) then engine.useskill(sweep); end; delay(100); end; end. author krn (if im not wrong) Thank you for the answer bro i will test it Quote Link to comment Share on other sites More sharing options...
7eleven Posted May 10, 2017 Share Posted May 10, 2017 Thank you for the answer bro i will test it works. Quote Link to comment Share on other sites More sharing options...
Beloves Posted May 11, 2017 Share Posted May 11, 2017 (edited) Hi all, I'm playing on Gracia Final and I need your help for a part of Antharas Quest that I'd like to script. In Windy Hill, I need to kill Abyssal Jewel (ID: 27165 ) to obtain 1st Fragment of Abyss Jewel (ID:3859 ). Once it's dead, many Jewel Guardian Mara (ID: 27168 ) appear and will drop Mara Fang (Id:3862). Here is what I need: - Get The 2 quest Items - Kill all the mobs in zone (especialy Jewel Guardian Mara) - Use SOE On the script I wrote here, bot stop hitting mobs when he got the 2 quest items. Consequence: the non-killed mobs break my SOE and I can't go away. Var Item: TL2Item; begin engine.moveto( -81233 , 75608, -3360); delay(500); engine.FaceControl(0,true); delay(500); Engine.AutoTarget(600, 200) ; delay (15000); if Inventory.Quest.ByID(3862, Item) and Inventory.Quest.ByID(3859, Item) and (Item.count > 0) and not user.incombat then begin Engine.MoveTo( -81363 , 76025,-3376 ) ; delay (500) ; Engine.FaceControl(0,false); delay (2000); Engine.UseItem (736) ; delay (20000); end; end. Thx for your upcoming replies. Beloves. Edited May 11, 2017 by Beloves Quote Link to comment Share on other sites More sharing options...
thalestvn Posted May 21, 2017 Share Posted May 21, 2017 Hello everyone! I'm playing on a pvp server, and the farm area is in Field of Silence, I have only one problem: when my char dies, he goes back to town, but I can not rebuff because of Heine's random respawn. What I need: a script for the char to go near the normal gk, because the npcs buffer and global gk are very close, so I can rebuff and teleport to the farm zone. Please help me, already tried to edit with Engine.MoveTo but it is kind of complicated because it always hangs somewhere. Thanks in advance! Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.