Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
fuba82
AddOnSkins
Commits
cc807e33
Commit
cc807e33
authored
Aug 23, 2020
by
fuba82
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
hopefilly fixed ArkInventory Version 3.09.31
parent
9930f51f
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
90 additions
and
86 deletions
+90
-86
Skins/AddOns/ArkInventory.lua
Skins/AddOns/ArkInventory.lua
+90
-86
No files found.
Skins/AddOns/ArkInventory.lua
View file @
cc807e33
...
...
@@ -3,101 +3,105 @@ local AS = unpack(AddOnSkins)
if
not
AS
:
CheckAddOn
(
'ArkInventory'
)
then
return
end
function
AS
:
ArkInventory
()
hooksecurefunc
(
ArkInventory
,
'Frame_Main_Paint'
,
function
(
frame
)
if
not
ArkInventory
.
ValidFrame
(
frame
,
true
)
then
return
end
for
i
=
1
,
select
(
'#'
,
frame
:
GetChildren
())
do
local
subframe
=
select
(
i
,
frame
:
GetChildren
())
if
subframe
.
IsSkinned
then
return
end
local
name
=
subframe
:
GetName
()
if
name
then
if
_G
[
name
..
'ArkBorder'
]
then
AS
:
Kill
(
_G
[
name
..
'ArkBorder'
])
end
if
_G
[
name
..
'Background'
]
then
AS
:
Kill
(
_G
[
name
..
'Background'
])
end
end
AS
:
SkinFrame
(
subframe
)
subframe
.
IsSkinned
=
true
end
end
)
hooksecurefunc
(
ArkInventory
,
'Frame_Main_Paint'
,
function
(
frame
)
if
not
ArkInventory
.
ValidFrame
(
frame
,
true
)
then
return
end
for
i
=
1
,
select
(
'#'
,
frame
:
GetChildren
())
do
local
subframe
=
select
(
i
,
frame
:
GetChildren
())
if
subframe
.
IsSkinned
then
return
end
local
name
=
subframe
:
GetName
()
if
name
then
if
_G
[
name
..
'ArkBorder'
]
then
AS
:
Kill
(
_G
[
name
..
'ArkBorder'
])
end
if
_G
[
name
..
'Background'
]
then
AS
:
Kill
(
_G
[
name
..
'Background'
])
end
if
subframe
.
ArkBorder
then
AS
:
Kill
(
subframe
.
ArkBorder
)
end
end
AS
:
SkinFrame
(
subframe
)
subframe
.
IsSkinned
=
true
end
end
)
hooksecurefunc
(
ArkInventory
,
'Frame_Main_Anchor_Set'
,
function
(
loc_id
)
local
mainframe
=
ArkInventory
.
Frame_Main_Get
(
loc_id
):
GetName
()
local
f
=
_G
[
mainframe
..
ArkInventory
.
Const
.
Frame
.
Search
.
Name
..
'Filter'
]
local
b
=
_G
[
mainframe
..
ArkInventory
.
Const
.
Frame
.
Search
.
Name
..
'Clear'
]
if
f
then
AS
:
SkinEditBox
(
f
)
local
bd
=
f
.
backdrop
or
f
.
Backdrop
or
nil
if
bd
then
local
bbc
=
ArkInventory
.
GetLocationCodex
(
loc_id
).
style
.
bar
.
border
.
colour
bd
:
SetFrameLevel
(
f
:
GetFrameLevel
())
AS
:
SetOutside
(
bd
,
nil
,
1
,
-
5
)
bd
:
SetBackdropBorderColor
(
bbc
.
r
,
bbc
.
g
,
bbc
.
b
,
bbc
.
a
or
1
)
end
end
if
b
then
AS
:
SkinButton
(
b
)
b
:
SetNormalTexture
(
[[Interface\Buttons\UI-GroupLoot-Pass-Up]]
)
b
:
SetHighlightTexture
(
[[Interface\Buttons\UI-GroupLoot-Pass-Highlight]]
)
b
:
SetPushedTexture
(
[[Interface\Buttons\UI-GroupLoot-Pass-Down]]
)
end
end
)
hooksecurefunc
(
ArkInventory
,
'Frame_Main_Anchor_Set'
,
function
(
loc_id
)
local
mainframe
=
ArkInventory
.
Frame_Main_Get
(
loc_id
):
GetName
()
local
f
=
_G
[
mainframe
..
ArkInventory
.
Const
.
Frame
.
Search
.
Name
..
'Filter'
]
local
b
=
_G
[
mainframe
..
ArkInventory
.
Const
.
Frame
.
Search
.
Name
..
'Clear'
]
if
f
then
AS
:
SkinEditBox
(
f
)
local
bd
=
f
.
backdrop
or
f
.
Backdrop
or
nil
if
bd
then
local
bbc
=
ArkInventory
.
GetLocationCodex
(
loc_id
).
style
.
bar
.
border
.
colour
bd
:
SetFrameLevel
(
f
:
GetFrameLevel
())
AS
:
SetOutside
(
bd
,
nil
,
1
,
-
5
)
bd
:
SetBackdropBorderColor
(
bbc
.
r
,
bbc
.
g
,
bbc
.
b
,
bbc
.
a
or
1
)
end
end
if
b
then
AS
:
SkinButton
(
b
)
b
:
SetNormalTexture
(
[[Interface\Buttons\UI-GroupLoot-Pass-Up]]
)
b
:
SetHighlightTexture
(
[[Interface\Buttons\UI-GroupLoot-Pass-Highlight]]
)
b
:
SetPushedTexture
(
[[Interface\Buttons\UI-GroupLoot-Pass-Down]]
)
end
end
)
hooksecurefunc
(
ArkInventory
,
'Frame_Bar_Paint'
,
function
(
bar
)
local
loc_id
=
bar
.
ARK_Data
.
loc_id
if
not
bar
.
IsSkinned
then
local
name
=
bar
:
GetName
()
if
_G
[
name
..
'ArkBorder'
]
then
AS
:
Kill
(
_G
[
name
..
'ArkBorder'
])
end
if
_G
[
name
..
'Background'
]
then
AS
:
Kill
(
_G
[
name
..
'Background'
])
end
bar
.
IsSkinned
=
true
end
hooksecurefunc
(
ArkInventory
,
'Frame_Bar_Paint'
,
function
(
bar
)
local
loc_id
=
bar
.
ARK_Data
.
loc_id
if
not
bar
.
IsSkinned
then
local
name
=
bar
:
GetName
()
if
_G
[
name
..
'ArkBorder'
]
then
AS
:
Kill
(
_G
[
name
..
'ArkBorder'
])
end
if
_G
[
name
..
'Background'
]
then
AS
:
Kill
(
_G
[
name
..
'Background'
])
end
if
bar
.
ArkBorder
then
AS
:
Kill
(
bar
.
ArkBorder
)
end
bar
.
IsSkinned
=
true
end
AS
:
SetTemplate
(
bar
)
AS
:
SetTemplate
(
bar
)
if
ArkInventory
.
Global
.
Mode
.
Edit
then
bar
:
SetBackdropBorderColor
(
1
,
0
,
0
,
1
)
bar
:
SetBackdropColor
(
1
,
0
,
0
,
.
1
)
else
bar
:
SetBackdropBorderColor
(
_G
[
bar
:
GetName
()
..
'ArkBorder'
]:
GetBackdropBorderColor
())
end
end
)
if
ArkInventory
.
Global
.
Mode
.
Edit
then
bar
:
SetBackdropBorderColor
(
1
,
0
,
0
,
1
)
bar
:
SetBackdropColor
(
1
,
0
,
0
,
.
1
)
else
if
bar
.
ArkBorder
then
bar
:
SetBackdropBorderColor
(
bar
.
ArkBorder
:
GetBackdropBorderColor
())
end
end
end
)
hooksecurefunc
(
ArkInventory
,
'SetItemButtonTexture'
,
function
(
frame
,
texture
,
r
,
g
,
b
)
if
not
(
frame
and
frame
.
icon
)
then
return
end
hooksecurefunc
(
ArkInventory
,
'SetItemButtonTexture'
,
function
(
frame
,
texture
,
r
,
g
,
b
)
if
not
(
frame
and
frame
.
icon
)
then
return
end
AS
:
SkinTexture
(
frame
.
icon
)
AS
:
SetInside
(
frame
.
icon
)
end
)
AS
:
SkinTexture
(
frame
.
icon
)
AS
:
SetInside
(
frame
.
icon
)
end
)
hooksecurefunc
(
ArkInventory
,
'Frame_Item_Update_Border'
,
function
(
frame
)
if
not
ArkInventory
.
ValidFrame
(
frame
,
true
)
then
return
end
local
obj
=
_G
[
frame
:
GetName
()
..
'
ArkBorder
'
]
if
not
obj
then
return
end
AS
:
Kill
(
obj
)
hooksecurefunc
(
ArkInventory
,
'Frame_Item_Update_Border'
,
function
(
frame
)
if
not
ArkInventory
.
ValidFrame
(
frame
,
true
)
then
return
end
local
obj
=
frame
.
ArkBorder
if
not
obj
then
return
end
AS
:
Kill
(
obj
)
AS
:
SetTemplate
(
frame
)
frame
:
SetBackdropBorderColor
(
obj
:
GetBackdropBorderColor
())
frame
:
SetBackdropColor
(
unpack
(
AS
.
BorderColor
))
AS
:
SkinTexture
(
frame
.
icon
)
frame
:
SetNormalTexture
(
nil
)
if
_G
[
frame
:
GetName
()]
==
ARKINV_Frame1ChangerWindowBag1
then
ARKINV_Frame1ChangerWindowBag1IconTexture
:
SetTexture
(
'interface\\icons\\inv_misc_bag_07_green'
)
AS
:
SkinTexture
(
ARKINV_Frame1ChangerWindowBag1IconTexture
)
AS
:
SetInside
(
ARKINV_Frame1ChangerWindowBag1IconTexture
)
end
end
)
AS
:
SetTemplate
(
frame
)
frame
:
SetBackdropBorderColor
(
obj
:
GetBackdropBorderColor
())
frame
:
SetBackdropColor
(
unpack
(
AS
.
BorderColor
))
AS
:
SkinTexture
(
frame
.
icon
)
frame
:
SetNormalTexture
(
nil
)
if
_G
[
frame
:
GetName
()]
==
ARKINV_Frame1ChangerWindowBag1
then
ARKINV_Frame1ChangerWindowBag1IconTexture
:
SetTexture
(
'interface\\icons\\inv_misc_bag_07_green'
)
AS
:
SkinTexture
(
ARKINV_Frame1ChangerWindowBag1IconTexture
)
AS
:
SetInside
(
ARKINV_Frame1ChangerWindowBag1IconTexture
)
end
end
)
hooksecurefunc
(
ArkInventory
,
'Frame_Border_Paint'
,
function
(
border
,
slot
,
file
,
size
,
offset
,
scale
,
r
,
g
,
b
,
a
)
local
parent
=
border
:
GetParent
()
parent
:
SetBackdropBorderColor
(
r
,
g
,
b
,
a
)
parent
:
SetBackdropColor
(
unpack
(
AS
.
BackdropColor
))
end
)
hooksecurefunc
(
ArkInventory
,
'Frame_Border_Paint'
,
function
(
border
,
slot
,
file
,
size
,
offset
,
scale
,
r
,
g
,
b
,
a
)
local
parent
=
border
:
GetParent
()
parent
:
SetBackdropBorderColor
(
r
,
g
,
b
,
a
)
parent
:
SetBackdropColor
(
unpack
(
AS
.
BackdropColor
))
end
)
if
AS
:
CheckAddOn
(
'ElvUI'
)
then
hooksecurefunc
(
ArkInventory
,
'Frame_Item_Update_Clickable'
,
function
(
frame
)
local
obj
=
_G
[
frame
:
GetName
()
..
ArkInventory
.
Const
.
Frame
.
Cooldown
.
Name
]
if
obj
then
ElvUI
[
1
]:
RegisterCooldown
(
obj
)
end
end
)
end
if
AS
:
CheckAddOn
(
'ElvUI'
)
then
hooksecurefunc
(
ArkInventory
,
'Frame_Item_Update_Clickable'
,
function
(
frame
)
local
obj
=
_G
[
frame
:
GetName
()
..
ArkInventory
.
Const
.
Frame
.
Cooldown
.
Name
]
if
obj
then
ElvUI
[
1
]:
RegisterCooldown
(
obj
)
end
end
)
end
end
AS
:
RegisterSkin
(
'ArkInventory'
,
AS
.
ArkInventory
)
AS
:
RegisterSkin
(
'ArkInventory'
,
AS
.
ArkInventory
)
\ No newline at end of file
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment