Para's VanillaTool [Rework]

Page 637 of 734

637

03/24/2019 13:35 Paraly#9541

Quote:

Originally Posted by tupacrap

best way to make kinah with this hack on NA/EU ?

Keberium farming with Chapa and Puku or Mob Grinder script

Open World farming

Broker Botting

Luna

03/24/2019 14:25 Diavolakos#9542

OK there is an update in Luna Recipes function I made, the 75% recipe that we use is the one that uses 2 Luna's Light, BUT it also uses 11 Flawless crystals. Unfortunately when opening an S-rank pouch we get 1 Luna's light but also 1~3 luna materials of the rest of the mats. This means that for every Luna's light we get max 3x Flawless crystals (at best). So for 2 Luna's Light we get anything from 2~6 Flawless crystals.

So running my script for a long time, what happens is that I have chars that have 40 luna's light but almost no Flawless crystals since it is being overused in this recipe.

Therefore it is necessary to check the other 75% recipe that uses more mats of the other materials and much less of the Flawless crystal to start using those, since we end up having too many mats of the other materials and very little Flawless Crystals.

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

The below functions are testing the two recipes and call each function if needed. It will craft any of the two recipes it finds first. In theory in the long run it will be better material wise.

Code:

start_CheckLunaRecipes; <-- By Diavolakos

FrameAction=497,State,SHOW;
Delay=750;
Mouse=207,127; Luna back
Delay=750;
Mouse=274,219; Workshop
Delay=750;
Mouse=375,402; Take the recipes lower
Delay=700;

Mouse=264,230; 1st recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe; 
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,270; 2nd recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,310; 3rd recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,350; 4th recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,390; 5th recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF

Delay=500;
FrameAction=497,State,HIDE;
Delay=500;

end_CheckLunaRecipes;



start_CraftKinahRecipeOne; <-- By Diavolakos

_SetVar23=0;

#DO=1200000; will craft up to 20 minutes if we need to
Delay=500;

_IFInventoryContains=152150004,11; Flawless crystal
_IFInventoryContains=152150002,5; Cloudy Crystal
_IFInventoryContains=152150001,9; Chipped Crystal
_IFInventoryContains=152150003,9; Clear Crystal
_IFInventoryContains=152150005,2; Luna's Light

Mouse=524,389; if we have all mats, then hit the Craft Button
Delay=5000;

#ELSE
_SetVar23=1; if we do not have mats stop crafting

#ENDIF

#UNTIL=%Var23,>0;


end_CraftKinahRecipeOne;




start_CraftKinahRecipeTwo;

_SetVar23=0;

#DO=1200000; 20 minutes if we need
Delay=300;

_IFInventoryContains=152150004,4; Flawless crystal
_IFInventoryContains=152150002,9; Cloudy Crystal
_IFInventoryContains=152150001,17; Chipped Crystal
_IFInventoryContains=152150003,17; Clear Crystal
_IFInventoryContains=152150005,4; Luna's Light

Mouse=524,389; if we have all mats, then hit the Craft Button
Delay=3500;

#ELSE
_SetVar23=1; if we do not have mats stop crafting

#ENDIF

#UNTIL=%Var23,>0;

end_CraftKinahRecipeTwo;

I also checked the official luna here, you might wanna add the opening of all rewards otherwise the materials will be kept in the pouches and no recipe will be crafted.

This one opens the free crafted luna material and all pouches possible (S & A rank, B rank is no longer possible at this patch), as well as the additional rewards your chars get like the transformation scroll pouches and minium pouches. You can remove anything you do not want your char to open.

Code:

start_OpenRewards;


#DO=15000;
_IFInventoryContains=188055460; Luna Material Chest (crafted)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055460;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055599; Contaminated Underpath High Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055599;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055598; Contaminated Underpath Highest Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055598;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055647; Mechaturerk's Treasure Chest (weekly)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055647;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188070358; Transformation Scroll Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070358;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



#DO=15000;
_IFInventoryContains=188070797; Grade A-C Minium Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070797;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



end_OpenRewards;

And this function opens the chest you get with the blue key when you finish the daily quest 7 times. I open this and get the luna's material (as all other rewards might not be that good for now). I used to get the manastones but we soon get 6.5 and we get new manastones, not to mention that this gave me many times MP manastones that were junk, I'd rather get the additional luna material and possibly craft more kinah bundles.

