From 983d87e44356c4cfc8f8908ec365006323a4dbe0 Mon Sep 17 00:00:00 2001
From: Alexander Harkness <bearbin@gmail.com>
Date: Sat, 27 Jul 2013 16:24:03 +0100
Subject: Added correct core plugin

---
 MCServer/Plugins/Core/portal-worlds.lua | 36 +++++++++++++++++++++++++++++++++
 1 file changed, 36 insertions(+)
 create mode 100644 MCServer/Plugins/Core/portal-worlds.lua

(limited to 'MCServer/Plugins/Core/portal-worlds.lua')

diff --git a/MCServer/Plugins/Core/portal-worlds.lua b/MCServer/Plugins/Core/portal-worlds.lua
new file mode 100644
index 000000000..136edb82e
--- /dev/null
+++ b/MCServer/Plugins/Core/portal-worlds.lua
@@ -0,0 +1,36 @@
+function HandlePortalCommand( Split, Player )
+	if( #Split ~= 2 ) then
+		Player:SendMessage( cChatColor.Green .. "Usage: /gotoworld [WorldName]" )
+		return true	
+	end
+	
+	if( Player:MoveToWorld(Split[2]) == false ) then
+		Player:SendMessage( cChatColor.Green .. "Could not move to world '" .. Split[2] .. "'!" )
+		return true
+	end
+	
+	
+	Player:SendMessage( cChatColor.Green .. "Moved successfully to '" .. Split[2] .. "'! :D" )
+	return true
+end
+
+function HandleWorldsCommand( 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