Register for your free account! | Forgot your password?

Go Back   elitepvpers > MMORPGs > Aion > Aion Hacks, Bots, Cheats & Exploits
You last visited: Today at 17:58

  • Please register to post and access all features, it's quick, easy and FREE!

Advertisement



Para's VanillaTool [Rework]

Discussion on Para's VanillaTool [Rework] within the Aion Hacks, Bots, Cheats & Exploits forum part of the Aion category.

Reply
 
Old 04/05/2018, 19:49   #7666
 
Paraly's Avatar
 
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
Quote:
Originally Posted by Solaci View Post
I get errors in the console when it first runs and doesnt resize the window. And instead of hitting the entry button it keeps bringing up profile, and isn't putting in the PIN in its window either. I'm using latest version of tool and script. I've rebooted everything and still have the same problem
Rightclick on your desktop, display settings, is the percentage value there set to 100%?

Did you use 100% UI size?
Did you reset all the windows to default position?
What did you enter at the PIN question window?
Paraly is offline  
Old 04/05/2018, 19:52   #7667
 
elite*gold: 0
Join Date: Aug 2011
Posts: 79
Received Thanks: 4
Quote:
Originally Posted by Paraly View Post
Rightclick on your desktop, display settings, is the percentage value there set to 100%?

Did you use 100% UI size?
Did you reset all the windows to default position?
What did you enter at the PIN question window?
Everything is correct, like i said it brings up errors in white on the screen itself (which I assume is console commands) and doesn't resize it
Solaci is offline  
Old 04/05/2018, 19:56   #7668
 
Paraly's Avatar
 
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
Quote:
Originally Posted by Solaci View Post
Everything is correct, like i said it brings up errors in white on the screen itself (which I assume is console commands) and doesn't resize it
Replace
Code:
#EXECUTE=SetResolution;
with
Code:
#NeedResolution=816,638;

_____________

Another small update regarding the PIN and resizing part

Code:
#IF=%FirstTime,;
#SmoothBackground
#EXECUTE=SetResolution;
Delay=500;
#NeedResolution=816,638;
Delay=500;
#NeedResolution=816,638;
#UseLoop
UseSpeed=1;
WaitForResponse=Be sure you have 100% UI size/nBe sure all windows are reseted to default position/nBe sure Auto-Arrange windows is disabled/nBe sure click-to-move is disabled/n/nBe sure you stay next to Gogorunerk;
#SetVar2=How much characters you have?;
#SetVar1=Enter your PIN/nexample: "1|2|3|4|5|6"/n/n(the seperators are no "i" and no "L";
#SetVar3=Do you have an Instance Boost Pack?/n/n(1 = Yes)/n(0 = No);
_SetVar4=0; <- char counter
#SetVar5=How do you want to use the big keys?/n/n(0 = use them with the toon himself)/n(1 = Send them by mail)/n(2 = Keep them in inventory);
_SetVar7=0; <- item counter
MemWrite=%AddrFreeMem5,%Var5,BYTE;
_IFMemRead=%AddrFreeMem5,BYTE,=1;
#SetVar6=Enter the charactername you want to send the keys to;
#ENDIF


_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>9;
#EXECUTE=Enter;
#ENDIF

MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=1;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
_IFInventoryContains=185000319; ornate key
#EXECUTE=Mail;
#ENDIF

MemWrite=%AddrFreeMem1,%Var2,BYTE;
_IFMemRead=%AddrFreeMem1,BYTE,>1;
#EXECUTE=ChangeCharacter;
_Calc4=%Var4+1;
#ENDIF

MemWrite=%AddrFreeMem3,%Var4,BYTE;
_IFMemRead=%AddrFreeMem3,BYTE,=%Var2;
WaitForResponse=Finished;
#UseNoLoop
#EndScript
#ENDIF




start_Mail;

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=L; <-- Elyos
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1392.873,1266.345,339.819;
#EXECUTE=SendMail;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1420.528,1264.053,336.66;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=D; <-- Asmo
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1819.842,1986.981,199.197;
#EXECUTE=SendMail;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1811.884,1961.294,199.197;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

end_Mail;



start_SendMail;

Delay=250;
Command=/select Mailbox;
Delay=500;
Command=/select Mailbox;
Delay=500;
Command=/attack;
Delay=1500;
Mouse=87,109;
Delay=750;
SendKey=%Var6; <-- playername
Delay=1500;
_GetInventoryItemHandle=185000319; <-- itemID
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x9C,%VarItemID,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x94,%VarItemHandle,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xA8,%VarItemAmount,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x98,1,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xAC,0,DWORD;
_Calc7=%Var7+%VarItemAmount;
Mouse=188,393;
Delay=1000;
Mouse=442,344;
Delay=5;
Mouse=442,344;
Delay=500;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
MemPtrWrite=%AddrESChwnd,%OffsetESChwnd,142,BYTE;
Command=;

end_SendMail;



start_Enter;

#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;

MemWrite=%AddrFreeMem2,%Var3,BYTE;
_IFMemRead=%AddrFreeMem2,BYTE,=1;
#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;
#ENDIF