Code:

start_OpenLunaSpecialPouch;


#DO=30000;
_IFInventoryContains=188055664; Contaminated Underpath Special Puch
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055664;
Delay=1000;

FrameAction=443,XPOS,0; this is the window that shows the list
FrameAction=443,YPOS,0; position it to corner

Delay=1000;
Mouse=61,69; Luna's Light
Delay=700;
Mouse=95,206; OK button
Delay=700;

FrameAction=525,XPOS,0; this is the window that shows the list
FrameAction=525,YPOS,0; position it to corner
Delay=700;

Mouse=164,62; OK center button
Delay=3000;

#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;

end_OpenLunaSpecialPouch;

~~~~

All these are good to open by the end of the instance

03/24/2019 23:33 erotunin#9543

work on Aion 3.5 ?

03/24/2019 23:34 Paraly#9544

Quote:

Originally Posted by erotunin

work on Aion 3.5 ?

No only on the latest EU and NA version

03/25/2019 10:26 Lynne77#9545

Can I get a new routine for sm using pet on a combat script please,someone from here gave me an old one but it doesn't work now on a new spot I wanna grind.

That script was nice it makes my toon sit when low hp,I'm noit so knowledgeable about scripts T.T.

03/25/2019 11:07 Paraly#9546

Quote:

Originally Posted by Lynne77

Can I get a new routine for sm using pet on a combat script please,someone from here gave me an old one but it doesn't work now on a new spot I wanna grind.

That script was nice it makes my toon sit when low hp,I'm noit so knowledgeable about scripts T.T.

This is the first version of the Spiritmaster with AutoCombat system, it will use Pet

Code:

#SmoothBackground

;;;;;;;;;Settings Spiritmaster;;;;;;;;;

#EXECUTE=SpiritmasterFindPet;
_ACRelyOnPet=3602,True;
_ACRelyOnPet=3839,True;
_ACRelyOnPet=3833,True;
_ACRelyOnPet=3835,True;
_ACRelyOnPet=3853,True;
_ACRelyOnPet=%Var[ACPet],False;
_ACRelyOnPet=3837,True;
_ACRelyOnPet=3779,False;
_ACRelyOnPet=3796,True;
_ACRelyOnPet=3549,True;
_ACRelyOnPet=3541,False;
_ACRelyOnPet=3548,True;
_ACRelyOnPet=3836,True;
_ACRelyOnPet=3531,True;
_ACRelyOnPet=3739,True;

_ACCustomCooldown=3780,25000;

_ACRelyOnBuff=1166,1166;

_ACRelyOnRace=3807,Eylos;
_ACRelyOnRace=3808,Asmo;

_ACManaPercentage=66;
_ACHealPercentage=50;

_ACPotion=162000050,HP/MP,50,66;

_ACHeals=3839,3833,4665,3549,3851,3531,3739;
_ACBuffs=3602,3730,1166,3796,3541;
_ACSkills=3779,%Var[ACPet],3574,3731,3581,3776,3772,3572,3547,3835,3548,3836,3853,3847,3561,3807,3808,3589,3750,3588,3775,3837,3780,1459;

;;;;;;;End Settings Spiritmaster;;;;;;;

_ACMob_Looting=True;

_ACCheckMob=;










start_SpiritmasterFindPet;

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,76-80;
_SetVar=ACPet,3662;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,76-80;
_SetVar=ACPet,3663;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,68-75;
_SetVar=ACPet,3660;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,68-75;
_SetVar=ACPet,3661;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,62-67;
_SetVar=ACPet,3658;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,62-67;
_SetVar=ACPet,3659;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,56-61;
_SetVar=ACPet,3656;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,56-61;
_SetVar=ACPet,3657;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,50-55;
_SetVar=ACPet,3654;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,50-55;
_SetVar=ACPet,3655;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,44-49;
_SetVar=ACPet,3652;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,44-49;
_SetVar=ACPet,3653;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,38-43;
_SetVar=ACPet,3650;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,38-43;
_SetVar=ACPet,3651;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,32-37;
_SetVar=ACPet,3648;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,32-37;
_SetVar=ACPet,3649;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,26-31;
_SetVar=ACPet,3646;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,26-31;
_SetVar=ACPet,3647;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,20-25;
_SetVar=ACPet,3644;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,20-25;
_SetVar=ACPet,3645;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=L;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,10-19;
_SetVar=ACPet,3706;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetData/0x1090,CHAR[1],=D;
_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,10-19;
_SetVar=ACPet,3707;
#ENDIF

