diff --git a/MCServer/Plugins/Core/listgroups.lua b/MCServer/Plugins/Core/listgroups.lua
new file mode 100644
index 000000000..da9a6ce67
--- /dev/null
+++ b/MCServer/Plugins/Core/listgroups.lua
@@ -0,0 +1,14 @@
+function HandleListGroupsCommand( Split, Player )
+	local GroupsIni = cIniFile("groups.ini")
+	if GroupsIni:ReadFile() == false then
+		Player:SendMessage( cChatColor.Green .. "No groups found" )
+	end
+	Number = GroupsIni:NumKeys()
+	Groups = {}
+	for i=0, Number do
+		table.insert( Groups, GroupsIni:KeyName(i) )
+	end
+	Player:SendMessage( cChatColor.Green .. "Groups:" )
+	Player:SendMessage( cChatColor.Green .. table.concat( Groups, ", " ) )
+	return true
+end
\ No newline at end of file