end_Enter;



start_ChangeCharacter;

Command=/logout;
Delay=15000;
#EXECUTE=SelectSlot;
Delay=1500;
Mouse=400,571; <-- Start
Delay=2000;
_IFFrameVisible=567; PIN window
#EXECUTE=PINCheck;
#ENDIF
Delay=6000;

end_ChangeCharacter;



start_SelectSlot;

MemWrite=%AddrFreeMem1,%Var2,BYTE;

_IFMemRead=%AddrFreeMem1,BYTE,=2;
Mouse=675,200;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=3;
Mouse=675,241;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=4;
Mouse=675,276;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=5;
Mouse=675,313;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=6;
Mouse=675,357;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=7;
Mouse=675,397;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=8;
Mouse=675,436;
#ENDIF

end_SelectSlot;



start_PINCheck;

MemWrite=%AddrFreeMem10,1,BYTE;
#DO=999999999;
_IFFrameVisible=567; PIN window
#EnterPIN=%Var1;
Delay=1000;
#ELSE
MemWrite=%AddrFreeMem10,0,BYTE;
#ENDIF
Delay=750;
_UNTILMemRead=%AddrFreeMem10,BYTE,=0;

end_PINCheck;



start_InstancePart1;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%PlayerBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=325; instance entry list
MemWrite=%AddrFreeMem10,1,BYTE;
Delay=2000;
Mouse=696,443; OK
Delay=2000;
#ENDIF
_IFFrameVisible=329; quick entry
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_IFMemRead=%AddrFreeMem10,BYTE,=0;
Mouse=628,489; quick entry icon
Delay=4500;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=329,XPOS,0;
FrameAction=329,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=508; confirm
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=98,129; quick entry
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=2500;

_IFFrameVisible=508; confirm
#EXECUTE=InstancePart2;
#ENDIF

end_InstancePart1;





start_InstancePart2;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=330; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=161,73; <--
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=7200000; <-- 120 min timeout
_IFFrameVisible=331; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=331,XPOS,0;
FrameAction=331,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=30000;
_IFFrameVisible=442; race
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=109,90; enter
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;
FrameAction=309,STATE,HIDE;

<-- optional: add a small path here so you win against full AFK teams

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=1080000; <-- 18 min timeout
_IFFrameVisible=309; rewards
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=309,XPOS,0;
FrameAction=309,YPOS,0;
Delay=500;

Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=2150;

FlySmooth=133.022,349.152,124.814;
FlySmooth=125.085,345.75,124.781;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%PlayerBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
#ENDIF

FlySmooth=127.902,356.226,125.028;
MemWrite=%AddrFreeMem10,0,BYTE;
#DO=90000;
Command=/select Common Treasure Chest;
Delay=125;
Command=/attack;
Delay=4500;
_IFInventoryContains=185000320;
#ELSE
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

_IFInventoryContains=188058635; Big key box
FlySmooth=125.863,352.742,124.787;
UseID=188058635;
Delay=500;
FrameAction=433,XPOS,0;
FrameAction=433,YPOS,0;
Delay=500;
Mouse=67,68;
Delay=500;
Mouse=93,205;
Delay=500;
FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=500
Mouse=161,71;
Delay=2500;
MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=0;
Command=/select Ornate Treasure Chest;
Delay=125;
Command=/attack;
Delay=5500;
#ENDIF

MemPtrWrite=%PlayerBase,%OffsetAnim,0,WORD; <-- Activate NoAnim
#DO=30000;
Command=/leave;
Delay=1250;
_UNTILMemPtrRead=%PlayerBase,%OffsetAnim,WORD,>0;
Delay=9500;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%PlayerBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

end_InstancePart2;


start_SetResolution; <-- resizes client without using real mouse

Console=\r_Height 600;
Console=\r_Width 800;

end_SetResolution;
Paraly is offline  
Old 04/05/2018, 20:11   #7669
 
elite*gold: 0
Join Date: Nov 2014
Posts: 79
Received Thanks: 2
#SetVar1=Enter your PIN / example: 1|2|3|4|5|6/n/n(the seperators are no "i" and no "L";

hm, so is it "|" only in between pin or "/" or it has to be in the order of 5 of | and 2 of "/" if full 8 digit pin?

I am sorry for confusion Thanks
dlrjsajdi is offline  
Old 04/05/2018, 20:17   #7670
 
Paraly's Avatar
 
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
Quote:
Originally Posted by dlrjsajdi View Post
#SetVar1=Enter your PIN / example: 1|2|3|4|5|6/n/n(the seperators are no "i" and no "L";

hm, so is it "|" only in between pin or "/" or it has to be in the order of 5 of | and 2 of "/" if full 8 digit pin?

I am sorry for confusion Thanks
You can only use this "|", I know many people just don't see this key on their keyboard and they use a uppercase "i" or lower case "L" or a normal slash "/" it's neither of these

Here're few examples, you might just copy paste them if your PIN is like that (copy without the "")