_IFMemPtrRead=%PlayerBase,%OffsetLevel,BYTE,1-9;
_SetVar=ACPet,none;
#ENDIF

end_SpiritmasterFindPet;

03/25/2019 17:56 Cuckedbattles#9547

Quote:
Originally Posted by Diavolakos
OK there is an update in Luna Recipes function I made, the 75% recipe that we use is the one that uses 2 Luna's Light, BUT it also uses 11 Flawless crystals. Unfortunately when opening an S-rank pouch we get 1 Luna's light but also 1~3 luna materials of the rest of the mats. This means that for every Luna's light we get max 3x Flawless crystals (at best). So for 2 Luna's Light we get anything from 2~6 Flawless crystals.

So running my script for a long time, what happens is that I have chars that have 40 luna's light but almost no Flawless crystals since it is being overused in this recipe.

Therefore it is necessary to check the other 75% recipe that uses more mats of the other materials and much less of the Flawless crystal to start using those, since we end up having too many mats of the other materials and very little Flawless Crystals.

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

The below functions are testing the two recipes and call each function if needed. It will craft any of the two recipes it finds first. In theory in the long run it will be better material wise.
Code:
start_CheckLunaRecipes; <-- By Diavolakos

FrameAction=497,State,SHOW;
Delay=750;
Mouse=207,127; Luna back
Delay=750;
Mouse=274,219; Workshop
Delay=750;
Mouse=375,402; Take the recipes lower
Delay=700;

Mouse=264,230; 1st recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe; 
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,270; 2nd recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,310; 3rd recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,350; 4th recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,390; 5th recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF

Delay=500;
FrameAction=497,State,HIDE;
Delay=500;

end_CheckLunaRecipes;



start_CraftKinahRecipeOne; <-- By Diavolakos

_SetVar23=0;

#DO=1200000; will craft up to 20 minutes if we need to
Delay=500;

_IFInventoryContains=152150004,11; Flawless crystal
_IFInventoryContains=152150002,5; Cloudy Crystal
_IFInventoryContains=152150001,9; Chipped Crystal
_IFInventoryContains=152150003,9; Clear Crystal
_IFInventoryContains=152150005,2; Luna's Light

Mouse=524,389; if we have all mats, then hit the Craft Button
Delay=5000;

#ELSE
_SetVar23=1; if we do not have mats stop crafting

#ENDIF

#UNTIL=%Var23,>0;


end_CraftKinahRecipeOne;




start_CraftKinahRecipeTwo;

_SetVar23=0;

#DO=1200000; 20 minutes if we need
Delay=300;

_IFInventoryContains=152150004,4; Flawless crystal
_IFInventoryContains=152150002,9; Cloudy Crystal
_IFInventoryContains=152150001,17; Chipped Crystal
_IFInventoryContains=152150003,17; Clear Crystal
_IFInventoryContains=152150005,4; Luna's Light

Mouse=524,389; if we have all mats, then hit the Craft Button
Delay=3500;

#ELSE
_SetVar23=1; if we do not have mats stop crafting

#ENDIF

#UNTIL=%Var23,>0;

end_CraftKinahRecipeTwo;
I also checked the official luna here, you might wanna add the opening of all rewards otherwise the materials will be kept in the pouches and no recipe will be crafted.

This one opens the free crafted luna material and all pouches possible (S & A rank, B rank is no longer possible at this patch), as well as the additional rewards your chars get like the transformation scroll pouches and minium pouches. You can remove anything you do not want your char to open.
Code:
start_OpenRewards;


#DO=15000;
_IFInventoryContains=188055460; Luna Material Chest (crafted)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055460;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055599; Contaminated Underpath High Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055599;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055598; Contaminated Underpath Highest Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055598;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055647; Mechaturerk's Treasure Chest (weekly)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055647;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188070358; Transformation Scroll Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070358;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



#DO=15000;
_IFInventoryContains=188070797; Grade A-C Minium Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070797;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



