Para's Script Library

Page 145 of 176

145

01/09/2019 20:53 Paraly#2161

If someone wants to switch the grind spot of the Combat Wizard after X minutes here's a template file that supports 4 different routes

You need to manually paste the additional Grind and Return Paths to the correct areas, I commented the necessary lines.

01/09/2019 21:23 HansTH#2162

@[Only registered and activated users can see links. Click Here To Register...]
Why i'm getting always a sendlog if i try to run the npc/shugo check script?

Any settings i have to preset or smth?

01/09/2019 21:24 Paraly#2163

Quote:

Originally Posted by HansTH

@[Only registered and activated users can see links. Click Here To Register...]
Why i'm getting always a sendlog if i try to run the npc/shugo check script?

Any settings i have to preset or smth?

Did you use the latest version 1.03?

Did you update your Aion Client with the official launcher?

01/09/2019 23:21 HansTH#2164

Quote:

Originally Posted by Paraly

Did you use the latest version 1.03?

Did you update your Aion Client with the official launcher?

1. Shugo Detector is 1.01, where to find the newer version?
Got 1.01 from a post of you in another thread

2. Yes, updated it today.

01/09/2019 23:22 Paraly#2165

Quote:

Originally Posted by HansTH

1. Shugo Detector is 1.01, where to find the newer version?
Got 1.01 from a post of you in another thread

2. Yes, updated it today.

[Only registered and activated users can see links. Click Here To Register...]

01/10/2019 18:20 wickedfever#2166

i put the Grind and return path in your commented lines but it keeps going into Grind path frist and never to return path??

Quote:

Originally Posted by Paraly

If someone wants to switch the grind spot of the Combat Wizard after X minutes here's a template file that supports 4 different routes

You need to manually paste the additional Grind and Return Paths to the correct areas, I commented the necessary lines.

01/10/2019 18:29 Paraly#2167

Quote:

Originally Posted by wickedfever

i put the Grind and return path in your commented lines but it keeps going into Grind path frist and never to return path??

You mean you started the script from next to the obelisk, right?

Fixed here

01/11/2019 16:47 wickedfever#2168

it still didnt work, now it wont loop grind or path.

Quote:

Originally Posted by Paraly

You mean you started the script from next to the obelisk, right?

Fixed here

01/11/2019 17:47 Paraly#2169

Quote:

Originally Posted by wickedfever

it still didnt work, now it wont loop grind or path.

Send me a PM with your edited code

01/11/2019 19:10 zorak10#2170

Im trying using it but its not looting main target..
I saw the ID:50003 (select target the target) but i didint see ID:50002 (loot)
Can help me with this? pls
Thanks advanced

Quote:

Originally Posted by Paraly

Someone requested a script where a toon follows the main and just keeps looting his targets

Code:

#IF=%FirstTime,;
#DisableScrolling
MemPtrWrite=%AddrFPS,%OffsetFPS1,24,BYTE;
MemPtrWrite=%AddrFPS,%OffsetFPS2,24,FLOAT;
#SmoothBackground
UseSpeed=1;
#UseLoop
#EnableChatLog
#ClearChatLog
#SetVar1=Enter your main charactername;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],2;
Command=;
#ENDIF


#EXECUTE=Follow;

#EXECUTE=Keywords;
#EXECUTE=Notification;

#EXECUTE=CheckLoot;




start_Follow;


#EXECUTE=SelectMaster;
#IF=%TargetDistance,<20;
#IF=%TargetName,%Var1;
Command=/Follow;
#ELSE
Command=/attack;
#ENDIF


end_Follow;




start_CheckLoot;

_SetVar4=0;

_MemPtrReadVar=%PlayerBase,%OffsetData/0x30,WORD,29;
_MemPtrReadVar=%TargetBase,%OffsetData/0x30,WORD,28;

_IFMemPtrRead=%AddrFrameID[2],0x558,WORD,=%Var29; <-- if target has player as target
_SetVar4=1;
#ENDIF

_IFMemPtrRead=%AddrFrameID[2],0x558,WORD,=%Var28; <-- if target has target as target
_SetVar4=1;
#ENDIF

_IFMemPtrRead=%AddrFrameID[2],0x558,WORD,=0; <-- if target has nothing as target
_SetVar4=1;
#ENDIF

#IF=%Var4,=0;
UseID=50003;
Delay=50;
_IFMemPtrRead=%TargetBase,%OffsetHP,DWORD,=0; Dead
_IFMemPtrRead=%TargetBase,%OffsetData/0x1574,DWORD,=1; Lootable
_IFMemPtrRead=%TargetBase,%OffsetData/0x1588,DWORD,=0; Not Looted yet
_MemReadVar=%AddrTargetID,WORD,5;
#EXECUTE=WaitForLoot;
#ENDIF

end_CheckLoot;



start_WaitForLoot;

_SetVar6=0;

#DO=8000; 8 seconds loot timeout

_IFMemPtrRead=%TargetBase,%OffsetHP,DWORD,=0;
MemPtrWrite=%PlayerBase,%OffsetActionID,0x150000000100000000000000000000000000000000000000010000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000010000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002,BYTE[225];
#ENDIF

_IFMemPtrRead=%TargetBase,%OffsetData/0x1588,DWORD,>0; <-- Looted
_SetVar6=1;
#ENDIF

_IFMemRead=%AddrTargetID,WORD,=%Var5; <-- Lost target
#ELSE
_SetVar6=1;
#ENDIF

_IFMemPtrRead=%AddrFrameID[275],0x28,BYTE,=175;
SendKey=0x43;
Delay=5;
SendKey=0x43;
Delay=5;
SendKey=0x43;
Delay=5;
SendKey=0x43;
Delay=15;
_SetVar6=1;
_IFMemPtrRead=%AddrFrameID[525],0x28,BYTE,=175;
SendKey=0x0D;
Delay=50;
SendKey=0x0D;
Delay=50;
Command=;
SendKey=0x1B;
MemPtrWrite=%AddrFrameID[19],0x28,142,BYTE;
#ENDIF

_IFMemPtrRead=%AddrFrameID[525],0x28,BYTE,=175;
SendKey=0x0D;
Delay=50;
SendKey=0x0D;
Delay=50;
Command=;
SendKey=0x1B;
MemPtrWrite=%AddrFrameID[19],0x28,142,BYTE;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetHP,DWORD,=0;
_SetVar6=1;
#ENDIF

#UNTIL=%Var6,=1;

SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
MemPtrWrite=%AddrFrameID[19],0x28,142,BYTE;

end_WaitForLoot;


start_Notification;


#EXECUTE=SelectMaster;
#IF=%TargetName,;
Command=/w %Var1 I don't see you anymore, I'll wait [pos:here/:0 %Var3 %Var1 %Var2 0.0 0];
#DO=999999999;
Command=/select %Var1;
#UNTIL=%TargetName,%Var1;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetPercentHP,BYTE,<50;<-- Use if lower than 50% life
#IF=%Timer=1,60000;
Command=/w %Var1 I'm low life!;
CreateTimer=1;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetPercentHP,BYTE,<99;<-- Use if lower than 99% life
#IF=%Timer=1,60000;
Command=/w %Var1 I'm under attack!;
CreateTimer=1;
#ENDIF


end_Notification;





start_Keywords;


_SearchChatLog=\[charname:%Var1.*?] Whispers: Hello!;
Command=/w %Var1 Hey;
#ENDIF

_SearchChatLog=\[charname:%Var1.*?] Whispers: Stay here!;
#EXECUTE=SelectMaster;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=%Var1;
_MemPtrReadVar=%TargetBase,%OffsetPosX,FLOAT,6;
_MemPtrReadVar=%TargetBase,%OffsetPosY,FLOAT,7;
_MemPtrReadVar=%TargetBase,%OffsetPosZ,FLOAT,8;
MoveTo=%Var6,%Var7,%Var8,False,False;
Command=/w %Var1 ok I'll wait [pos:here/:0 %Var6 %Var7 %Var8 0.0 0];
_SetVar9=0;
#EXECUTE=Wait;
#ENDIF

#ClearChatLog

end_Keywords;


start_Wait;