"1|2|3|4|5|6"
"1|2|3|4|5|6|7|8"
"0|1|0|1|0|1|0|1"
"9|8|7|6|5|4"
Paraly is offline  
Old 04/05/2018, 20:26   #7671
 
elite*gold: 0
Join Date: Nov 2014
Posts: 79
Received Thanks: 2
got it Thanks
dlrjsajdi is offline  
Old 04/05/2018, 20:37   #7672
 
elite*gold: 0
Join Date: Nov 2007
Posts: 73
Received Thanks: 20
Quote:
Originally Posted by Paraly View Post
Replace
Code:
#EXECUTE=SetResolution;
with
Code:
#NeedResolution=816,638;

_____________

Another small update regarding the PIN and resizing part

Code:
#IF=%FirstTime,;
#SmoothBackground
#EXECUTE=SetResolution;
Delay=500;
#NeedResolution=816,638;
Delay=500;
#NeedResolution=816,638;
#UseLoop
UseSpeed=1;
WaitForResponse=Be sure you have 100% UI size/nBe sure all windows are reseted to default position/nBe sure Auto-Arrange windows is disabled/nBe sure click-to-move is disabled/n/nBe sure you stay next to Gogorunerk;
#SetVar2=How much characters you have?;
#SetVar1=Enter your PIN/nexample: "1|2|3|4|5|6"/n/n(the seperators are no "i" and no "L";
#SetVar3=Do you have an Instance Boost Pack?/n/n(1 = Yes)/n(0 = No);
_SetVar4=0; <- char counter
#SetVar5=How do you want to use the big keys?/n/n(0 = use them with the toon himself)/n(1 = Send them by mail)/n(2 = Keep them in inventory);
_SetVar7=0; <- item counter
MemWrite=%AddrFreeMem5,%Var5,BYTE;
_IFMemRead=%AddrFreeMem5,BYTE,=1;
#SetVar6=Enter the charactername you want to send the keys to;
#ENDIF


_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>9;
#EXECUTE=Enter;
#ENDIF

MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=1;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
_IFInventoryContains=185000319; ornate key
#EXECUTE=Mail;
#ENDIF

MemWrite=%AddrFreeMem1,%Var2,BYTE;
_IFMemRead=%AddrFreeMem1,BYTE,>1;
#EXECUTE=ChangeCharacter;
_Calc4=%Var4+1;
#ENDIF

MemWrite=%AddrFreeMem3,%Var4,BYTE;
_IFMemRead=%AddrFreeMem3,BYTE,=%Var2;
WaitForResponse=Finished;
#UseNoLoop
#EndScript
#ENDIF




start_Mail;

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=L; <-- Elyos
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1392.873,1266.345,339.819;
#EXECUTE=SendMail;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1420.528,1264.053,336.66;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=D; <-- Asmo
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1819.842,1986.981,199.197;
#EXECUTE=SendMail;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1811.884,1961.294,199.197;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

end_Mail;



start_SendMail;

Delay=250;
Command=/select Mailbox;
Delay=500;
Command=/select Mailbox;
Delay=500;
Command=/attack;
Delay=1500;
Mouse=87,109;
Delay=750;
SendKey=%Var6; <-- playername
Delay=1500;
_GetInventoryItemHandle=185000319; <-- itemID
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x9C,%VarItemID,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x94,%VarItemHandle,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xA8,%VarItemAmount,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x98,1,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xAC,0,DWORD;
_Calc7=%Var7+%VarItemAmount;
Mouse=188,393;
Delay=1000;
Mouse=442,344;
Delay=5;
Mouse=442,344;
Delay=500;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
MemPtrWrite=%AddrESChwnd,%OffsetESChwnd,142,BYTE;
Command=;

end_SendMail;



start_Enter;

#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;

MemWrite=%AddrFreeMem2,%Var3,BYTE;
_IFMemRead=%AddrFreeMem2,BYTE,=1;
#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;
#ENDIF

end_Enter;



start_ChangeCharacter;

Command=/logout;
Delay=15000;
#EXECUTE=SelectSlot;
Delay=1500;
Mouse=400,571; <-- Start
Delay=2000;
_IFFrameVisible=567; PIN window
#EXECUTE=PINCheck;
#ENDIF
Delay=6000;

end_ChangeCharacter;



start_SelectSlot;

MemWrite=%AddrFreeMem1,%Var2,BYTE;

_IFMemRead=%AddrFreeMem1,BYTE,=2;
Mouse=675,200;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=3;
Mouse=675,241;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=4;
Mouse=675,276;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=5;
Mouse=675,313;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=6;
Mouse=675,357;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=7;
Mouse=675,397;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=8;
Mouse=675,436;
#ENDIF

end_SelectSlot;



start_PINCheck;

MemWrite=%AddrFreeMem10,1,BYTE;
#DO=999999999;
_IFFrameVisible=567; PIN window
#EnterPIN=%Var1;
Delay=1000;
#ELSE
MemWrite=%AddrFreeMem10,0,BYTE;
#ENDIF
Delay=750;
_UNTILMemRead=%AddrFreeMem10,BYTE,=0;

