diff --git a/stepmania/src/GameConstantsAndTypes.cpp b/stepmania/src/GameConstantsAndTypes.cpp
index 83d31789a5..698fd80edd 100644
--- a/stepmania/src/GameConstantsAndTypes.cpp
+++ b/stepmania/src/GameConstantsAndTypes.cpp
@@ -31,7 +31,18 @@ static const CString RadarCategoryNames[] = {
 };
 XToString( RadarCategory, NUM_RADAR_CATEGORIES );
 XToThemedString( RadarCategory, NUM_RADAR_CATEGORIES );
+LuaFunction( RadarCategoryToThemedString, RadarCategoryToThemedString((RadarCategory) IArg(1)) );
 
+static void LuaRadarCategory(lua_State* L)
+{
+	FOREACH_RadarCategory( rc )
+	{
+		CString s = RadarCategoryToString( rc );
+		s.MakeUpper();
+		LUA->SetGlobal( "RADAR_CATEGORY_"+s, rc );
+	}
+}
+REGISTER_WITH_LUA_FUNCTION( LuaRadarCategory );
 
 static void LuaStepsType(lua_State* L)
 {
@@ -206,6 +217,7 @@ TapNoteScore StringToTapNoteScore( const CString &s )
 	return TNS_INVALID;
 }
 XToThemedString( TapNoteScore, NUM_TapNoteScore );
+LuaFunction( TapNoteScoreToThemedString, TapNoteScoreToThemedString((TapNoteScore) IArg(1)) );
 static void LuaTapNoteScores( lua_State* L )
 {
 	FOREACH_TapNoteScore( i )