diff --git a/Themes/_fallback/Scripts/03 HSV.lua b/Themes/_fallback/Scripts/03 HSV.lua
index a4b56baa5d..c2fd988ea7 100644
--- a/Themes/_fallback/Scripts/03 HSV.lua	
+++ b/Themes/_fallback/Scripts/03 HSV.lua	
@@ -246,4 +246,16 @@ function Hue(color,newHue)
 	end
 	c.Hue = newHue
 	return HSVToColor(c)
+end;
+
+function Alpha(color,percent)
+	local c = ColorToHSV(color);
+	-- error checking
+	if percent < 0 then
+		percent = 0.0;
+	elseif percent > 1 then
+		percent = 1.0;
+	end;
+	c.Alpha = percent;
+	return HSVToColor(c);
 end;
\ No newline at end of file