end_PINCheck;



start_InstancePart1;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%PlayerBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=325; instance entry list
MemWrite=%AddrFreeMem10,1,BYTE;
Delay=2000;
Mouse=696,443; OK
Delay=2000;
#ENDIF
_IFFrameVisible=329; quick entry
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_IFMemRead=%AddrFreeMem10,BYTE,=0;
Mouse=628,489; quick entry icon
Delay=4500;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=329,XPOS,0;
FrameAction=329,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=508; confirm
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=98,129; quick entry
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=2500;

_IFFrameVisible=508; confirm
#EXECUTE=InstancePart2;
#ENDIF

end_InstancePart1;





start_InstancePart2;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=330; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=161,73; <--
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=7200000; <-- 120 min timeout
_IFFrameVisible=331; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=331,XPOS,0;
FrameAction=331,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=30000;
_IFFrameVisible=442; race
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=109,90; enter
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;
FrameAction=309,STATE,HIDE;

<-- optional: add a small path here so you win against full AFK teams

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=1080000; <-- 18 min timeout
_IFFrameVisible=309; rewards
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=309,XPOS,0;
FrameAction=309,YPOS,0;
Delay=500;

Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=2150;

FlySmooth=133.022,349.152,124.814;
FlySmooth=125.085,345.75,124.781;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%PlayerBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
#ENDIF

FlySmooth=127.902,356.226,125.028;
MemWrite=%AddrFreeMem10,0,BYTE;
#DO=90000;
Command=/select Common Treasure Chest;
Delay=125;
Command=/attack;
Delay=4500;
_IFInventoryContains=185000320;
#ELSE
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

_IFInventoryContains=188058635; Big key box
FlySmooth=125.863,352.742,124.787;
UseID=188058635;
Delay=500;
FrameAction=433,XPOS,0;
FrameAction=433,YPOS,0;
Delay=500;
Mouse=67,68;
Delay=500;
Mouse=93,205;
Delay=500;
FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=500
Mouse=161,71;
Delay=2500;
MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=0;
Command=/select Ornate Treasure Chest;
Delay=125;
Command=/attack;
Delay=5500;
#ENDIF

MemPtrWrite=%PlayerBase,%OffsetAnim,0,WORD; <-- Activate NoAnim
#DO=30000;
Command=/leave;
Delay=1250;
_UNTILMemPtrRead=%PlayerBase,%OffsetAnim,WORD,>0;
Delay=9500;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%PlayerBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

end_InstancePart2;


start_SetResolution; <-- resizes client without using real mouse

Console=\r_Height 600;
Console=\r_Width 800;

end_SetResolution;
Hi Paraly, I used this version and for some reason at the end they just click at the shugo and run towards it but then they inmediately go and loot the small box, the shugo quest is not being completed at that point.

After looting the box they just tp out of the instance and the quest is lost for that run.
thekiller258 is offline  
Thanks
1 User
Old 04/05/2018, 20:41   #7673
 
Paraly's Avatar
 
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
Fixed it

Code:
#IF=%FirstTime,;
#SmoothBackground
#EXECUTE=SetResolution;
Delay=500;
#NeedResolution=816,638;
Delay=500;
#NeedResolution=816,638;
#UseLoop
UseSpeed=1;
WaitForResponse=Be sure you have 100% UI size/nBe sure all windows are reseted to default position/nBe sure Auto-Arrange windows is disabled/nBe sure click-to-move is disabled/n/nBe sure you stay next to Gogorunerk;
#SetVar2=How much characters you have?;
#SetVar1=Enter your PIN/nexample: "1|2|3|4|5|6"/n/n(the seperators are no "i" and no "L";
#SetVar3=Do you have an Instance Boost Pack?/n/n(1 = Yes)/n(0 = No);
_SetVar4=0; <- char counter
#SetVar5=How do you want to use the big keys?/n/n(0 = use them with the toon himself)/n(1 = Send them by mail)/n(2 = Keep them in inventory);
_SetVar7=0; <- item counter
MemWrite=%AddrFreeMem5,%Var5,BYTE;
_IFMemRead=%AddrFreeMem5,BYTE,=1;
#SetVar6=Enter the charactername you want to send the keys to;
#ENDIF


_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>9;
#EXECUTE=Enter;
#ENDIF

MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=1;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
_IFInventoryContains=185000319; ornate key
#EXECUTE=Mail;
#ENDIF

MemWrite=%AddrFreeMem1,%Var2,BYTE;
_IFMemRead=%AddrFreeMem1,BYTE,>1;
#EXECUTE=ChangeCharacter;
_Calc4=%Var4+1;
#ENDIF

MemWrite=%AddrFreeMem3,%Var4,BYTE;
_IFMemRead=%AddrFreeMem3,BYTE,=%Var2;
WaitForResponse=Finished;
#UseNoLoop
#EndScript
#ENDIF




start_Mail;

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=L; <-- Elyos
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1392.873,1266.345,339.819;
#EXECUTE=SendMail;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1420.528,1264.053,336.66;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=D; <-- Asmo
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1819.842,1986.981,199.197;
#EXECUTE=SendMail;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1811.884,1961.294,199.197;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

