|
You last visited: Today at 21:24
Advertisement
Para's Script Library
Discussion on Para's Script Library within the Aion forum part of the MMORPGs category.
|
View Poll Results: You want the scripts for any client language?
|
|
Yes, surely!
|
   
|
273 |
37.14% |
|
No, english and german are enough for me.
|
  
|
462 |
62.86% |
07/17/2020, 04:31
|
#2491
|
elite*gold: 0 
Join Date: Nov 2014
Posts: 79
Received Thanks: 2
|
Quote:
Originally Posted by Paraly
working fine here
Delete your "bin64" and "data/dump" folder and repair your files afterwards
Also restart the Account Manager
|
Ah, I was dumb, only problem was my vanilla tool was out dated. Working like it was before now. Thanks again
|
|
|
|
07/24/2020, 11:01
|
#2492
|
elite*gold: 0
Join Date: Dec 2013
Posts: 31
Received Thanks: 2
|
In the gather function, how can I edit to get only Ultimate product type?
For example I am gathering Peridot and i just want got Ultimate Peridot and cancel Ancient and Legendary to save Katalam Essencetapper:
Code:
Command=/select Peridot;
Delay=150;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=Peridot;
_IFMemPtrRead=%TargetBase,%OffsetPosX,float,2193.09-2197.09;
_IFMemPtrRead=%TargetBase,%OffsetPosY,float,2058.76-2062.76;
_IFMemPtrRead=%TargetBase,%OffsetPosZ,float,245.83-249.83;
#DO=60000;
SendKey=0x43;
Delay=500;
_UNTILMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=;
_Calc8=%Var8+1;
#ENDIF
|
|
|
|
|
07/24/2020, 11:37
|
#2493
|
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
|
Quote:
Originally Posted by Na.Q
In the gather function, how can I edit to get only Ultimate product type?
For example I am gathering Peridot and i just want got Ultimate Peridot and cancel Ancient and Legendary to save Katalam Essencetapper:
Code:
Command=/select Peridot;
Delay=150;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=Peridot;
_IFMemPtrRead=%TargetBase,%OffsetPosX,float,2193.09-2197.09;
_IFMemPtrRead=%TargetBase,%OffsetPosY,float,2058.76-2062.76;
_IFMemPtrRead=%TargetBase,%OffsetPosZ,float,245.83-249.83;
#DO=60000;
SendKey=0x43;
Delay=500;
_UNTILMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=;
_Calc8=%Var8+1;
#ENDIF
|
Did you see this example script?
Code:
#IF=%FirstTime,;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],PlayerName;
#EXECUTE=GetEssenceTappingAddr;
#ENDIF
#DO=120000;
_MemReadVar=%Var[ET_AddrItemID],DWORD,ET_ItemID;
_MemReadVar=%Var[ET_AddrAmount],DWORD,ET_Amount;
_MemReadVar=%Var[ET_AddrSuccess],DWORD,ET_Success;
_MemReadVar=%Var[ET_AddrFailure],DWORD,ET_Failure;
_MemReadVar=%Var[ET_AddrComplete],DWORD,ET_Complete;
_MemReadVar=%Var[ET_AddrLevel],DWORD,ET_Level;
Display=ItemID: %Var[ET_ItemID]/nAmount: %Var[ET_Amount]/nSuccess: %Var[ET_Success]/nFailure: %Var[ET_Failure]/nCompleted at: %Var[ET_Complete]/n/nEssenceTapping at: %Var[ET_Level]/n,0,0,EssenceTappingData: %Var[PlayerName];
Delay=10;
#UNTIL=1,=2;
start_GetEssenceTappingAddr;
_MemReadVar=%AddrFreeMem8,DWORD,cache;
MemWrite=%AddrFreeMem8,%AddrFoV,DWORD;
_MemReadVar=%AddrFreeMem8,DWORD,temp;
MemWrite=%AddrFreeMem8,%Var[cache],DWORD;
_Calc[ET_AddrItemID]=%Var[temp]-5256;
_Calc[ET_AddrAmount]=%Var[temp]-5248;
_Calc[ET_AddrSuccess]=%Var[temp]-5232;
_Calc[ET_AddrFailure]=%Var[temp]-5228;
_Calc[ET_AddrComplete]=%Var[temp]-5224;
_MemPattern=3275000032750000................FFFFFFFFFFFFFFFF..........000000................0E000000000000000F00000000000000000000000000000000000000000000001500000000......00000000..........000000010000000000000000000000000000000000000000000000..000000..000000,116,False,0x10000000/0x17F000000;
#IF=%Var[PatternFound],>0;
_SetVar=ET_AddrLevel,%Var[PatternRet_1];
#ENDIF
end_GetEssenceTappingAddr;
It displays all informations you need, so what you would do is
Code:
#IF=%FirstTime,;
#EXECUTE=GetEssenceTappingAddr;
#ENDIF
Command=/select Peridot;
Delay=150;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=Peridot;
_IFMemPtrRead=%TargetBase,%OffsetPosX,float,2193.09-2197.09;
_IFMemPtrRead=%TargetBase,%OffsetPosY,float,2058.76-2062.76;
_IFMemPtrRead=%TargetBase,%OffsetPosZ,float,245.83-249.83;
#DO=60000;
SendKey=0x43;
#EXECUTE=Collect;
_UNTILMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=;
_Calc8=%Var8+1;
#ENDIF
start_Collect;
#DO=500;
Delay=10;
_UNTILMemRead=%Var[ET_AddrItemID],DWORD,>0; // wait till collecting has started
_IFMemRead=%Var[ET_AddrItemID],DWORD,=152003057; // If is Ultimate Peridot
#DO=60000;
Delay=333;
_UNTILMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=;
#ELSE
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
#ENDIF
end_Collect;
start_GetEssenceTappingAddr;
_MemReadVar=%AddrFreeMem8,DWORD,cache;
MemWrite=%AddrFreeMem8,%AddrFoV,DWORD;
_MemReadVar=%AddrFreeMem8,DWORD,temp;
MemWrite=%AddrFreeMem8,%Var[cache],DWORD;
_Calc[ET_AddrItemID]=%Var[temp]-5256;
_Calc[ET_AddrAmount]=%Var[temp]-5248;
_Calc[ET_AddrSuccess]=%Var[temp]-5232;
_Calc[ET_AddrFailure]=%Var[temp]-5228;
_Calc[ET_AddrComplete]=%Var[temp]-5224;
_MemPattern=3275000032750000................FFFFFFFFFFFFFFFF..........000000................0E000000000000000F00000000000000000000000000000000000000000000001500000000......00000000..........000000010000000000000000000000000000000000000000000000..000000..000000,116,False,0x10000000/0x17F000000;
#IF=%Var[PatternFound],>0;
_SetVar=ET_AddrLevel,%Var[PatternRet_1];
#ENDIF
end_GetEssenceTappingAddr;
|
|
|
|
|
07/27/2020, 12:24
|
#2494
|
elite*gold: 0
Join Date: Jun 2009
Posts: 26
Received Thanks: 0
|
Hi Paraly.
The Udas Xp script doesn't work for me. I wlak to the lava then nothing 
|
|
|
|
|
07/27/2020, 12:28
|
#2495
|
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
|
Quote:
Originally Posted by xfallen33
Hi Paraly.
The Udas Xp script doesn't work for me. I wlak to the lava then nothing |
They already fixed it, the pyre souls do not respawn anymore.
|
|
|
|
|
07/27/2020, 12:31
|
#2496
|
elite*gold: 0
Join Date: Jun 2009
Posts: 26
Received Thanks: 0
|
Thank you for the fast reply 
|
|
|
|
|
07/29/2020, 22:20
|
#2497
|
elite*gold: 0
Join Date: Dec 2013
Posts: 31
Received Thanks: 2
|
Do you have anyway to check energy of respose?
|
|
|
|
|
07/29/2020, 22:22
|
#2498
|
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
|
Quote:
Originally Posted by Na.Q
Do you have anyway to check energy of respose?
|
Code:
#EXECUTE=GetRepose;
WaitForResponse=Percentage: %Var[ReposePercent]/nRepose EXP left: %Var[ReposeCurrentValue]/nRepose EXP maximum: %Var[ReposeMaxValue];
start_GetRepose;
_MemReadVar=%AddrFreeMem0,BYTE[4],TempCache;
MemWrite=%AddrFreeMem0,%AddrFlightCooldown,DWORD;
_MemReadVar=%AddrFreeMem0,DWORD,AddrTemp;
MemWrite=%AddrFreeMem0,%Var[TempCache],BYTE[4];
_Calc[AddrReposeCurrent]=%Var[AddrTemp]-232;
_Calc[AddrReposeMax]=%Var[AddrTemp]-224;
_MemReadVar=%Var[AddrReposeCurrent],DWORD,ReposeCurrentValue;
_MemReadVar=%Var[AddrReposeMax],DWORD,ReposeMaxValue;
_Calc[ReposePercent]=%Var[ReposeCurrentValue]/%Var[ReposeMaxValue];
_Calc[ReposePercent]=%Var[ReposePercent]*100;
end_GetRepose;
|
|
|
|
|
07/30/2020, 06:58
|
#2499
|
elite*gold: 0
Join Date: Dec 2013
Posts: 31
Received Thanks: 2
|
Quote:
Originally Posted by Paraly
Code:
#EXECUTE=GetRepose;
WaitForResponse=Percentage: %Var[ReposePercent]/nRepose EXP left: %Var[ReposeCurrentValue]/nRepose EXP maximum: %Var[ReposeMaxValue];
start_GetRepose;
_MemReadVar=%AddrFreeMem0,BYTE[4],TempCache;
MemWrite=%AddrFreeMem0,%AddrFlightCooldown,DWORD;
_MemReadVar=%AddrFreeMem0,DWORD,AddrTemp;
MemWrite=%AddrFreeMem0,%Var[TempCache],BYTE[4];
_Calc[AddrReposeCurrent]=%Var[AddrTemp]-232;
_Calc[AddrReposeMax]=%Var[AddrTemp]-224;
_MemReadVar=%Var[AddrReposeCurrent],DWORD,ReposeCurrentValue;
_MemReadVar=%Var[AddrReposeMax],DWORD,ReposeMaxValue;
_Calc[ReposePercent]=%Var[ReposeCurrentValue]/%Var[ReposeMaxValue];
_Calc[ReposePercent]=%Var[ReposePercent]*100;
end_GetRepose;
|
Sorry but i check all the character it shows incorrect, Percentage and Repose EXP left always is 0
|
|
|
|
|
07/30/2020, 08:09
|
#2500
|
elite*gold: 0
Join Date: Jun 2009
Posts: 26
Received Thanks: 0
|
Hi
What script is the best to make kinah ?
Have a good day
|
|
|
|
|
07/30/2020, 10:13
|
#2501
|
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
|
Quote:
Originally Posted by Na.Q
Sorry but i check all the character it shows incorrect, Percentage and Repose EXP left always is 0
|
Sorry this code was from 2019 for an older aion patch, anyways here you go
Code:
#EXECUTE=GetRepose;
WaitForResponse=Percentage: %Var[ReposePercent]/nRepose EXP left: %Var[ReposeCurrentValue]/nRepose EXP maximum: %Var[ReposeMaxValue];
start_GetRepose;
_MemReadVar=%AddrFreeMem0,BYTE[4],TempCache;
MemWrite=%AddrFreeMem0,%AddrFlightCooldown,DWORD;
_MemReadVar=%AddrFreeMem0,DWORD,AddrTemp;
MemWrite=%AddrFreeMem0,%Var[TempCache],BYTE[4];
_Calc[AddrReposeCurrent]=%Var[AddrTemp]-244;
_Calc[AddrReposeMax]=%Var[AddrTemp]-236;
_MemReadVar=%Var[AddrReposeCurrent],DWORD,ReposeCurrentValue;
_MemReadVar=%Var[AddrReposeMax],DWORD,ReposeMaxValue;
_Calc[ReposePercent]=%Var[ReposeCurrentValue]/%Var[ReposeMaxValue];
_Calc[ReposePercent]=%Var[ReposePercent]*100;
end_GetRepose;
Quote:
Originally Posted by xfallen33
Hi
What script is the best to make kinah ?
Have a good day |
Crafting Kinah Bundles from luna is the best method to make Kinah, it just requires level 10 characters and has a very low risk of getting banned
|
|
|
|
|
07/30/2020, 10:18
|
#2502
|
elite*gold: 0
Join Date: Jun 2009
Posts: 26
Received Thanks: 0
|
Just the daily and weekly luna script ?
I don't know how earn kinah with that
|
|
|
|
|
07/30/2020, 15:55
|
#2503
|
elite*gold: 27
Join Date: Sep 2009
Posts: 5,609
Received Thanks: 1,596
|
Quote:
Originally Posted by xfallen33
Just the daily and weekly luna script ?
I don't know how earn kinah with that |
They get materials every day and when a toon has the kinah bundle recipe available to craft it crafts them, so the more characters you have the more kinah you get, it's just a question of time
|
|
|
|
|
08/05/2020, 09:19
|
#2504
|
elite*gold: 0
Join Date: Dec 2013
Posts: 31
Received Thanks: 2
|
Hi Paraly
Would you like to make short script for do the (10+10) weekly quest with NPC Windel to acquired ultimate etium and spirit fragment in multiple characters please? Thank you.
|
|
|
|
|
08/09/2020, 16:26
|
#2505
|
elite*gold: 0
Join Date: Dec 2013
Posts: 31
Received Thanks: 2
|
Today i has tried this script. It's stopped craft all item and when i check the %Var[ET_AddrItemID] it always show 22255784
Quote:
Originally Posted by Paraly
Did you see this example script?
Code:
#IF=%FirstTime,;
_MemPtrReadVar=%PlayerBase,%OffsetName,WCHAR[32],PlayerName;
#EXECUTE=GetEssenceTappingAddr;
#ENDIF
#DO=120000;
_MemReadVar=%Var[ET_AddrItemID],DWORD,ET_ItemID;
_MemReadVar=%Var[ET_AddrAmount],DWORD,ET_Amount;
_MemReadVar=%Var[ET_AddrSuccess],DWORD,ET_Success;
_MemReadVar=%Var[ET_AddrFailure],DWORD,ET_Failure;
_MemReadVar=%Var[ET_AddrComplete],DWORD,ET_Complete;
_MemReadVar=%Var[ET_AddrLevel],DWORD,ET_Level;
Display=ItemID: %Var[ET_ItemID]/nAmount: %Var[ET_Amount]/nSuccess: %Var[ET_Success]/nFailure: %Var[ET_Failure]/nCompleted at: %Var[ET_Complete]/n/nEssenceTapping at: %Var[ET_Level]/n,0,0,EssenceTappingData: %Var[PlayerName];
Delay=10;
#UNTIL=1,=2;
start_GetEssenceTappingAddr;
_MemReadVar=%AddrFreeMem8,DWORD,cache;
MemWrite=%AddrFreeMem8,%AddrFoV,DWORD;
_MemReadVar=%AddrFreeMem8,DWORD,temp;
MemWrite=%AddrFreeMem8,%Var[cache],DWORD;
_Calc[ET_AddrItemID]=%Var[temp]-5256;
_Calc[ET_AddrAmount]=%Var[temp]-5248;
_Calc[ET_AddrSuccess]=%Var[temp]-5232;
_Calc[ET_AddrFailure]=%Var[temp]-5228;
_Calc[ET_AddrComplete]=%Var[temp]-5224;
_MemPattern=3275000032750000................FFFFFFFFFFFFFFFF..........000000................0E000000000000000F00000000000000000000000000000000000000000000001500000000......00000000..........000000010000000000000000000000000000000000000000000000..000000..000000,116,False,0x10000000/0x17F000000;
#IF=%Var[PatternFound],>0;
_SetVar=ET_AddrLevel,%Var[PatternRet_1];
#ENDIF
end_GetEssenceTappingAddr;
It displays all informations you need, so what you would do is
Code:
#IF=%FirstTime,;
#EXECUTE=GetEssenceTappingAddr;
#ENDIF
Command=/select Peridot;
Delay=150;
_IFMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=Peridot;
_IFMemPtrRead=%TargetBase,%OffsetPosX,float,2193.09-2197.09;
_IFMemPtrRead=%TargetBase,%OffsetPosY,float,2058.76-2062.76;
_IFMemPtrRead=%TargetBase,%OffsetPosZ,float,245.83-249.83;
#DO=60000;
SendKey=0x43;
#EXECUTE=Collect;
_UNTILMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=;
_Calc8=%Var8+1;
#ENDIF
start_Collect;
#DO=500;
Delay=10;
_UNTILMemRead=%Var[ET_AddrItemID],DWORD,>0; // wait till collecting has started
_IFMemRead=%Var[ET_AddrItemID],DWORD,=152003057; // If is Ultimate Peridot
#DO=60000;
Delay=333;
_UNTILMemPtrRead=%TargetBase,%OffsetName,WCHAR[64],=;
#ELSE
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
SendKey=0x1B;
Delay=15;
#ENDIF
end_Collect;
start_GetEssenceTappingAddr;
_MemReadVar=%AddrFreeMem8,DWORD,cache;
MemWrite=%AddrFreeMem8,%AddrFoV,DWORD;
_MemReadVar=%AddrFreeMem8,DWORD,temp;
MemWrite=%AddrFreeMem8,%Var[cache],DWORD;
_Calc[ET_AddrItemID]=%Var[temp]-5256;
_Calc[ET_AddrAmount]=%Var[temp]-5248;
_Calc[ET_AddrSuccess]=%Var[temp]-5232;
_Calc[ET_AddrFailure]=%Var[temp]-5228;
_Calc[ET_AddrComplete]=%Var[temp]-5224;
_MemPattern=3275000032750000................FFFFFFFFFFFFFFFF..........000000................0E000000000000000F00000000000000000000000000000000000000000000001500000000......00000000..........000000010000000000000000000000000000000000000000000000..000000..000000,116,False,0x10000000/0x17F000000;
#IF=%Var[PatternFound],>0;
_SetVar=ET_AddrLevel,%Var[PatternRet_1];
#ENDIF
end_GetEssenceTappingAddr;
|
|
|
|
|
Similar Threads
|
Script para todos os Lastchaos - Autohokey
01/29/2012 - Last Chaos - 1 Replies
I got a script that clicks several times with the click right mouse clicks when monster picks up the tarjeta. so he just throws the skill.
I used AutoHotkey program. in AutoHotkey - Free Mouse and Keyboard Macro Program with Hotkeys and AutoText
Needs improvement.
I accept any help.
I'm from Brazil.
------------------------------------------------- --------------------------
|
[Release]Big Script Library
07/25/2010 - SRO PServer Guides & Releases - 0 Replies
I think its a good idea to open this Topic.
I need Your Help.
Sent me your own made Scripts and i upload them here.
It does not matter if there is already a script by the mob.
Only Self made scripts!!!
What To Post?
Post me not the text file.Post me the script!!!
Scorpion 1 by Th3Stalker
|
All times are GMT +1. The time now is 21:25.
|
|
