diff --git a/scripts/s_vamp_plugin_index.lua b/scripts/s_vamp_plugin_index.lua
new file mode 100644
index 0000000000..3c2965cd7e
--- /dev/null
+++ b/scripts/s_vamp_plugin_index.lua
@@ -0,0 +1,41 @@
+ardour { ["type"] = "Snippet", name = "Vamp Plugin List" }
+function factory () return function ()
+
+	local plugins = ARDOUR.LuaAPI.Vamp.list_plugins ();
+	for id in plugins:iter () do
+		local vamp = ARDOUR.LuaAPI.Vamp(id, Session:nominal_frame_rate())
+		local vp = vamp:plugin ()
+		print (" --- VAMP Plugin ---")
+		print ("Id:", vp:getIdentifier ())
+		print ("Name:", vp:getName ())
+		print ("Description:", vp:getDescription ())
+
+		local progs = vp:getPrograms();
+		if not progs:empty () then
+			print ("Preset(s):")
+			for p in progs:iter () do
+				print (" *", p)
+			end
+		end
+
+		local params = vp:getParameterDescriptors ()
+		if not params:empty () then
+			print ("Parameters(s):")
+			for p in params:iter () do
+				-- http://manual.ardour.org/lua-scripting/class_reference/#Vamp:PluginBase:ParameterDescriptor
+				print (" * Id:", p.identifier, "Name:", p.name, "Desc:", p.description)
+			end
+		end
+
+		local feats = vp:getOutputDescriptors ()
+		if not feats:empty () then
+			print ("Output(s):")
+			for p in feats:iter () do
+				-- http://manual.ardour.org/lua-scripting/class_reference/#Vamp:Plugin:OutputDescriptor
+				print (" * Id:", p.identifier, "Name:", p.name, "Desc:", p.description)
+			end
+		end
+
+	end
+end end
+