hook.Add callchain thingy

hook_ex.lua

H=NewChain(
		function(chain,...) 
			if not chain[2] then
				return hook.Run(chain[1],...) -- call hook
			elseif chain[2] then
				return hook.GetTable()[chain[1]][chain[2]](...) -- call single hook??
			end
		end,
		function(chain,val)
			if isfunction(val) then
				hook.Add(chain[1],chain[2],val)
			else
				hook.Remove(chain[1],chain[2])
			end
		end)