end_OpenRewards;
And this function opens the chest you get with the blue key when you finish the daily quest 7 times. I open this and get the luna's material (as all other rewards might not be that good for now). I used to get the manastones but we soon get 6.5 and we get new manastones, not to mention that this gave me many times MP manastones that were junk, I'd rather get the additional luna material and possibly craft more kinah bundles.
Code:
start_OpenLunaSpecialPouch;


#DO=30000;
_IFInventoryContains=188055664; Contaminated Underpath Special Puch
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055664;
Delay=1000;

FrameAction=443,XPOS,0; this is the window that shows the list
FrameAction=443,YPOS,0; position it to corner

Delay=1000;
Mouse=61,69; Luna's Light
Delay=700;
Mouse=95,206; OK button
Delay=700;

FrameAction=525,XPOS,0; this is the window that shows the list
FrameAction=525,YPOS,0; position it to corner
Delay=700;

Mouse=164,62; OK center button
Delay=3000;

#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;

end_OpenLunaSpecialPouch;
~~~~

All these are good to open by the end of the instance

OMG this is a great! The only item that I see missing is opening the Depleted Luna Blessing but I think I can add that myself. Shouldn't it work if I also add in Borunerk's Coin so it uses up the exp into making gems as soon as it gets done?

Wait, I thought these were lines I could just add to the daily luna code but it doesn't seem to work like that so are these meant to be separate scripts you have to run outside of the daily script? If this is just a separate script could it be added to the luna script to run before it switches characters? This would be great because the large bulk of my alts are placed in pvp zones like FM gate, lab entrances and PF entrance. I can't exactly stand there and open bags and stuff without getting ganked, it works for me to craft and open bags inside luna daily.

03/25/2019 18:54 xxxLavos#9548

sometimes my windows defender do not let have the 6.14 on my PC. it keep deleting it. I have been using 6.13. How can I deactivate that defender?

03/25/2019 21:35 Paraly#9549

Quote:

Originally Posted by xxxLavos

sometimes my windows defender do not let have the 6.14 on my PC. it keep deleting it. I have been using 6.13. How can I deactivate that defender?

Use the Windows key + R keyboard shortcut to open the Run command.
Type regedit, and click OK to open the Registry.
Browse the following path:

Code:

HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows Defender

If you don't see the DisableAntiSpyware DWORD, right-click the Windows Defender (folder) key, select New, and click on DWORD (32-bit) Value.
Name the key DisableAntiSpyware and press Enter.
Double-click the newly created DWORD and set the value from 0 to 1.
Click OK.
After completing the steps, restart your device to apply the settings, and then the Windows Defender Antivirus should now be disabled.

03/25/2019 23:23 Diavolakos#9550

Quote:

Originally Posted by Cuckedbattles

OMG this is a great! The only item that I see missing is opening the Depleted Luna Blessing but I think I can add that myself. Shouldn't it work if I also add in Borunerk's Coin so it uses up the exp into making gems as soon as it gets done?

Wait, I thought these were lines I could just add to the daily luna code but it doesn't seem to work like that so are these meant to be separate scripts you have to run outside of the daily script? If this is just a separate script could it be added to the luna script to run before it switches characters? This would be great because the large bulk of my alts are placed in pvp zones like FM gate, lab entrances and PF entrance. I can't exactly stand there and open bags and stuff without getting ganked, it works for me to craft and open bags inside luna daily.

We no longer get depleted luna blessing as far as I see (at least in NA) so you can add this but what server are you playing?

----------

I also made routines for the gems opening, I always keep the functions separate for separate things in order to make them more movable to other scripts.

I previously posted these functions but I'll repost them and explain:

If you have 50 or more coins it will not open anything, if you have less than 50 coins it will open one pouch of 20 coins and recheck if you have more than 50, if not it will open one more etc. This way if a char has like 50 pouches (your main maybe) it will not open them all and fill all your slots. You call this routine once in the luna probably after everything is done and you are ready to exchange the coins to gems.

Code:

start_OpenPouches;

#DO=30000;
_IFInventoryContains=188920046,50; Borunerk's coin
#ELSE
UseID=188071857;
Delay=4000;
#ENDIF

end_OpenPouches;

