Back to Home

ESO Lua File v100018

pregame/gamecredits/sharedgamecredits.lua

[◄ back to folders ]
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
local CREDITS_SCROLL_SPEED = 75 -- UI units per second
CreditsScreen_Base = ZO_Object:Subclass()
function CreditsScreen_Base:New(...)
    local object = ZO_Object.New(self)
    object:Initialize(...)
    return object
end
function CreditsScreen_Base:Initialize(control)
    self.control = control
    self.pools = {}
    self.currentEntryIndex = nil
    self.numCreditsEntries = 0
    self.scrollParent = control:GetNamedChild("Scroll")
    local function TimelineRelease(timeline)
        self:ReleaseEntry(timeline.control)
        timeline.key = nil
        timeline.control = nil
        timeline.stopCreditsRollWhenFinished = nil
    end
    control:SetHandler("OnUpdate", function(control, timeS) self:OnUpdate(timeS) end)
end
function CreditsScreen_Base:SetupTextControl(control, text)
    control:SetText(text)
    return control:GetTextHeight()
end
function CreditsScreen_Base:SetupLogoControl(control, textureFile, height)
    control:SetTexture(textureFile)
    return tonumber(height)
end
function CreditsScreen_Base:SetupBackgroundSwitch(control, textureFile)
    control.textureFile = textureFile
    control:SetTexture(textureFile) -- won't display anything, just loads this image so it's ready to go
    return 0 -- control is invisible, doesn't need a height
end
function CreditsScreen_Base:SetupPaddingSection(control, unused, height)
    return tonumber(height)
end
function CreditsScreen_Base:AddPool(poolType, template, setupCallback)
    self.pools[poolType] =
    {
        pool = ZO_ControlPool:New(template, self.scrollParent),
        setupCallback = setupCallback,
    }
end
function CreditsScreen_Base:AcquireControl(entryType, entryData, additionalData)
    local poolData = self.pools[entryType]
    local control, key = poolData.pool:AcquireObject()
    control.key = key
    control.entryType = entryType
    
    control:SetAnchor(TOP, self.scrollParent, BOTTOM)
    local controlHeight, onExitCallback = poolData.setupCallback(control, entryData, additionalData)
    return controlHeight, control, onExitCallback
end
function CreditsScreen_Base:ReleaseEntry(control)
    local key = control.key
    local entryType = control.entryType
    control.key = nil
    control.entryType = nil
    if entryType then
        self.pools[entryType].pool:ReleaseObject(key)
    end
end
do
    local finishedControls = {}
    function CreditsScreen_Base:OnUpdate(timeS)
        if self.running then
            self.phase = timeS * CREDITS_SCROLL_SPEED
            local phaseRung = math.floor(self.phase)
            ZO_ClearNumericallyIndexedTable(finishedControls)
            for _, control in ipairs(self.activeControls) do
                local currentDistance = (phaseRung - control.phaseRung)
                control:SetAnchor(TOP, self.scrollParent, BOTTOM, 0, -currentDistance)
                --Use -100 as a buffer so we don't see entries disappearing right on the edge
                if control:GetBottom() < -100 then
                    table.insert(finishedControls, control)
                end
            end
    
            for _, control in ipairs(finishedControls) do
                for searchIndex, searchControl in ipairs(self.activeControls) do
                    if searchControl == control then
                        table.remove(self.activeControls, searchIndex)
                        self:ReleaseEntry(control)
                    end
                end
            end
            if self.addNextPhaseRung == nil or phaseRung >= self.addNextPhaseRung then
                if self.currentEntryIndex < self.numCreditsEntries then
                    self:AddNextEntry()
                end
            end
            if self.creditsReadyToEnd and #self.activeControls == 0 then
                self:Exit()
            end
        end
    end
end
do
    local function ClosestUIUnitsOnPixelBoundry(uiUnits)
        local globalScale = GetUIGlobalScale()
        local numPixels = uiUnits * globalScale
        numPixels = zo_round(numPixels)
        return numPixels / globalScale
    end
    function CreditsScreen_Base:AddNextEntry()
        if(self.currentEntryIndex <= self.numCreditsEntries) then
            local entryType, entryData, additionalData = GetGameCreditsEntry(self.currentEntryIndex)
            local controlHeight, control, onExitCallback = self:AcquireControl(entryType, entryData, additionalData)
            
            --We find the amount UI units closest to the control's height that translates to an integral pixel amount when scaled for rendering. This ensures an integral pixel spacing
            --between all controls and prevent them from rounding over the pixel boundry at different times (jitter)
            controlHeight = ClosestUIUnitsOnPixelBoundry(controlHeight)
        
            local scrollHeight = self.scrollParent:GetHeight()
            local scrollDistance = scrollHeight + controlHeight
        
            control.phaseRung = self.addNextPhaseRung or zo_ceil(self.phase)
            control.onExitCallback = onExitCallback
            table.insert(self.activeControls, control)
            self.addNextPhaseRung = control.phaseRung + controlHeight
            self.currentEntryIndex = self.currentEntryIndex + 1
            if self.currentEntryIndex > self.numCreditsEntries then
                self.creditsReadyToEnd = true
            end
        end
    end
end
function CreditsScreen_Base:BeginCredits()
    if(self:IsPreferredScreen()) then
        self.numCreditsEntries = GetNumGameCreditsEntries()
        self.currentEntryIndex = 1
        g_currentDrawLevel = 1
        self.running = true
        self.activeControls = {}
    end
end
function CreditsScreen_Base:StopCredits()
    StopCredits()
    self.running = false
    self.addNextPhaseRung = nil
    for _, control in ipairs(self.activeControls) do
        self:ReleaseEntry(control)
    end
end