From 79bc414b307790b916f0e42c2d4674abf11d9bbb Mon Sep 17 00:00:00 2001 From: Nickito12 Date: Sun, 29 Jan 2017 13:00:48 -0300 Subject: [PATCH] Add files via upload --- .../Til Death/BGAnimations/_mouseselect.lua | 62 +++++++++++++++++++ 1 file changed, 62 insertions(+) create mode 100644 Themes/Til Death/BGAnimations/_mouseselect.lua diff --git a/Themes/Til Death/BGAnimations/_mouseselect.lua b/Themes/Til Death/BGAnimations/_mouseselect.lua new file mode 100644 index 0000000000..957abfe98c --- /dev/null +++ b/Themes/Til Death/BGAnimations/_mouseselect.lua @@ -0,0 +1,62 @@ + +local whee +local top +local function mouseInput(event) + if event.DeviceInput.button == "DeviceButton_left mouse button" and event.type == "InputEventType_FirstPress"then + if INPUTFILTER:GetMouseX() > 500 then + local n=0 + local m=1 + if INPUTFILTER:GetMouseY() > 220 and INPUTFILTER:GetMouseY() < 256 then + m=0 + elseif INPUTFILTER:GetMouseY() > 256 and INPUTFILTER:GetMouseY() < 292 then + m=1 + n=1 + elseif INPUTFILTER:GetMouseY() > 292 and INPUTFILTER:GetMouseY() < 328 then + m=1 + n=2 + elseif INPUTFILTER:GetMouseY() > 328 and INPUTFILTER:GetMouseY() < 364 then + m=1 + n=3 + elseif INPUTFILTER:GetMouseY() > 364 and INPUTFILTER:GetMouseY() < 400 then + m=1 + n=4 + elseif INPUTFILTER:GetMouseY() > 400 and INPUTFILTER:GetMouseY() < 436 then + m=1 + n=5 + elseif INPUTFILTER:GetMouseY() > 184 and INPUTFILTER:GetMouseY() < 220 then + m=-1 + n=1 + elseif INPUTFILTER:GetMouseY() > 148 and INPUTFILTER:GetMouseY() < 184 then + m=-1 + n=2 + elseif INPUTFILTER:GetMouseY() > 112 and INPUTFILTER:GetMouseY() < 148 then + m=-1 + n=3 + elseif INPUTFILTER:GetMouseY() > 76 and INPUTFILTER:GetMouseY() < 112 then + m=-1 + n=4 + elseif INPUTFILTER:GetMouseY() > 40 and INPUTFILTER:GetMouseY() <76 then + m=-1 + n=5 + end + for i=1,n do + whee:Move(m) + whee:Move(0) + end + if m==0 then + top:SelectCurrent(0) + end + end + end +end + + +local t = Def.ActorFrame{ + BeginCommand=function(self) + top = SCREENMAN:GetTopScreen() + whee = top:GetMusicWheel() + top:AddInputCallback(mouseInput) + end, +} + +return t \ No newline at end of file