end_Mail;



start_SendMail;

Delay=250;
Command=/select Mailbox;
Delay=500;
Command=/select Mailbox;
Delay=500;
Command=/attack;
Delay=1500;
Mouse=87,109;
Delay=750;
SendKey=%Var6; <-- playername
Delay=1500;
_GetInventoryItemHandle=185000319; <-- itemID
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x9C,%VarItemID,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x94,%VarItemHandle,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xA8,%VarItemAmount,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x98,1,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xAC,0,DWORD;
_Calc7=%Var7+%VarItemAmount;
Mouse=188,393;
Delay=1000;
Mouse=442,344;
Delay=5;
Mouse=442,344;
Delay=500;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
MemPtrWrite=%AddrESChwnd,%OffsetESChwnd,142,BYTE;
Command=;

end_SendMail;



start_Enter;

#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;

MemWrite=%AddrFreeMem2,%Var3,BYTE;
_IFMemRead=%AddrFreeMem2,BYTE,=1;
#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;
#ENDIF

end_Enter;



start_ChangeCharacter;

Command=/logout;
Delay=15000;
#EXECUTE=SelectSlot;
Delay=1500;
Mouse=400,571; <-- Start
Delay=2000;
_IFFrameVisible=567; PIN window
#EXECUTE=PINCheck;
#ENDIF
Delay=6000;

end_ChangeCharacter;



start_SelectSlot;

MemWrite=%AddrFreeMem1,%Var2,BYTE;

_IFMemRead=%AddrFreeMem1,BYTE,=2;
Mouse=675,200;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=3;
Mouse=675,241;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=4;
Mouse=675,276;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=5;
Mouse=675,313;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=6;
Mouse=675,357;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=7;
Mouse=675,397;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=8;
Mouse=675,436;
#ENDIF

end_SelectSlot;



start_PINCheck;

MemWrite=%AddrFreeMem10,1,BYTE;
#DO=999999999;
_IFFrameVisible=567; PIN window
#EnterPIN=%Var1;
Delay=1000;
#ELSE
MemWrite=%AddrFreeMem10,0,BYTE;
#ENDIF
Delay=750;
_UNTILMemRead=%AddrFreeMem10,BYTE,=0;

end_PINCheck;



start_InstancePart1;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=325; instance entry list
MemWrite=%AddrFreeMem10,1,BYTE;
Delay=2000;
Mouse=696,443; OK
Delay=2000;
#ENDIF
_IFFrameVisible=329; quick entry
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_IFMemRead=%AddrFreeMem10,BYTE,=0;
Mouse=628,489; quick entry icon
Delay=4500;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=329,XPOS,0;
FrameAction=329,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=508; confirm
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=98,129; quick entry
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=2500;

_IFFrameVisible=508; confirm
#EXECUTE=InstancePart2;
#ENDIF

end_InstancePart1;





start_InstancePart2;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=330; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=161,73; <--
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=7200000; <-- 120 min timeout
_IFFrameVisible=331; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=331,XPOS,0;
FrameAction=331,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=30000;
_IFFrameVisible=442; race
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=109,90; enter
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;
FrameAction=309,STATE,HIDE;

<-- optional: add a small path here so you win against full AFK teams

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=1080000; <-- 18 min timeout
_IFFrameVisible=309; rewards
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=309,XPOS,0;
FrameAction=309,YPOS,0;
Delay=500;

Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=2150;

FlySmooth=133.022,349.152,124.814;
FlySmooth=125.085,345.75,124.781;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
#ENDIF

FlySmooth=127.902,356.226,125.028;
MemWrite=%AddrFreeMem10,0,BYTE;
#DO=90000;
Command=/select Common Treasure Chest;
Delay=125;
Command=/attack;
Delay=4500;
_IFInventoryContains=185000320;
#ELSE
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

_IFInventoryContains=188058635; Big key box
FlySmooth=125.863,352.742,124.787;
UseID=188058635;
Delay=500;
FrameAction=433,XPOS,0;
FrameAction=433,YPOS,0;
Delay=500;
Mouse=67,68;
Delay=500;
Mouse=93,205;
Delay=500;
FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=500
Mouse=161,71;
Delay=2500;
MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=0;
Command=/select Ornate Treasure Chest;
Delay=125;
Command=/attack;
Delay=5500;
#ENDIF

MemPtrWrite=%PlayerBase,%OffsetAnim,0,WORD; <-- Activate NoAnim
#DO=30000;
Command=/leave;
Delay=1250;
_UNTILMemPtrRead=%PlayerBase,%OffsetAnim,WORD,>0;
Delay=9500;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

end_InstancePart2;


start_SetResolution; <-- resizes client without using real mouse

Console=\r_Height 600;
Console=\r_Width 800;

end_SetResolution;
Paraly is offline  
Thanks
1 User
Old 04/05/2018, 21:56   #7674
 
elite*gold: 0
Join Date: Nov 2007
Posts: 73
Received Thanks: 20
Quote:
Originally Posted by Paraly View Post
Fixed it

