Added the new core as a subtree.

Core/rank-groups.lua

@@ -0,0 +1,48 @@
+function HandleRankCommand( Split, Player )
+	if Split[2] == nil or Split[3] == nil then
+		Player:SendMessage(cChatColor.Rose .. "Usage: /rank [Player] [Group]")
+		return true
+	end
+	local GroupsIni = cIniFile("groups.ini")
+	if( GroupsIni:ReadFile() == false ) then
+		LOG("Could not read groups.ini!")
+	end
+	if GroupsIni:FindKey(Split[3]) == -1 then
+		Player:SendMessage(cChatColor.Rose .. "Group does not exist")
+		return true
+	end
+	local UsersIni = cIniFile("users.ini")
+	if( UsersIni:ReadFile() == false ) then
+		LOG("Could not read users.ini!")
+	end
+	UsersIni:DeleteKey(Split[2])
+	UsersIni:GetValueSet(Split[2], "Groups", Split[3])
+	UsersIni:WriteFile()
+	local loopPlayers = function( Player )
+		if Player:GetName() == Split[2] then
+			Player:SendMessage( cChatColor.Green .. "You were moved to group " .. Split[3] )
+			Player:LoadPermissionsFromDisk()
+		end
+	end
+	local loopWorlds = function ( World )
+		World:ForEachPlayer( loopPlayers )
+	end
+	cRoot:Get():ForEachWorld( loopWorlds )
+	Player:SendMessage(cChatColor.Green .. "Player " .. Split[2] .. " Was moved to " .. Split[3])
+	return true
+end
+
+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() - 1
+	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