From 2ccc87286cbdd2058fec5888e5cb3c9c11786b77 Mon Sep 17 00:00:00 2001
From: "madmaxoft@gmail.com"
 <madmaxoft@gmail.com@0a769ca7-a7f5-676a-18bf-c427514a06d6>
Date: Wed, 30 May 2012 21:31:42 +0000
Subject: My first Lua plugin, yay! sTick allows a player to force a blocktick
 on any block by rightclicking it with a stick.

git-svn-id: http://mc-server.googlecode.com/svn/trunk@529 0a769ca7-a7f5-676a-18bf-c427514a06d6
---
 Plugins/sTick/main.lua         | 20 ++++++++++++++++++++
 Plugins/sTick/onblockplace.lua | 18 ++++++++++++++++++
 2 files changed, 38 insertions(+)
 create mode 100644 Plugins/sTick/main.lua
 create mode 100644 Plugins/sTick/onblockplace.lua

diff --git a/Plugins/sTick/main.lua b/Plugins/sTick/main.lua
new file mode 100644
index 000000000..16ac7167f
--- /dev/null
+++ b/Plugins/sTick/main.lua
@@ -0,0 +1,20 @@
+
+-- Global variables
+PLUGIN = {}	-- Reference to own plugin object
+
+
+
+
+
+function Initialize( Plugin )
+	PLUGIN = Plugin
+	
+	Plugin:SetName( "sTick" )
+	Plugin:SetVersion( 8 )
+	
+	PluginManager = cRoot:Get():GetPluginManager()
+	PluginManager:AddHook( Plugin, cPluginManager.E_PLUGIN_BLOCK_PLACE )
+	
+	LOG( "Initialized " .. Plugin:GetName() .. " v." .. Plugin:GetVersion() )
+	return true
+end
\ No newline at end of file
diff --git a/Plugins/sTick/onblockplace.lua b/Plugins/sTick/onblockplace.lua
new file mode 100644
index 000000000..0216b580e
--- /dev/null
+++ b/Plugins/sTick/onblockplace.lua
@@ -0,0 +1,18 @@
+function OnBlockPlace( Block, Player )
+
+	-- dont check if the direction is in the air
+	if Block.m_Direction == -1 then
+		return false
+	end
+
+	if (Block.m_ItemType ~= 280) then -- not a Stick of Ticking
+		return false
+	end
+
+	LOG("Setting next block tick to {" .. Block.m_PosX .. ", " .. Block.m_PosY .. ", " .. Block.m_PosZ .. "}")
+
+	Player:GetWorld():SetNextBlockTick(Block.m_PosX, Block.m_PosY, Block.m_PosZ);
+
+	return true
+
+end
\ No newline at end of file
-- 
cgit v1.2.3