Code:
#IF=%FirstTime,;
#SmoothBackground
#EXECUTE=SetResolution;
Delay=500;
#NeedResolution=816,638;
Delay=500;
#NeedResolution=816,638;
#UseLoop
UseSpeed=1;
WaitForResponse=Be sure you have 100% UI size/nBe sure all windows are reseted to default position/nBe sure Auto-Arrange windows is disabled/nBe sure click-to-move is disabled/n/nBe sure you stay next to Gogorunerk;
#SetVar2=How much characters you have?;
#SetVar1=Enter your PIN/nexample: "1|2|3|4|5|6"/n/n(the seperators are no "i" and no "L";
#SetVar3=Do you have an Instance Boost Pack?/n/n(1 = Yes)/n(0 = No);
_SetVar4=0; <- char counter
#SetVar5=How do you want to use the big keys?/n/n(0 = use them with the toon himself)/n(1 = Send them by mail)/n(2 = Keep them in inventory);
_SetVar7=0; <- item counter
MemWrite=%AddrFreeMem5,%Var5,BYTE;
_IFMemRead=%AddrFreeMem5,BYTE,=1;
#SetVar6=Enter the charactername you want to send the keys to;
#ENDIF


_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>9;
#EXECUTE=Enter;
#ENDIF

MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=1;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
_IFInventoryContains=185000319; ornate key
#EXECUTE=Mail;
#ENDIF

MemWrite=%AddrFreeMem1,%Var2,BYTE;
_IFMemRead=%AddrFreeMem1,BYTE,>1;
#EXECUTE=ChangeCharacter;
_Calc4=%Var4+1;
#ENDIF

MemWrite=%AddrFreeMem3,%Var4,BYTE;
_IFMemRead=%AddrFreeMem3,BYTE,=%Var2;
WaitForResponse=Finished;
#UseNoLoop
#EndScript
#ENDIF




start_Mail;

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=L; <-- Elyos
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1392.873,1266.345,339.819;
#EXECUTE=SendMail;
FlySmooth=1392.873,1266.345,339.819;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1416.913,1275.82,336.438;
FlySmooth=1420.528,1264.053,336.66;
FlySmooth=1420.528,1264.053,336.66;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x10C0,CHAR[1],=D; <-- Asmo
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1819.842,1986.981,199.197;
#EXECUTE=SendMail;
FlySmooth=1819.842,1986.981,199.197;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1803.919,1979.276,197.804;
FlySmooth=1811.884,1961.294,199.197;
FlySmooth=1811.884,1961.294,199.197;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],8;
TrayInfo=%Var8 has send %VarItemAmount Ornate Treasure Keys to %Var6, total keys send: %Var7;
#ENDIF

end_Mail;



start_SendMail;

Delay=250;
Command=/select Mailbox;
Delay=500;
Command=/select Mailbox;
Delay=500;
Command=/attack;
Delay=1500;
Mouse=87,109;
Delay=750;
SendKey=%Var6; <-- playername
Delay=1500;
_GetInventoryItemHandle=185000319; <-- itemID
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x9C,%VarItemID,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x94,%VarItemHandle,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xA8,%VarItemAmount,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0x98,1,DWORD;
MemPtrWrite=%AddrMail,0x5E0/0x3B8/0x0/0xAC,0,DWORD;
_Calc7=%Var7+%VarItemAmount;
Mouse=188,393;
Delay=1000;
Mouse=442,344;
Delay=5;
Mouse=442,344;
Delay=500;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
SendKey=0x1B;
Delay=5;
MemPtrWrite=%AddrESChwnd,%OffsetESChwnd,142,BYTE;
Command=;

end_SendMail;



start_Enter;

#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;

MemWrite=%AddrFreeMem2,%Var3,BYTE;
_IFMemRead=%AddrFreeMem2,BYTE,=1;
#EXECUTE=InstancePart1;
Delay=2500;
#EXECUTE=InstancePart1;
#ENDIF

end_Enter;



start_ChangeCharacter;

Command=/logout;
Delay=15000;
#EXECUTE=SelectSlot;
Delay=1500;
Mouse=400,571; <-- Start
Delay=2000;
_IFFrameVisible=567; PIN window
#EXECUTE=PINCheck;
#ENDIF
Delay=6000;

end_ChangeCharacter;



start_SelectSlot;

MemWrite=%AddrFreeMem1,%Var2,BYTE;

_IFMemRead=%AddrFreeMem1,BYTE,=2;
Mouse=675,200;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=3;
Mouse=675,241;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=4;
Mouse=675,276;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=5;
Mouse=675,313;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=6;
Mouse=675,357;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=7;
Mouse=675,397;
#ENDIF

_IFMemRead=%AddrFreeMem1,BYTE,=8;
Mouse=675,436;
#ENDIF

end_SelectSlot;



start_PINCheck;

