?  search:
summary | log | graphiclog1 | graphiclog2 | commit | commitdiff | tree | refs | edit | fork
blame | history | raw | HEAD
Merge branch 'fixes' into main/gingo-test
[ryzomcore.git] / ryzom / common / data_common / r2 / r2_ui_displayers.lua
blob45fd1d14e0a47e7dfbd5bf115fc5b70e9dcaca92
1 -----------------
2 -----------------
3 -- DISPLAYERS --
4 -----------------
5 -----------------
6
7 -- Displayer are objects attached to instance in the scenario
8 -- They react to modification events (creations of new objects such as nps, groups ...)
9 -- and update their display accordingly
10 -- There is zero or one displayer attached per category of display for each instance in the map
11 -- For now this include :
12 -- UI displayers : - They update the scenario window to display new things added to the map
13 -- Property displayers : - They update the property sheet for an instance when one is displayed
14 -- Visual displayers : - For now they are only implemented in C++. Their fonction is to update the display of a instance
15 -- - in the 3D scene
16 --
17 -- Displayer at attached at creation time by the C++ code
18 -- The displayers to add to a specific object are given its the class definition
19 -- (see r2_base_class.lua for details)
20
21 -- helper : update the context toolbar for the given instance if it is the current selected instance
22 local function updateContextToolbar(instance)
23 if r2:getSelectedInstance() == instance then
24 r2.ContextualCommands:update()
25 end
26 end
27
28
29
30
31 -----------------------------------------------------------------------------------------------------
32 -----------------------------------------------------------------------------------------------------
33 -----------------------------------------------------------------------------------------------------
34
35 -- The following code describes how to create a basic displayer that just
36 -- output the events it handles in the log
37 -- Mots of the time, when creating a new displayer, one will
38 -- just construct an existing displayer, and redefine methods of interest,
39 -- possibly calling the parent one
40
41 function r2:exampleUIDisplayer()
42 local handler = {}
43 local ct = colorTag(0, 0, 255)
44 ------------------------------------------------
45 -- Called by C++ at creation
46 function handler:onCreate(instance)
47 debugInfo(ct .. "Instance " .. instance.InstanceId .." was created")
48 end
49 ------------------------------------------------
50 -- Called by C++ just before object is removed (so properties are still readable)
51 function handler:onErase(instance)
52 debugInfo(ct .. "Instance " .. instance.InstanceId .." was erased")
53 end
54 ------------------------------------------------
55 -- Called by C++ just before object is moved in the object hierarchy
56 function handler:onPreHrcMove(instance)
57 updateContextToolbar(instance)
58 debugInfo(ct .. "Instance " .. instance.InstanceId .." is about to move")
59 end
60 ------------------------------------------------
61 -- Called by C++ just after object is move in the object hierarchy
62 function handler:onPostHrcMove(instance)
63 updateContextToolbar(instance)
64 debugInfo(ct .. "Instance " .. instance.InstanceId .." has moved")
65 end
66 ------------------------------------------------
67 -- Called by C++ just after object is highlighted by mouse
68 function handler:onFocus(instance, hasFocus)
69 if (instance.User.HasFocus ~= hasFocus) then
70 if hasFocus == true then
71 debugInfo(ct .. "Instance " .. instance.InstanceId .." has gained focus")
72 else
73 debugInfo(ct .. "Instance " .. instance.InstanceId .." has lost focus")
74 end
75 instance.User.HasFocus = hasFocus
76 end
77 end
78 ------------------------------------------------
79 -- Called by C++ just after object has been selected
80 function handler:onSelect(instance, isSelected)
81 if (isSelected == true) then
82 debugInfo(ct .. "Instance " .. instance.InstanceId .." is selected")
83 else
84 debugInfo(ct .. "Instance " .. instance.InstanceId .." is unselected")
85 end
86 end
87 ------------------------------------------------
88 -- Called by C++ when an attribute of this object has been modified
89 -- An attribute inside this object has been modified
90 -- attributeName :Name of the attribute inside this object, as given by its class definition. If the attribute
91 -- is an array, then an additionnal parameter gives the index of the element being modified in the array (or -1 if the whole array is set)
92 function handler:onAttrModified(instance, attributeName, indexInArray)
93 updateContextToolbar(instance)
94 debugInfo(ct .. "Instance " .. instance.InstanceId .." has an attribute modified : " .. attributeName)
95 end
96 end
97
98
99 function r2:onInstanceSelectedInTree(id)
100 -- is there's an active pick tool then
101 local currTool = r2:getCurrentTool()
102 if currTool and currTool:isPickTool() then
103 local tree = getUICaller()
104 tree:cancelNextSelectLine() -- don't want real selection, actually ...
105 if currTool:canPick() then
106 currTool:pick()
107 end
108 -- no-op else ...
109 return
110 end
111 --debugInfo("Seleting instance with id = " .. tostring(id) )
112 r2:setSelectedInstanceId(id)
113 end
114
115 function r2:onInstanceRightClickInTree(id)
116 r2:setSelectedInstanceId(id)
117 r2:displayContextMenu()
118 end
119
120
121 r2.VerboseEvents = false;
122
123 -- before to go to "test mode", store opened/closed nodes in scenario window tree
124 -- to correctly initialize tree when go back in edition mode
125 r2.storedClosedTreeNodes = {}
126
127 -----------------------------------------------------------------------------------------------------
128 -----------------------------------------------------------------------------------------------------
129 -----------------------------------------------------------------------------------------------------
130
131 -- displayer that update the tree control (scenario window)
132 function r2:defaultUIDisplayer()
133 local function eventDebugInfo(msg)
134 if r2.VerboseEvents == true then
135 debugInfo(msg)
136 end
137 end
138
139 local handler = {}
140 local ct = colorTag(255, 0, 255)
141 ------------------------------------------------
142 -- helper function : notify current act ui displayer that its quota has been modified
143 function handler:updateCurrentActQuota()
144 -- defer update to the next frame (many element can be added at once)
145 r2.UIMainLoop.LeftQuotaModified = true
146 end
147 ------------------------------------------------
148 function handler:onCut(instance, cutted)
149 -- NOT IMPLEMENTED
150 -- debugInfo("On cut " .. tostring(cutted))
151 -- local tree = getUI(r2.InstanceTreePath)
152 -- debugInfo(tostring(select(cutted, 127, 255)))
153 -- instance.User.TreeNode.Color.G = select(cutted, 0, 255)
154 -- tree:forceRebuild()
155 end
156 ------------------------------------------------
157 function handler:onCreate(instance)
158 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." was created")
159 self:addTreeNode(instance)
160 -- if my quota is not 0, then we should update
161 -- the current act quota ..
162 --if instance:getUsedQuota() ~= 0 then
163 -- self:updateCurrentActQuota()
164 --end
165 if instance:hasScenarioCost() ~= false then
166 self:updateCurrentActQuota()
167 end
168
169 end
170 ------------------------------------------------
171 function handler:onPostCreate(instance)
172
173 -- Special : if the cookie 'AskName' is set (by C++ or lua), then show property and ask name
174 -- to user for that object
175 if instance.User.AskName then
176 if instance.User.ShowProps then
177 r2:showProperties(instance)
178 instance.User.ShowProps = nil
179 end
180 if instance.User.Select then
181 r2:setSelectedInstanceId(instance.InstanceId)
182 end
183 local propWindow = r2.CurrentPropertyWindow
184
185 -- tmp : quick & dirty access to the widget ...
186 if propWindow and propWindow.active then
187 local editBox = propWindow:find("Name"):find("eb")
188 if editBox then
189 setCaptureKeyboard(editBox)
190 editBox:setSelectionAll()
191 end
192 end
193 instance.User.AskName = nil -- get rid of cookie
194 end
195 -- Special : if the cookie 'Select' is set (by C++ or lua), then the object should be selected after creation
196 if instance.User.Select then
197 r2:setSelectedInstanceId(instance.InstanceId)
198 end
199 if type(instance.User.CreateFunc) == "function" then
200 instance.User.CreateFunc(instance)
201 end
202 end
203 ------------------------------------------------
204 function handler:onErase(instance)
205 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." was erased")
206 self:removeTreeNode(instance)
207 -- if my quota is not 0, then we should update
208 -- the current act quota ..
209 if instance:hasScenarioCost() ~= false then
210 self:updateCurrentActQuota()
211 end
212 end
213 ------------------------------------------------
214 function handler:onPreHrcMove(instance)
215 updateContextToolbar(instance)
216 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." is about to move")
217 self:removeTreeNode(instance)
218 end
219 ------------------------------------------------
220 function handler:onPostHrcMove(instance)
221
222 -- if parent is a group, for its creation you don't know category of children : people or creature
223 -- you check it for first child
224 local parent = instance.ParentInstance
225 if instance:isGrouped() and parent.Components.Size==1 then
226 self:onErase(parent)
227 self:onCreate(parent)
228 self:onPostCreate(parent)
229 end
230
231 updateContextToolbar(instance)
232 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." has moved")
233 --eventDebugInfo(ct .. "New parent is " .. instance.ParentInstance.InstanceId)
234 local nodes = self:addTreeNode(instance)
235 if (r2:getSelectedInstance() == instance) and nodes then
236 for k, node in pairs(nodes) do
237 assert(node)
238 assert(node:getParentTree())
239 assert(node:getParentTree().selectNodeById)
240 node:getParentTree():selectNodeById(node.Id, false)
241 end
242 end
243 -- if my quota is not 0, then we should update
244 -- the current act quota ..
245 if instance:hasScenarioCost() ~= false then
246 self:updateCurrentActQuota()
247 end
248
249 -- if instance has Components, its children's nodes have been deleted at onPreHrcMove call
250 if instance.Components then
251 for i=0, instance.Components.Size-1 do
252 local child = instance.Components[i]
253 self:onCreate(child)
254 end
255
256 self:onPostCreate(instance)
257 end
258 end
259 ------------------------------------------------
260 function handler:onFocus(instance, hasFocus)
261 if (instance.User.HasFocus ~= hasFocus) then
262 if hasFocus == true then
263 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." has gained focus")
264 else
265 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." has lost focus")
266 end
267 instance.User.HasFocus = hasFocus
268 end
269 end
270 ------------------------------------------------
271 function handler:onSelect(instance, isSelected)
272 if not instance.User.TreeNodes then
273 return
274 end
275 for k, treeNode in pairs(instance.User.TreeNodes) do
276
277 if not (treeNode == nil or treeNode.isNil == true) then
278
279 local tree = treeNode:getParentTree()
280 if (isSelected == true) then
281 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." is selected")
282 tree:selectNodeById(instance.InstanceId, false)
283 else
284 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." is unselected")
285 tree:unselect()
286 end
287 end
288 end
289 end
290 ------------------------------------------------
291 function handler:onAttrModified(instance, attributeName, indexInArray)
292 if attributeName == "Position" or attributeName == "Angle" then
293 return
294 end
295 if attributeName == "Selectable" then
296 self:removeTreeNode(instance)
297 self:addTreeNode(instance)
298 end
299
300 updateContextToolbar(instance)
301 if not instance.User.TreeNodes then
302 return
303 end
304 local nodes = instance.User.TreeNodes
305 for k, node in pairs(nodes) do
306 local tree = node:getParentTree()
307 if attributeName == 'Name' then
308 setupNodeName(instance)
309 if node:getFather() then
310 node:getFather():sortByBitmap()
311 end
312 tree:forceRebuild()
313 tree:selectNodeById(node.Id, false) -- reforce the selection
314 end
315 end
316
317 if attr == "Ghost" then
318 if instance.Ghost then
319 self:removeTreeNode(instance)
320 end
321 end
322 --eventDebugInfo(ct .. "Instance " .. instance.InstanceId .." has an attribute modified : " .. attributeName)
323 end
324
325 function setupNodeName(instance)
326 local treeNodes = instance.User.TreeNodes
327 if not treeNodes then return end
328
329 for k, treeNode in pairs(treeNodes) do
330 if not (treeNode == nil or treeNode.isNil == true) then
331 local tree = treeNode:getParentTree()
332
333 treeNode.Text = instance:getDisplayName()
334 if tree then -- nb : tree may be nil if node is setupped before being attached to its parent tree
335 tree:forceRebuild()
336 end
337 end
338 end
339 end
340
341 function handler:storeClosedTreeNodes()
342
343 function downInTree(node, nodeTable)
344
345 for i=0, node:getNumChildren()-1 do
346 local child = node:getChild(i)
347 assert(child)
348
349 nodeTable[child.Id] = child.Opened
350
351 if child:getNumChildren()>0 then
352 downInTree(child, nodeTable)
353 end
354 end
355 end
356
357 r2.storedClosedTreeNodes = {}
358
359 -- scenary objects
360 r2.storedClosedTreeNodes[r2.Scenario:getBaseAct().InstanceId] = {}
361 local objectNodes = r2.storedClosedTreeNodes[r2.Scenario:getBaseAct().InstanceId]
362
363 local container = getUI("ui:interface:r2ed_scenario")
364 --local objectsRoot = container:find("content_tree_list"):getRootNode():getNodeFromId("scenery_objects")
365 local objectsRoot = container:find("content_tree_list"):getRootNode()
366 assert(objectsRoot)
367 downInTree(objectsRoot, objectNodes)
368
369 -- entities and components
370 if r2.Scenario.Acts.Size>1 then
371 for i=1, r2.Scenario.Acts.Size-1 do
372 local act = r2.Scenario.Acts[i]
373 local peopleRoot = act:getContentTree():getRootNode():getNodeFromId("people")
374 assert(peopleRoot)
375 local creatureRoot = act:getContentTree():getRootNode():getNodeFromId("creatures")
376 assert(creatureRoot)
377 --local componentRoot = act:getMacroContentTree():getRootNode():getNodeFromId("macro_components")
378 local componentRoot = act:getMacroContentTree():getRootNode()
379 assert(componentRoot)
380
381 r2.storedClosedTreeNodes[act.InstanceId] = {}
382 local actNodes = r2.storedClosedTreeNodes[act.InstanceId]
383
384 downInTree(peopleRoot, actNodes)
385 downInTree(creatureRoot, actNodes)
386 downInTree(componentRoot, actNodes)
387 end
388 end
389 end
390
391 function handler:addPermanentNodes()
392
393 if r2.ScenarioInstanceId then
394 local scenario = r2:getInstanceFromId(r2.ScenarioInstanceId)
395 if scenario and scenario.Acts.Size>0 then
396 local addToTreesTable = {}
397 scenario:getBaseAct():appendInstancesByType(addToTreesTable, "LogicEntity")
398 for k, instance in pairs(addToTreesTable) do
399 self:addTreeNode(instance)
400 end
401 end
402 end
403 end
404
405 -- private
406 function handler:addTreeNode(instance)
407
408 if instance.Ghost then return nil end
409
410 local parentNodes = instance:getParentTreeNode()
411
412 if parentNodes==nil then return nil end
413
414 if instance.User.TreeNodes==nil then instance.User.TreeNodes = {} end
415
416 for actId,parentNode in pairs(parentNodes) do
417
418 local alreadyAdded = false
419
420 for k2, treeNode in pairs(instance.User.TreeNodes) do
421 if not (treeNode==nil or treeNode.isNil==true) then
422
423 local father = treeNode:getFather()
424 if father==parentNode then
425 alreadyAdded=true
426 break
427 end
428 end
429 end
430
431 if not alreadyAdded then
432
433 if parentNode == nil then
434 return nil -- one of the ancestors may be unselectable
435 end
436 if not instance.SelectableFromRoot then
437 return nil
438 end
439 local tree = parentNode:getParentTree()
440 local treeNode = SNode()
441
442 -- store reference in object
443 table.insert(instance.User.TreeNodes, treeNode)
444
445 treeNode.Bitmap = instance:getPermanentStatutIcon()
446 local openTree = true
447 if r2.storedClosedTreeNodes[actId] then
448 openTree = (r2.storedClosedTreeNodes[actId][instance.InstanceId]==true)
449 end
450 treeNode.Opened = openTree
451
452 treeNode.Id = instance.InstanceId
453 treeNode.AHName = "lua"
454 local ahParams = "r2:onInstanceSelectedInTree('" .. instance.InstanceId .. "')"
455 --eventDebugInfo(ahParams)
456 treeNode.AHParams = ahParams
457 treeNode.AHNameRight = "lua"
458 treeNode.AHParamsRight = "r2:onInstanceRightClickInTree('" .. instance.InstanceId .. "')"
459 treeNode.AHNameClose = "lua"
460 treeNode.AHParamsClose = "r2.storedClosedTreeNodes = {}"
461
462 setupNodeName(instance)
463
464 assert(parentNode)
465 parentNode:addChildSortedByBitmap(treeNode)
466 parentNode.Show = (parentNode:getNumChildren() ~= 0)
467
468 tree:forceRebuild()
469 end
470 end
471
472 return instance.User.TreeNodes
473 end
474 function handler:removeTreeNode(instance)
475
476 local nodes = instance.User.TreeNodes
477 if nodes == nil or nodes.isNil then
478 return
479 end
480 for k, node in pairs(nodes) do
481 if not (node == nil or node.isNil == true) then
482 local tree = node:getParentTree()
483 if node:getFather().isNil then
484 if (node == node:getParentTree():getRootNode()) then
485 --debugInfo("ROOT NODE")
486 node:getParentTree():setRootNode(nil)
487 else
488 --debugInfo("ISOLATED NODE")
489 deleteReflectable(node) -- isolated node (the tree was never built ?)
490 end
491 else
492 -- update parent node visibility only if a direct son of the root node
493 if node:getFather() then
494 if (node:getFather():getFather() == tree:getRootNode()) then
495 node:getFather().Show = (node:getFather():getNumChildren() > 1)
496 end
497 node:getFather():deleteChild(node)
498 end
499
500 end
501 tree:forceRebuild()
502 end
503 end
504 instance.User.TreeNodes = nil
505 end
506
507 return handler
508
509 end
510
511 -----------------------------------------------------------------------------------------------------
512 -----------------------------------------------------------------------------------------------------
513 -----------------------------------------------------------------------------------------------------
514
515 -- special display for groups in scenario window
516 function r2:groupUIDisplayer()
517 local handler = self:defaultUIDisplayer()
518 function handler:updateLeaderColor(instance)
519 if not instance.User.TreeNodes then
520 return
521 end
522 for k, node in pairs(instance.User.TreeNodes) do
523 local tree = node:getParentTree()
524 for i = 0, instance.Components.Size - 1 do
525 --debugInfo("I = " .. tostring(i))
526 local treeNodes = instance.Components[i].User.TreeNodes
527 if treeNodes then
528 for k2, treeNode in pairs(treeNodes) do
529 if i == 0 then
530 treeNode.Color = CRGBA(255, 0, 0) -- mark leader in red
531 else
532 treeNode.Color = CRGBA(255, 255, 255)
533 end
534 end
535 end
536 end
537 tree:forceRebuild()
538 end
539 end
540 --
541 local oldOnAttrModified = handler.onAttrModified
542 function handler:onAttrModified(instance, attrName, indexInArray)
543 if attrName == "Components" then
544 self:updateLeaderColor(instance)
545 end
546 oldOnAttrModified(self, instance, attrName, indexInArray)
547 end
548 --
549 -- local oldOnCreate = handler.onCreate
550 -- function handler:onCreate(instance)
551 -- debugInfo("On create group")
552 -- oldOnCreate(self, instance)
553 -- end
554 --
555 local oldOnPostCreate = handler.onPostCreate
556 function handler:onPostCreate(instance)
557 oldOnPostCreate(self, instance)
558 self:updateLeaderColor(instance)
559 end
560 --
561 return handler
562 end
563
564
565
566 -----------------------------------------------------------------------------------------------------
567 -----------------------------------------------------------------------------------------------------
568 -----------------------------------------------------------------------------------------------------
569
570 -- Displayer for ACTS. In the ui, acts are added into the act combo box --
571 -- in the environment of the container we store a table that gives the act Instance id,
572 -- and the index of the tree control for each line in the combo box
573 -- Table has the following look
574 -- ActTable = { { Act = ..., TreeIndex = ... }, -- combo box line 1
575 -- { Act = ..., TreeIndex = ... }, -- combo box line 2
576 -- { Act = ..., TreeIndex = ... }, -- combo box line 3 etc.
577 -- }
578
579
580 r2.ActUIDisplayer = {}
581 r2.ActUIDisplayer.ActTable = {} -- table that map each line of the combo box to an act
582 r2.ActUIDisplayer.LastSelfCreatedActInstanceId = nil -- id of the last act created by the pionner (not by another pionner)
583 -- When created, an act change will automatically occur
584
585 ------------------------------------------------
586 -- helper function : notify current act ui displayer that its quota has been modified
587 function r2.ActUIDisplayer:updateCurrentActQuota()
588 -- defer update to the next frame (many element can be added at once)
589 r2.UIMainLoop.LeftQuotaModified = true
590 end
591
592 ------------------------------------------------
593 function r2.ActUIDisplayer:updateActName(act)
594
595 if act and not act:isBaseAct() then
596
597 local actTable = self:getActTable()
598 for index, entry in pairs(actTable) do
599 if entry.Act == act then
600 local comboBox = self:getActComboBox()
601
602 local actTitle = act:getName()
603 if act==r2.Scenario:getCurrentAct() then
604 actTitle = actTitle .. " [" .. i18n.get("uiR2EDCurrentActComboBox"):toUtf8() .."]"
605 end
606 local text = ucstring()
607 text:fromUtf8(actTitle)
608 comboBox:setText(index - 1, text)
609 return
610 end
611 end
612 end
613 end
614
615 ------------------------------------------------
616 function r2.ActUIDisplayer:onAttrModified(instance, attributeName, indexInArray)
617
618 -- if title is modified, then must update names of all entities in the scene
619 if attributeName == "Name" then
620 local npcs = {}
621 r2:getCurrentAct():appendInstancesByType(npcs, "Npc")
622 for k, npc in pairs(npcs) do
623 npc.DisplayerVisual:updateName()
624 end
625
626 self:updateActName(instance)
627 end
628 end
629
630
631
632 ------------------------------------------------
633 function r2.ActUIDisplayer:onCreate(act)
634
635 local container = self:getContainer()
636 local comboBox = self:getActComboBox()
637
638 local tree, macroTree
639 if not act:isBaseAct() then
640 local text = ucstring()
641 local index = r2.logicComponents:searchElementIndex(act)-2
642 local actTitle = act:getName()
643 if type(actTitle) ~= "string" then
644 text:fromUtf8("bad type for title : " .. type(actTitle))
645 comboBox:insertText(index, text)
646 else
647 text:fromUtf8(actTitle)
648 comboBox:insertText(index, text)
649 end
650
651 tree = self:findFreeTreeCtrl()
652 macroTree = self:findFreeTreeCtrl(true)
653 local actTable = self:getActTable()
654 table.insert(actTable, index+1, { Act = act, Tree = tree , MacroTree = macroTree})
655 end
656
657 -- store tree in the act for future insertion of items
658 act.User.ContentTree = tree
659 act.User.MacroContentTree = macroTree
660 self:updateCurrentActQuota()
661
662 -- add permanent nodes to act node
663 r2:defaultUIDisplayer():addPermanentNodes()
664 end
665
666 ------------------------------------------------
667 function r2.ActUIDisplayer:onPostCreate(act)
668 -- when a new act is created, select this act as the default
669 if act.InstanceId == self.LastSelfCreatedActInstanceId then
670 -- the act was just created by pionner on that computer, so change right now
671 r2.ScenarioWindow:setAct(act)
672 self.LastSelfCreatedActInstanceId = nil
673 end
674 r2.ScenarioWindow:updateUIFromCurrentAct()
675 self:updateCurrentActQuota()
676 end
677
678 ------------------------------------------------
679 function r2.ActUIDisplayer:onErase(erasedAct)
680 -- clean tree content
681 local tree = erasedAct.User.ContentTree
682 local macroTree = erasedAct.User.MacroContentTree
683 if tree then
684 r2:cleanTreeNode(tree, "people")
685 r2:cleanTreeNode(tree, "creatures")
686 end
687 if macroTree then
688 --r2:cleanTreeNode(macroTree, "macro_components")
689 r2:cleanTreeRootNode(macroTree)
690 end
691 local actTable = self:getActTable()
692 for index, entry in pairs(actTable) do
693 if entry.Act == erasedAct then
694 self:getActComboBox():removeTextByIndex(index - 1)
695 table.remove(actTable, index)
696 return
697 end
698 end
699
700 self:updateCurrentActQuota()
701 end
702 ------------------------------------------------
703 function r2.ActUIDisplayer:getActTable()
704 return self.ActTable
705 end
706
707 ------------------------------------------------
708 function r2.ActUIDisplayer:getContainer()
709 return getUI("ui:interface:r2ed_scenario")
710 end
711
712 ------------------------------------------------
713 function r2.ActUIDisplayer:getActComboBox()
714 return self:getContainer():find("act_combo_box")
715 end
716
717 -----------------------------------------------
718 function r2.ActUIDisplayer:findFreeTreeCtrl(macroTree)
719
720 local treeName = "act_tree_"
721 if macroTree==true then treeName="macro_act_tree_" end
722 for i = 0, r2:getMaxNumberOfAdditionnalActs() - 1 do
723 local tree = self:getContainer():find(treeName .. tostring(i))
724 local used = false
725 for index, entry in pairs(self:getActTable()) do
726 local entryTree = entry.Tree
727 if macroTree==true then entryTree = entry.MacroTree end
728 if entryTree == tree then
729 used = true
730 break
731 end
732 end
733 if not used then
734 return tree
735 end
736 end
737 return nil
738 end
739
740
741 function r2:createActUIDisplayer()
742 return r2.ActUIDisplayer
743 end
744