TheProdigy Posted February 26, 2018 Posted February 26, 2018 Hey guys, I've searched a bit on google about a script that can can mix the regents for the Lunargent and Hellfire Oil and I managed to find something, but it doesn't work properly. Can someone tell me what do I need to do in order to make it work? Here's the code. //Mixing Urn var i,n,Craft:integer; item: TL2item; begin // Craft: // =1 , Mix Moon Dust(МооnShard+VolcanicAsh)(10+1) // =2 , Mix Lunargent(MoonDust+Quicksilver)(10+1) // =3 , Mix Demonplasm(Demonblood+BloodRoot)(10+1) // =4 , Mix Magma Dust(Lavastone+VolcanicAsh)(10+1) Craft:=1; // Mix what? Read above^ 1=Moon Dust etc.. n:=20; // Mix how many times? if craft = 1 then begin engine.dlgopen; delay(500); engine.dlgsel('Quest'); delay(500); engine.dlgsel('Insert a mixing'); delay(500); for i:=1 to n do begin engine.dlgsel('Moonstone'); delay(800); engine.dlgsel('Next'); delay(800); engine.dlgsel('Ash'); delay(800); engine.dlgsel('Next'); delay(800); engine.dlgsel('Salamander'); delay(800); engine.dlgsel('Mix'); delay(800); engine.dlgsel('Mix'); delay(800); end; end; if craft = 2 then begin engine.dlgopen; delay(300); engine.dlgsel('Quest'); delay(300); engine.dlgsel('Insert a mixing'); delay(300); for i:=1 to n do begin engine.dlgsel('Moon Dust'); delay(300); engine.dlgsel('Next'); delay(300); engine.dlgsel('Quicksilver'); delay(300); engine.dlgsel('Next'); delay(300); engine.dlgsel('Salamander'); delay(300); engine.dlgsel('Mix'); delay(300); engine.dlgsel('Mix'); delay(300); end; end; if craft = 3 then begin engine.dlgopen; delay(300); engine.dlgsel('Quest'); delay(300); engine.dlgsel('Insert a mixing'); delay(300); for i:=1 to n do begin engine.dlgsel('Demon''s Blood'); delay(300); engine.dlgsel('Next'); delay(300); engine.dlgsel('Blood Root'); delay(300); engine.dlgsel('Next'); delay(300); engine.dlgsel('Salamander'); delay(300); engine.dlgsel('Mix'); delay(300); engine.dlgsel('Mix'); delay(300); end; end; if craft = 4 then begin engine.dlgopen; delay(300); engine.dlgsel('Quest'); delay(300); engine.dlgsel('Insert a mixing'); delay(300); for i:=1 to n do begin engine.dlgsel('Lava Stone'); delay(300); engine.dlgsel('Next'); delay(300); engine.dlgsel('Ash'); delay(300); engine.dlgsel('Next'); delay(300); engine.dlgsel('Salamander'); delay(300); engine.dlgsel('Mix'); delay(300); engine.dlgsel('Mix'); delay(300); end; end; end.
Luigicol Posted May 25, 2018 Posted May 25, 2018 Try this: if User.InRange (85538, 16191, -4300, 200, 200) then begin Engine.SetTarget (31149); Engine.DlgOpen; Delay (500); Engine.DlgSel (2); Delay (500); // Moondust = 10 Moonstone Shard + 1 Volcanic Ash for i := 1 to 50 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6013'); // x10 moonstone shard Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6018'); // x1 volcanic ash Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Lunargent = 10 Moondust + 1 Quicksilver for i := 1 to 5 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6023'); // x10 moondust Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6019'); // x1 quicksilver Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Magma Dust = 10 Lava Stone + 1 Volcanic Ash for i := 1 to 10 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6012'); // x10 lava stone Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6018'); // x1 volcanic ash Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Fire Essence = 10 Magma Dust + 1 Sulfur Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6022'); // x10 magma dust Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6020'); // x1 sulfur Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); // Demonplasm = 10 Demon Blood + 1 Blood Root for i := 1 to 10 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6015'); // x10 demon blood Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6017'); // x1 blood root Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Demonic Essence = 10 Demonplasm + 1 Sulfur Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6025'); // x10 demonplasm Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6020'); // x1 sulfur Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); // Hellfire Oil = 1 Fire Essence + 1 Demonic Essence Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_I_6028'); // x1 fire essence Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6031'); // x1 demonic essence Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end;
zmaj13 Posted October 6, 2019 Posted October 6, 2019 (edited) On 5/25/2018 at 1:35 PM, Luigicol said: Try this: if User.InRange (85538, 16191, -4300, 200, 200) then begin Engine.SetTarget (31149); Engine.DlgOpen; Delay (500); Engine.DlgSel (2); Delay (500); // Moondust = 10 Moonstone Shard + 1 Volcanic Ash for i := 1 to 50 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6013'); // x10 moonstone shard Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6018'); // x1 volcanic ash Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Lunargent = 10 Moondust + 1 Quicksilver for i := 1 to 5 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6023'); // x10 moondust Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6019'); // x1 quicksilver Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Magma Dust = 10 Lava Stone + 1 Volcanic Ash for i := 1 to 10 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6012'); // x10 lava stone Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6018'); // x1 volcanic ash Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Fire Essence = 10 Magma Dust + 1 Sulfur Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6022'); // x10 magma dust Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6020'); // x1 sulfur Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); // Demonplasm = 10 Demon Blood + 1 Blood Root for i := 1 to 10 do begin Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6015'); // x10 demon blood Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6017'); // x1 blood root Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; // Demonic Essence = 10 Demonplasm + 1 Sulfur Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_2_I_6025'); // x10 demonplasm Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6020'); // x1 sulfur Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); // Hellfire Oil = 1 Fire Essence + 1 Demonic Essence Engine.BypassToServer ('Quest 373_SupplierOfReagents U_I_Insert'); // insert ingredient Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_I_6028'); // x1 fire essence Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents U_C_Insert'); // insert catalyst Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents x_1_C_6031'); // x1 demonic essence Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-5.htm'); // select temperature Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents tmp_1'); // temperature 1 - salamander Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents 31149-6.htm'); // mix ingredients Delay (500); Engine.BypassToServer ('Quest 373_SupplierOfReagents urn'); // back Delay (500); end; for this to work u need to have complete mats? 500 100 100? ps: i know its old post but its gonna save me a loot of time if someone that understands script better then me can answer that :d Edited October 6, 2019 by zmaj13
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now