Re: Rock5's Fusion Control Functions
Posted: Sat Dec 28, 2013 7:12 am
I have it and it works almost in the same way, but its German. Cant read German.
MicroMacro home
https://www.solarstrike.net/phpBB3/
comes back 81 0/script pr(TEXT("TOOLTIP_LIMIT_TEXT") .. " " .. TEXT("SYS_LEVEL"))
Good. That's what it's supposed to return. DoesEggman1414 wrote:comes back 81 0
Code: Select all
/script pr(Fusion.Bag:getItem(61):makesTier(5))
Code: Select all
function Item:makesTier(tier)
self:updateTooltipInfo()
local level = self.Level
Code: Select all
if self.Slot == 61 then pr(self.Level, self.Quality) end
Code: Select all
0 0
Code: Select all
/script pr(Fusion.Bag:getItem(61):makesTier(5))
Code: Select all
/script pr(Fusion.Bag:getItem(61):makesTier(1))
Code: Select all
/script i=Fusion.Bag:getItem(61) i:updateTooltipInfo() pr(#i.Attributes > 0 or Fusion_Settings.UseCleanItems == true)
Actually that makes sense if the Level is coming back as 0.Eggman1414 wrote:I put a 1 in for 5...and It came back true??? That makes no sense
Is 'Use clean items' set to false?Eggman1414 wrote:Also this came back False
)Code: Select all
/script i=Fusion.Bag:getItem(61) i:updateTooltipInfo() pr(#i.Attributes > 0 or Fusion_Settings.UseCleanItems == true
That explains why the use clean item check fails, the belts are clean after all. So it's just a problem with the tier check. I don't know why it returns 0 for the Level sometimes.Eggman1414 wrote:Use clean Items and Use Item Whitelist are not checked
not working for new addonrock5 wrote:Apparently, the maintainer of Fusion was planning a big update that included more buttons and he just committed it. It supports up to tier 20 including a few other new options.
http://www.curse.com/addons/rom/fusion
Code: Select all
-- Setup config options
-- Fusion_Config("Use Item Whitelist", false)
-- Fusion_Config("Fusion Stones", true)
-- Fusion_Config("Green", true)
-- Fusion_Config("Speed", .8)
-- Open dialogs
if RoMScript("AdvancedMagicBoxFrame ~= nil") then
RoMScript("AdvancedMagicBoxFrame:Show()"); yrest(1500)
RoMScript("FusionFrame2:Show()"); yrest(1500)
RoMScript("Fusion_Max(FusionFrame2_Max)") yrest(1500)
print("Now Fusing ...")
RoMScript("Fusion_QueueManastones(FusionFrame2_Do)");
else
RoMScript("MagicBoxFrame:Show()"); yrest(1500)
RoMScript("FusionFrame1:Show()"); yrest(1500)
RoMScript("Fusion_Max(FusionFrame1_Max)") yrest(1500)
print("Now Fusing ...")
RoMScript("Fusion_QueueManastones(FusionFrame1_Do)");
end
repeat
yrest(1500)
until RoMScript("Fusion.LastGrad")==0
-- close
yrest(2000)
if RoMScript("AdvancedMagicBoxFrame ~= nil") then
RoMScript("AdvancedMagicBoxFrame:Hide()"); yrest(500)
else
RoMScript("MagicBoxFrame:Hide()"); yrest(500)
end
Code: Select all
function fusionobs()
sendMacro("CloseWindows()")
local have = inventory:itemTotalCount(202999)
if 54 > have then
sendMacro("CloseWindows()")
player:openStore("Leskar Prole"); yrest(2000);
sendMacro("ChoiceOption(1);"); yrest(2000);
inventory:storeBuyItem(202999,54-have)
yrest(1000)
sendMacro("CloseWindows()")
player:update();
else
sendMacro("CloseWindows()")
local have = inventory:itemTotalCount(228966)
if 54 > have then
sendMacro("OpenMail()");
yrest(15000);
UMM_TakeMail()
yrest(20000)
player:update();
sendMacro("CloseWindows()")
sendMacro("OpenMail()")
yrest(10000);
RoMScript("UMMMailManager:MassTagMails('Empty')"); yrest(5000)
RoMScript("UMMFrameTab1Tools:ButtonClick('Delete');"); yrest(5000)
player:update();
yrest(5000)
sendMacro("CloseWindows()")
player:update();
else
-- Setup config options
Fusion_Config("Use Item Whitelist", false)
Fusion_Config("Fusion Stones", true)
Fusion_Config("Green", true)
Fusion_Config("Speed", .8)
-- Open dialogs
if RoMScript("AdvancedMagicBoxFrame ~= nil") then
RoMScript("AdvancedMagicBoxFrame:Show()"); yrest(1500)
RoMScript("FusionFrame2:Show()"); yrest(1500)
RoMScript("Fusion_Max(FusionFrame2_Max)") yrest(1500)
print("Now Fusing ...")
RoMScript("Fusion_QueueManastones(FusionFrame2_Do)");
else
RoMScript("MagicBoxFrame:Show()"); yrest(1500)
RoMScript("FusionFrame1:Show()"); yrest(1500)
RoMScript("Fusion_Max(FusionFrame1_Max)") yrest(1500)
print("Now Fusing ...")
RoMScript("Fusion_QueueManastones(FusionFrame1_Do)");
end
repeat
yrest(1500)
until RoMScript("Fusion.LastGrad")==0
-- close
yrest(2000)
if RoMScript("AdvancedMagicBoxFrame ~= nil") then
RoMScript("AdvancedMagicBoxFrame:Hide()"); yrest(500)
else
RoMScript("MagicBoxFrame:Hide()"); yrest(500)
end
sendMacro("CloseWindows()")
sendMacro("OpenMail()");
yrest(2000);
UMM_SendByNameOrId("Xxxxxxx",{"Mana Stone Tier 10","Mana Stone Tier 11"})
sendMacro("CloseWindows()")
player:update();
end
end
end
yes i tried your latest userfunction and the new addon you link but i got this error when its time to fusingrock5 wrote:What is that? Part of the old userfunction? Have you tried the newer version 0.4 version?
Code: Select all
Loaded waypoint path zzobsfs.xml
No return path with default naming zzobsfs_return.xml found.
We use the normal waypoint path zzobsfs.xml now.
Moving to waypoint #1, (-23029, 4584)
Use MACRO: Executing RoMScript "CloseWindows()".
Use MACRO: Executing RoMScript "CloseWindows()".
Setting 'Use Item Whitelist' to false.
Setting 'Fusion Stones' to true.
Setting 'Green' to true.
Wrong usage of the Fusion_Config function.
Possible argument values are listed below;
Fusion_Config("Random Fusion Stones",true/false)
Fusion_Config("Fusion Stones",true/false)
Fusion_Config("Purified Fusion Stones",true/false)
Fusion_Config("Item Tier Level",number)
Fusion_Config("Maximum Stats",number)
Fusion_Config("Use Clean Items",true/false)
Fusion_Config("Use Item Whitelist",true/false)
Fusion_Config("Set Whitelist","item1,item2")
Fusion_Config("White",true/false)
Fusion_Config("Green",true/false)
Fusion_Config("Blue",true/false)
Fusion_Config("Purple",true/false)
The game client did not crash.
7:48pm - D:/micromacro/micromacro/scripts/rom/functions.lua:803: attempt to conc
atenate field '?' (a nil value)
AL lib: FreeContext: (022ECAA8) Deleting 1 Source(s)
Please enter the script name to run.
Type in 'exit' (without quotes) to exit.
Script>
Code: Select all
Fusion_MakeMaxManaStones()
with thiskuripot wrote:Code: Select all
-- Open dialogs if RoMScript("AdvancedMagicBoxFrame ~= nil") then RoMScript("AdvancedMagicBoxFrame:Show()"); yrest(1500) RoMScript("FusionFrame2:Show()"); yrest(1500) RoMScript("Fusion_Max(FusionFrame2_Max)") yrest(1500) print("Now Fusing ...") RoMScript("Fusion_QueueManastones(FusionFrame2_Do)"); else RoMScript("MagicBoxFrame:Show()"); yrest(1500) RoMScript("FusionFrame1:Show()"); yrest(1500) RoMScript("Fusion_Max(FusionFrame1_Max)") yrest(1500) print("Now Fusing ...") RoMScript("Fusion_QueueManastones(FusionFrame1_Do)"); end repeat yrest(1500) until RoMScript("Fusion.LastGrad")==0 -- close yrest(2000) if RoMScript("AdvancedMagicBoxFrame ~= nil") then RoMScript("AdvancedMagicBoxFrame:Hide()"); yrest(500) else RoMScript("MagicBoxFrame:Hide()"); yrest(500) end
Code: Select all
Fusion_MakeMaxManaStones()
Code: Select all
Loaded waypoint path zzobsfs.xml
No return path with default naming zzobsfs_return.xml found.
We use the normal waypoint path zzobsfs.xml now.
Moving to waypoint #1, (-23029, 4584)
Use MACRO: Executing RoMScript "CloseWindows()".
Use MACRO: Executing RoMScript "CloseWindows()".
Making Mana stones...
Opening Transmutor and Fusion frames.
Setting to make Mana Stones up to a level of 11
Now Fusing ...
The game client did not crash.
9:5am - IGF:\Fusion:Do_Onclick(FusionFrame_Do)\ [string "local a={Fusion:Do_Oncl
ick(FusionFrame_Do)}..."]:1: attempt to call method 'Do_Onclick' (a nil value)
AL lib: FreeContext: (023CCAA8) Deleting 1 Source(s)
Please enter the script name to run.
Type in 'exit' (without quotes) to exit.
Script>
Code: Select all
function fusionobs()
sendMacro("CloseWindows()")
local have = inventory:itemTotalCount(202999)
if 54 > have then
sendMacro("CloseWindows()")
player:openStore("Leskar Prole"); yrest(2000);
sendMacro("ChoiceOption(1);"); yrest(2000);
inventory:storeBuyItem(202999,54-have)
yrest(1000)
sendMacro("CloseWindows()")
player:update();
else
sendMacro("CloseWindows()")
local have = inventory:itemTotalCount(228966)
if 54 > have then
sendMacro("OpenMail()");
yrest(15000);
UMM_TakeMail()
yrest(5000)
player:update();
sendMacro("CloseWindows()")
sendMacro("OpenMail()")
yrest(5000);
RoMScript("UMMMailManager:MassTagMails('Empty')"); yrest(5000)
RoMScript("UMMFrameTab1Tools:ButtonClick('Delete');"); yrest(5000)
player:update();
yrest(5000)
sendMacro("CloseWindows()")
player:update();
else
Fusion_MakeMaxManaStones(11)
sendMacro("CloseWindows()")
sendMacro("OpenMail()");
yrest(2000);
UMM_SendByNameOrId("Xxxxxxx",{"Mana Stone Tier 9","Mana Stone Tier 10","Mana Stone Tier 11"})
sendMacro("CloseWindows()")
player:update();
end
end
end