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@93
|
6 A.data = A.CommonData
|
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@93
|
73 local numReagents = GetTradeSkillNumReagents(i)
|
contrebasse@93
|
74 local reagentID, reagentCount
|
contrebasse@93
|
75 if numReagents==1 then
|
contrebasse@93
|
76 -- reagent ID
|
contrebasse@93
|
77 reagentID = A.link2ID(GetTradeSkillReagentItemLink(i, 1))
|
contrebasse@14
|
78
|
contrebasse@93
|
79 -- reagent number needed
|
contrebasse@93
|
80 reagentCount = select(3,GetTradeSkillReagentInfo(i, 1))
|
contrebasse@93
|
81 end
|
contrebasse@14
|
82
|
contrebasse@70
|
83 -- number of reagent created by the recipe
|
contrebasse@70
|
84 local minMade, maxMade = GetTradeSkillNumMade(i)
|
contrebasse@66
|
85
|
contrebasse@70
|
86 -- recipe link (for tooltips)
|
contrebasse@70
|
87 local recipeLink = GetTradeSkillRecipeLink(i)
|
contrebasse@0
|
88
|
contrebasse@70
|
89 -- error checking
|
contrebasse@93
|
90 if itemID and (numReagents ~= 1 or (reagentID and reagentCount)) and minMade and maxMade and recipeLink then
|
contrebasse@70
|
91 -- remove unneeded minMade/maxMade
|
contrebasse@70
|
92 if maxMade==minMade then
|
contrebasse@70
|
93 maxMade = nil
|
contrebasse@70
|
94 if minMade==1 then
|
contrebasse@70
|
95 minMade = nil
|
contrebasse@70
|
96 end -- if
|
contrebasse@70
|
97 end -- if
|
contrebasse@66
|
98
|
contrebasse@70
|
99 -- As we scan multiple times, check if this recipe is already stored
|
contrebasse@70
|
100 local addSpell = true
|
contrebasse@70
|
101 if not A.data[itemID] then
|
contrebasse@70
|
102 A.data[itemID] = {}
|
contrebasse@70
|
103 else
|
contrebasse@37
|
104 for _,v in ipairs(A.data[itemID]) do
|
contrebasse@70
|
105 if v.spellLink==recipeLink then
|
contrebasse@70
|
106 addSpell = nil
|
contrebasse@37
|
107 break
|
contrebasse@37
|
108 end -- if
|
contrebasse@37
|
109 end -- for
|
contrebasse@15
|
110 end -- if
|
contrebasse@70
|
111
|
contrebasse@70
|
112 -- Cache the data
|
contrebasse@70
|
113 if addSpell then
|
contrebasse@70
|
114 local spell = {reagentID,reagentCount,minMade,maxMade}
|
contrebasse@85
|
115 spell.spellName = tradeskillName
|
contrebasse@70
|
116 spell.spellLink = recipeLink
|
contrebasse@82
|
117 spell.header = lastHeader
|
contrebasse@70
|
118 tinsert(A.data[itemID],spell)
|
contrebasse@70
|
119 end
|
contrebasse@70
|
120
|
contrebasse@84
|
121 --else -- Zap incomplete recipes, they will be scanned later
|
contrebasse@70
|
122 --@debug@
|
contrebasse@84
|
123 --print("Erreur de scan :",itemID,reagentID,reagentCount,minMade,maxMade,recipeLink)
|
contrebasse@70
|
124 --@end-debug@
|
contrebasse@70
|
125 end -- if
|
contrebasse@0
|
126 end -- if
|
contrebasse@15
|
127 end -- for
|
contrebasse@66
|
128
|
contrebasse@70
|
129 zzz = A.data
|
contrebasse@26
|
130 -- the scanning is complete
|
contrebasse@26
|
131 return true
|
contrebasse@15
|
132 end -- function
|
contrebasse@15
|
133 end -- do
|