#DO=9999999999;
_SearchChatLog=\[charname:%Var1.*?] Whispers: Follow me!;
_SetVar9=1;
#ENDIF
Delay=500;
#UNTIL=%Var9,=1;

end_Wait;


start_SelectSlave;


_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=%Var2;
#ELSE
Command=/select %Var2;
Delay=5;
#ENDIF


end_SelectSlave;




start_SelectMaster;


_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=%Var1;
#ELSE
Command=/select %Var1;
Delay=5;
#ENDIF


end_SelectMaster;

The follower toon can also be whispered with

"Hello!" - The follower returns "Hey!" (just a ping to check if he works properly)

"Stay here!" - The follower waits at your position till you whisper him "Follow me!"

01/11/2019 23:54 Paraly#2171

Quote:

Originally Posted by zorak10

Im trying using it but its not looting main target..
I saw the ID:50003 (select target the target) but i didint see ID:50002 (loot)
Can help me with this? pls
Thanks advanced

Here's the fixed code

Code:

#IF=%FirstTime,;
#DisableScrolling
MemPtrWrite=%AddrFPS,%OffsetFPS1,24,BYTE;
MemPtrWrite=%AddrFPS,%OffsetFPS2,24,FLOAT;
#SmoothBackground
UseSpeed=1;
#UseLoop
#EnableChatLog
#ClearChatLog
#SetVar1=Enter your main charactername;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],2;
Command=;
_SetVar26=65536;
#ENDIF


#EXECUTE=Follow;

#EXECUTE=Keywords;
#EXECUTE=Notification;

#EXECUTE=CheckLoot;




start_Follow;


#EXECUTE=SelectMaster;
#IF=%TargetDistance,<20;
#IF=%TargetName,%Var1;
Command=/Follow;
#ELSE
Command=/attack;
#ENDIF


end_Follow;




start_CheckLoot;

_SetVar4=0;

_MemPtrReadVar=%PlayerBase,%OffsetData/0x30,WORD,29;
_MemPtrReadVar=%TargetBase,%OffsetData/0x30,WORD,28;
_MemPtrReadVar=%TargetBase,%OffsetData/0x378,WORD,27;

#IF=%Var27,=%Var29; <-- if target has player as target
_SetVar4=1;
#ENDIF

#IF=%Var27,=%Var28; <-- if target has target as target
_SetVar4=1;
#ENDIF

#IF=%Var27,=0; <-- if target has nothing as target
_SetVar4=1;
#ENDIF

_IFMemPtrRead=%AddrFrameID[2],0x558,WORD,>0; If target's target is alive
_SetVar4=1;
#ENDIF

#IF=%Var27,=Var26; <-- if target has looted target as target
_SetVar4=1;
#ENDIF

#IF=%Var4,=0;
_SetVar26=%Var27;
UseID=50003;
Delay=55;
_IFMemPtrRead=%TargetBase,%OffsetHP,DWORD,=0; Dead
_IFMemPtrRead=%TargetBase,%OffsetData/0x1574,DWORD,=1; Lootable
_IFMemPtrRead=%TargetBase,%OffsetData/0x1588,DWORD,=0; Not Looted yet
_MemReadVar=%AddrTargetID,WORD,5;
#EXECUTE=WaitForLoot;
#ENDIF

end_CheckLoot;



start_WaitForLoot;

_SetVar6=0;

#DO=12000; 12 seconds loot timeout

MemPtrWrite=%PlayerBase,%OffsetActionID,0x150000000100000000000000000000000000000000000000010000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000010000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000000002,BYTE[225];

_IFMemPtrRead=%TargetBase,%OffsetData/0x1588,DWORD,>0; <-- Looted
_SetVar6=1;
#ENDIF

_IFMemRead=%AddrTargetID,WORD,=%Var5; <-- Lost target
#ELSE
_SetVar6=1;
#ENDIF

