contrebasse@0
|
1 local addonName, A = ...
|
contrebasse@0
|
2
|
contrebasse@67
|
3 -- @todo: enchants, elementals, prospecting
|
contrebasse@0
|
4 -- @todo improve scanning
|
contrebasse@67
|
5
|
contrebasse@67
|
6 A.data = {}
|
contrebasse@67
|
7
|
contrebasse@15
|
8 do
|
contrebasse@15
|
9 -- lua functions
|
contrebasse@15
|
10 local print = print
|
contrebasse@15
|
11 local ipairs = ipairs
|
contrebasse@15
|
12 local tinsert = tinsert
|
contrebasse@67
|
13 local select = select
|
contrebasse@0
|
14
|
contrebasse@15
|
15 -- Wow functions
|
contrebasse@15
|
16 local GetNumTradeSkills = GetNumTradeSkills
|
contrebasse@15
|
17 local GetTradeSkillInfo = GetTradeSkillInfo
|
contrebasse@15
|
18 local GetTradeSkillNumReagents = GetTradeSkillNumReagents
|
contrebasse@15
|
19 local GetTradeSkillItemLink = GetTradeSkillItemLink
|
contrebasse@67
|
20 local GetTradeSkillRecipeLink = GetTradeSkillRecipeLink
|
contrebasse@15
|
21 local GetTradeSkillReagentItemLink = GetTradeSkillReagentItemLink
|
contrebasse@15
|
22 local GetTradeSkillReagentInfo = GetTradeSkillReagentInfo
|
contrebasse@15
|
23 local GetTradeSkillNumMade = GetTradeSkillNumMade
|
contrebasse@67
|
24 local GetSpellInfo = GetSpellInfo
|
contrebasse@67
|
25
|
contrebasse@67
|
26 -- Wow objects
|
contrebasse@67
|
27 local GetTradeSkillLine = GetTradeSkillLine
|
contrebasse@0
|
28
|
contrebasse@15
|
29 -- the function who scans the tradeskill
|
contrebasse@15
|
30 function A:ScanSimpleRecipes()
|
contrebasse@82
|
31 -- Do not scan while we modify the tradeskill display
|
contrebasse@82
|
32 if A.blockScan then return end
|
contrebasse@82
|
33
|
contrebasse@82
|
34
|
contrebasse@26
|
35 -- Check if the tradeskill is loaded
|
contrebasse@26
|
36 -- Has to have recipes and begin with a header
|
contrebasse@26
|
37 local NRecipes = GetNumTradeSkills()
|
contrebasse@26
|
38 if NRecipes==0 or select(2,GetTradeSkillInfo(1))~="header" then
|
contrebasse@26
|
39 return
|
contrebasse@26
|
40 end
|
contrebasse@70
|
41
|
contrebasse@85
|
42 tradeskillName = GetTradeSkillLine()
|
contrebasse@66
|
43
|
contrebasse@67
|
44 -- Check if the pseudo tradeskills have to be added
|
contrebasse@85
|
45 if tradeskillName == GetSpellInfo(25229) then -- Jewelcrafting
|
contrebasse@67
|
46 if not A.ProspectingDataLoaded then
|
contrebasse@68
|
47 for itemID,data in pairs(A.ProspectingData) do
|
contrebasse@67
|
48 A.data[itemID] = data
|
contrebasse@67
|
49 end
|
contrebasse@67
|
50 A.ProspectingDataLoaded = true
|
contrebasse@67
|
51 end
|
contrebasse@85
|
52 elseif tradeskillName == GetSpellInfo(45357) then -- Inscription
|
contrebasse@67
|
53 if not A.MillingDataLoaded then
|
contrebasse@68
|
54 for itemID,data in pairs(A.MillingData) do
|
contrebasse@67
|
55 A.data[itemID] = data
|
contrebasse@67
|
56 end
|
contrebasse@67
|
57 A.MillingDataLoaded = true
|
contrebasse@67
|
58 end
|
contrebasse@67
|
59 end
|
contrebasse@67
|
60
|
contrebasse@82
|
61 local lastHeader
|
contrebasse@82
|
62 for i = 1,NRecipes do
|
contrebasse@70
|
63 -- skillName, skillType, numAvailable, isExpanded, serviceType, numSkillUps = GetTradeSkillInfo(index)
|
contrebasse@70
|
64 -- serviceType is nil if the recipe creates an item
|
contrebasse@82
|
65 local skillName, skillType, _, _, serviceType = GetTradeSkillInfo(i)
|
contrebasse@82
|
66 if skillType and skillType == "header" then
|
contrebasse@82
|
67 lastHeader = skillName
|
contrebasse@82
|
68
|
contrebasse@82
|
69 elseif skillType and skillType ~= "header" and serviceType==nil then
|
contrebasse@70
|
70 -- item ID
|
contrebasse@70
|
71 local itemID = A.link2ID(GetTradeSkillItemLink(i))
|
contrebasse@0
|
72
|
contrebasse@70
|
73 -- reagent ID, valid only if there's only one reagent as we take only the first one
|
contrebasse@70
|
74 local reagentID = A.link2ID(GetTradeSkillReagentItemLink(i, 1))
|
contrebasse@14
|
75
|
contrebasse@70
|
76 -- reagent number needed
|
contrebasse@70
|
77 local _, _, reagentCount, _ = GetTradeSkillReagentInfo(i, 1)
|
contrebasse@14
|
78
|
contrebasse@70
|
79 -- number of reagent created by the recipe
|
contrebasse@70
|
80 local minMade, maxMade = GetTradeSkillNumMade(i)
|
contrebasse@66
|
81
|
contrebasse@70
|
82 -- recipe link (for tooltips)
|
contrebasse@70
|
83 local recipeLink = GetTradeSkillRecipeLink(i)
|
contrebasse@0
|
84
|
contrebasse@70
|
85 -- error checking
|
contrebasse@70
|
86 if itemID and reagentID and reagentCount and minMade and maxMade and recipeLink then
|
contrebasse@70
|
87 -- remove unneeded minMade/maxMade
|
contrebasse@70
|
88 if maxMade==minMade then
|
contrebasse@70
|
89 maxMade = nil
|
contrebasse@70
|
90 if minMade==1 then
|
contrebasse@70
|
91 minMade = nil
|
contrebasse@70
|
92 end -- if
|
contrebasse@70
|
93 end -- if
|
contrebasse@66
|
94
|
contrebasse@70
|
95 -- As we scan multiple times, check if this recipe is already stored
|
contrebasse@70
|
96 local addSpell = true
|
contrebasse@70
|
97 if not A.data[itemID] then
|
contrebasse@70
|
98 A.data[itemID] = {}
|
contrebasse@70
|
99 else
|
contrebasse@37
|
100 for _,v in ipairs(A.data[itemID]) do
|
contrebasse@70
|
101 if v.spellLink==recipeLink then
|
contrebasse@70
|
102 addSpell = nil
|
contrebasse@37
|
103 break
|
contrebasse@37
|
104 end -- if
|
contrebasse@37
|
105 end -- for
|
contrebasse@15
|
106 end -- if
|
contrebasse@70
|
107
|
contrebasse@70
|
108 -- Cache the data
|
contrebasse@70
|
109 if addSpell then
|
contrebasse@70
|
110 local spell = {reagentID,reagentCount,minMade,maxMade}
|
contrebasse@85
|
111 spell.spellName = tradeskillName
|
contrebasse@70
|
112 spell.spellLink = recipeLink
|
contrebasse@82
|
113 spell.header = lastHeader
|
contrebasse@70
|
114 spell.manyReagents = GetTradeSkillNumReagents(i)>1
|
contrebasse@70
|
115 tinsert(A.data[itemID],spell)
|
contrebasse@70
|
116 end
|
contrebasse@70
|
117
|
contrebasse@84
|
118 --else -- Zap incomplete recipes, they will be scanned later
|
contrebasse@70
|
119 --@debug@
|
contrebasse@84
|
120 --print("Erreur de scan :",itemID,reagentID,reagentCount,minMade,maxMade,recipeLink)
|
contrebasse@70
|
121 --@end-debug@
|
contrebasse@70
|
122 end -- if
|
contrebasse@0
|
123 end -- if
|
contrebasse@15
|
124 end -- for
|
contrebasse@66
|
125
|
contrebasse@70
|
126 zzz = A.data
|
contrebasse@26
|
127 -- the scanning is complete
|
contrebasse@26
|
128 return true
|
contrebasse@15
|
129 end -- function
|
contrebasse@15
|
130 end -- do
|