MemWrite=%AddrFreeMem10,1,BYTE;
#DO=999999999;
_IFFrameVisible=567; PIN window
#EnterPIN=%Var1;
Delay=1000;
#ELSE
MemWrite=%AddrFreeMem10,0,BYTE;
#ENDIF
Delay=750;
_UNTILMemRead=%AddrFreeMem10,BYTE,=0;

end_PINCheck;



start_InstancePart1;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=325; instance entry list
MemWrite=%AddrFreeMem10,1,BYTE;
Delay=2000;
Mouse=696,443; OK
Delay=2000;
#ENDIF
_IFFrameVisible=329; quick entry
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_IFMemRead=%AddrFreeMem10,BYTE,=0;
Mouse=628,489; quick entry icon
Delay=4500;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=329,XPOS,0;
FrameAction=329,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=508; confirm
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=98,129; quick entry
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=2500;

_IFFrameVisible=508; confirm
#EXECUTE=InstancePart2;
#ENDIF

end_InstancePart1;





start_InstancePart2;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=20000;
_IFFrameVisible=330; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=161,73; <--
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=7200000; <-- 120 min timeout
_IFFrameVisible=331; search
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=331,XPOS,0;
FrameAction=331,YPOS,0;
Delay=2500;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=30000;
_IFFrameVisible=442; race
MemWrite=%AddrFreeMem10,1,BYTE;
#ELSE
Mouse=109,90; enter
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

Delay=2500;
FrameAction=309,STATE,HIDE;

<-- optional: add a small path here so you win against full AFK teams

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=1080000; <-- 18 min timeout
_IFFrameVisible=309; rewards
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
#IF=%Timer=999,120000;
SendAction=3,2; anti afk jump
CreateTimer=999;
#ENDIF
Delay=2500;
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

FrameAction=309,XPOS,0;
FrameAction=309,YPOS,0;
Delay=500;

Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=150;
Mouse=333,298; ok
Delay=2150;

FlySmooth=133.022,349.152,124.814;
FlySmooth=125.085,345.75,124.781;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
#ENDIF

FlySmooth=127.902,356.226,125.028;
MemWrite=%AddrFreeMem10,0,BYTE;
#DO=90000;
Command=/select Common Treasure Chest;
Delay=125;
Command=/attack;
Delay=4500;
_IFInventoryContains=185000320;
#ELSE
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

_IFInventoryContains=188058635; Big key box
FlySmooth=125.863,352.742,124.787;
UseID=188058635;
Delay=500;
FrameAction=433,XPOS,0;
FrameAction=433,YPOS,0;
Delay=500;
Mouse=67,68;
Delay=500;
Mouse=93,205;
Delay=500;
FrameAction=508,XPOS,0;
FrameAction=508,YPOS,0;
Delay=500
Mouse=161,71;
Delay=2500;
MemWrite=%AddrFreeMem5,%Var5,BYTE; <- mail status
_IFMemRead=%AddrFreeMem5,BYTE,=0;
Command=/select Ornate Treasure Chest;
Delay=125;
Command=/attack;
Delay=5500;
#ENDIF

MemPtrWrite=%PlayerBase,%OffsetAnim,0,WORD; <-- Activate NoAnim
#DO=30000;
Command=/leave;
Delay=1250;
_UNTILMemPtrRead=%PlayerBase,%OffsetAnim,WORD,>0;
Delay=9500;

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,>50;
Command=/select Gogorunerk;
Delay=125;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=Gogorunerk;
Command=/attack;
Delay=4500;
_IFFrameVisible=170;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
DialogClick=;
Delay=1000;
Mouse=194,391;
#ENDIF

end_InstancePart2;


start_SetResolution; <-- resizes client without using real mouse

Console=\r_Height 600;
Console=\r_Width 800;

end_SetResolution;
Thank you Paraly, it works like a charm .

There's still something that is worrying me, aparently Quick entry isn't that popular as we expected, I've seen plenty of groups forming up on LFG for AFK runs instead tho, the reason of this is because they have faster instance pop times.

Right now I have 3 Elyos toons like this:

That's why I think an option to group / regroup x 3 is really good, no matter if it has no multicharacter support.

Edit: 1 Elyos toon poped up after 1 hour 10 minutes, so it wasnt a bugged instance entry
thekiller258 is offline  
Old 04/05/2018, 22:00   #7675
 
Paraly's Avatar
 
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
Quote:
Originally Posted by thekiller258 View Post
Thank you Paraly, it works like a charm .

There's still something that is worrying me, aparently Quick entry isn't that popular as we expected, I've seen plenty of groups forming up on LFG for AFK runs instead tho, the reason of this is because they have faster instance pop times.

Right now I have 3 Elyos toons like this:

That's why I think an option to group / regroup x 3 is really good, no matter if it has no multicharacter support.

Edit: 1 Elyos toon poped up after 1 hour 10 minutes, so it wasnt a bugged instance entry
Yea I thought about it already, I might add it.
however I'm busy tomorrow
Paraly is offline  
Thanks
2 Users
Old 04/06/2018, 08:20   #7676
 