_IFMemPtrRead=%AddrFrameID[275],0x28,BYTE,=175;
SendKey=0x43;
Delay=5;
SendKey=0x43;
Delay=5;
SendKey=0x43;
Delay=5;
SendKey=0x43;
Delay=15;
_SetVar6=1;
_IFMemPtrRead=%AddrFrameID[525],0x28,BYTE,=175;
SendKey=0x0D;
Delay=50;
SendKey=0x0D;
Delay=50;
Command=;
SendKey=0x1B;
MemPtrWrite=%AddrFrameID[19],0x28,142,BYTE;
#ENDIF

_IFMemPtrRead=%AddrFrameID[525],0x28,BYTE,=175;
SendKey=0x0D;
Delay=50;
SendKey=0x0D;
Delay=50;
Command=;
SendKey=0x1B;
MemPtrWrite=%AddrFrameID[19],0x28,142,BYTE;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetHP,DWORD,=0;
_SetVar6=1;
#ENDIF

#UNTIL=%Var6,=1;

SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
MemPtrWrite=%AddrFrameID[19],0x28,142,BYTE;

end_WaitForLoot;


start_Notification;


#EXECUTE=SelectMaster;
#IF=%TargetName,;
Command=/w %Var1 I don't see you anymore, I'll wait [pos:here/:0 %Var3 %Var1 %Var2 0.0 0];
#DO=999999999;
Command=/select %Var1;
#UNTIL=%TargetName,%Var1;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetPercentHP,BYTE,<50;<-- Use if lower than 50% life
#IF=%Timer=1,60000;
Command=/w %Var1 I'm low life!;
CreateTimer=1;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetPercentHP,BYTE,<99;<-- Use if lower than 99% life
#IF=%Timer=1,60000;
Command=/w %Var1 I'm under attack!;
CreateTimer=1;
#ENDIF


end_Notification;





start_Keywords;


_SearchChatLog=\[charname:%Var1.*?] Whispers: Hello!;
Command=/w %Var1 Hey;
#ENDIF

_SearchChatLog=\[charname:%Var1.*?] Whispers: Stay here!;
#EXECUTE=SelectMaster;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=%Var1;
_MemPtrReadVar=%TargetBase,%OffsetPosX,FLOAT,6;
_MemPtrReadVar=%TargetBase,%OffsetPosY,FLOAT,7;
_MemPtrReadVar=%TargetBase,%OffsetPosZ,FLOAT,8;
MoveTo=%Var6,%Var7,%Var8,False,False;
Command=/w %Var1 ok I'll wait [pos:here/:0 %Var6 %Var7 %Var8 0.0 0];
_SetVar9=0;
#EXECUTE=Wait;
#ENDIF

#ClearChatLog

end_Keywords;


start_Wait;

#DO=9999999999;
_SearchChatLog=\[charname:%Var1.*?] Whispers: Follow me!;
_SetVar9=1;
#ENDIF
Delay=500;
#UNTIL=%Var9,=1;

end_Wait;


start_SelectSlave;


_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=%Var2;
#ELSE
Command=/select %Var2;
Delay=5;
#ENDIF


end_SelectSlave;




start_SelectMaster;


_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[32],=%Var1;
#ELSE
Command=/select %Var1;
Delay=5;
#ENDIF


end_SelectMaster;

01/14/2019 17:00 derboos#2172

Yo Para,

not sure if it's just me but the broker bot 1.28 isn't faking the Kinah Client sided anymore for me. Before I could see the kinah I selected in my inventory, now the Kinah isn't changing anymore

01/14/2019 17:02 Paraly#2173

Quote:

Originally Posted by derboos

Yo Para,

not sure if it's just me but the broker bot 1.28 isn't faking the Kinah Client sided anymore for me. Before I could see the kinah I selected in my inventory, now the Kinah isn't changing anymore

You mean the "simplified" or the "no edit needed" version?
EU or NA?
Did you patch your client to the latest state? (Vanillatool and Aion)

01/14/2019 17:11 derboos#2174

Yeah should all be latest state, Vanilla 6.05 and launched Aion with normal Launcher (so should be also up to date)
It's EU simplified
Everything else of the Script is working

Now it's working again.... haven't changed anything at all. Just let the script run till now and checked the inventory Kinah again.

01/14/2019 22:19 tobiaschko#2175

Have anyone a Lvl script from lvl 1-65 or 75 for Aion EU ?

Page 145 of 176

145