From beb36ee1496fa54ae9a0abcef4251d71512d48c5 Mon Sep 17 00:00:00 2001 From: "nielsbreu@gmail.com" Date: Fri, 28 Jun 2013 10:18:55 +0000 Subject: Added /listworlds command and fixed bug in /listgroups where you have an extra comma at the end. git-svn-id: http://mc-server.googlecode.com/svn/trunk@1629 0a769ca7-a7f5-676a-18bf-c427514a06d6 --- MCServer/Plugins/Core/listworlds.lua | 20 ++++++++++++++++++++ 1 file changed, 20 insertions(+) create mode 100644 MCServer/Plugins/Core/listworlds.lua (limited to 'MCServer/Plugins/Core/listworlds.lua') diff --git a/MCServer/Plugins/Core/listworlds.lua b/MCServer/Plugins/Core/listworlds.lua new file mode 100644 index 000000000..753345426 --- /dev/null +++ b/MCServer/Plugins/Core/listworlds.lua @@ -0,0 +1,20 @@ +function HandleListWorldsCommand( Split, Player ) + local SettingsIni = cIniFile("settings.ini") + if SettingsIni:ReadFile() == false then + Player:SendMessage( cChatColor.Green .. "No worlds found" ) + end + Number = SettingsIni:NumValues("Worlds") - 1 + Worlds = {} + for i=0, SettingsIni:GetNumKeys() - 1 do + if SettingsIni:GetKeyName(i) == "Worlds" then + Key = i + break + end + end + for i=0, Number do + table.insert( Worlds, SettingsIni:GetValue( Key, i) ) + end + Player:SendMessage( cChatColor.Green .. "Worlds:" ) + Player:SendMessage( cChatColor.Green .. table.concat( Worlds, ", " ) ) + return true +end \ No newline at end of file -- cgit v1.2.3