diff --git a/Themes/Til Death/BGAnimations/ScreenSelectMusic decorations/wifeTwirl.lua b/Themes/Til Death/BGAnimations/ScreenSelectMusic decorations/wifeTwirl.lua
index e7df4473a9..9d660a82f2 100644
--- a/Themes/Til Death/BGAnimations/ScreenSelectMusic decorations/wifeTwirl.lua	
+++ b/Themes/Til Death/BGAnimations/ScreenSelectMusic decorations/wifeTwirl.lua	
@@ -405,6 +405,24 @@ t[#t+1] = LoadFont("Common Large") .. {
 	RefreshChartInfoMessageCommand=cmd(queuecommand,"Set"),
 }
 
+t[#t+1] = Def.Quad{
+	InitCommand=cmd(xy,frameX+135,frameY+45;zoomto,50,40;diffusealpha,0),
+	MouseLeftClickMessageCommand=function(self)
+		local sg = profile:GetEasiestGoalForChartAndRate(steps:GetChartKey(), getCurRateValue())
+		if sg and isOver(self) and update then
+			sg:SetPercent(sg:GetPercent()+0.01)
+			MESSAGEMAN:Broadcast("RefreshChartInfo")
+		end
+	end,
+	MouseRightClickMessageCommand=function(self)
+		local sg = profile:GetEasiestGoalForChartAndRate(steps:GetChartKey(), getCurRateValue())
+		if sg and isOver(self) and update then
+			sg:SetPercent(sg:GetPercent()-0.01)
+			MESSAGEMAN:Broadcast("RefreshChartInfo")
+		end
+	end
+}
+
 -- perhaps need this perhaps not
 -- t[#t+1] = LoadFont("Common Large") .. {
 	-- InitCommand=cmd(xy,frameX+135,frameY+65;zoom,0.3;halign,0.5;valign,1),