And the below command is called afterwards, it tries to exchange a coin into a gem, if the little window with the OK confirmation button appears, it means we have 20m XP thus to hits OK and lets it convert and repeats, if the little window doesn't appear it means we run out of XP and thus it closes the routine and proceeds to the rest of the script. This thing will exchange as many coins as it can as long as there is XP and it has a 3 minute window to do this.

Code:

start_ExchangeGems;

#DO=180000;
_IFInventoryContains=188920046; Borunerk's Coin
MemWrite=%AddrFreeMem6,1,BYTE;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF


Command=/use Borunerk’s Coin;

_IFFrameVisible=525; if the XP is enough
Delay=1000;
Mouse=447,341;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;

end_ExchangeGems;

I didn't make yet the routine to buy the pouches, it requires the mouse hover function which requires the client to be on top at that point and if you run multiple clients it will collide. But it isn't THAT necessary. Every luna usually converts 5~6 coins, so by the time you open your kinah boxes manually to trade them to your main via the bidding loot, you can simply buy the 5x pouches to that specific character.

So far this is what I do and none of my chars has run out of coins to be converted.

Notice: gems can be converted in chars of lvl 80 only.

03/25/2019 23:37 Cuckedbattles#9551

I actually care more about opening up the material chest underpath bundles inside the luna daily more then anything else, is that possible.

03/26/2019 10:06 tupacrap#9552

how much kinah from luna boxes ?

03/27/2019 01:43 Lynne77#9553

Quote:

Originally Posted by tupacrap

how much kinah from luna boxes ?

one time I got 30kk,some 20kk,mostly 5-10kk.Easy kinah when you have tons of alts.I have only around 30 and it never fails to give me around 30-50kk in a day.It goes higher when you have good luck on kinah bundles.

03/27/2019 11:05 windows2045#9554

Quote:
Originally Posted by Diavolakos
OK there is an update in Luna Recipes function I made, the 75% recipe that we use is the one that uses 2 Luna's Light, BUT it also uses 11 Flawless crystals. Unfortunately when opening an S-rank pouch we get 1 Luna's light but also 1~3 luna materials of the rest of the mats. This means that for every Luna's light we get max 3x Flawless crystals (at best). So for 2 Luna's Light we get anything from 2~6 Flawless crystals.

So running my script for a long time, what happens is that I have chars that have 40 luna's light but almost no Flawless crystals since it is being overused in this recipe.

Therefore it is necessary to check the other 75% recipe that uses more mats of the other materials and much less of the Flawless crystal to start using those, since we end up having too many mats of the other materials and very little Flawless Crystals.

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

The below functions are testing the two recipes and call each function if needed. It will craft any of the two recipes it finds first. In theory in the long run it will be better material wise.
Code:
start_CheckLunaRecipes; <-- By Diavolakos

FrameAction=497,State,SHOW;
Delay=750;
Mouse=207,127; Luna back
Delay=750;
Mouse=274,219; Workshop
Delay=750;
Mouse=375,402; Take the recipes lower
Delay=700;

Mouse=264,230; 1st recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe; 
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,270; 2nd recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,310; 3rd recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,350; 4th recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF
Delay=500;

Mouse=264,390; 5th recipe
Delay=500;
_MemPtrReadVar=%AddrFrameID[497],0x528/0xB8,DWORD,Recipe;
#IF=%Var[Recipe],=30034; Recipe 75% with 2 luna's light
#EXECUTE=CraftKinahRecipeOne;
#ENDIF
#IF=%Var[Recipe],=30029; Recipe 75% with 4 luna's light
#EXECUTE=CraftKinahRecipeTwo;
#ENDIF

Delay=500;
FrameAction=497,State,HIDE;
Delay=500;

end_CheckLunaRecipes;



start_CraftKinahRecipeOne; <-- By Diavolakos

_SetVar23=0;

#DO=1200000; will craft up to 20 minutes if we need to
Delay=500;

_IFInventoryContains=152150004,11; Flawless crystal
_IFInventoryContains=152150002,5; Cloudy Crystal
_IFInventoryContains=152150001,9; Chipped Crystal
_IFInventoryContains=152150003,9; Clear Crystal
_IFInventoryContains=152150005,2; Luna's Light

Mouse=524,389; if we have all mats, then hit the Craft Button
Delay=5000;

#ELSE
_SetVar23=1; if we do not have mats stop crafting

#ENDIF

#UNTIL=%Var23,>0;


end_CraftKinahRecipeOne;




start_CraftKinahRecipeTwo;

_SetVar23=0;

#DO=1200000; 20 minutes if we need
Delay=300;

_IFInventoryContains=152150004,4; Flawless crystal
_IFInventoryContains=152150002,9; Cloudy Crystal
_IFInventoryContains=152150001,17; Chipped Crystal
_IFInventoryContains=152150003,17; Clear Crystal
_IFInventoryContains=152150005,4; Luna's Light

Mouse=524,389; if we have all mats, then hit the Craft Button
Delay=3500;

#ELSE
_SetVar23=1; if we do not have mats stop crafting

#ENDIF

#UNTIL=%Var23,>0;

end_CraftKinahRecipeTwo;
I also checked the official luna here, you might wanna add the opening of all rewards otherwise the materials will be kept in the pouches and no recipe will be crafted.

This one opens the free crafted luna material and all pouches possible (S & A rank, B rank is no longer possible at this patch), as well as the additional rewards your chars get like the transformation scroll pouches and minium pouches. You can remove anything you do not want your char to open.
Code:
start_OpenRewards;


#DO=15000;
_IFInventoryContains=188055460; Luna Material Chest (crafted)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055460;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055599; Contaminated Underpath High Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055599;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055598; Contaminated Underpath Highest Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055598;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055647; Mechaturerk's Treasure Chest (weekly)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055647;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188070358; Transformation Scroll Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070358;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



#DO=15000;
_IFInventoryContains=188070797; Grade A-C Minium Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070797;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



end_OpenRewards;
And this function opens the chest you get with the blue key when you finish the daily quest 7 times. I open this and get the luna's material (as all other rewards might not be that good for now). I used to get the manastones but we soon get 6.5 and we get new manastones, not to mention that this gave me many times MP manastones that were junk, I'd rather get the additional luna material and possibly craft more kinah bundles.
Code:
start_OpenLunaSpecialPouch;


#DO=30000;
_IFInventoryContains=188055664; Contaminated Underpath Special Puch
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055664;
Delay=1000;

FrameAction=443,XPOS,0; this is the window that shows the list
FrameAction=443,YPOS,0; position it to corner

Delay=1000;
Mouse=61,69; Luna's Light
Delay=700;
Mouse=95,206; OK button
Delay=700;

FrameAction=525,XPOS,0; this is the window that shows the list
FrameAction=525,YPOS,0; position it to corner
Delay=700;

Mouse=164,62; OK center button
Delay=3000;

#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;

end_OpenLunaSpecialPouch;
~~~~

All these are good to open by the end of the instance

This is a great script, much thanks.

Just a question though, on the opening of the luna rewards A/S daily light bags etc. I tried to add the ability to switch from character to character opening all the bags but I bungled it horribly. Do you have plans to add to that later? or perhaps paralay?
That way I can run the script to open the bags througout all the characters on that account before doing the daily. (or after)

03/27/2019 16:19 Diavolakos#9555

Quote:

Originally Posted by Cuckedbattles

I actually care more about opening up the material chest underpath bundles inside the luna daily more then anything else, is that possible.

I already posted it in the original post up there, open the S-rank and A-rank reward along with other things right? Unless you need something else so I can do that too.

You will have to call this command:

Code:

#EXECUTE=OpenRewards;

right after the boss died and we got the pouches and also make sure you have the below function in the luna daily

Code:

start_OpenRewards;


#DO=15000;
_IFInventoryContains=188055460; Luna Material Chest (crafted)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055460;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055599; Contaminated Underpath High Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055599;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055598; Contaminated Underpath Highest Grade Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055598;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188055647; Mechaturerk's Treasure Chest (weekly)
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188055647;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;


#DO=15000;
_IFInventoryContains=188070358; Transformation Scroll Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070358;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



#DO=15000;
_IFInventoryContains=188070797; Grade A-C Minium Bundle
MemWrite=%AddrFreeMem6,1,BYTE;
UseID=188070797;
Delay=3000;
#ELSE
MemWrite=%AddrFreeMem6,0,BYTE;
#ENDIF
_UNTILMemRead=%AddrFreeMem6,BYTE,=0;



end_OpenRewards;

Page 637 of 734

637