elite*gold: 0
Join Date: Jul 2010
Posts: 398
Received Thanks: 77
Quote:
Originally Posted by Paraly View Post
...
Paraly the script also misses a Command=; inside the "#IF=%FirstTime,;"

And also we miss the
MemPtrWrite=%AddrFPS,%OffsetFPS1,24,BYTE;
MemPtrWrite=%AddrFPS,%OffsetFPS2,24,FLOAT;

after the smooth background, I realized it after I saw my clients were too problematic trying to run it.

~~~~~~~~~

Something weird happens in the end of the instance, my main got 0 mails from the others with the keys and they didn't handle back the quests outside the instance, they just went character screen and next char.

I think I found the problem, after he uses /leave from the instance, that 9500ms delay is not enough to load the screen so when he checks the lvl (if he is above lvl 50) he sees nothing so goes directly to logout screen.

Also when goes to get the repeatable, it is weird, he doesn't take it all the time.

I'll increase some delays for my script and see if it works now and I'll have to check the quest take and give, he seems not to take the quest all the time too.

~~~~~

We can also add this snippet to open those pouches since they are not stackable and they can give keys as well. We can call this procedure once and it will open as many common pouches we have (I took this from the procedure you have for opening the small chests)

#EXECUTE=OpenCommonBundle;


Code:
start_OpenCommonBundle;

MemWrite=%AddrFreeMem10,0,BYTE;
#DO=90000;
_IFInventoryContains=188058577; common treasure bundle
Command=/use Gogorunerk's Gauntlet Common Treasure Chest Bundle;
Delay=1000;
SendKey=0x0D; Enter
Delay=4500; waits to open it
#ELSE
MemWrite=%AddrFreeMem10,1,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem10,BYTE,=1;

end_OpenCommonBundle;
~

And I am going to make my own procedure, instead of sending mail, I'll make all chars go to the warehouse npcs, open the legion warehouse (that my main owns) and they will keep right clicking their first cube, whatever is tradeable will be deposited, whatever is not, will remain in their inventory. The only thing is that the legion wh cannot be open by more than 1 chars at the moment. But it is fine, I will simply make a routine to check if the wh window opened, if not retry after 5 seconds (etc)

There are so many things that need to be traded other than the golden key. So this will be necessary, but you gotta have a legion warehouse owned by your char to do something like this
Diavolakos is offline  
Old 04/06/2018, 21:44   #7677
 
Paraly's Avatar
 
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
Quote:
Originally Posted by xndinlove View Post
Easy fix for that is changing "Quick Group" to "New Group"
I thought that it would take too long to pop and it's exactly whats happening

While Paraly is busy, here's the "New Group" version I modified. It works like a charm
Did you test it multiple times?

I started with New Group but I got faster entrys with Quick Entry

As far as I remember from the times when I played active, New group made the system only give you groups with a healer, dps and tank also you get a new instance ID

Quick group didn't care about the group composition even 6x SM were possible also it made you join in dredgions that were running already for example
Paraly is offline  
Old 04/06/2018, 21:54   #7678
 
xndinlove's Avatar
 
elite*gold: 0
Join Date: Apr 2013
Posts: 94
Received Thanks: 13
Quote:
Originally Posted by Paraly View Post
Did you test it multiple times?

I started with New Group but I got faster entrys with Quick Entry

As far as I remember from the times when I played active, New group made the system only give you groups with a healer, dps and tank also you get a new instance ID

Quick group didn't care about the group composition even 6x SM were possible also it made you join in dredgions that were running already for example
actually... when i use New Group with multiple accounts it goes really fast. I just tested with only 1 account and its taking forever to pop

looks like New Group works better when there's multiple applications at once. for example, i have 15 accounts online and just take me 1~3 minutes to pop
xndinlove is offline  
Thanks
1 User
Old 04/07/2018, 07:12   #7679
 
elite*gold: 0
Join Date: Mar 2016
Posts: 89
Received Thanks: 8
Guys only for me quest from event is buged ? after i complete 5 times he give me only runing scroll 1 h ... no box with key.

Please create one for New Group entry , or tell me what comand need to change for go inside with first option...
alkinus is offline  
Old 04/07/2018, 10:32   #7680
 
Paraly's Avatar
 
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
Quote:
Originally Posted by alkinus View Post
Guys only for me quest from event is buged ? after i complete 5 times he give me only runing scroll 1 h ... no box with key.

Please create one for New Group entry , or tell me what comand need to change for go inside with first option...
The repeatable quest is bugged, people already posted it

Search for this line
Code:
Mouse=98,129; quick entry
and replace it with this line
Code:
Mouse=98,103; new group entry
Paraly is offline  
Reply

Tags
animation, cheat, hack, script, vanillatool


Similar Threads Similar Threads
Para's VanillaTool [hack undetected]
12/11/2014 - Aion Hacks, Bots, Cheats & Exploits - 497 Replies
http://i.epvpimg.com/k6WPg.png http://epvpimg.com/mhK2h.png



All times are GMT +1. The time now is 18:00.


Powered by vBulletin®
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.
This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Terms of Service | Abuse
Copyright ©2025 elitepvpers All Rights Reserved.