From de293999872346271cdfb5dbecbad7f77362b83b Mon Sep 17 00:00:00 2001
From: faketruth <faketruth@0a769ca7-a7f5-676a-18bf-c427514a06d6>
Date: Fri, 27 Jan 2012 23:47:32 +0000
Subject: Converted entire Core plugin including WebAdmin interface to new
 plugin method/system/thingy and sexyfied it. Made some changes to WebAdmin to
 make the new plugins work Old plugins still work like they're supposed to Not
 all hooks have been programmed for the new plugins yet, this still needs to
 be done

git-svn-id: http://mc-server.googlecode.com/svn/trunk@182 0a769ca7-a7f5-676a-18bf-c427514a06d6
---
 Plugins/Core/help.lua | 54 +++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 54 insertions(+)
 create mode 100644 Plugins/Core/help.lua

(limited to 'Plugins/Core/help.lua')

diff --git a/Plugins/Core/help.lua b/Plugins/Core/help.lua
new file mode 100644
index 000000000..02ef25ebd
--- /dev/null
+++ b/Plugins/Core/help.lua
@@ -0,0 +1,54 @@
+function HandleHelpCommand( Split, Player )
+	local PluginManager = cRoot:Get():GetPluginManager()
+	
+	local LinesPerPage = 9
+	local CurrentPage = 1
+	local CurrentLine = 0
+	
+	if( #Split == 2 ) then
+		CurrentPage = tonumber(Split[2])
+	end
+	
+	local Pages = {}
+
+	local PluginList = PluginManager:GetAllPlugins()
+	for i, Plugin in ipairs( PluginList ) do
+		local Commands = Plugin:GetCommands()
+		for i, v in ipairs( Commands ) do
+			if( Player:HasPermission( v.Permission ) ) then
+				local PageNum = math.floor( CurrentLine/LinesPerPage )+1
+				if( Pages[ PageNum ] == nil ) then Pages[ PageNum ] = {} end -- Create page
+				
+				if( Pages[ PageNum ].ShownName ~= Plugin:GetName() and SHOW_PLUGIN_NAMES == true ) then
+					if( CurrentLine == LinesPerPage * PageNum -1 ) then	-- Don't add if it's the last line of the page, it looks silly
+						-- Add it to the next page instead
+						CurrentLine = CurrentLine+1
+						PageNum = math.floor( CurrentLine/LinesPerPage )+1
+						
+						if( Pages[ PageNum ] == nil ) then Pages[ PageNum ] = {} end -- Create page
+						table.insert( Pages[ PageNum ], cChatColor.Gold .. Plugin:GetName() )
+					else
+						Pages[ PageNum ].ShownName = Plugin:GetName()
+						table.insert( Pages[ PageNum ], cChatColor.Gold .. Plugin:GetName() )
+					end
+					CurrentLine = CurrentLine+1
+					PageNum = math.floor( CurrentLine/LinesPerPage )+1
+					if( Pages[ PageNum ] == nil ) then Pages[ PageNum ] = {} end -- Create page
+				end
+				local Message = cChatColor.Blue .. v.Command .. v.Description;
+				table.insert( Pages[ PageNum ], Message )
+				CurrentLine = CurrentLine+1
+			end
+		end
+	end
+	
+	Player:SendMessage( cChatColor.Purple .. "- All commands - " .. cChatColor.Gold .. "[Page " .. (CurrentPage) .."/"..#Pages.."]" )
+	
+	if( Pages[CurrentPage] ~= nil ) then
+		for i, v in ipairs(Pages[CurrentPage]) do
+			Player:SendMessage( v )
+		end
+	end
+	
+	return true
+end
\ No newline at end of file
-- 
cgit v1.2.3